通达信百发百中选股和龙抬头选股公式

文件里是两个选股指标送给需要的：
 
龙抬头：
 

VAR100:=IF(DATE<1530730 AND DATE>900101,1,0);
 A2:=((EMA(CLOSE,12)) - (EMA(CLOSE,26))) * 10;
 A3:=EMA(A2,27);
 A4:=2 * (A2 - A3);
 A5:=((CLOSE - (LLV(LOW,9))) / ((HHV(HIGH,9)) - (LLV(LOW,9)))) * 100;
 A6:=SMA(A5,3,1)*VAR100;
 A7:=SMA(A6,3,1)*VAR100;
 A8:=(3 * A6) - (2 * A7)*VAR100;
 A9:=((MA(CLOSE,3)))*VAR100;
 A10:=MA(CLOSE,5)*VAR100;
 A11:=MA(CLOSE,10)*VAR100;
 A12:=((MA(CLOSE,13)));
 A13:=MA(CLOSE,30)*VAR100;
 A14:=MA(CLOSE,34)*VAR100;
 A15:=MA(CLOSE,55)*VAR100;
 A16:=MA(CLOSE,60)*VAR100;
 A17:=MA(CLOSE,90)*VAR100;
 A26:=((CLOSE - A17) / A17) * 100;
 TYP := (HIGH + LOW + CLOSE)/3;
 CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
 A50:=(REF(CCI,1)) > (-180);
 RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 J:=3*K-2*D;
 A65:=(CROSS(K,D)) * 60;
 A96:=AMOUNT / VOL;
 A97:=EMA(((WINNER((CLOSE * 1.1)) - WINNER((CLOSE * 0.9))) * 80),5);
 A98:=VOL * CLOSE;
 A99:=(EMA(A98,5)) / (EMA(VOL,5));
 A100:=((CLOSE - A99) / A99) * 100;
 A101:=A96 / 100;
 A102:=MA(A101,5);
 A103:=MA(A101,20);
 A104:=MA(A101,30);
 A105:=MA(CLOSE,27);
 A106:=((CLOSE - A105) / A105) * 100;
 A107:=(MA(A106,3));
 A149:=BARSLAST(((CROSS(-10,A107)) = 1));
 A151:=((A107 < -10) AND (A149 > 3));
 安全:=(((IF(A151,A107,0)) < 0) * -10),COLORGREEN;
 龙抬头:((((((A65 AND 安全) AND ((A6 - A7) > 1.5)) AND (OPEN != HIGH)) AND (A26 < -10)) OR (安全 AND (CROSS(A6,A7)))) * 10)*VAR100;

 百发百中：
 

VAR1:=C/MA(C,20)*100<80;VAR2:=C/MA(C,40)*100<78;
 VAR3:=C/MA(C,60)*100<72;
 VAR4:=H>L*1.051;
 VAR5:=VAR4 AND COUNT(VAR4,5)>1;
VAR5 AND (VAR1 OR VAR2 OR VAR3);