黑马启步通达信公式，n合1组合，有源码

{东方求败}

股价:=(H+L+C)/3;

股价运动:=股价,LINETHICK2,COLORBLUE;

运动趋势:=XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(股价,3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3);

良机区1:=运动趋势*0.9;

良机区2:=运动趋势*0.875;

良机区3:=运动趋势*0.85;

涨1:=O<良机区3;

求败1:IF(涨1,0.3,0),COLOR0000FF;

涨2:=L<良机区2 AND 运动趋势>REF(运动趋势,1);

求败2:IF(涨2,0.5,0),COLOR008000;

涨3:=L<良机区3 AND 运动趋势>REF(运动趋势,1);

求败3:IF(涨3,1,0),COLOR00FFFF;

{黑马启动}

VAR6:=REF(LOW,1)*0.83;

VAR7:=LOW*0.1;

VAR8:=(VAR7*VOL+VAR6*(CAPITAL-VOL))/CAPITAL;

VAR9:=EMA(VAR8,60);

VARA:=EMA(VAR6,60);

VARB:=VARA-2;

VARC:=IF(C<=VAR9,VARB,VARA);

{VARD:=MA(C,80)-MA(C,10)/17;}

启动:=FILTER(VARC-VARB=0 AND CROSS((EMA(EMA(EMA(C,2),2),2)-REF(EMA(EMA(EMA(C,2),2),2),1))/REF

(EMA(EMA(EMA(C,2),2),2),1)*100,MA((EMA(EMA(EMA(C,2),2),2)

-REF(EMA(EMA(EMA(C,2),2),2),1))/REF(EMA(EMA(EMA(C,2),2),2),1)*100,3)),4);

马启:IF(启动,1.5,0),COLORFFFFFF;

{理想实现}

VARS2:=IF(MONTH<12,1,1);

VARS3:=(2.28*CLOSE+HIGH+LOW)/4;

VARS4:=LLV(LOW,34);

VARS5:=HHV(HIGH,34);

理想:=EMA((VARS3-VARS4)/(VARS5-VARS4)*100,13)*VARS2,LINETHICK4,COLORRED;

论坛:=EMA(0.667*REF(理想,1)+0.333*理想,2),LINETHICK2,COLORFF9933;

理想实现:(CROSS(理想,论坛) AND 理想<22),LINETHICK2,COLOR0099FF; 

{横盘放量选股}

横盘放量:LAST((H-L)/REF(C,1)<0.1,20,0) AND VOL>REF(VOL,1)*2 AND C>REF(C,1)*1.03

AND "DMI.PDI">"DMI.MDI" AND CROSS("DMI.ADX","DMI.ADXR")

AND"DMI.ADXR">"DMI.MDI" AND "DMI.PDI">"DMI.ADX" AND"KDJ.D">REF("KDJ.D",1);

{STICKLINE(横盘放量,0,0.5,1,0),COLOR000099;}

{笑傲江湖}

DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);  {选股设JC=10即可}

DEA:=EMA(DIFF,9);

MACD:=2*(DIFF-DEA),COLORSTICK;

A:=IF(CROSS(0,DEA),1,0);

A1:=IF(DIFF<0 AND CROSS(DIFF,DEA),1,0);

SS:=IF(A,SUM(A1,0),0);

SSB:=HHV(SS,0);

SSS:=SUM(A1,0);

笑傲江湖:IF(SSS-SSB=2 AND SSS>REF(SSS,1),1.3,0),COLORFFFF00;

{终结者}

X:=1;

LGL:=IF(EMA(C,5)/EMA(EMA(C,9),16)<=0.85 AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND VOL/CAPITAL*100<5,50,0);

WR1:=-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100*X;

WR2:=-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;

WR3:=-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100*X;

BIAS1:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5;

BIAS2:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5;

BIAS3:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;

S1:=(WR1+WR2+WR3+BIAS1+BIAS2+BIAS3)/6*X;

S2:=EMA(S1,3);

S3:=ABS(BIAS1-BIAS3);

SX:=(S1+S3)/2;

XC1:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50;

CCC:=XC1+SX;

ZJZ:=IF( LGL>0 AND CCC<0,200,0)*X;

LXL:=IF(SX<0 AND C=LLV(C,5) AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND 

VOL/CAPITAL*100<5,-50,0);

JBJ:=IF(CCC<0 AND LXL=-50,100,0)*X;

MA3:= MA(C,3);

C0:=REF(C,2)*0.865;

C1:=REF(C,13)*0.772;

BOT:=MIN(C0,C1);

HSL:=100*VOL/CAPITAL*X;

MA13:=MA(C,13)*X;

CXC:=IF((C-BOT)/C<3/100 AND SUM(HSL,5)/5<1.8,1,0);

VMC:=IF(CXC>0 AND (LXL<0 OR LGL>0),100,0);

V满仓:=VMC;

V半仓A:=IF(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902)) OR 

(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND (LXL<0 OR LGL>0)) AND VMC<10 ,50,0) ;

V93:=(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND (LXL<0 OR LGL>0)) ;

V90:=((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902));

V半仓:=V93 OR V90;

XMM87:=V满仓 OR V半仓;

XMM91:=VMC;

G:=MA(CLOSE,80)-MA(CLOSE,10)/3*X;

初级:=IF(XMM87>0,1.5,0),STICK,LINETHICK2;

中级:IF(XMM91>0,1,0),STICK,COLORFF0080;

高级:IF(VMC>0 AND CLOSE<G,1.5,0),STICK,LINETHICK2;

{黑马底}

DIFF1:=EMA(DCLOSE,12)-EMA(DCLOSE,26);

DEA1:=EMA(DIFF1,9),COLORFFFF00;

A01:=BARSLAST(REF(CROSS(DIFF1,DEA1),1));

底背离:=REF(CLOSE,A01+1)>CLOSE AND DIFF1>REF(DIFF1,A01+1) AND CROSS(DIFF1,DEA1);

DEA0:=EMA(DIFF1*100,9);

MACD0:=2*(DIFF1*100-DEA0);

黑马:=(MACD0>REF(MACD0,1)*2.5 AND MACD0>15);

黑马0:(底背离 AND 黑马),COLORFF8000;