通达信超好MACD未加密选股指标公式源码

源码正文：

SHORT:=6;LONG:=9;MID:=6;D1:=ema(C,3)-Ema(C,8){XG51};
D2:=EMA(O,3)-EMA(O,8){XG51};
D3:=EMA(H,3)-EMA(H,8){XG51};
D4:=EMA(L,3)-EMA(L,8);stICKLINE(D1>=D2,D1,D2,3,0),COLOR0055AA{XG51};
STICKLINE(D1<=D2,D1,D2,3,0),COLOR006600{XG51};
STICKLINE(D1>=D2,D1,D2,2,0),COLOR0077CC{XG51};
STICKLINE(D1>=D2,D1,D2,1,0),COLOR0099DD{XG51};
STICKLINE(D1>=D2,D3,D4,0,0),COLOR00BBFF{XG51};
STICKLINE(D1<=D2,D1,D2,2,0),COLOR009900{XG51};
STICKLINE(D1<=D2,D1,D2,1,0),COLOR00BB00{XG51};
STICKLINE(D1<=D2,D3,D4,0,0),COLOR00EE00;dif:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG),COLORGREEN,LINETHICK2{XG51};
DEA:EMA(DIF,MID),COLOR66CC00,LINETHICK3{XG51};
TJ1:EMA(DEA,4),COLOR999933,LINETHICK3{XG51};
TJ2:=EMA(DIF,17),COLORYELLOW,LINETHICK3{XG51};
macd:(DIF-DEA)*2,COLORSTICK{XG51};
IF(DIF>REF(DIF,1),DIF,DRAWNULL),COLORRED,LINETHICK2{XG51};
IF(DEA>REF(DEA,1),DEA,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
IF(TJ1>REF(TJ1,1),TJ1,DRAWNULL),COLORLIMAGENTA,LINETHICK3{XG51};
0,COLORBROWN,LINETHICK1{X-G_5!1-C-N-{};

源码正文：

ma13:MA(C,13),COLOR0066FF,LINETHICK2{XG51};
stICKLINE(C>MA13,L,H,0,0),COLORWHITE{XG51};
STICKLINE(C>MA13,O,C,3,0),COLOR000088{XG51};
STICKLINE(C>MA13,O,C,2,0),COLOR0000AA{XG51};
STICKLINE(C>MA13,O,C,0.1,0),COLOR0000CC{XG51};
STICKLINE(C>MA13,O,C,0,0),COLOR0000FF{XG51};
bias1:=MA((C-MA(C,13))/MA(C,13),3)*100,COLORRED,LINETHICK0{XG51};
BIAS3:=MA((C-MA(C,34))/MA(C,34),3)*100,COLORFF00FF,LINETHICK0{XG51};
关注区:=COUNT(BIAS3<0,8)>=8 AND COUNT(BIAS3>0,34)>13 AND COUNT(BIAS3<0,55)>30 OR BIAS3<-15,LINETHICK0{XG51};
STICKLINE(关注区,C,O,3,0),COLOR8977FF{XG51};
STICKLINE(关注区,L,H,0,0),COLOR8977FF{XG51};
开炮1:=crOSS(BIAS1,0) AND SUM(IF(BIAS3<-15,10,0),8)>10,LINETHICK0{XG51};
STICKLINE(开炮1,C,O,3,0),COLOR0066BB{XG51};
STICKLINE(开炮1,C,O,2,0),COLOR0099CC{XG51};
STICKLINE(开炮1,C,O,1,0),COLOR00CCEE{XG51};
STICKLINE(开炮1,C,O,0.1,0),COLOR00FFFF{XG51};
STICKLINE(开炮1,L,H,0,0),COLOR00FFFF{XG51};
DRAWTEXT(开炮1,C*0.97,'开炮1'),COLOR0000FF{XG51};
LC:=REF(C,1),LINETHICK0{XG51};
rsi:=((SMA(MAX((C-LC),0),13,1)/SMA(Abs((C-LC)),13,1))*100){XG51};
STICKLINE((RSI<20),L,H,0.1,0),COLORFF6600{XG51};
STICKLINE((RSI<20),O,C,8,0),COLORCC5000{XG51};
DRAWTEXT(CROSS(RSI,20-0.0005),L*0.97,'短线'),COLORAA99AA{XG51};
STICKLINE(CROSS(RSI,20-0.0005),C,O,3,0),COLOR888888{XG51};
STICKLINE(CROSS(RSI,20-0.0005),C,O,2,0),COLORAAAAAA{XG51};
STICKLINE(CROSS(RSI,20-0.0005),C,O,1,0),COLORCCCCCC{XG51};
STICKLINE(CROSS(RSI,20-0.0005),C,O,0.1,0),COLORFFFFFF{XG51};
STICKLINE(CROSS(RSI,20-0.0005),L,H,0,0),COLORFFFFFF{XG51};
RSV:=(((C-LLV(L,9))/(HHV(H,9)-LLV(L,9)))*100){XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
NB:=((C>LC) AND C>O){XG51};
KK:=HHV(K,5){XG51};
DD:=HHV(D,5){XG51};
D1:=REF(D,1){XG51};
K1:=REF(K,1){XG51};
STICKLINE(((DD>75) AND CROSS(D,K)),C,O,3,0),COLOR008800{XG51};
STICKLINE(((DD>75) AND CROSS(D,K)),C,O,2,0),COLOR00AA00{XG51};
STICKLINE(((DD>75) AND CROSS(D,K)),C,O,1,0),COLOR00CC00{XG51};
STICKLINE(((DD>75) AND CROSS(D,K)),C,O,0.1,0),COLOR00FF00{XG51};
STICKLINE(((DD>75) AND CROSS(D,K)),L,H,0,0),COLOR00FF00{XG51};
STICKLINE((((D1<30) AND CROSS(K,D)) AND NB),C,O,3,0),COLOR0011FF{XG51};
STICKLINE((((D1<30) AND CROSS(K,D)) AND NB),C,O,2,0),COLOR0044FF{XG51};
STICKLINE((((D1<30) AND CROSS(K,D)) AND NB),C,O,1,0),COLOR0077FF{XG51};
STICKLINE((((D1<30) AND CROSS(K,D)) AND NB),C,O,0.1,0),COLOR0099FF{XG51};
STICKLINE((((D1<30) AND CROSS(K,D)) AND NB),L,H,0,0),COLOR0099FF{XG51};
DRAWTEXT((((D1<30) AND CROSS(K,D)) AND NB),L,'开炮2'),COLOR0066FF{XG51};
DRAWTEXT((((D1<30) AND CROSS(K,D)) AND NB),L*0.95,'↑买'),COLORFFAAFF{XG51};
DRAWTEXT(((DD>75) AND CROSS(D,K)),H*1.05,'↓卖'),COLOR00CC00{XG51};
QN1:=MA(C,13){XG51};
QN:=ATAN((QN1-REF(QN1,1)))*180/2{XG51};
STICKLINE(QN>1 AND QN1>REF(QN1,1),QN1,REF(QN1,1),5,0),COLOR00FFFF{XG51};
STICKLINE(QN<1 AND QN1<REF(QN1,1),QN1,REF(QN1,1),5,1),COLORCYAN{XG51};
QN2:=MA(C,21){XG51};
QN3:=ATAN((QN2-REF(QN2,1)))*180/2{XG51};
STICKLINE(QN3>1,QN2,REF(QN2,1),5,0),COLORFF00FF{XG51};
STICKLINE(QN3<1,QN2,REF(QN2,1),5,1),COLORFF0000{X_G+5.1_C_N_{};