通达信柱状换手率未加密选股指标公式源码

源码正文：

成交:=vol,COLORFFFF00,LINETHICK0{XG51};
BB:=CAPITAL{XG51};
换手:成交*100/BB,LINETHICK0{XG51};
今日换手:换手,LINETHICK0{XG51};
HS:SUM(VOL,0)/CAPITAL,LINETHICK0{XG51};
换手次数:FLOOR(HS),LINETHICK0{XG51};
BBB:=IF(换手次数>0,换手次数,0){XG51};
BBB2:=IF(BBB-REF(BBB,1)>0,BBB,0){XG51};
距上次完全换手:=BArslAst(BBB2),LINETHICK0,COLORCYAN{XG51};
平均换手天:=FLOOR((BARSCOUNT(CLOSE)-距上次完全换手)/换手次数),COLORGREEN,LINETHICK0{XG51};
A2:=成交/CAPITAL*100{XG51};
A3:=A2>3 AND A2<=5{XG51};
A4:=A2>5 AND A2<=7{XG51};
A5:=A2>7 AND A2<=10{XG51};
A6:=A2>10{XG51};
STICKLINE(A2<3 AND C>O,0,A2,3,0),COLORFFFF00{XG51};
STICKLINE(A2<3 AND C<O,0,A2,3,0),COLOR00FF00{XG51};
换手积极:STICKLINE(A3,0,A2,3,0),COLORFF8800{XG51};
换手活跃:STICKLINE(A4,0,A2,3,0),COLORBLUE{XG51};
换手频繁:STICKLINE(A5,0,A2,3,0),COLORCYAN{XG51};
巨幅换手:STICKLINE(A6,0,A2,3,0),COLOR0000FF{XG51};
AA:=A2>1 AND A2<=3{XG51};
STICKLINE(AA,0,A2,3,0),COLORDD7700;BBB3:=CON2STR(REF(BBB,距上次完全换手),0){XG51};
DRAWTEXT(BBB2,A2,'次换手'),COLORFFFFFF{XG51};
DRAWTEXT(换手>REF(换手,1)*2,换手*0.8,'黑马'),COLORRED{XG51};
ma5:MA(换手,5),COLORWHITE,LINETHICK2{XG51};
MA10:MA(换手,10),COLORBLUE,LINETHICK2{X.G_5!1.C.N.{};

源码正文：

difF:ema(CLOSE,12)-Ema(CLOSE,27){XG51};
DEA:EMA(DIFF,9){XG51};
macd:=2*(DIFF-DEA){XG51};
stICKLINE(MacD>=0,MACD,0,4,1),COLORF00FF0{XG51};
STICKLINE(MACD<0,MACD,0,4,1),COLORRED{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4,0 ),COLOR00AAFF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,3.3,0 ),COLOR00BBFF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),COLOR00CCFF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.65,0 ),COLOR00ddfF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.1,0 ),COLOR00EEFF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,0.55,0 ),COLOR00FFFF{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,4 ,0 ),COLOR0000AA{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,3.3 ,0 ),COLOR0011BB{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),COLOR0022CC{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.65 ,0 ),COLOR0033DD{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.1 ,0 ),COLOR0044EE{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,0.55 ,0 ),COLOR0055FF{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,4,0 ),COLORAA00BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,3.3 ,0 ),COLORBB11BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,2.2,0 ),COLORCC22BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.65,0 ),COLORDD33BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.1,0 ),COLOREE44BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,0.55 ,0 ),COLORFF55BB{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,4,0 ),COLORFFAA00{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,3.3 ,0 ),COLORFFBB11{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,2.2,0 ),COLORFFCC22{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1.65 ,0 ),COLORFFDD33{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1.1 ,0 ),COLORFFEE44{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,0.55 ,0 ),COLORFFFF55{XG51};
IF(DIFF<0,DIFF,0),COLORWHITE,LINETHICK1{XG51};
IF(DIFF<0,0,DIFF),COLORBLUE,LINETHICK1{XG51};
IF(DIFF<DEA,DIFF,DEA),COLOR00FF00,LINETHICK1{XG51};
IF(DIFF>DEA,DEA,DEA),COLORRED,LINETHICK1{XG51};
低位金叉:=crOSS(DIFF,DEA) AND DIFF<-0.1{XG51};
STICKLINE(低位金叉,0,-0.18,6,0),COLORBLUE{XG51};
DRAWTEXT(低位金叉,-0.3, '低位金叉'),COLORBLUE{XG51};
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BArslAST(DEA>=0)){XG51};
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
STICKLINE(二次金叉,0,-0.18,6,0),COLORFF00FF{XG51};
DRAWICON(二次金叉,DEA*1.1,13) {XG51};
DRAWTEXT(二次金叉,-0.4, '二次金叉'),COLORFF00FF{XG51};
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA){XG51};
STICKLINE(底背离,0,0.13,6,0),COLOR00FF00{XG51};
DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORWHITE,LINETHICK2{XG51};
DRAWTEXT(底背离,0.2, '底背离'),COLOR00FF00{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF){XG51};
DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORCYAN,LINETHICK2{X!G=5~1!C!N!{};