通达信底部中阳选股指标公式源码

通达信底部中阳选股指标公式源码

源码正文：

VAR1:=ma(CLOSE,5){XG51};
VAR2:=MA(CLOSE,10){XG51};
VAR3:=MA(CLOSE,30){XG51};
VAR4:=MA(CLOSE,60){XG51};
VARB:=SUM(CLOSE*vol*100,28)/SUM(VOL*100,28){XG51};
VARC:=INTPART(VARB*100)/100{XG51};
VARD:=ema(CLOSE,5)-EMA(CLOSE,10){XG51};
VARE:=EMA(VARD,9){XG51};
VARF:=(-100)*(HHV(CLOSE,5)-CLOSE)/(HHV(CLOSE,5)-LLV(LOW,5))+100{XG51};
VAR10:=(-100)*(HHV(CLOSE,10)-CLOSE)/(HHV(CLOSE,10)-LLV(LOW,10))+100{XG51};
VAR11:=(-100)*(HHV(CLOSE,20)-CLOSE)/(HHV(CLOSE,20)-LLV(LOW,20))+100{XG51};
VAR12:=(-100)*(HHV(CLOSE,30)-CLOSE)/(HHV(CLOSE,30)-LLV(LOW,30))+100{XG51};
VAR13:=REF(VARE,1){XG51};
VAR14:=VARE{XG51};
VAR15:=VAR14-VAR13{XG51};
VAR16:=REF(VARD,1){XG51};
VAR17:=VARD{XG51};
VAR18:=VAR17-VAR16{XG51};
VAR19:=OPEN{XG51};
VAR1A:=CLOSE{XG51};
IF(VAR19<=VAR1 AND MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1) AND MA(C,20)>REF(MA(C,20),1) AND EVERY(MA(C,20)<MA(C,60),20) AND VAR19<=VAR2 AND VAR19<=VAR3 AND VAR1A>=VAR1 AND VAR1A>=VARC AND
VAR15>0 AND VAR18>0,0.8,0),LINETHICK2 , COLOR00FFFF{X-G-5_1-C-N-{};