通达信抓住疯牛选股指标(源码)

VAR1:=1;
VAR2:=EMA(CLOSE,3);
XA1:=VAR2;
VAR3:=EMA(CLOSE,10);
VAR4:=EMA(CLOSE,20);
VAR5:=EMA(CLOSE,30)*VAR1;
VAR6:=3*VAR5-2*VAR4;
VAR7:=(3*CLOSE+LOW+OPEN+HIGH)/6;
VAR8:=(20*VAR7+19*REF(VAR7,1)+18*REF(VAR7,2)+17*REF(VAR7,3)+16*REF(VAR7,4)+15*REF(VAR7,5)+14*REF(VAR7,6)+13*REF(VAR7,7)+12*REF(VAR7,8)+11*REF(VAR7,9)+10*REF(VAR7,10)+9*REF(VAR7,11)+8*REF(VAR7,12)+7*REF(VAR7,13)+6*REF(VAR7,14)+5*REF(VAR7,15)+4*REF(VAR7,16)+3*REF(VAR7,17)+2*REF(VAR7,18)+REF(VAR7,20))/210;
VAR9:=(VAR8+VAR6)/2*VAR1;
XA2:=VAR9;
VARA:=EMA(VAR9,13);
XA3:=VARA;
XA4:=MA(VAR3,18);
VARB:=IF((ABS(XA3-XA2)+ABS(XA4-XA2)+ABS(XA3-XA4))/3/((XA1+XA2+XA3+XA4)/4)*100<2.2 AND CROSS(XA2,XA4),CLOSE,0);
VARC:=IF((ABS(XA4-XA2)+ABS(XA3-XA4))/3/((XA1+XA2+XA3+XA4)/4)*100>3.6 AND CROSS(XA2,XA1) AND XA2>XA3,CLOSE,0);
VARD:=MA(WINNER(CLOSE)*100,30);
信号:VARB=CLOSE AND VARD<61;