通达信筹码集散未加密选股指标公式源码

源码正文：

PJJ:=ma(CLOSE,5){XG51};
PJC:=MA(MA(CLOSE,20),5){XG51};
kl:=((PJJ-REF(PJJ,1))/REF(PJJ,1))*1000{XG51};
ku:=((PJC-REF(PJC,1))/REF(PJC,1))*1000{XG51};
km:=kl-ku{XG51};
kk:=if(kl<km,km+abs(kl-km),km-abs(kl-km)){XG51};
kl1:=kl+50{XG51};
kk1:=kk+50{XG51};
集散上轨:=if(max(kl1,kk1)>100,100,max(kl1,kk1)){XG51};
集散下轨:=if(min(kl1,kk1)<0,0,min(kl1,kk1)){XG51};
短线活筹百分比:=(集散上轨+集散下轨)/2{XG51};
短线筹码集散:(集散上轨-集散下轨)*2.5,stick{XG51};
短线筹码进出:=短线活筹百分比-50{XG51};
强弱系数:短线筹码进出*2.5{XG51};
pt:if(ref(集散下轨,1)<17 and c=llv(c,7),50,0),colorred,linethick2{X?G?5?1?C?N?{};

源码正文：

N:=10{XG51};
VAR2:HHV(ma(C,10),2),COLORCYAN,LINETHICK2{XG51};
FS:IF(ema(C,5)<VAR2,(MA(C,5)-(VAR2-MA(C,5))),VAR2),COLORBLUE,LINETHICK2{XG51};
CG:MA(C,10),LINETHICK2,COLORWHITE{XG51};
MA60:MA(C,60)COLORCYAN,DOTLINE{XG51};
IF(MA(C,60)>=REF(MA(C,60),1),MA(C,60),DRAWNULL),COLORBLUE{XG51};
LC:=REF(CLOSE,1);rsi:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(Abs((CLOSE - LC)),3,1)) * 100){XG51};
FF:=EMA(CLOSE,3);MA15:=EMA(CLOSE,21);DRAWTEXT(crOSS(FF,MA15),(LOW * 0.98),'*背离'),COLORBLUE{XG51};
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'*背离'),COLORCYAN{XG51};
mtm:=C-REF(C,1);DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6){XG51};
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(FILTER(买=1,5),LOW-0.03,'*拉升'),COLORMAGENTA{X*G-5~1*C*N*{};