通达信【万马奔腾V8】主图与选股指标源码分享

通达信【万马奔腾V8】主图与选股指标源码分享
【万马奔腾V8主图】
VAR1:=MA(C,1);
VAR11:=SMA(SMA(SMA(VAR1,2,1),2,1),2,1);
VAR12:=MA(VAR11,3);
VAR13:=VAR11>VAR12;
VAR14:=VAR11< VAR12;
IF(VAR13,VAR11,DRAWNULL),COLORRED,LINETHICK2;
IF(VAR14,VAR11,DRAWNULL),COLORGREEN,LINETHICK1;
趋势线:HHV(MA(VAR11,1),13),COLORYELLOW,DOTLINE;
HM1:=Abs((3.48*C+H+L)/4-EMA(C,20)/EMA(C,20));
HM2:=DMA((2.15*C+L+H)/4,HM1);
VAR15:EMA(HM2,200)*1.118,LINETHICK2,COLORMAGENTA;
J1:=MA(C,5);
J2:=MA(C,10);
J3:=MA(C,30);
J4:=MA(C,60);
J5:=MA(C,120);
VAR16:=BARSLAST((((crOSS(J2,J1) AND (J2 > J3)) AND (J3 > J4)) AND (J4 > J5)));
VAR17:=REF(HHV(C,200),VAR16);
PT:=REFDATE(VAR17,DATE);
N:=20;
MIDA:=MA(C,N);
VAR21:=POW((C - MIDA),2);
VAR22:=MA(VAR21,N);
VAR23:=SQRT(VAR22);
UPPERA:=(MIDA + (2 * VAR23));
LOWERA:=(MIDA - (2 * VAR23));
VAR18:=MA(C,133),LINETHICK2,COLORC0C0C0;
XX:=HHV(EMA(H,75),100);
VAR19:=IF((XX > REF(XX,1)),XX,DRAWNULL),LINETHICK2,COLORCYAN;
DRAWTEXT(X_XG,L*0.96,' 擒牛指标公式网WWW.CJM99.COM')COLORYELLOW;
VAR110:=EMA(REF(MIDA,1),2),LINETHICK2,COLORFF6EC7;
临界点:IF((VAR110 > VAR18),PT,DRAWNULL),COLORRED,LINETHICK2;
ZF:=(((C - REF(C,1)) / REF(C,1)) * 100);
S1:=(((L > REF(H,1)) OR (ZF > 9.6)) OR (REF(ZF,1) > 9.6));
VAR111:=((CROSS(C,PT) AND (S1 > 0)) * 8);
X_0:=((((MAX((C - (REF(C,1))),0)) / (ABS((C - (REF(C,1)))))) * 100) > 65);
X_1:=X_0 AND (((((EMA(C,5)) * 7) + ((EMA(C,10)) * 3)) / 10) > (EMA(C,13)));
X_2:=X_1 AND ((EMA(C,13)) > (EMA(C,55)));
X_3:=X_2 AND (((MA(C,26)) + (2 * (STD(C,26)))) > (REF(((MA(C,26)) + (2 * (STD(C,26)))),1)));
X_XG:=VAR111 AND X_3;
DRAWTEXT(X_XG,L*0.96,' 万马奔腾')COLORYELLOW;
STICKLINE(X_XG,(C+O)/2,CLOSE,5,0),COLORRED;
STICKLINE(X_XG,O,(C+O)/2,5,0),COLOR0099FF;
STICKLINE(X_XG,CLOSE,OPEN,0,0),COLORWHITE;
DRAWICON(X_XG,L,1);
【万马奔腾V8选股】
J1:=MA(C,5);
J2:=MA(C,10);
J3:=MA(C,30);
J4:=MA(C,60);
J5:=MA(C,120);
VAR6:=BARSLAST((((crOSS(J2,J1) AND (J2 > J3)) AND (J3 > J4)) AND (J4 > J5)));
VAR7:=REF(HHV(C,200),VAR6);
PT:=REFDATE(VAR7,DATE);
ZF:=(C-REF(C,1))/REF(C,1)*100;
S1:=L>REF(H,1) OR ZF>9.6 OR REF(ZF,1)>9.6;
VAR11:=CROSS(C,PT) AND S1;
VAR0:=MAX(C-REF(C,1),0)/Abs(C-REF(C,1))*100>65;
VAR1:=VAR0 AND (EMA(C,5)*7+EMA(C,10)*3)/10>EMA(C,13);
VAR2:=VAR1 AND EMA(C,13)>EMA(C,55);
VAR3:=VAR2 AND (MA(C,26)+2*STD(C,26))>REF(MA(C,26)+2*STD(C,26),1);
选股:VAR11 AND VAR3;