通达信龙抬头主图/选股预警精准波段起涨点源码

　　VAR0:=IF(DATE<=1261231,1,0);

　　BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;

　　IF(VAR0=1,BBI,DRAWNULL),COLORYELLOW,LINETHICK5;

　　IF(CLOSE>BBI AND VAR0=1,BBI,DRAWNULL),COLORRED,LINETHICK5;

　　IF(CLOSE<BBI AND VAR0=1,BBI,DRAWNULL),COLORGREEN,LINETHICK5;

　　DIF:=EMA(CLOSE,10)-EMA(CLOSE,33);

　　DEA:=EMA(DIF,10);

　　VAR1:=DIF-DEA;

　　MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);

　　HD :=HIGH-REF(HIGH,1);

　　LD :=REF(LOW,1)-LOW;

　　DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);

　　DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);

　　PDI:=DMP*100/MTR;

　　MDI:=DMM*100/MTR;

　　ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);

　　ADXR:=EXPMEMA(ADX,6);

　　VAR2:=PDI-MDI;

　　VAR3:=ADX-ADXR;

　　ENTER:=TFILTER(COUNT(CROSS(CLOSE,BBI),10)>0 AND VAR1>0 AND VAR2>0 AND VAR3>0 AND VAR0=1,COUNT(CROSS(BBI,CLOSE),10)>0 AND VAR1<0 AND VAR2<0 AND VAR0=1,1);

　　EXIT:=TFILTER(COUNT(CROSS(CLOSE,BBI),10)>0 AND VAR1>0 AND VAR2>0 AND VAR3>0 AND VAR0=1,COUNT(CROSS(BBI,CLOSE),10)>0 AND VAR1<0 AND VAR2<0 AND VAR0=1,2);

　　DRAWICON(ENTER,LOW*0.98,5);

　　DRAWTEXT(ENTER,LOW*0.9,'龙抬头'),COLORRED;