通达信截杀二代及选股指标(源码)

D:=ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.1416;
D1:=ATAN((MA(C,10)/REF(MA(C,10),1)-1)*100)*180/3.1416;
D2:=ATAN((MA(C,20)/REF(MA(C,20),1)-1)*100)*180/3.1416;
D3:=100*(C-LLV(L,34))/(HHV(C,34)-LLV(L,34));
D4:=(AMOUNT/C)/(HHV(AMOUNT,34)/HHV(C,34));
D5:=IF(D4>1,1,D4)*100;
D6:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
D7:=EMA((CLOSE-LLV(LOW,10))/(HHV(HIGH,25)-LLV(LOW,10))*4,4)*30;
D8:=D5>=90 AND D3>80 AND MA(D6,12)<90;
D9:=BARSLAST(CROSS(D7,MA(D6,12)))<40;
D10:=C/REF(C,1)>1+0.01*2;
AA:=IF(D>45 AND D1>55 AND D2>30 ,1,0);
AA1:=D8 AND D9 AND (C>O OR C/REF(C,1)>1.05) AND D10;
BB1:=C/REF(C,1)>1+0.01*9;
BB2:=EXIST(C/REF(C,1)>1+0.01*9,10);
BB3:=C/REF(C,1)>1+0.01*9;
AA2:=IF(BB1+BB2+BB3=3,1,0);
BB4:=EMA(C,50)>EMA(C,240);
BB5:=BARSLAST(CROSS(EMA(C,240),EMA(C,50)));
BB6:=IF(BB4>0,BB5,50);
BB7:=C/LLV(C,BB6)*100-100;
AA3:=HHV(BB7,283);
AA4:=(AA>0 OR AA1>0 OR AA2>0) AND COUNT(AA>0,2)>=1 AND COUNT(AA1>0,3)>=1 AND COUNT(AA2>0,5)>=1 ;
截杀二代:=IF(AA4>0 AND COUNT(AA4>0,10)=1 AND AA3<100 >=1 AND (H-C)/C*100<1 AND REF(C<O,1) ,5,0);
STICKLINE(截杀二代,1,100,1,0),LINETHICK2,COLORRED;
STICKLINE(截杀二代,1,100,0.7,0),LINETHICK2,COLORRED;
STICKLINE(截杀二代,1,100,0.4,0),LINETHICK2,COLORRED;
STICKLINE(截杀二代,1,100,0.1,0),LINETHICK2,COLORRED;

{
选股公式:

D:=ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.1416;
D1:=ATAN((MA(C,10)/REF(MA(C,10),1)-1)*100)*180/3.1416;
D2:=ATAN((MA(C,20)/REF(MA(C,20),1)-1)*100)*180/3.1416;
D3:=100*(C-LLV(L,34))/(HHV(C,34)-LLV(L,34));
D4:=(AMOUNT/C)/(HHV(AMOUNT,34)/HHV(C,34));
D5:=IF(D4>1,1,D4)*100;
D6:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
D7:=EMA((CLOSE-LLV(LOW,10))/(HHV(HIGH,25)-LLV(LOW,10))*4,4)*30;
D8:=D5>=90 AND D3>80 AND MA(D6,12)<90;
D9:=BARSLAST(CROSS(D7,MA(D6,12)))<40;
D10:=C/REF(C,1)>1+0.01*2;
AA:=IF(D>45 AND D1>55 AND D2>30 ,1,0);
AA1:=D8 AND D9 AND (C>O OR C/REF(C,1)>1.05) AND D10;
BB1:=C/REF(C,1)>1+0.01*9;
BB2:=EXIST(C/REF(C,1)>1+0.01*9,10);
BB3:=C/REF(C,1)>1+0.01*9;
AA2:=IF(BB1+BB2+BB3=3,1,0);
BB4:=EMA(C,50)>EMA(C,240);
BB5:=BARSLAST(CROSS(EMA(C,240),EMA(C,50)));
BB6:=IF(BB4>0,BB5,50);
BB7:=C/LLV(C,BB6)*100-100;
AA3:=HHV(BB7,283);
AA4:=(AA>0 OR AA1>0 OR AA2>0) AND COUNT(AA>0,2)>=1 AND COUNT(AA1>0,3)>=1 AND COUNT(AA2>0,5)>=1 ;
截杀二代:IF(AA4>0 AND COUNT(AA4>0,10)=1 AND AA3<100 >=1 AND (H-C)/C*100<1 AND REF(C<O,1) ,5,0);
}