通达信碧血洗银枪未加密选股指标公式源码

源码正文：

Var2:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1)*100{XG51};
Var3:=(CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100{XG51};
Var4:=SMA(Var3, 9, 1){XG51};
Var5:=Sma(Var4, 3, 1){XG51};
J:3*Var4-2*Var5,colorff00ff{XG51};
Var6:=J>1*REF(J, 1){XG51};
Var7:=LLVBARS(LOW, 50){XG51};
Var8:=SUM(vol, Var7){XG51};
Var9:=HHVBARS(HIGH, 50){XG51};
Var10:=SUM(VOL, Var9){XG51};
Var11:=(CLOSE-REF(OPEN, Var9))/REF(OPEN, Var9)*100{XG51};
Var12:=Var10/CAPITAL*100{XG51};
Var13:=(CLOSE-REF(OPEN, Var7))/REF(OPEN, Var7)*100{XG51};
Var14:=Var8/CAPITAL*100{XG51};
Var15:MA(WINNER(CLOSE),3)*100{XG51};
Var16:ema(Var4,3){XG51};
A2:EMA(Var4,3), COLORFFDDCC,linethick2{XG51};
A3:EMA(A2,3), COLORFFBBCC{XG51};
A4:EMA(A3,3), COLORFF99CC{XG51};
A5:EMA(A4,3), COLORFF55CC{XG51};
A6:EMA(A5,3), COLORFF33CC{XG51};
A7:EMA(A6,3), COLORFF11CC,linethick2{XG51};
c1:=cross(a2,a7) and a2>a7{XG51};
DRAWICON(c1,a2,1){XG51};
AA:EMA(A5,36),LINETHICK2, COLORyellow{XG51};
DRAWTEXT(CROSS(A4, AA) AND Var11,a4,'@'),color00ff00{XG51};
DRAWTEXT(CROSS(A2,J) AND A2>75, A2, '峰'), COLORBLUE{XG51};
DRAWTEXT(CROSS(J, A2) AND Var6 AND A2<20 AND Var2>9 OR A2>1*REF(A2, 1) AND Var2>4 AND A2<60, A2, '拉'), colorred{X_G.5~1_C_N_{};

源码正文：

VAR1C:=(HIGH - MIN(OPEN,CLOSE)){XG51};
VAR2C:=(CLOSE - OPEN){XG51};
VAR3C:=(MIN(OPEN,CLOSE) - LOW){XG51};
VAR4C:=(HIGH - LOW){XG51};
VAR5C:=((vol * VAR1C) / VAR4C){XG51};
VAR6C:=((VOL * VAR2C) / VAR4C){XG51};
VAR7C:=((VOL * VAR3C) / VAR4C){XG51};
VAR8C:=((VAR5C - VAR6C) - VAR7C){XG51};
大机构:((SUM(VAR8C,13) / ma(VOL,13)) / 13),LINETHICK1,COLOR0000FF{XG51};
小机构:((SUM(VAR8C,21) / MA(VOL,21)) / 21),LINETHICK1,COLORFFFF00{XG51};
散户:((SUM(VAR8C,30) / MA(VOL,30))/ 30),COLORFF00FF{XG51};
股票:((SUM(VAR8C,125) / MA(VOL,125)) / 125),LINETHICK2,COLOR00FFFF{XG51};
VAR4:=MA(CLOSE,5){XG51};
VAR5:=MA(CLOSE,10){XG51};
VAR6:=MA(CLOSE,30){XG51};
VAR7:=MA(CLOSE,60){XG51};
VAR8:=ema(COst(85),7){XG51};
VAR9:=EMA(COST(15),7){XG51};
VARA:=(SUM(((CLOSE * VOL) * 100),4) / SUM((VOL * 100),4)){XG51};
VARB:=(INTPART((VARA * 100)) / 100){XG51};
VARC:=(SUM(((CLOSE * VOL) * 100),7) / SUM((VOL * 100),7)){XG51};
VARD:=(INTPART((VARC * 100)) / 100){XG51};
VARE:=(SUM(((CLOSE * VOL) * 100),28) / SUM((VOL * 100),28)){XG51};
VARF:=(INTPART((VARE * 100)) / 100){XG51};
短线趋势:(EMA(CLOSE,5) - EMA(CLOSE,10)){XG51};
中线趋势:EMA(短线趋势,9){XG51};
VAR10:=((0 - ((100 * (HHV(CLOSE,5) - CLOSE)) / (HHV(CLOSE,5) - LLV(LOW,5)))) + 100){XG51};
VAR11:=((0 - ((100 * (HHV(CLOSE,10) - CLOSE)) / (HHV(CLOSE,10) - LLV(LOW,10)))) + 100){XG51};
VAR12:=((0 - ((100 * (HHV(CLOSE,20) - CLOSE)) / (HHV(CLOSE,20) - LLV(LOW,20)))) + 100){XG51};
VAR13:=((0 - ((100 * (HHV(CLOSE,30) - CLOSE)) / (HHV(CLOSE,30) - LLV(LOW,30)))) + 100){XG51};
VAR14:=REF(中线趋势,1){XG51};
VAR15:=中线趋势{XG51};
VAR16:=(VAR15 - VAR14){XG51};
VAR17:=REF(短线趋势,1){XG51};
VAR18:=短线趋势{XG51};
VAR19:=(VAR18 - VAR17){XG51};
VAR1A:=OPEN{XG51};
VAR1B:=CLOSE{XG51};
发现机构入场:IF((((((((VAR1A <= VAR4) AND (VAR1A <= VAR5)) AND (VAR1A <= VAR6)) AND (VAR1B >= VAR4)) AND (VAR1B >= VARF)) AND (VAR16 > 0)) AND (VAR19 > 0)),0.5,0),LINETHICK2,COLOR00FF00{XG51};
短线指标:IF(((((crOSS(短线趋势,中线趋势) AND (短线趋势 < 0)) AND (中线趋势 < (0 - 0.2))) AND (VAR11 > 45)) AND (VAR16 > 0)),0.3,0.1),COLORFF0000{X*G-5?1*C*N*{};