通达信换手趋势未加密选股指标公式源码

源码正文：

参数

HSL:HSL*CAPITAL,LINETHICK2 COLORFF00FF {XG51};
maHSL:MA(HSL,M),LINETHICK1 COLORBLUE{XG51};
VUR0:=(2*OPEN+HIGH+LOW+3*CLOSE)/7{XG51};
VUR1:=IF(CAPITAL,CAPITAL,-1)*VUR0{XG51};
VUR2:=SMA(AMOUNT,10,1)/1000{XG51};
VUR3:=MA(CLOSE*3,5){XG51};
VUR4:=VUR2*(CLOSE*3)/VUR3*1/10{XG51};
VUR5:=VUR2*(OPEN*3)/VUR3*1/10{XG51};
VUR6:=VUR2*(HIGH*3)/VUR3*1/10{XG51};
VUR7:=VUR2*(LOW*3)/VUR3*1/10{XG51};
VUR8:=(2*VUR5+VUR6+VUR7+3*VUR4)/7{XG51};
VUR9:=dma(ema(VUR4,2),SUM(vol,1)*VUR8){XG51};
VUR10:=EMA(VUR9,2){XG51};
VURA:=VUR9>VUR10{XG51};
VURB:=EMA(VUR1-VUR9,1){XG51};
VURC:=REF(VURB,1){XG51};
VURD:=VURB>VURC{XG51};
VURE:=(VURB-VURC)*15{XG51};
VURF:=(VUR9-VUR10)*30000{XG51};
VURG:=(VURC-VURB)*(-1){XG51};
VURH:=IF(VURB>VURC,VURE/500,0){XG51};
VURN:=IF(VURB<VURC,VURE/500,0){XG51};
VURT:=IF(VURA AND VURD,VURF/2000000,0){XG51};
VURL:=IF(VURA AND VURB<VURC,VURE/1000,0){XG51};
0,COLOR8A8A8A{XG51};
买进量_手:VURH,COLOR1010FF,POINTDOT{XG51};
卖出量_手:VURN,COLOR80FF00,POINTDOT{XG51};
买进_强烈:VURT,COLOR10E6FF,POINTDOT{XG51};
打压_减筹:VURL,COLORFF00FF,POINTDOT{XG51};
stICKLINE(VURB>VURC,0,VURE,6.8,1),COLOR1010FF{XG51};
STICKLINE(VURB<VURC,0,VURE,6.8,0),COLOR80FF00{XG51};
STICKLINE(VURA AND VURD AND CLOSE>OPEN,0,VURF*0.5,6.8,0),COLOR10E6FF{XG51};
STICKLINE(VURA AND VURB<VURC,0,VURE,6.8,0),COLORFF00FF{XG51};
HS:=FLOOR(SUM(V/CAPITAL,0)){XG51};
完全换手:STICKLINE(HS>REF(HS,1),0,VURE,6,0) COLORFF0000{X-G_5-1-C-N-{};

源码正文：

N:=5{XG51};
QJ0:=(HIGH+LOW+CLOSE)/3{XG51};
QJ1:=IF(HIGH=LOW,1,HIGH-maX(OPEN,CLOSE)){XG51};
QJ2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-QJ0){XG51};
QJ3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW){XG51};
QJ4:=IF(HIGH=LOW,1,QJ0-MIN(CLOSE,OPEN)){XG51};
QJ5:=vol/(IF(HIGH=LOW,4,HIGH-LOW)){XG51};
QJ6:="macd.dif">"MacD.DEA" AND "MACD.DEA"<0{XG51};
QJ7:="kdj.K">"kdj.D" AND "KDJ.D"<30{XG51};
QJ8:="MACD.DIF"<"MACD.DEA"{XG51};
QJ9:="KDJ.K"<"KDJ.D" AND "KDJ.K">80{XG51};
特大:QJ4*QJ5,NODRAW{XG51};
大单:QJ3*QJ5,NODRAW{XG51};
中单:QJ1*QJ5,NODRAW{XG51};
小单:QJ2*QJ5,NODRAW{XG51};
W1:=SUM(大单,N)+SUM(特大,N){XG51};
W2:=SUM(小单,N)+SUM(中单,N){XG51};
量振1:=特大>大单 AND 大单>小单{XG51};
量振2:=特大<小单 AND 大单<小单{XG51};
标振1:=QJ6 AND QJ7{XG51};
标振2:=QJ8 AND QJ9{XG51};
A:=W1-W2{XG51};
A0:=IF(A>0,A,0){XG51};
B0:=IF(A<0,A,0){XG51};
stICKLINE(A0,0,A0,3,0),COLOR000066{XG51};
STICKLINE(A0,0,A0,2.5,0),COLOR0000AA{XG51};
STICKLINE(A0,0,A0,1,0),COLOR0000CC{XG51};
STICKLINE(B0,0,-B0,3,0),COLOR006600{XG51};
STICKLINE(B0,0,-B0,2.5,0),COLOR00AA00{XG51};
STICKLINE(B0,0,-B0,1,0),COLOR00CC00{XG51};
周趋势:MA(A,5),COLORFFFFFF{XG51};
M:=周趋势{XG51};
平滑值:ema((5*M+4*REF(M,1)+3*REF(M,2)+2*REF(M,3)+REF(M,4))/15,1),COLOR00FFFF{XG51};
(量振1 AND 标振1 AND 周趋势>平滑值),COLORFF00FF,POINTDOT{XG51};
(量振2 AND 标振2 AND 周趋势<平滑值),COLOR00FF00,POINTDOT{X-G~5-1-C-N-{};