以下是通达信牛熊轨道公式美化版，喜欢就拿去吧
通达信牛熊轨道公式美化版，喜欢就拿去吧
源码
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;
{股资源提供 www.guziyuan.cn}
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;
