通达信庄你别跑未加密选股指标公式源码

通达信庄你别跑未加密选股指标公式源码

源码正文：

difF := ema(CLOSE,12) - Ema(CLOSE,26){XG51};
DEA :=EMA(DIFF,9){XG51};
macd :=1000* (2*(DIFF-DEA))/EMA(C,30){XG51};
RSV1:= (CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100{XG51};
FAstK:=SMA(RSV1,3,1){XG51};
龙Ｋ:=SMA(FASTK,2,1){XG51};
龙Ｄ:=SMA(龙Ｋ,5,1){XG51};
STICKLINE(龙Ｋ>=龙Ｄ,龙Ｄ,龙Ｋ,5,0),COLOR000085{XG51};
STICKLINE(龙Ｋ<龙Ｄ,龙Ｄ,龙Ｋ,5,0),COLOR324800{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:SMA(RSV,3,1),COLORRED{XG51};
D:SMA(K,3,1),COLORBLUE{XG51};
J:3*K-2*D,COLORFF00FF{XG51};
阿门24:=(2*CLOSE+HIGH+LOW)/4{XG51};
阿门25:=LLV(LOW,5){XG51};
阿门26:=HHV(HIGH,4){XG51};
阿门27:=EMA((阿门24-阿门25)/(阿门26-阿门25)*100,4){XG51};
阿门28:=EMA(0.667*REF(阿门27,1)+0.333*阿门27,2){XG51};
DRAWTEXT(crOSS(阿门27,阿门28) AND 阿门27<50 AND 阿门27>29,K,'短↑进'),COLORWHITE{XG51};
DRAWTEXT(CROSS(阿门27,阿门28) AND 阿门27<30,K,'低↑吸'){XG51};
DRAWTEXT(CROSS(阿门28,阿门27) AND 阿门27>70,K,'短↑出'){XG51};
VAR2:=REF(LOW,1){XG51};
VAR3:=SMA(Abs(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100{XG51};
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3){XG51};
VAR5:=LLV(LOW,30){XG51};
VAR6:=HHV(VAR4,30){XG51};
VAR7:=IF(MA(CLOSE,58),1,0){XG51};
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7{XG51};
VAR9:=IF(VAR8>100,100,VAR8){XG51};
庄来了别放过:STICKLINE(VAR9>-120,0,VAR9,6,1),COLORCYAN{X.G*5~1.C.N.{};

通达信日周月变色主图未加密选股指标公式源码

源码正文：

日上轨:ma(H,24),COLORLIBLUE{XG51};
日下轨:MA(L,24),COLORLIBLUE{XG51};
周上轨:MA(H,120),COLOR808000{XG51};
周下轨:MA(L,120),COLOR808000{XG51};
月上轨:MA(H,528),DOTLINE,COLOR008080{XG51};
月下轨:MA(L,528),DOTLINE,COLOR008080{XG51};
IF(日上轨>REF(日上轨,1),日上轨,DRAWNULL),COLORMAGENTA,LINETHICK1{XG51};
IF(日下轨>REF(日下轨,1),日下轨,DRAWNULL),COLORMAGENTA,LINETHICK1{XG51};
IF(日上轨<REF(日上轨,1),日上轨,DRAWNULL),COLORLIBLUE,LINETHICK1{XG51};
IF(日下轨<REF(日下轨,1),日下轨,DRAWNULL),COLORLIBLUE,LINETHICK1{XG51};
IF(周上轨>REF(周上轨,1),周上轨,DRAWNULL),COLORLICYAN,LINETHICK1{XG51};
IF(周下轨>REF(周下轨,1),周下轨,DRAWNULL),COLORLICYAN,LINETHICK1{XG51};
IF(周上轨<REF(周上轨,1),周上轨,DRAWNULL),COLOR808000,LINETHICK1;
IF(周下轨<REF(周下轨,1),周下轨,DRAWNULL),COLOR808000,LINETHICK1{XG51};
IF(月上轨>REF(月上轨,1),月上轨,DRAWNULL),COLORFF80FF,DOTLINE,LINETHICK1{XG51};
IF(月下轨>REF(月下轨,1),月下轨,DRAWNULL),COLORFF80FF,DOTLINE,LINETHICK1;
IF(月上轨<REF(月上轨,1),月上轨,DRAWNULL),COLOR008080,DOTLINE,LINETHICK1{XG51};
IF(月下轨<REF(月下轨,1),月下轨,DRAWNULL),COLOR008080,DOTLINE,LINETHICK1{X*G!5~1*C*N*{};