通达信突破箱体主图，副图，选股，源码

通达信突破箱体主图，副图，选股，源码

突破箱体
{箱体888}
DF:=(C-REF(C,1))/REF(C,1)*100<-5;
AA:=BARSLAST(DF);
箱体:REF(C,AA+1);
突破箱体:CROSS(C,REF(C,AA+1)),COLORRED,NODRAW;

箱顶:DRAWLINE(DF,O,REF(DF,1),REF(O,1),1),COLORMAGENTA LINETHICK2;
箱底:LLV(MIN(L,REF(L,AA)),AA),COLORCYAN,LINETHICK2;
DRAWTEXT(ISLASTBAR,箱顶,' ％箱顶');
DRAWTEXT(ISLASTBAR,箱底,' ％箱底');
DRAWTEXT(ISLASTBAR,箱体,' ％箱体 ');
DRAWICON(突破箱体,箱底,25);

{箱体818}
DF:=(C-REF(C,1))/REF(C,1)*100<-5;
AA:BARSLAST(DF);
突破:CROSS(C,REF(C,AA+1));
当日跌幅:(REF(C,AA)-REF(C,AA+1))/REF(C,AA+1)*100,NODRAW;

XG:=突破 AND COUNT(突破=1,15)>1;
突破箱体:20*XG,COLORRED;

{突破箱体选股}
DF:=(C-REF(C,1))/REF(C,1)*100<-5;
AA:=BARSLAST(DF);
突破:=CROSS(C,REF(C,AA+1));
XG:=突破 AND COUNT(突破,15)>1;
突破箱体:20*XG,COLORRED;