通达信黑马趋势主升浪选股指标公式源码

通达信黑马趋势主升浪选股指标公式源码

源码正文：

M:=7{XG51};
ema13:=Ema(C,13){XG51};
EMA30:EMA(C,30),COLORFFCCCC{XG51};
HJ_1:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100{XG51};
HJ_2:=SMA(SMA(HJ_1,3,1),3,1)/28.57{XG51};
HJ_3:=EMA(HJ_2,5){XG51};
HJ_4:=3*HJ_2-2*HJ_3{XG51};
HJ_5:=crOSS(HJ_4,HJ_2) AND HJ_2<2.1 AND CLOSE>OPEN{XG51};
EMA60:EMA(C,60),COLORFF00FF{XG51};
EMA90:EMA(C,90),COLORBLUE{XG51};
stICKLINE(HJ_5,82,0,0.005,0),COLORWHITE{XG51};
DRAWICON(HJ_5>0,85,13),COLORBLUE{XG51};
EMA120:EMA(C,120),COLORFFCC66{XG51};
EMA250:EMA(C,250),COLORYELLOW{XG51};
HJ_6:=CROSS(HJ_4,HJ_2) AND HJ_2<2.1 AND CLOSE>OPEN{XG51};
HJ_7:=(2*CLOSE+HIGH+LOW)/4{XG51};
HJ_8:=LLV(LOW,13){XG51};
A1:3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,
1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1){XG51};
黑马线:EMA(A1,5),LINETHICK2,COLOR6600FF{XG51};
HJ_9:=HHV(HIGH,13){XG51};
HJ_10:=EMA((HJ_7-HJ_8)/(HJ_9-HJ_8)*100,13){XG51};
F1:=EMA30-EMA60<130/1000 AND EMA30-EMA90<230/1000 AND EMA30-EMA120<330/1000{XG51};
F2:=EMA60-EMA30<130/1000 AND EMA60-EMA90<230/1000 AND EMA60-EMA120<330/1000{XG51};
HJ_11:=EMA(0.667*REF(HJ_10,1)+0.333*HJ_10,2){XG51};
HJ_12:=HJ_10{XG51};
F3:=EMA90-EMA30<130/1000 AND EMA90-EMA60<230/1000 AND EMA90-EMA120<330/1000{XG51};
F4:=EMA120-EMA30<130/1000 AND EMA120-EMA60<230/1000 AND EMA120-EMA90<330/1000{XG51};
F5:=EMA30-EMA60<100/1000 AND EMA30-EMA90<200/1000{XG51};
STICKLINE(HJ_10>HJ_11,HJ_10,HJ_11,3,0),COLOR0055AA{XG51};
STICKLINE(HJ_10>HJ_11,HJ_10,HJ_11,2.8,0),COLOR0066BB{XG51};
STICKLINE(HJ_10>HJ_11,HJ_10,HJ_11,2.5,0),COLOR0077CC{XG51};
A2:=(黑马线-REF(黑马线,1))/REF(黑马线,1)*100{XG51};
A3:=EMA(C,5){XG51};
STICKLINE(HJ_10>HJ_11,HJ_10,HJ_11,2.2,0),COLOR0088DD{XG51};
STICKLINE(HJ_10>HJ_11,HJ_10,HJ_11,1.7,0),COLOR0099EE{XG51};
STICKLINE(HJ_10>HJ_11,HJ_10,HJ_11,1.2,0),COLOR00AAFF{XG51};
FF1:=F1 AND F2 AND F3 AND F4 AND CROSS(EMA30,EMA60){XG51};
FF2:=F1 AND F2 AND F3 AND F4 AND CROSS(EMA(C,13),EMA30){XG51};
FF3:=F5 AND C>EMA250 AND CROSS(EMA30,EMA60){XG51};
STICKLINE(HJ_10>HJ_11,HJ_10,HJ_11,0.7,0),COLOR00CCFF{XG51};
STICKLINE(HJ_10>HJ_11,HJ_10,HJ_11,0.2,0),COLORBLUE{XG51};
STICKLINE(HJ_10<=HJ_11,HJ_10,HJ_11,3,0),COLOR990099{XG51};
STICKLINE(HJ_10<=HJ_11,HJ_10,HJ_11,2.8,0),COLOR990088{XG51};
STICKLINE(HJ_10<=HJ_11,HJ_10,HJ_11,2.5,0),COLOR990077{XG51};
G1:=EMA60-EMA90<220/1000 AND EMA60-EMA120<320/1000 AND EMA60-EMA250<420/1000{XG51};
G2:=EMA90-EMA30<220/1000 AND EMA90-EMA60<320/1000 AND EMA90-EMA250<420/1000{XG51};
STICKLINE(HJ_10<=HJ_11,HJ_10,HJ_11,2.2,0),COLOR990066{XG51};
STICKLINE(HJ_10<=HJ_11,HJ_10,HJ_11,1.7,0),COLOR990055{XG51};
STICKLINE(HJ_10<=HJ_11,HJ_10,HJ_11,1.2,0),COLORBB00BB{XG51};
STICKLINE(HJ_10<=HJ_11,HJ_10,HJ_11,0.7,0),COLORDD00DD{XG51};
STICKLINE(HJ_10<=HJ_11,HJ_10,HJ_11,0.2,0),COLORLIMAGENTA{XG51};
G3:=EMA120-EMA60<220/1000 AND EMA120-EMA90<320/1000 AND EMA120-EMA250<420/1000{XG51};
G4:=EMA250-EMA60<220/1000 AND EMA250-EMA90<320/1000 AND EMA250-EMA120<420/1000{XG51};
DRAWTEXT(HJ_6,78,5),COLORGREEN{XG51};
HJ_13:=10{XG51};
GG1:=G1 AND G2 AND G3 AND G4 AND CROSS(EMA13,EMA30){XG51};
GG2:=G1 AND G2 AND G3 AND G4 AND CROSS(EMA30,EMA60){XG51};
底部区域:20,COLORLICYAN{XG51};
中轨:50,COLORBLUE{XG51};
高位:80,COLORLIGREEN{XG51};
启动:EMA(0.382*REF(HJ_10,2)+0.618*HJ_10,6),COLORWHITE{XG51};
A4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100{XG51};
趋势线:(MA(3*SMA(A4,6,1)-2*SMA(SMA(A4,5,1),5,1),2)),LINETHICK2,COLORBLUE{XG51};
IF(启动>REF(启动,1),启动,DRAWNULL),COLORWHITE,LINETHICK4{XG51};
IF(启动<REF(启动,1),启动,DRAWNULL),COLORLIGREEN,LINETHICK2{XG51};
DRAWICON(FF1 OR FF2 OR FF3 OR GG1 OR GG2,L-0.1,9){XG51};
VAR1:=EMA(SMA((CLOSE-LLV(LOW,19))/(HHV(HIGH,19)-LLV(LOW,19))*100,8,1),3){XG51};
买入:IF(CROSS(4*SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,
5,1)-3*SMA(SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,
1),3,1),8),58,0),STICK,COLORBLUE,LINETHICK3{XG51};
A5:=(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))*100{XG51};
STICKLINE(买入,50,0,3.5,0),COLORCYAN{XG51};
STICKLINE(买入,50,0,3.4,0),COLORCYAN{XG51};
STICKLINE(买入,50,0,3.1,0),COLORCYAN{XG51};
STICKLINE(VAR1>20 AND VAR1<80,VAR1,VAR1,10,1),COLORWHITE{XG51};
STICKLINE(VAR1<REF(VAR1,1),VAR1,VAR1,10,1),COLORFFCC66{XG51};
STICKLINE(买入,50,0,2.8,0),COLOR009900{XG51};
STICKLINE(买入,50,0,2.5,0),COLOR009900{XG51};
STICKLINE(买入,50,0,2,0),COLOR009900{XG51};
STICKLINE(买入,50,0,1.5,0),COLOR00BB00{XG51};
STICKLINE(VAR1>80,VAR1,VAR1,8,1),COLOR00FF00{XG51};
STICKLINE(VAR1<20,VAR1,VAR1,8,1),COLORBLUE{XG51};
STICKLINE(买入,50,0,0.9,0),COLOR00DD00{XG51};
STICKLINE(买入,50,0,0.3,0),COLORCYAN{XG51};
STICKLINE(买入,50,0,0.05,0),COLORBLUE{XG51};
DRAWTEXT(FILTER(REF(黑马线,1)>90 AND A2<0,7),黑马线,'跑'),COLOR00FF00{XG51};
WWWCOM:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
DRAWTEXT(CROSS(A1,黑马线)AND 黑马线<A5,黑马线,'黑马'){XG51};
DRAWTEXT(CROSS(趋势线,0)AND 黑马线<40,5,'大黑马'){XG51};
DRAWICON(买入>0,58,34),COLORBLUE{XG51};
DRAWTEXT(买入,45,2),COLOR66FFCC{XG51};
主升浪:IF(WINNER(C*0.9)*100-V/CAPITAL*100>=25,10,0),COLORBLUE,POINTDOT{XG51};
STICKLINE(主升浪,10,0,1,1),COLORBLUE{XG51};
HJ_14:=REF(CLOSE,1){XG51};
HJ_15:=SMA(MAX(CLOSE-HJ_14,0),6,1)/SMA(Abs(CLOSE-HJ_14),6,1)*100{XG51};
HJ_16:=CROSS(70,HJ_15)*70{XG51};
底部:(A2<-10 AND A2>REF(A2,1))*25,COLORWHITE{XG51};
DRAWICON(底部 AND A3>REF(A3,1),25,4){XG51};
DRAWTEXT(HJ_16,80,3),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.61,0.9,1,4),COLORWHITE{X_G^5.1_C_N_{};