通达信超级顶底未加密选股指标公式源码

源码正文：

VAR1:=(HHV(HIGH,8)-LLV(LOW,8)){XG51};
VAR2:=(HHV(HIGH,8)-CLOSE){XG51};
VAR3:=(CLOSE-LLV(LOW,8)){XG51};
VAR4:=VAR2/VAR1*100-70 {XG51};
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100{XG51};
VAR6:=(2*C+H+L)/4{XG51};
VAR7:=SMA((VAR3/VAR1*100),3,1);
VAR8:=LLV(LOW,30){XG51};
VAR9:=Sma(VAR7,3,1)-SMA(VAR4,9,1){XG51};
VAR10:= IF(VAR9>100,VAR9-100,0){XG51};
VARA:=HHV(HIGH,30){XG51};
B:ema((VAR6-VAR8)/(VARA-VAR8)*100,8),COLORWHITE{XG51};
B1:=EMA(B,5){XG51};
stICKLINE(B>0 AND B-B1>=0,79,80,6,0),COLORWHITE{XG51};
STICKLINE(B>0 AND B-B1<0,79,80,6,0),COLOR00FF00{XG51};
STICKLINE(B>0 AND B-B1>=0,49,50,6,0),COLORWHITE{XG51};
STICKLINE(B>0 AND B-B1<0,49,50,6,0),COLORFF8899{XG51};
STICKLINE(B>0 AND B-B1>=0,19,20,6,0),COLORWHITE{XG51};
STICKLINE(B>0 AND B-B1<0,19,20,6,0),COLOR00FF00{XG51};
STICKLINE(B-B1>0,B,B1,8,1),COLORWHITE{XG51};
STICKLINE(B-B1<0,B,B1,8,1),COLOR00FF00{X+G_5-1+C+N+{};

源码正文：

PJ:=(H+L+C)/3{XG51};
V1:=IF(H=L,1,H-maX(O,C)){XG51};
V2:=IF(H=L,1,MAX(C,O)-PJ){XG51};
V3:=IF(H=L,1,MIN(O,C)-L){XG51};
V4:=IF(H=L,1,PJ-MIN(C,O)){XG51};
V5:=vol/IF(H=L,4,H-L){XG51};
V6:=(V1*V5)+(V2*V5){XG51};
V7:=(V3*V5)+(V4*V5){XG51};
WP1:=DYnaINFO(23){XG51};
NP1:=DYNAINFO(22){XG51};
WP2:=IF(ISLAstBAR,V7*240/FROMOPEN,V7){XG51};
NP2:=IF(ISLASTBAR,V6*240/FROMOPEN,V6){XG51};
WP:=IF(ISLASTBAR AND PERIOD=5 ,WP1,WP2){XG51};
NP:=IF(ISLASTBAR AND PERIOD=5 ,NP1,NP2){XG51};
日差:WP-NP,LINETHICK0{XG51};
周差:SUM(日差,5),NODRAW{XG51};
月差:SUM(日差,22),NODRAW{XG51};
STICKLINE(日差>O,0,日差,-1,0),COLORWHITE{XG51};
STICKLINE(日差<O,0,日差,-1,0),COLORFFFF00{X.G-5_1.C.N.{};