通达信抓牛法宝主图选股指标公式源码

通达信抓牛法宝主图选股指标公式源码

源码正文：

N:=10{XG51};
TA:=maX(MAX((HIGH-LOW),Abs(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW)){XG51};
ATR:=ema(TA,21){XG51};
VAR81:=REF(CLOSE,N)-REF(ATR,1){XG51};
筹码线:=HHV(VAR81,21),COLORBLUE{XG51};
上:=(1+7/100)*筹码线{XG51};
下:=(1-7/100)*筹码线{XG51};
中:=(上+下)/2{XG51};
XGD:DRAWBAND(上,RGB(258,88,1),下,RGB(258,88,1)){XG51};
UPPER: MA(CLOSE,60)+ 2*stD(CLOSE,60),LINETHICK2,COLORFFFF00{XG51};
LOWER: MA(CLOSE,60)- 2*STD(CLOSE,60),LINETHICK2,COLORFFFF00{XG51};

F:=C/O{XG51};
STICKLINE(F>=1,C,O,2.8,1),COLORWHITE{XG51};
STICKLINE(F>=1,C,H,0.00001,0),COLORWHITE{XG51};
STICKLINE(F>=1,L,O,0.00001,0),COLORWHITE{XG51};
STICKLINE(F<1,C,O,2.8,0),COLORGREEN{XG51};
STICKLINE(F<1,O,H,0.00001,0),COLORGREEN{XG51};
STICKLINE(F<1,L,C,0.00001,0),COLORGREEN{XG51};
短期线:EMA(CLOSE,7),COLORRED,LINETHICK1{XG51};
中期线:EMA(CLOSE,25),COLORFF00FF,LINETHICK1{XG51};
长期线MacP:EMA(中期线,55),COLORBLUE,LINETHICK2{XG51};
牛熊分水岭905:EMA(CLOSE,905),COLORWHITE,LINETHICK3{XG51};
大牛控盘线:MA(CLOSE,1650),COLORCYAN,LINETHICK3{XG51};
X_3:=MAX(DYNAINFO(3),DYNAINFO(5)){XG51};
X_4:=MIN(DYNAINFO(3),DYNAINFO(6)){XG51};
银河线:=(X_3-X_4){XG51};
DRAWICON(crOSS(中期线,长期线MACP),长期线MACP,23){XG51};
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1{XG51};
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD{XG51};
DRAWICON(VAR19 AND C>短期线,L*0.998,1){XG51};
DRAWICON(VAR1A,H*1.002,2),NODRAW{XG51};
TJ5:=REF("cci.CCI",1)<-100 AND "CCI.CCI">REF("CCI.CCI",1){XG51};
TJ6:=REF("kdj.J"(9,3,3),1)<20 AND "kdJ.J"(9,3,3)>REF( "KDJ.J"(9,3,3),1){XG51};
TJ7:=REF("rsi.RSI1",1)<20 AND "RSI.RSI1">REF("RSI.RSI1",1){XG51};
TJ8:=COUNT(TJ5,5) AND COUNT(TJ6,5) AND COUNT(TJ7,5){XG51};
大底:=CROSS(TJ8,0.5){XG51};
DRAWICON(大底,L*0.991,11){XG51};
T1:EMA(SLOPE(CLOSE,34)*20+CLOSE,75),COLORBLUE,NODRAW{XG51};
T2:MA(C,120),COLORGREEN,LINETHICK2,NODRAW{XG51};
T3:MA(C,250),COLORCYAN,LINETHICK2,NODRAW{XG51};
乖离线:=((C-REF(T1,1))/20+T1)*1.20{XG51};
TT1:=CROSS(T1,T2)  AND CROSS(T1,T3) AND V>REF(V,1){XG51};
TT2:=T1>REF(T1,2) AND V>REF(V,1) AND CROSS(C,T1){XG51};
DRAWICON((T2>=REF(T2,1) AND CROSS(C,T1) AND CROSS(C,T2) AND V>REF(V,1)),L*0.997,9){XG51};
DRAWICON(TT2,L*0.995,11){XG51};
DRAWICON(CROSS(C,乖离线) AND L!=H,H*1.005,12){XG51};
N1:=10{XG51};
N2:=3{XG51};
N3:=6{XG51};
PJJ:=dma((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9){XG51};
JJ:=REF(EMA(PJJ,3),1){XG51};
QJJ:=(vol / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN)))){XG51};
XVL:=(IF((CLOSE > OPEN),(QJJ * (HIGH - LOW)),IF((CLOSE < OPEN),(QJJ * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))) + IF((CLOSE > OPEN),(0 - (QJJ * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (QJJ * (HIGH - LOW))),(0 - (VOL / 2))))){XG51};
ZLL:=(VOL / CAPITAL){XG51};
HSL1:=IF((ZLL > 10),10,ZLL){XG51};
HSL:=((XVL / 20) / 1.15){XG51};
攻击流量:=(((HSL * 0.55) + (REF(HSL,1) * 0.33)) + (REF(HSL,2) * 0.22)){XG51};
STICKLINE(((HSL * 0.4) >= 0),((HSL/1000) * 1.0),0,1,0),COLORWHITE,NODRAW{XG51};
STICKLINE(((HSL * 0.4) < 0),((HSL/1000) * 1.0),0,1,0),COLORYELLOW,NODRAW{XG51};
力度: (HSL / 1000),LINETHICK0,NODRAW{XG51};
A1:=SUM(力度,N1){XG51};
A2:=EMA(A1,N2){XG51};
A3:=EMA(A1,N3){XG51};
累积能量:A1,NODRAW{XG51};
bias1:(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100,NODRAW{XG51};
买:DRAWICON(CROSS(A1,A3) AND C>短期线,L*0.998,1),NODRAW{XG51};
卖:DRAWICON(CROSS(A3,A1) AND BIAS1>1,H*1.002,10),NODRAW{XG51};
VAR1Y:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100{XG51};
VAR2Y:=(CLOSE-LLV(LOW,43))/(HHV(HIGH,43)-LLV(LOW,43))*100{XG51};
VAR3Y:=SMA(VAR2Y,2,1){XG51};
卖出:100+(-ABS(VAR1Y)),NODRAW{XG51};
预防:SMA(VAR3Y,2,1),COLORWHITE,LINETHICK2,NODRAW{XG51};
DRAWICON(CROSS(预防,卖出),H*1.02,2),NODRAW{XG51};
VV:=(C+L+H)/3{XG51};
DSA:=SMA(EMA(VV,2),2,1)LINETHICK2,COLORWHITE{XG51};
Y396:=DSA;
险1:=Y396*1.1,COLORLICYAN{XG51};
险2:=Y396*1.125,COLORLICYAN{XG51};
险3:=Y396*1.15,COLORLICYAN{XG51};
良1:=Y396*0.9,COLORLIGREEN{XG51};
良2:=Y396*0.875,COLORLIGREEN{XG51};
良3:=Y396*0.85,COLORLIGREEN{XG51};
变色:=IF(Y396<REF(Y396,1),Y396,DRAWNULL),LINETHICK2,COLORYELLOW{XG51};

WSR1:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100{XG51};
WSR2:=CROSS(WSR1,5){XG51};
WSR3:=CROSS(8,WSR1){XG51};
WSR4:=CROSS(WSR1,-5){XG51};
WSR5:=CROSS(WSR1,-8){XG51};
WSR6:=WSR3{XG51};
WSR7:=WSR4 OR WSR5{XG51};
WSR8:=WSR7 AND FILTER(WSR7,5){XG51};
WSR10:
DRAWICON(WSR8,L-0.01,1),NODRAW{XG51};
WSR9:=WSR6 AND FILTER(WSR6,5){XG51};
WSR11:DRAWICON(WSR9,H+0.01,10),NODRAW{XG51};
WSR12:=O<良3{XG51};
DRAWICON(WSR12 AND FILTER(WSR12,12),L-0.03,9){XG51};
W1:=C>REF(C,1) AND macd<REF(MACD,1) AND MACD>0 AND V<REF(V,1){XG51};
W2:=C>REF(C,1) AND MACD<0 AND MACD<REF(MACD,1) AND V<REF(V,1){XG51};
XG:=W1 OR W2{XG51};
VAR1AA:=AMOUNT/VOL/7{XG51};
VAR2AA:=(3*HIGH+LOW+OPEN+2*CLOSE)/7{XG51};
VAR3AA:=SUM(AMOUNT,10)/VAR1AA/7{XG51};
VAR4AA:=DMA(VAR2AA,VOL/VAR3AA){XG51};
VAR5AA:=(CLOSE-VAR4AA)/VAR4AA*100,COLORMAGENTA{XG51};
XG1:=CROSS(VAR5AA,MA(VAR5AA,2)) AND VAR5AA<0 AND C<(HHV(H,5)*0.88) AND REF(O>C,1) AND REF(O>C,2){XG51};
XG3:=XG AND XG1 AND L<良1{XG51};
WSR13:=O>良3 AND L<良1 OR XG3{XG51};
DRAWICON(WSR13 AND FILTER(WSR13,10),L-0.03,5){XG51};
WSR14:=H>险3{XG51};
DRAWICON(WSR14 AND FILTER(WSR14,15),H+0.03,10){XG51};
WSR15:=H<险3 AND H>险2{XG51};
DRAWICON(WSR15 AND FILTER(WSR15,5),H+0.03,4),NODRAW{XG51};
ZLCM:=EMA(WINNER(CLOSE)*70,3),NODRAW{XG51};
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3),NODRAW{XG51};
ZSHTL:=SHCM/(ZLCM+SHCM)*100,NODRAW{XG51};
ZZLKP:=ZLCM/(ZLCM+SHCM)*100,NODRAW{XG51};
ZZLJJ:=EMA(ZZLKP,89),NODRAW{XG51};
ZJLRQD:=INTPART(ZZLKP-ZZLJJ),NODRAW{XG51};
天界:INTPART(ZSHTL),COLORGREEN,LINETHICK2,NODRAW{XG51};
凡间:ZJLRQD,LINETHICK2,COLORWHITE,NODRAW{XG51};
DRAWICON(CROSS(天界,凡间),H*1.02,12){XG51};
C2:=REF(C,1){XG51};
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0){XG51};
均价线:=AMOUNT/V/100{XG51};
STICKLINE (涨停, OPEN ,CLOSE,4,0),COLORLIGRAY{XG51};
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORWHITE{XG51};
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0){XG51};
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORCYAN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.0,0,0,HYBLOCK),COLORGREEN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,DYBLOCK),COLORBLUE{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.2,0,0,GNBLOCK),COLORCYAN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.5,0,0,FGBLOCK),COLORRED{X_G*5~1_C_N_{};