通达信短线控盘未加密选股指标公式源码

源码正文：

VAR1:=ema(Ema(CLOSE,13),13){XG51};
控盘:= (VAR1-REF(VAR1,1))/REF(VAR1,1)*1000,COLORFFCCCC,POINTDOT{XG51};
stICKLINE(控盘<0,控盘,0,1,0),COLORRED{XG51};
无庄控盘:0,COLORRED{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLORWHITE{XG51};
有庄控盘: 0,COLORWHITE{XG51};
VAR2:=100*WINNER(CLOSE*0.95){XG51};
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00{XG51};
主力出货: 0,COLOR00FF00{XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORFF00FF{XG51};
高度控盘: 0,COLORFF00FF{XG51};
A10:=crOSS(控盘,0){XG51};
开始控盘:IF(A10,3,0),COLORBLUE{XG51};
逃顶:IF(CROSS(控盘<REF(控盘,1) AND 控盘>0,控盘>REF(控盘,1) AND 控盘>0),控盘*2,0),COLORGREEN{X!G+5_1!C!N!{};

源码正文：

dif:=(ema(CLOSE,12)-Ema(CLOSE,26))*100{XG51};
DEA:=EMA(DIF,9){XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,9,1){XG51};
D:=SMA(K,9,1){XG51};
B4:crOSS(DIF,DEA) AND CROSS("kdj.K"(9,3,3),"kdJ.D"(9,3,3)){X*G-5.1*C*N*{};