通达信改良筹码分布未加密选股指标公式源码

源码正文：

获利筹码:ema(WINNER(C)*70,5),COLORWHITE{XG51};
亏损筹码:Ema((WINNER(C*1.1)-WINNER(C*0.9))*80,5),COLORF0FF00{XG51};
stICKLINE(亏损筹码>0,0,亏损筹码,5,0),COLOR66FF00{XG51};
STICKLINE(亏损筹码>0,0,亏损筹码*0.9,5,0),COLOR66EE00{XG51};
STICKLINE(亏损筹码>0,0,亏损筹码*0.8,5,0),COLOR66CC00{XG51};
STICKLINE(亏损筹码>0,0,亏损筹码*0.7,5,0),COLOR66AA00{XG51};
STICKLINE(亏损筹码>0,0,亏损筹码*0.6,5,0),COLOR668800{XG51};
STICKLINE(亏损筹码>0,0,亏损筹码*0.5,5,0),COLOR666600{XG51};
STICKLINE(亏损筹码>0,0,亏损筹码*0.4,5,0),COLOR664400{XG51};
STICKLINE(亏损筹码>0,0,亏损筹码*0.35,5,0),COLOR663300{XG51};
STICKLINE(亏损筹码>0,0,亏损筹码*0.3,5,0),COLOR662200{XG51};
STICKLINE(亏损筹码>0,0,亏损筹码*0.25,5,0),COLOR661100{XG51};
STICKLINE(亏损筹码>0,0,亏损筹码*0.2,5,0),COLOR660000{XG51};
主力控筹:IF(获利筹码>亏损筹码,获利筹码*2,获利筹码),,COLORWHITE{XG51};
STICKLINE(主力控筹>0,0,主力控筹,5,0),COLORFFFFFF{XG51};
STICKLINE(主力控筹>0,0,主力控筹*0.9,5,0),COLOREEEEEE{XG51};
STICKLINE(主力控筹>0,0,主力控筹*0.8,5,0),COLORCCCCCC{XG51};
STICKLINE(主力控筹>0,0,主力控筹*0.7,5,0),COLORAAAAAA{XG51};
STICKLINE(主力控筹>0,0,主力控筹*0.6,5,0),COLOR888888{XG51};
STICKLINE(主力控筹>0,0,主力控筹*0.5,5,0),COLOR666666{XG51};
STICKLINE(主力控筹>0,0,主力控筹*0.4,5,0),COLOR444444{XG51};
STICKLINE(主力控筹>0,0,主力控筹*0.3,5,0),COLOR222222{XG51};
STICKLINE(主力控筹>0,0,主力控筹*0.2,5,0),COLOR000000{XG51};
STICKLINE(获利筹码>0,0,获利筹码,5,0),COLORFFFFFF{XG51};
STICKLINE(获利筹码>0,0,获利筹码*0.9,5,0),COLOREEEEFF{XG51};
STICKLINE(获利筹码>0,0,获利筹码*0.8,5,0),COLORCCCCFF{XG51};
STICKLINE(获利筹码>0,0,获利筹码*0.7,5,0),COLORAAAAFF{XG51};
STICKLINE(获利筹码>0,0,获利筹码*0.6,5,0),COLOR8888FF{XG51};
STICKLINE(获利筹码>0,0,获利筹码*0.5,5,0),COLOR6666FF{XG51};
STICKLINE(获利筹码>0,0,获利筹码*0.4,5,0),COLOR4444FF{XG51};
STICKLINE(获利筹码>0,0,获利筹码*0.3,5,0),COLOR2222FF{XG51};
STICKLINE(获利筹码>0,0,获利筹码*0.25,5,0),COLOR1111FF{XG51};
STICKLINE(获利筹码>0,0,获利筹码*0.2,5,0),COLOR0000FF{XG51};
AI:=AMOUNT/vol/100{XG51};
C0:=REF(C,2)*0.865{XG51};
C1:=REF(C,13)*0.772{XG51};
DSY:=100*VOL/CAPITAL{XG51};
抄底:IF((C-MIN(C0,C1))/C<0.1 AND SUM(DSY,5)/5<1.8,100, 0),COLOR00FF00{XG51};
STICKLINE(抄底,0,30,4,0),COLORFFFFFF{XG51};
动态底部:EMA(IF(L<= LLV(L,30),SMA(Abs(L-REF(L,1)),30,1)/SMA(MAX(L-REF(L,1),0),30,1),0),3)*10,STICK,COLORBLUE,LINETHICK2{XG51};
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100){XG51};
STICKLINE(((CLOSE > 0) AND DAY=2),20,121,6,1),COLORFFFFFF{XG51};
STICKLINE(((SAT <= 5) AND DAY=2),21,(20 + SAT),5,0),COLORFFFFFF{XG51};
STICKLINE((((SAT > 5) AND (SAT <= 20)) AND DAY=2),21,(20 + SAT),5,0),COLORCCFF88{XG51};
STICKLINE((((SAT > 20) AND (SAT <= 40)) AND DAY=2),21,(20 + SAT),5,0),COLORFF00FF{XG51};
STICKLINE(((SAT > 40) AND DAY=2),21,(20 + SAT),5,0),COLOR0000FF{XG51};
主力筹码:EMA(WINNER(CLOSE)*70,10),COLORRED{XG51};
散户筹码:EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,10),COLOR00FF00{XG51};
STICKLINE(主力筹码>散户筹码, 主力筹码,散户筹码,6,0),COLORWHITE{XG51};
STICKLINE(主力筹码<散户筹码, 主力筹码,散户筹码,6,0),COLOR00FF00{X~G_5+1~C~N~{};

源码正文：

V1:=dma((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9){XG51};
HY1:=REF(ema(V1,3),1){XG51};
多空趋势:=(ma((CLOSE - HY1) * 28,2))*0.1{XG51};
操盘4:stICKLINE(多空趋势>=0 AND 多空趋势>=REF(多空趋势,1),24,24+多空趋势,1.5,0),COLORWHITE{XG51};
减仓4:STICKLINE(多空趋势>=0 AND 多空趋势< REF(多空趋势,1),24,24+多空趋势,1.5,0), COLORWHITE{XG51};
反弹4:STICKLINE(多空趋势<0 AND 多空趋势>=REF(多空趋势,1),24,22+多空趋势,1.5,0),COLORCYAN{XG51};
寻底4:STICKLINE(多空趋势<0 AND 多空趋势< REF(多空趋势,1),24,24+多空趋势,1.5,0),COLORCYAN{XG51};
DRAWTEXT(ISLASTBAR=1,IF(多空趋势>=0,22,22.3),' 多空'),COLORRED{XG51};
换手:=V*100/CAPITAL{XG51};
主力:=MA(换手,4){XG51};
大户:=MA(换手,9){XG51};
中户:=MA(换手,17){XG51};
散户:=MA(换手,34){XG51};
均量:=(主力+大户+中户+散户)/4{XG51};
成交量:V,COLORRED,NODRAW{XG51};
主力能量:(主力-均量)COLORLIMAGENTA,NODRAW{XG51};
大户能量:(大户-均量)COLORBLUE,NODRAW{XG51};
中户能量:(中户-均量)COLORLIGREEN,NODRAW{XG51};
散户能量:(散户-均量)COLORYELLOW,NODRAW{XG51};
操盘:STICKLINE(主力能量>=0 AND 主力能量>=REF(主力能量,1),14.4,14.4+主力能量,1.5,0),COLORWHITE{XG51};
减仓:STICKLINE(主力能量>=0 AND 主力能量< REF(主力能量,1),14.4,14.4+主力能量,1.5,0),COLORBLUE{XG51};
反弹:STICKLINE(主力能量<0 AND 主力能量>=REF(主力能量,1),14.4,14.4+主力能量,1.5,0),COLORCYAN{XG51};
寻底:STICKLINE(主力能量<0 AND 主力能量< REF(主力能量,1),14.4,14.4+主力能量,1.5,0),COLORCYAN{XG51};
DRAWTEXT(ISLASTBAR=1,IF(主力能量>=0,14.4,14.6),' 机构'),COLORLIMAGENTA{XG51};
操盘1:STICKLINE(大户能量>=0 AND 大户能量>=REF(大户能量,1),9.6,9.6+大户能量,1.5,0),COLORWHITE{XG51};
减仓1:STICKLINE(大户能量>=0 AND 大户能量< REF(大户能量,1),9.6,9.6+大户能量,1.5,0),COLORBLUE{XG51};
反弹1:STICKLINE(大户能量<0 AND 大户能量>=REF(大户能量,1),9.6,9.6+大户能量,1.5,0),COLORCYAN{XG51};
寻底1:STICKLINE(大户能量<0 AND 大户能量< REF(大户能量,1),9.6,9.6+大户能量,1.5,0),COLORCYAN{XG51};
DRAWTEXT(ISLASTBAR=1,IF(大户能量>=0,9.6,9.8),' 大户'),COLORBLUE{XG51};
操盘2:STICKLINE(中户能量>=0 AND 中户能量>=REF(中户能量,1),4.8,4.8+中户能量,1.5,0),COLORWHITE{XG51};
减仓2:STICKLINE(中户能量>=0 AND 中户能量< REF(中户能量,1),4.8,4.8+中户能量,1.5,0),COLORWHITE{XG51};
反弹2:STICKLINE(中户能量<0 AND 中户能量>=REF(中户能量,1),4.8,4.8+中户能量,1.5,0),COLORCYAN{XG51};
寻底2:STICKLINE(中户能量<0 AND 中户能量< REF(中户能量,1),4.8,4.8+中户能量,1.5,0),COLORCYAN{XG51};
DRAWTEXT(ISLASTBAR=1,IF(中户能量>=0,4.8,5),' 中户'),COLORLIGREEN{XG51};
操盘3:STICKLINE(散户能量>=0 AND 散户能量>=REF(散户能量,1),0,散户能量,1.5,0),COLORWHITE{XG51};
减仓3:STICKLINE(散户能量>=0 AND 散户能量< REF(散户能量,1),0,散户能量,1.5,0),COLORWHITE{XG51};
反弹3:STICKLINE(散户能量<0 AND 散户能量>=REF(散户能量,1),0,散户能量,1.5,0),COLORCYAN{XG51};
寻底3:STICKLINE(散户能量<0 AND 散户能量< REF(散户能量,1),0,散户能量,1.5,0),COLORCYAN{XG51};
DRAWTEXT(ISLASTBAR=1,IF(散户能量>=0,-0.3,0.3),' 散户'),COLORYELLOW{XG51};
JZ:=V/(Abs(主力能量)+ABS(大户能量)+ABS(中户能量)+ABS(散户能量)){XG51};
ZLCJ:=JZ*ABS(主力能量){XG51};
DHCJ:=JZ*ABS(大户能量){XG51};
ZHCJ:=JZ*ABS(中户能量){XG51};
SHCJ:=JZ*ABS(散户能量);{XG51};
换手率:vol/CAPITAL*100,LINETHICK0{XG51};
机构量:=ZLCJ,COLORLIMAGENTA,NODRAW{XG51};
大户量:=DHCJ,COLORBLUE,NODRAW{XG51};
中户量:=ZHCJ,COLORLIGREEN,NODRAW{XG51};
散户量:=SHCJ,COLORYELLOW,NODRAW{X^G?5~1^C^N^{};