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

源码正文：

M:=55{XG51};
N:=34{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=((SMA(maX((CLOSE - LC),0),3,1) / SMA(Abs((CLOSE - LC)),3,1)) * 100){XG51};
FF:=ema(CLOSE,3){XG51};
MA15:=EMA(CLOSE,21){XG51};
VAR1:=IF(YEAR>=2038 AND MONTH>=1,0,1){XG51};
VAR2:=REF(LOW,1)*VAR1{XG51};
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100*VAR1{XG51};
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3)*VAR1{XG51};
VAR5:=LLV(LOW,30)*VAR1{XG51};
VAR6:=HHV(VAR4,30)*VAR1{XG51};
VAR7:=IF(MA(CLOSE,58),1,0)*VAR1{XG51};
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7*VAR1{XG51};
主力吸筹:IF(VAR8>100,100,VAR8)*VAR1,COLORLIMAGENTA{XG51};
庄家吸筹:stICKLINE(主力吸筹>-150,0,主力吸筹,1,0),COLORBLUE{XG51};
散户: 100*(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M)),COLORCYAN,LINETHICK2{XG51};
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
庄家:EMA(J,6),COLORWHITE,LINETHICK2{XG51};
换手:SUM(vol,1)/CAPITAL*100,COLORLIMAGENTA,NODRAW{XG51};
跌家:INDEXDEC,COLOR99FF99,NODRAW{X^G^5?1^C^N^{};

源码正文：

S:=IF(naMELIKE('S'),1,0)=0{XG51};
st:=IF(NAMELIKE('ST'),1,0)=0{XG51};
SST:=IF(NAMELIKE('*S'),1,0)=0{XG51};
停牌:=DYNAINFO(4)>0{XG51};
PE:=C/FINANCE(33){XG51};
SYL:=PE>0{XG51};
JBM:=S AND ST AND SST AND 停牌 AND SYL{XG51};
A1:=BArslAST(REF(crOSS(macd.dif,maCD.DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND MacD.DIF>REF(MACD.DIF,A1+1) AND CROSS(MACD.DIF,MACD.DEA){XG51};
TS1:=BARSLAST(CROSS(MACD.MACD*10,0)){XG51};
CC:=BARSLAST(CROSS(MACD.DEA,MACD.DIF)){XG51};
TS:=REF(BARSLAST(CROSS(MACD.DIF,MACD.DEA)),1){XG51};
EE:=(EVERY(MACD.DIF<=0.25 AND MACD.DEA<=0.05 ,TS+1) AND COUNT(CROSS(MACD.DEA,MACD.DIF),TS+1)=1 AND CROSS(kdj.J,kdj.D)){XG51};
XG1:COUNT(底背离,TS)>=0 AND EE AND HHV(C,30)/C>=1.25 AND H<HHV(H,5) AND JBM AND C/O<=1.07{X~G^5~1~C~N~{};