启爆（通达信公式 主图 源码 测试图）

 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;

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;

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

启爆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;

 

202111282162599372.png

 

202111282163183153.png