通达信波段之王未加密选股指标公式源码

源码正文：

VAR1:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*200{XG51};
VAR2:=SMA(VAR1,3,1){XG51};
VAR3:=Sma(VAR2,3,1){XG51};
VAR4:=3*VAR2-2*VAR3{XG51};
VAR5:=LLV(LOW,5){XG51};
VAR6:=HHV(HIGH,5){XG51};
VAR7:=ema((CLOSE-VAR5)/(VAR6-VAR5)*100,4)*2{XG51};
VAR8:=EMA(0.667*REF(VAR7,1)+0.333*VAR7,2){XG51};
VAR9:=3*VAR7-2*VAR8{XG51};
VARA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5){XG51};
VARB:=POW(MA(LOW,5),2)+MA(LOW,5){XG51};
VARC:=POW(MA(HIGH,5),2)+MA(HIGH,5){XG51};
VARD:=(VARA-LLV(VARB,64))/(HHV(VARC,64)-LLV(VARB,64))*150+65-10{XG51};
VARE:=SMA(VARD,3,1)*1.5-100{XG51};
VARF:=SMA(VARE,3,1){XG51};
VAR10:=3*VARE-2*VARF{XG51};
VAR11:=(HIGH+LOW+CLOSE*2)/4{XG51};
VAR12:=EMA(VAR11,13){XG51};
VAR13:=stD(VAR11,13){XG51};
VAR14:=(VAR11-VAR12)*100/VAR13{XG51};
VAR15:=EMA(VAR14,5){XG51};
VAR16:=EMA(VAR15,13){XG51};
VAR17:=EMA(VAR15,13)+200-100{XG51};
VAR18:=EMA(VAR17,10){XG51};
VAR19:=3*VAR17-2*VAR18{XG51};
VAR1A:=VAR2+VAR7+VARE+VAR17{XG51};
VAR1B:=VAR3+VAR8+VARF+VAR18{XG51};
VAR1C:=VAR4+VAR9+VAR10+VAR19{XG51};
VAR1D:=(HIGH+LOW+CLOSE)/3{XG51};
VAR1E:=AMOUNT/vol/100{XG51};
VAR20:=SUM(AMOUNT,5)/SUM(VOL,5)/100{XG51};
VAR21:=(VAR1D-MA(VAR1D,34))/(0.015*AVEDEV(VAR1D,34)){XG51};
VAR22:=(CLOSE+HIGH+LOW+OPEN)/4{XG51};
VAR23:=dma(AMOUNT/VOL/100,VOL/CAPITAL){XG51};
VAR24:=(HIGH+LOW+CLOSE+VAR1D)/4{XG51};
VAR25:=EMA(VAR24,24){XG51};
VAR26:=STD(VAR24,24){XG51};
VAR27:=(VAR24-VAR25)/VAR26*100{XG51};
VAR28:=(VAR1D-MA(VAR1D,24))/(0.015*AVEDEV(VAR1D,24)){XG51};
VAR29:=EMA(VAR27,5){XG51};
VAR2A:=(VAR1E-MA(VAR1E,21))/(0.015*AVEDEV(VAR1E,21)){XG51};
VAR2B:=SUMBARS(VOL,CAPITAL){XG51};
VAR2C:=(VAR20-MA(VAR20,90))/(0.015*AVEDEV(VAR20,90)){XG51};
VAR2D:=((VAR2C+VAR2A+VAR29+VAR28+VAR21)/5+165)/4{XG51};
VAR2E:=(EMA(EMA(EMA(VAR2D,15),10),5)-25)*2+VAR23{XG51};
VAR2F:=(VAR1A+VAR1B+VAR1C*30)/32/5-15{XG51};
VAR30:=EMA(VAR2F,13){XG51};
VAR31:=(VAR2D+VAR2F)/2/1.1{XG51};
VAR32:=HHV(VAR22,VAR2B){XG51};
VAR33:=LLV(VAR22,VAR2B){XG51};
VAR34:=(VAR22-VAR33)/(VAR32-VAR33){XG51};
人: IF(VAR22>=VAR32,(2*VAR22-VAR33-REF(VAR32,1))/(VAR32-VAR33),VAR34),COLORWHITE{XG51};
IF(VAR22<=VAR33,(2*VAR22-VAR33-REF(VAR33,1))/(VAR32-VAR33),VAR34),COLORCYAN{XG51};
AAA:=IF(VAR22>=VAR32,(2*VAR22-VAR33-REF(VAR32,1))/(VAR32-VAR33),VAR34){XG51};
DRAWICON(AAA<=0,0,4){XG51};
DRAWICON(AAA>=1,1.1,5){XG51};
地: 0{XG51};
天: 1{X?G*5_1?C?N?{};

源码正文：

VARA:=ema(REF(CLOSE,1),4);
色彩峰:=(SMA(maX(CLOSE-VARA,0),6,1)/SMA(Abs(CLOSE-VARA),6,1)*100);
stICKLINE(色彩峰,0,150,5,0),COLOR8BA4FF{XG51};
STICKLINE(色彩峰,0,-100,5,0),COLOR8BA433{XG51};
STICKLINE(色彩峰>0,0,色彩峰,5,0),COLOR66FF00{XG51};
AA:=100*EMA((100*(HIGH-REF(LOW,1))/REF(LOW,1)-2.618),2){XG51};
VARA1:=vol/CAPITAL/100< 0.015{XG51};
VARA2:=C/REF(C,1)> 1.05 AND C>O;
VARA3:=CLOSE<=1.47*LLV(CLOSE,58) AND CLOSE<=15;
VARA4:=(-100)*(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3)){XG51};
VARZ:=IF(VARA1 AND VARA2 AND VARA4<40,1,0){XG51};
PF1 :=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RSV:=SMA(PF1,9,1){XG51};
difF := EMA(CLOSE,12) - EMA(CLOSE,26){XG51};
DEA :=EMA(DIFF,9){XG51};
macd :=2000* (2*(DIFF-DEA))/EMA(C,30),LINETHICK0{XG51};
FASTK1:=SMA(RSV,3,1){XG51};
K1:=SMA(FASTK1,2,1), COLORBLUE{XG51};
D1:=SMA(K1,5,1),COLORB56C00{XG51};
T3:=(K1-D1)>REF((K1-D1),5){XG51};
STICKLINE(MacD>=0,0,MACD,4,0),COLOR666666{XG51};
STICKLINE(MACD>=0 AND MACD>REF(MACD,1),0,MACD,3,0),COLOREAEAEA{XG51};
STICKLINE(MACD<0,0,0.3*MACD,0.1,0),COLOR9A9A9A{XG51};
STICKLINE(MACD<0 AND MACD>REF(MACD,1),0,0.3*MACD,0.1,0),COLOR666666{XG51};
RSV2:= (CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100{XG51};
FASTK:=SMA(RSV2,3,1){XG51};
K:=SMA(FASTK,2,1), COLORBLUE{XG51};
D:=SMA(K,5,1),COLORB56C00{XG51};
STICKLINE(K1>=D1,D1,K1,2,0),COLORLIMAGENTA{XG51};
STICKLINE(K1<D1,D1,K1,2,0),COLORB56C00{XG51};
STICKLINE(K>=D,D,K,1,0),COLORLIMAGENTA{XG51};
STICKLINE(K<D,D,K,1,0),COLORB56C00{XG51};
DRAWTEXT(色彩峰<3.5,-50,'ャ'),COLORDBDBDB{XG51};
DRAWTEXT(色彩峰<3.5,-50,'︼'),COLOR688EC1{XG51};
DRAWTEXT(CROSS(色彩峰,90),98,'ヲ'),COLORDBDBDB{XG51};
DRAWTEXT(FILTER(MACD<0 AND MACD>REF(MACD,1) AND 色彩峰<20,5) AND T3,-1,'Ψ'), COLORGRAY{X-G?5^1-C-N-{};