通达信牛熊轨道公式美化版，喜欢就拿去吧

以下是通达信牛熊轨道公式美化版，喜欢就拿去吧

通达信牛熊轨道公式美化版，喜欢就拿去吧

源码

AHC1:=CLOSE*VOL;

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),POINTDOT,COLORWHITE;

内上1:=1.06*AHC22,COLORRED,LINETHICK2;

~:1.03*AHC22,POINTDOT,COLORWHITE;

内下1:=AHC22*0.94,COLORYELLOW,LINETHICK2;

~1:AHC22*0.97,POINTDOT,COLORWHITE;

【黄金线】:IF(内上1>=REF(内上1,1),内上1,DRAWNULL),COLORYELLOW,LINETHICK2;

青粗提示空仓！:IF(内上1<=REF(内上1,1),内上1,DRAWNULL),COLORCYAN,LINETHICK2;

【金底线】:IF(内下1>=REF(内下1,1),内下1,DRAWNULL),COLORYELLOW,LINETHICK2;

绿粗提示空仓！:IF(内下1<=REF(内下1,1),内下1,DRAWNULL),COLORGREEN,LINETHICK2;

内上:=1.06*AHC2;

内下:=AHC2*0.94;

~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;

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

DRAWTEXT(启爆,L,’启爆’),COLORCYAN;

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

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

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

五十成本集中:=(COST(75)-COST(25))/(COST(75)+COST(25))*100;

成本价1:=COST(五十成本集中),COLORGREEN;

五十成本集中1:=100-五十成本集中;

成本价2:=COST(五十成本集中1),COLORBLUE;

顶部突破3:=REF(成本价2,2)>REF(成本价2,1) AND 成本价2>REF(成本价2,1);

顶部突破4:=REF(成本价2,2)=REF(成本价2,1) AND 成本价2>REF(成本价2,1);

DRAWTEXT(顶部突破3 OR 顶部突破4 ,L*0.99,’跃’),COLORGREEN;