通达信高低筹码集中度选股指标公式源码

通达信高低筹码集中度选股指标公式源码

源码正文：

stICKLINE(C>0,60,60,10,0),COLORGRAY{XG51};
STICKLINE(C>0,40,40,10,0),COLORFAABEC{XG51};
STICKLINE(C>0,20,20,10,0),COLORBROWN{XG51};
wr:=ema(c,5){XG51};
SR:=Ema(c,13){XG51};
YX:=EMA(c,21){XG51};
jX:=EMA(c,62){XG51};
XCB:=COST(6.18){XG51};
CB0:=COST(38.2){XG51};
CB:=COST(61.8){XG51};
CBZ:=(CB+CB0)/2{XG51};
DCB:=COST(93.82){XG51};
ZCB:=(XCB+DCB)/2{XG51};
LSCB:=(cb+dcb)/2{XG51};
ZCCB:=(cb0+xcb)/2{XG51};
DWCM:(cb0-xcb)/(DCB-XCB)*100,COLORCYAN{XG51};
GWCM:(Dcb-cb)/(DCB-XCB)*100,COLORLIMAGENTA{XG51};
zwCM:=(cb-cb0)/(LSCB-ZCCB)*100,COLOR00CCCC{XG51};
CMXG:REF(LLV(DWCM,54),1),DOTLINE,COLORAAAA00{XG51};
CMSG:REF(HHV(GWCM,54),1),DOTLINE,COLORRED{XG51};
QD:=MAX(WR,MAX(JX,YX)){XG51};
QX:=MIN(WR,MIN(JX,YX)){XG51};
粘合:=(QD-QX)/((qd+qx)/2)*100{XG51};
集中:=(DCB-XCB)/zcb*100{XG51};
主力轨迹:SQRT(集中*粘合*2),COLOR00CCCC{XG51};
IF(主力轨迹>20,主力轨迹,DRAWNULL),COLOR00CCCC,LINETHICK2{XG51};
IF(主力轨迹>40,主力轨迹,DRAWNULL),COLOR7F00FF,LINETHICK2{X!G.5_1!C!N!{};