通达信主力筹码未加密选股指标公式源码

通达信主力筹码未加密选股指标公式源码

源码正文：

使用说明:100线上下的柱线显示资金进出情况，20线上灰白柱线提示散户筹码，彩色柱线提示主力筹码运行，从吸货拉升到出货(由蓝-黄-红-绿)，散兵坑予示底部，20线下深蓝柱提示关注，亮红柱提示建仓。三根线与柱线综合观察分析，可以获得极隹的买卖点。

价量:3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*Sma(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)
,COLOR00CCFF,NODRAW{XG51};
主线:(((价量-LLV(价量,27))/(HHV(价量,27)-LLV(价量,27)))*(4))*(25)
,COLORGREEN,NODRAW{XG51};
快线:(((价量-LLV(价量,9))/(HHV(价量,9)-LLV(价量,9)))*(4))*(25)
,COLOR55AAFF,NODRAW{XG51};
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100{XG51};
K1:=SMA(RSV,3,1){XG51};
D1:=SMA(K1,3,1){XG51};
KK:=INTPART(K1){XG51};
DD:=INTPART(D1){XG51};
TFXXS:=KK+DD{XG51};
TGLXS:=(TFXXS-REF(TFXXS,1)){XG51};
stICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,2.5,0),COLOR0000AA;
STICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,1.5,0),COLOR0022CC{XG51};
STICKLINE(TGLXS>0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,0.5,0),COLOR0055FF{XG51};
STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,2.5,0),COLORAA00BB{XG51};
STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,1.5,0),COLORCC22BB{XG51};
STICKLINE(TGLXS<0 AND TGLXS>REF(TGLXS,1),100,TGLXS+100,0.5,0),COLORFF55BB{XG51};
STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,2.5,0),COLOR00AAFF;
STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,1.5,0),COLOR00CCFF;
STICKLINE(TGLXS>0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,0.5,0),COLOR00FFFF{XG51};
STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,2.5,0),COLORFF7700{XG51};
STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,1.5,0),COLORFFAA22{XG51};
STICKLINE(TGLXS<0 AND TGLXS<=REF(TGLXS,1),100,TGLXS+100,0.5,0),COLORFFFF55{XG51};
STICKLINE(TGLXS=0 AND REF(TGLXS,1)>=0,100,TGLXS+100,8,0),COLORGRAY{XG51};
STICKLINE(TGLXS=0 AND REF(TGLXS,1)<0,100,TGLXS+100,8,0),COLORRED{XG51};
ZLCM:=ema(WINNER(CLOSE)*70,3){XG51};
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3){XG51};
ZSHTL:=SHCM/(ZLCM+SHCM)*100{XG51};
ZZLKP:=ZLCM/(ZLCM+SHCM)*100{XG51};
ZSHJJ:=EMA(ZSHTL,55){XG51};
ZZLJJ:=EMA(ZZLKP,55){XG51};
散兵坑:IF(ZZLKP<=10,ZZLKP,ZZLKP),COLORLIMAGENTA,NODRAW{XG51};
STICKLINE(C>0,ZSHTL,ZZLKP,2,0),COLOR808080{XG51};
STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,2,0),COLORC0C0C0{XG51};

STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,2.5,0 ),COLORAA00BB{XG51};
STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,1.5,0 ),COLORCC22BB;
STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,0.5,0 ),COLOREE44BB;
STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,2.5,0 ),COLORFF7700;
STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,1.5,0 ),COLORFFAA22{XG51};
STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP>20,ZZLKP,20,0.5 ,0 ),COLORFFFF55{XG51};
STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,2.5,0 ),COLOR131FFD{XG51};
STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,1.5,0 ),COLOR5050FF{XG51};
STICKLINE(ZZLKP>REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,0.5,0 ),COLOR7E7EFF{XG51};
STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,2.5,0 ),COLORAA0000{XG51};
STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,1.5,0 ),COLORCC0000{XG51};
STICKLINE(ZZLKP<=REF(ZZLKP,1) AND ZZLKP<20,ZZLKP,0,0.5 ,0 ),COLORFF0000{XG51};

STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,2.5,0 ),COLOR00AAFF;
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,1.5,0 ),COLOR00CCFF;
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,0.5,0 ),COLOR00FFFF{XG51};
STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ>50,ZZLKP,ZZLJJ,2.5,0 ),COLOR0000AA;
STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ>50,ZZLKP,ZZLJJ,1.5,0 ),COLOR0022CC{XG51};
STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ>50,ZZLKP,ZZLJJ,0.5 ,0 ),COLOR0055FF{XG51};
STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ<50 AND ZZLKP>50
AND ZZLJJ>REF(ZZLJJ,1),ZZLKP,50,2.5,0 ),COLOR0000AA;
STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ<50 AND ZZLKP>50
AND ZZLJJ>REF(ZZLJJ,1),ZZLKP,50,1.5,0 ),COLOR0022CC{XG51};
STICKLINE(ZZLKP>ZZLJJ AND ZZLJJ<50 AND ZZLKP>50
AND ZZLJJ>REF(ZZLJJ,1),ZZLKP,50,0.5 ,0 ),COLOR0055FF{XG51};

