通达信黑牛寻踪主图未加密选股指标公式源码

源码正文：

D1:=90{XG51};
D2:=15{XG51};
M1:=3{XG51};
M2:=3{XG51};
M3:=3{XG51};
多:REF(ma(HIGH,3),1) NODRAW ;
空:REF(MA(LOW,5),1) NODRAW ;
支:REF(MA(LOW,30),1) NODRAW ;
SPJ:CLOSE NODRAW ;
HT:HHV(SPJ,90) NODRAW ;
ZT:IF((SPJ - REF(SPJ,1)) * 100 / REF(SPJ,1) >= 10 - 1 / REF(SPJ,1) AND (SPJ - REF(SPJ,1)) * 100 / REF(SPJ,1) <= 10.5 AND (HIGH = SPJ),1,0) AND vol / CAPITAL * 100 NODRAW ;
LAstZT:COUNT(ZT,15) >= 1 NODRAW ;
B点预警:crOSS(SPJ,空) AND 多 > 空 AND 空 > 支 AND macd.dif > 0 AND MacD.DEA > 0 AND LASTZT > 0 NODRAW ;
牛点:CROSS(SPJ,REF(HHV(SPJ,90),1)) AND (COUNT(CROSS(SPJ,REF(HHV(SPJ,90),1)),5) = 1) NODRAW;
DRAWTEXT(牛点 OR (CROSS(SPJ,REF(HHV(SPJ,360),1)) AND (COUNT(CROSS(SPJ,REF(HHV(SPJ,360),1)),5) = 1)),LOW * 0.97,''){XG51};
追点:CROSS(HIGH,REF(HHV(SPJ,90),1)) AND (COUNT(CROSS(HIGH,REF(HHV(SPJ,90),1)),5) = 1) NODRAW ;
DRAWTEXT(追点,LOW * 0.98,'追'){XG51};
SVAR0:=REF(HHV(HIGH,90),1) ;
TPJL:(SPJ - SVAR0) / SVAR0 * 100, NODRAW ;
DRAWTEXT(B点预警 > 0,LOW,'B'){XG51};
B2预警:CROSS(SPJ,多) AND 多 > 空 AND 空 > 支 AND MACD.DIF > 0 AND MACD.DEA > 0 AND LASTZT > 0 NODRAW;
DRAWTEXT(B2预警 > 0,LOW,'B2'){XG51};
STICKLINE(LOW > REF(HIGH,1),REF(HIGH,1),LOW,20,0.5),COLORA0A0A0{XG51};
DRAWICON(CROSS(多,SPJ),HIGH * 1.02,2),LINETHICK4{XG51};
DRAWICON(CROSS(SPJ,多),LOW * 0.98,1),LINETHICK5{XG51};
DT:CROSS(SPJ,多) NODRAW ;
SVAR1:=SUM(IF(SPJ > REF(SPJ,1),VOL,IF(SPJ < REF(SPJ,1),-(VOL),0)),0) ;
SVAR2:=HHV(SVAR1,90) ;
HH顶:HHV(SPJ,700) NODRAW ;
SVAR3:="SH000001$CLOSE" ;
SVAR4:=(SVAR3 - REF(SVAR3,1)) / REF(SVAR3,1) * 100 ;
SVAR5:=(SPJ - REF(SPJ,1)) / REF(SPJ,1) * 100 ;
DRAWTEXT((MA(SVAR5,5) - MA(SVAR4,5) > 0.5 AND MA(SVAR5,5) - MA(SVAR4,5) < 6 AND VOL / REF(VOL,1) > 2 AND SPJ > REF(SPJ,1) AND HIGH < HHV(HIGH,1000)) > 0,LOW * 0.99,'牛'){XG51};
STICKLINE(ZT > 0,SPJ,OPEN,5.5,0),COLOR00FFFF{XG51};
MA5:MA(SPJ,5),COLORFFFFFF ;
MA10:MA(SPJ,10),COLOR00FFFF ;
MA30:MA(SPJ,30),COLOR8B8B7A ;
MA250:MA(SPJ,120),COLOR0000FF {X-G!5+1-C-N-{};

源码正文：

A1:=(LOW+HIGH+CLOSE+OPEN)/4;
A2:=ema((Ema(A1,14.4)-EMA(A1,36)),6){XG51};
A3:=((EMA(A1,14.4)-EMA(A1,36))-A2)*6{XG51};
A4:=IF(A3>=1000 ,1000 ,IF(A3<=A1,A1,A3)){XG51};
八字主图:LLV((MA(A1,6)),36),COLORBLUE,LINETHICK2;
乾坤:EXPMEMA(OPEN,3),COLORCYAN{XG51};
线起:IF(乾坤>REF(MA(乾坤,3),16),乾坤,DRAWNULL),COLORWHITE{XG51};
A5:=COstEX((FORCAST(FORCAST(A4,36),14.4)),REF(OPEN,1)){XG51};
成本:MA(A5,24),COLORLIGREEN{XG51};
赢利:MA((COSTEX(OPEN,REF(OPEN,1))),16),COLORLIMAGENTA{XG51};
STICKLINE(成本<赢利,成本,赢利,2,1),COLORRED{XG51};
A6:=MA((COST(50)),14.4){XG51};
STICKLINE((COST(50))>A6,(COST(50)),A6,0.2,0),COLORLIMAGENTA{XG51};
八字:MA(乾坤,72),COLORRED,POINTDOT{XG51};
财运好:MA((MA(乾坤,34)),144),COLORBLUE,POINTDOT{X!G^5~1!C!N!{};