通达信步入抄底区主图源码

N:=55;

C2:=REF(CLOSE,1);

非ST涨停:=IF((CLOSE-C2)*100/C2>=10-0.01*100/C2,1,0);

NUMBER:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1);

TDXSTEP195:DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.56,0.02,0,NUMBER),COLORWHITE;

TDXSTEP196:DRAWTEXT_FIX(CURRBARSCOUNT=1,0.45,0.02,0,25),COLORCYAN;

M5:EMA(CLOSE,5);

M21:MA(CLOSE,21),COLORCYAN;

DD:=EVERY(CLOSE<MA(CLOSE,21),20);

TDXSTEP197:DRAWICON(DD,M21,37);

HIGHN:=36;

AAB:=REF(HIGH,HIGHN)=HHV(HIGH,2*HIGHN+1);

QY:=BACKSET(AAB,HIGHN+1);

CC2:=FILTER(QY,HIGHN) AND HIGH=HHV(HIGH,HIGHN+1);

DDD:=BARSLAST(CC2);

GDTS:=IF(CC2,CURRBARSCOUNT,0);

DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);

GDCS1:=CONST(DINGBUTS);

DRAWLINE(CURRBARSCOUNT=GDCS1,HIGH,ISLASTBAR,REF(HIGH,GDCS1-1),1),DOTLINE,COLORCYAN;

DRAWTEXT(CURRBARSCOUNT=GDCS1,HIGH*1.01,18),COLORCYAN;