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

源码正文：

VAR1:=(CLOSE*2+HIGH+LOW)/4{XG51};
SK: ema(VAR1,13)-Ema(VAR1,21),COLORWHITE{XG51};
SD: EMA(SK,2){XG51};
多方能量: 2*(SK-SD)*3.8,COLORFF00FF, LINEstICK{XG51};
空方能量: (-2)*(SK-SD)*3.8, LINESTICK{XG51};
强弱分界: 0, CIRCLEDOT{X.G_5!1.C.N.{};

源码正文：

N:=5;N1:=10{XG51};
LC:=REF(CLOSE,1){XG51};
rsi5:=SMA(maX(CLOSE-LC,0),N,1)/SMA(Abs(CLOSE-LC),N,1)*100;
0,COLORCYAN;
wr10:=100*(HHV(HIGH,N1)-CLOSE)/(HHV(HIGH,N1)-LLV(LOW,N1));
NEWvol:=RSI5-WR10;
NV:NEWVOL,COLORWHITE;
stICKLINE(NEWVOL>0,0,NEWVOL,0.8,1),COLORBLUE;
STICKLINE(NEWVOL<0,0,NEWVOL,0.8,1),COLORBLUE;
MA(NEWVOL,6),COLORRED;
DRAWTEXT(FILTER((NEWVOL>REF(NEWVOL,2)) AND ( REF(NEWVOL,1)<REF(NEWVOL,3) AND NEWVOL<0 ),5),NEWVOL*0.995,'买'),COLORRED{XG51};
DRAWTEXT(FILTER((NEWVOL<REF(NEWVOL,3)) AND ( REF(NEWVOL,1)>REF(NEWVOL,4) AND NEWVOL>0 ),5),NEWVOL*0.995,'卖'),COLORFF00FF{X*G!5~1*C*N*{};