STICKLINE(ZZLKP>80,ZZLKP,ZZLKP-(ZZLKP-80)/2,2.5,0),COLOR00AA00{XG51};
STICKLINE(ZZLKP>80,ZZLKP,ZZLKP-(ZZLKP-80)/2,1.5,0),COLOR00CC00{XG51};
STICKLINE(ZZLKP>80,ZZLKP,ZZLKP-(ZZLKP-80)/2,0.5,0),COLOR00FF00{XG51};
STICKLINE(ZZLKP<=10,ZZLKP,0,5,0),COLORDD00DD{XG51};
100,COLORCYAN{XG51};
80,COLORCYAN{XG51};

价量,COLOR0CC0FF,LINETHICK2{XG51};
主线,COLOR00FFAA,LINETHICK2{XG51};
快线,LINESTICK,COLORFF68DD{X^G?5~1^C^N^{};

通达信成竹在胸主图未加密选股指标公式源码

源码正文：

顶部:=REF(HHV(H,J),Q);
底部:=REF(LLV(L,J),Q){XG51};
A:=顶部-(顶部-底部)*0.191;
B:=顶部-(顶部-底部)*0.382;
Z:=顶部-(顶部-底部)*0.5;
D:=顶部-(顶部-底部)*0.618;
E:=顶部-(顶部-底部)*0.809{XG51};
顶:REFDATE(顶部,DATE),POINTDOT,COLORYELLOW,LINETHICK3{XG51};
A19.1%:REFDATE(A,DATE),POINTDOT,COLORBLUE,LINETHICK2{XG51};
B38.2%:REFDATE(B,DATE),POINTDOT,COLORmaGENTA,LINETHICK2{XG51};
C50%:REFDATE(Z,DATE),POINTDOT,COLORBLACK,LINETHICK2{XG51};
D61.8%:REFDATE(D,DATE),POINTDOT,COLORWHITE,LINETHICK2{XG51};
E80.9%:REFDATE(E,DATE),POINTDOT,COLORGREEN,LINETHICK2{XG51};
底:REFDATE(底部,DATE),POINTDOT,COLORBLUE,LINETHICK3{XG51};
X:=6;Y:=6{XG51};
DRAWLINE(H=PEAK(1 ,X ,1 ) ,H ,L=TROUGH(2 ,X ,1 ) ,L , 1),COLORYELLOW{XG51};
DRAWLINE(H=PEAK(1 ,X ,1 ) ,H ,L=TROUGH(2 ,X ,1 ) ,
L+(PEAK(1 ,X ,1 )-TROUGH(2 ,X ,1 ))/3 , 1),COLORBLUE{XG51};
DRAWLINE(H=PEAK(1 ,X ,1 ) ,H ,L=TROUGH(2 ,X ,1 ) ,
L+(PEAK(1 ,X ,1 )-TROUGH(2 ,X ,1 ))/3*2 , 1),COLOR66BB00{XG51};
DRAWLINE(L=TROUGH(2 ,Y,1 ) ,L ,H=PEAK(1 ,Y,1 ) ,H ,1 ),COLORYELLOW{XG51};
DRAWLINE(L=TROUGH(2 ,Y,1 ) ,L ,H=PEAK(1 ,Y,1 ) ,
H-(PEAK(1 ,Y ,1 )-TROUGH(2 , Y,1 ))/3*2 ,1 ),COLORWHITE{XG51};
DRAWLINE(L=TROUGH(2 ,Y,1 ) ,L ,H=PEAK(1 ,Y,1 ) ,
H-(PEAK(1 ,Y ,1 )-TROUGH(2 , Y,1 ))/3 ,1 ),COLORBLUE{XG51};
M3:=ema(CLOSE,3){XG51};
M21:=EMA(CLOSE,21){XG51};
DRAWTEXT(crOSS(M3,M21),(LOW * 0.99),'买进'),COLOR00FFFF{XG51};
DRAWTEXT(CROSS(M21,M3),(HIGH * 1.02),'出货'),COLOR00FF00{XG51};
DRAWTEXT(CROSS(85,rsi),(HIGH * 1.02),'落袋'),COLORGREEN{XG51};
stICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLORWHITE;
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),COLORCYAN;
STICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR000055{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000077;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR000099{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000BB{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000DD{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOR0000FF{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR555555{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORGREEN{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR990000{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLORCC0000;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORFF4400{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORFF8800{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORFFCC00{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORGREEN{X*G-5~1*C*N*{};