牵牛花

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;

蓝柱:=