通达信红牛珍藏版未加密选股指标公式源码

源码正文：

A:=(3*C+L+O+H)/6{XG51};
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210{XG51};
RCC:=DYnaINFO(3){XG51};
S2:=SMA(C,3,1){XG51};
S6:=Sma(C,5,1){XG51};
DK:=2*(S2-S6){XG51};
stICKLINE(DK>0,RCC,RCC+DK,0,1),COLORWHITE{XG51};
STICKLINE(DK<0,RCC,RCC+DK,0,1),COLORGREEN{XG51};
主力成本:ema(X,13),COLORFF00FF,LINETHICK0{XG51};
短期底部:LLV(HIGH,30),LINETHICK2,COLORFFCC00{XG51};
IF(MA(C,3),MA(C,3),DRAWNULL),COLORBLUE,LINETHICK2{XG51};
IF(MA(C,9),MA(C,9),DRAWNULL),COLORLIMAGENTA,LINETHICK2{XG51};
IF(MA(C,23.5),MA(C,23.5),DRAWNULL),COLORRED{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){XG51};
MA5:=MA(C,5){XG51};
MA10:=MA(C,10){XG51};
MA30:=MA(C,30){XG51};
FA:=BArslAST(crOSS(MA10,MA5)) AND CROSS(MA5,MA10){XG51};
FB:=FA AND MA5>MA30 AND MA10>MA30 AND MA10>REF(MA10,1){XG51};
DRAWTEXT(FB,L-0.58,'★红牛'),COLORWHITE{XG51};
V1:=EMA(CLOSE,5){XG51};
V2:=EMA(EMA(CLOSE,90)*1.01,10){XG51};
DRAWTEXT(CROSS(V1,V2),V1+0.05,'牛起步'),COLOR00FF00{XG51};
VAR1:=LLV(LOW,21){XG51};
VAR2:=HHV(HIGH,21){XG51};
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5){XG51};
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13){XG51};
AB:=CROSS(AK1,AK){XG51};
DRAWTEXT((AB = 1),(LOW * 0.99),'○牛窝'),COLORBLUE{XG51};
AA1:=AMOUNT/V{XG51};
BB1:=L<AA1*0.9{XG51};
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2{XG51};
DD1:=L<MA(C,5)*0.921{XG51};
EE1:=V<MA(V,5)*1.5{XG51};
老鼠仓:=BB1 AND CC1 AND DD1 AND EE1,LINETHICK0,COLOR0099FF{XG51};
DRAWTEXT(老鼠仓,L*0.99,'老鼠仓'),COLOR0099FF{XG51};
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0){XG51};
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0){XG51};
DRAWTEXT(FILTER((VAR4AA>90),45),(LOW)*(0.93),'★大胆搏 '),COLOR00FFFF{XG51};
DRAWTEXT(FILTER((VAR4AA>90),35),(LOW)*(0.99000001),'★加仓'),COLOR00FFFF{XG51};
A1AA:=9{XG51};
A2AA:=(REF(CLOSE,A1AA+1)<CLOSE){XG51};
DRAWTEXT(FILTER((A2AA>-0.5),84),(HIGH)*(1.05),'小心变盘'),COLORFFFFFF{XG51};
VAR6:=REF(C,1){XG51};
VAR7:=SMA(MAX(C-VAR6,0),6,1)/SMA(Abs(C-VAR6),6,1)*100{XG51};
DRAWTEXT(CROSS(82,VAR7),H*1.01,'▼逃顶'),COLORBLUE{X_G^5.1_C_N_{};

源码正文：

K:=2{XG51};
VL:=vol{XG51};
VL60:=ma(VL,60){XG51};
VL5:=MA(VL,5){XG51};
VL10:=MA(VL,10){XG51};
V1:=MIN(REF(VOL,1),REF(VOL,2)){XG51};
V2:=MIN(REF(VOL,3),REF(VOL,4)){XG51};
V3:=MIN(REF(VOL,5),REF(VOL,6)){XG51};
V4:=MIN(REF(VOL,7),REF(VOL,8)){XG51};
V5:=MIN(REF(VOL,9),REF(VOL,10)){XG51};
V6:=MIN(REF(VOL,11),REF(VOL,12)){XG51};
V7:=MIN(REF(VOL,13),REF(VOL,14)){XG51};
V8:=MIN(REF(VOL,15),REF(VOL,16)){XG51};
W1:=MIN(MIN(V1,V2),MIN(V3,V4)){XG51};
W2:=MIN(MIN(V5,V6),MIN(V7,V8)){XG51};
ZM1:=MIN(W1,W2){XG51};
芝麻量:=ZM1{XG51};
AA:=V<ZM1{XG51};
AAA:=COUNT(AA,K){XG51};
XG1:=AAA>0{XG51};
G:=14{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:=(TYP-MA(TYP,G))/(0.015*AVEDEV(TYP,G)){XG51};
XG2:=crOSS(CCI,-100){XG51};
LV:=2;GROW:=8{XG51};
XA_1:=IF(CLOSE>REF(CLOSE,1),1,0){XG51};
XA_2:=IF(CLOSE/REF(CLOSE,1)>1.01 AND HIGH/CLOSE<1.01 AND XA_1=1,1,0){XG51};
XA_3:=IF(NAMELIKE(1) OR NAMELIKE(2) OR NAMELIKE(3),0,1){XG51};
XA_4:=IF(DYNAINFO(17)>0,1,0){XG51};
XA_5:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1){XG51};
XA_6:=8{XG51};
XA_7:=XA_5<=8{XG51};
XA_8:=(2*CLOSE+HIGH+LOW+OPEN)/5{XG51};
XA_9:=(XA_8-MA(XA_8,14))*100/(1.5*AVEDEV(XA_8,14)){XG51};
XA_10:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(Abs(CLOSE-REF(CLOSE,1)),6,1)*100{XG51};
XA_11:=XA_9<(-100){XG51};
XA_12:=XA_10<25{XG51};
XA_13:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3{XG51};
XA_14:=XA_13<(-9) AND XA_13>REF(XA_13,1){XG51};
XA_15:=XA_11 OR XA_12 OR XA_14{XG51};
XA_16:=20*MAX(XA_7,XA_15)*dma(ema(CLOSE,60),SUM(VOL,60)/CAPITAL)/EXP(2*HIGH-LOW/3){XG51};
XA_17:=DMA(EMA(CLOSE,60),SUM(VOL,60)/CAPITAL)*POW(IF(CLOSE>60,100,10),6)/EXP(2*HIGH-LOW/3)/2{XG51};
XA_18:=IF(LV=3,XA_17,0){XG51};
XG3:=XA_2=1 AND XA_3=1 AND XA_4=1 AND XA_16=0 AND XA_18=0 AND DYNAINFO(14)*100<=GROW{XG51};
N:=14;MM:=6{XG51};
XB1:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N){XG51};
XB2:=HIGH-REF(HIGH,1){XG51};
XB3:=REF(LOW,1)-LOW{XG51};
XB4:=EXPMEMA(IF(XB2>0 AND XB2>XB3,XB2,0),N){XG51};
XB5:=EXPMEMA(IF(XB3>0 AND XB3>XB2,XB3,0),N){XG51};
C1:=XB4*100/XB1{XG51};
C2:=XB5*100/XB1{XG51};
XG4:=CROSS(C1,C2){XG51};
MA30:=MA(CLOSE,30){XG51};
MA20:=MA(CLOSE,20){XG51};
XG:XG1 AND XG2 AND XG3 AND CLOSE>MA30 AND MA30>REF(MA30,1) AND REF(MA30,1)>REF(MA30,2) AND XG4 AND CROSS(CLOSE,MA20){X^G!5-1^C^N^{};