通达信动量买卖选股指标公式源码

通达信动量买卖选股指标公式源码

源码正文：

VAR1:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100{XG51};
S:=SMA(VAR1,5,1){XG51};
VAR2:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100{XG51};
X:Sma(VAR2,2,1),COLORFF00FF {XG51};
VR4:=SMA(Abs(L-REF(L,1)),13,1)/SMA(MAX(L-REF(L,1),0),13,1){XG51};
底部动量:IF(ema(IF(L<=LLV(L,30),VR4,0),3)*10<100,EMA(IF(L<=LLV(L,30),VR4,0),3)*10,100),COLOR004DF5{XG51};
AA:=INTPART(底部动量){XG51};
DD:=IF(AA>REF(HHV(AA,120),1),AA,0){XG51};
VR2:=LLV(LOW,10){XG51};
VR3:=HHV(HIGH,25){XG51};
动力线:=IF(EMA((CLOSE-VR2)/(VR3-VR2)*4,4)*25<100,EMA((CLOSE-VR2)/(VR3-VR2)*4,4)*25,100){XG51};
stICKLINE(动力线>REF(动力线,1) ,动力线 ,REF(动力线,1),2 ,0),COLORWHITE{XG51};
STICKLINE(动力线<=REF(动力线,1) ,动力线 ,REF(动力线,1),2 ,1),COLOR00FF00{XG51};
VAR3:=1/WINNER(CLOSE){XG51};
VAR4:=EMA(CLOSE,13){XG51};
VAR5:=100-ABS((CLOSE-VAR4)/VAR4)*100{XG51};
黄金坑:=(100-IF(VAR3>10,IF(VAR3<100,VAR3,VAR5-90),0)){XG51};
100,POINTDOT{XG51};
70,POINTDOT{XG51};
30,POINTDOT,COLORFF00FF {XG51};
VAR1A:=WINNER(CLOSE);
VAR2A:=vol/CAPITAL;
VAR3A:=VAR2A/VAR1A;
JJ:=IF(VAR1A<50/100 ,VAR3A,0)*100;
财神线:=IF(JJ<100,JJ,0){XG51};
STICKLINE(财神线>=0,0,底部动量,0.01,0),COLOR00FFFF{XG51};
JHH:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0){XG51};
STICKLINE(ABS(JHH/WINNER(C))>1000000000,0,0,0,0),COLORFF00FF,LINETHICK5{XG51};
DRAWTEXT((S-X)>=70 AND X<7,10,'★'),COLORWHITE{XG51};
VARC:=CLOSE*50/100{XG51};
VARD:=MA(VARC,30)*0.83{XG51};
VARE:=MA(VARC/VARD,3){XG51};
DRAWTEXT(FILTER(VARE<1.04,3),10,'★'),COLORBLUE {XG51};
DRAWTEXT(crOSS(X,底部动量) AND 动力线>REF(动力线,1) AND C>L*1.03,100,'★'),COLORCYAN{XG51};
DRAWTEXT(X>动力线*2 AND X>=80,90,'●'){X^G!5-1^C^N^{};