牵牛花主图（通达信公式 主图 源码 测试图）

 牵牛花

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,DYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;

DRAWTEXT_FIX(ISLASTBAR,0.001,0.050,0,GNBLOCK),COLORCYAN;{概念};

AHC1:=CLOSE*VOL;

AHC11:=EMA((EXPMA(AHC1,1)/EXPMA(VOL,1)+EXPMA(AHC1,2)/EXPMA(VOL,2)+EXPMA(AHC1,4)/EXPMA(VOL,4)+EXPMA(AHC1,6)/EXPMA(VOL,6))/4,7),COLORYELLOW;

AHC2:EMA((EXPMA(AHC1,3)/EXPMA(VOL,3)+EXPMA(AHC1,6)/EXPMA(VOL,6)+EXPMA(AHC1,12)/EXPMA(VOL,12)+EXPMA(AHC1,24)/EXPMA(VOL,24))/4,13),POINTDOT,COLORYELLOW;

AHC22:=EMA((EXPMA(AHC1,27)/EXPMA(VOL,27)+EXPMA(AHC1,54)/EXPMA(VOL,54)+EXPMA(AHC1,108)/EXPMA(VOL,108)+EXPMA(AHC1,316)/EXPMA(VOL,316))/4,13),COLORWHITE,POINTDOT;

顶:=1.3*AHC2;

内上:=1.06*AHC2;

内下:=AHC2*0.94;

底:=AHC2*0.87;

~11:1.03*AHC2,POINTDOT,COLORYELLOW;

~22:0.97*AHC2,POINTDOT,COLORYELLOW;

IF((内上 <= REF(内上,1)),内上,DRAWNULL),COLORGREEN,DOTLINE,LINETHICK2;

IF((内上 >= REF(内上,1)),内上,DRAWNULL),COLORMAGENTA,DOTLINE,LINETHICK2;

IF((内下 <= REF(内下,1)),内下,DRAWNULL),COLORGREEN,DOTLINE,LINETHICK2;

IF((内下 >= REF(内下,1)),内下,DRAWNULL),COLORMAGENTA,DOTLINE,LINETHICK2;

DRAWKLINE(H,O,L,C);

ZT:=REF(C,1)*1.1-C<0.01 AND H=C;

启爆1:=CROSS(C,内上) OR CROSS(C,内下) AND ZT;

DRAWTEXT(启爆1,L*0.98,'启爆'),COLORYELLOW;

STICKLINE(启爆1,C,O,3,1),COLORWHITE;

STICKLINE(启爆1,C,O,1,0),COLORGREEN;

买点:=REF(内下,2)>REF(内下,1) AND 内下>REF(内下,1);

DRAWTEXT(买点,L*0.98,'↖买点')COLORWHITE;

DF:=(C-REF(C,1))/REF(C,1)*100<-5;

DF4:=(C-O)/O*100<-4;

AAAA:=BARSLAST(DF);

突破箱体:=CROSS(C,REF(C,AAAA));

箱顶:DRAWLINE(DF,O,REF(DF,1),REF(O,1),1),COLORMAGENTA,DOTLINE;

箱顶1:DRAWLINE(DF4,O,REF(DF4,1),REF(O,1),1),COLORMAGENTA,DOTLINE;

箱底:=LLV(MIN(L,REF(L,AAAA)),AAAA),COLORCYAN,LINETHICK2;

蓝柱:=REF(DF,2)=1 AND ZT AND CROSS(C,箱顶);

DRAWTEXT(蓝柱,L,'回头牛'),COLORGREEN;

STICKLINE(蓝柱,C,O,3,1),COLORYELLOW;

STICKLINE(蓝柱,C,O,1,0),COLORBLUE;

红柱:=REF(DF,1)=1 AND ZT AND CROSS(C,箱顶);

DRAWTEXT(红柱,L,'反转牛'),COLORRED;

STICKLINE(红柱,C,O,3,1),COLORYELLOW;

STICKLINE(红柱,C,O,1,0),COLORRED;

蓝柱1:=REF(DF4,2)=1 AND ZT AND CROSS(C,箱顶1);

DRAWTEXT(蓝柱1,L,'回头牛'),COLORGREEN;

STICKLINE(蓝柱1,C,O,3,1),COLORYELLOW;

STICKLINE(蓝柱1,C,O,1,0),COLORBLUE;

红柱1:=REF(DF4,1)=1 AND ZT AND CROSS(C,箱顶1);

DRAWTEXT(红柱1,L,'反转牛'),COLORRED;

STICKLINE(红柱1,C,O,3,1),COLORYELLOW;

STICKLINE(红柱1,C,O,1,0),COLORRED;

牛股:=C>内上 AND O>内上;

 STICKLINE( 牛股 AND C>O,C,O,3.2,0),COLOR000066;

 STICKLINE(牛股 AND C>O,C,O,2.0,0),COLOR000077;

 STICKLINE(牛股 AND C>O,C,O,1.5,0),COLOR000099;

 STICKLINE(牛股 AND C>O,C,O,0.9,0),COLOR0000CC;

 STICKLINE(牛股 AND C>O,C,O,0.5,0),COLOR0000FF;

 STICKLINE(牛股 AND C>0,O,C,0,0),COLORFFFFFF;

STICKLINE( 牛股 AND C<O,L,H,0,0),COLOR009900;

STICKLINE( 牛股 AND C<O,C,O,3.2,0),COLOR009900;

STICKLINE( 牛股 AND C<O,C,O,2.5,0),COLOR00BB00;

STICKLINE(牛股 AND C<O,C,O,1.5,0),COLOR00DD00;

STICKLINE(牛股 AND C<O,C,O,0.5,0),COLOR00FF00;

STICKLINE(牛股 AND C<O,C,O,0,0),COLORFFFFFF;

20218143551926442.png