通达信追魂黑马粘合未加密选股指标公式源码

源码正文：

A:=ma(CLOSE,17)+Abs(MA(CLOSE,17)-REF(MA(CLOSE,17),1)){XG51};
B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1){XG51};
分水岭:=IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),LINETHICK1,COLORLIMAGENTA{XG51};
操作线:=分水岭-(ema(C,3)-分水岭),LINETHICK1,COLORBLUE{XG51};
PM:=MA(C,5),COLORRED{XG51};
S:=(PM>操作线){XG51};
DD:=分水岭<REF(分水岭,1){XG51};
VAR1:=MA(CLOSE,5){XG51};
VAR2:=MA(CLOSE,10){XG51};
VAR3:=MA(CLOSE,30){XG51};
VAR4:=MA(CLOSE,60){XG51};
VARB:=SUM(CLOSE*vol*100,28)/SUM(VOL*100,28){XG51};
VARC:=INTPART(VARB*100)/100{XG51};
VARD:=EMA(CLOSE,5)-EMA(CLOSE,10){XG51};
VARE:=EMA(VARD,9){XG51};
VARF:=(-100)*(HHV(CLOSE,5)-CLOSE)/(HHV(CLOSE,5)-LLV(LOW,5))+100{XG51};
VAR10:=(-100)*(HHV(CLOSE,10)-CLOSE)/(HHV(CLOSE,10)-LLV(LOW,10))+100{XG51};
VAR11:=(-100)*(HHV(CLOSE,20)-CLOSE)/(HHV(CLOSE,20)-LLV(LOW,20))+100{XG51};
VAR12:=(-100)*(HHV(CLOSE,30)-CLOSE)/(HHV(CLOSE,30)-LLV(LOW,30))+100{XG51};
VAR13:=REF(VARE,1){XG51};
VAR14:=VARE{XG51};
VAR15:=VAR14-VAR13{XG51};
VAR16:=REF(VARD,1){XG51};
VAR17:=VARD{XG51};
VAR18:=VAR17-VAR16{XG51};
VAR19:=OPEN{XG51};
VAR1A:=CLOSE{XG51};
白马剑: IF(VAR19<=VAR1 AND VAR19<=VAR2 AND VAR19<=VAR3 AND VAR1A>=VAR1 AND VAR1A>=VARC AND VAR15>0 AND VAR18>0,0.8,0),LINETHICK3 , COLOR00FFFF{XG51};
黑马剑: IF(VAR19<=VAR1 AND VAR19<=VAR2 AND VAR19<=VAR3 AND VAR1A>=VAR1 AND VAR1A>=VARC AND VAR15>0 AND VAR18>0,0.8,0),LINETHICK3 , COLOR00FFFF{XG51};
stICKLINE(黑马剑,0,黑马剑*0.86,2,1),LINETHICK3 ,COLOR00FFFF{XG51};
DRAWICON(黑马剑>0,黑马剑,1){XG51};
MA1:=EMA(CLOSE,5){XG51};
MA2:=EMA(CLOSE,10){XG51};
MA3:=EMA(CLOSE,20){XG51};
MA4:=EMA(CLOSE,30){XG51};
三线粘合剑:crOSS(分水岭,操作线) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 AND CROSS(MA1,MA4) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 AND CROSS(MA2,MA3) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 OR CROSS(MA1,MA3) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018{XG51};
STICKLINE(三线粘合剑,0,三线粘合剑*0.96,2,1),COLORWHITE{XG51};
DRAWICON(三线粘合剑>0,三线粘合剑,1){XG51};
bias1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100{XG51};
BIAS2:=HHV((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100,200){XG51};
M1:=BIAS1=BIAS2 {XG51};
M2:=V>MA(V,5) {XG51};
M3:=REF(BIAS1,1)<REF(BIAS2,1) {XG51};
追魂剑:IF(M1 AND M2 AND M3,0.60,0),COLORFFCCCC,LINETHICK2{XG51};
STICKLINE(追魂剑,0,追魂剑*0.56,2,1),COLORFFCCCC,LINETHICK2{XG51};
DRAWICON(追魂剑>0,追魂剑,1){XG51};
C1:=HHV(C,115){XG51};
C2:=LLV(C,115){XG51};
C3:=C1-C2{XG51};
C4:=MA((C-C2)/C3-0.5,14)*20{XG51};
HH:=REF(HHV(C,66),2){XG51};
BUY1:=CROSS(C,HH) AND (HHV(C,110)/LLV(C,110)-1)*100<45 AND C4<5.666{XG51};
SIGN1:=LLV(C4,35)<-8.9 AND CROSS(C4,-7.815) AND C4<-1.2{XG51};
抄底:1*FILTER(SIGN1,41),STICK,LINETHICK4,COLOR00EE00{X+G_5-1+C+N+{};

源码正文：

N:=5{XG51};
N1:=13{XG51};
N2:=50{XG51};
VAR1:=ema(Ema(EMA(CLOSE,N),N),N){XG51};
短线: VAR1-REF(VAR1,1)+VAR1,COLOR10FFFF{XG51};
中短: MA(短线,N1){XG51};
中线: EMA(CLOSE,N2),LINETHICK1,COLORFFFFFF{XG51};
stICKLINE(短线>中短,中短,短线,0.10,1),COLOR0000FF,LINETHICK1{XG51};
STICKLINE(中短>短线,短线,中短,0.10,1),LINETHICK1,COLOR00FF00{XG51};
DRAWTEXT(crOSS(短线,中短) AND 中短>=REF(中短,1),中短-0.2,'↑'), , COLOR00FFFF{XG51};
VARA:=AMOUNT/vol/100{XG51};
VARB:=(3*HIGH+LOW+OPEN+2*CLOSE)/7{XG51};
VARC:=SUM(AMOUNT,7)/VARA/100{XG51};
VARD:=dma(VARB,VOL/VARC){XG51};
VARE:=(CLOSE-VARD)/VARD*100{XG51};
VARF:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100{XG51};
VARJ:=MA(VARE,20)+STD(VARE,20){XG51};
bias18:=(CLOSE-MA(CLOSE,18))/MA(CLOSE,18)*100{XG51};
K:=SMA(VARF,3,1){XG51};
顶:STICKLINE(REF(BIAS18,1)>=5 AND CROSS(VARJ,VARE) AND K>79 ,MA(CLOSE,25)*(1-6/100),MA(LOW,30)*(1-15/100),5,0),COLOR0099FF{XG51};
金叉: CROSS(短线,中短);
DRAWTEXT(金叉,短线,'★'),COLOR6F27FF{X_G.5_1_C_N_{};