通达信大机构实战MACD未加密选股指标公式源码

源码正文：

LONG:=26;SHORT:=12;M:=9{XG51};
difF:=ema(CLOSE,SHORT)-Ema(CLOSE,LONG){XG51};
DEA:=EMA(DIFF,M){XG51};
macd2:=2*(DIFF-DEA){XG51};
DU0:=crOSS(DIFF,0){XG51};
UD0:=CROSS(0,DIFF){XG51};
TDU0:=BArslAst(DU0){XG51};
TUD0:=BARSLAST(UD0){XG51};
DU3:=REF(DU0,1){XG51};
UD3:=REF(UD0,1){XG51};
TDU3:=BARSLAST(DU3){XG51};
TUD3:=BARSLAST(UD3){XG51};
UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3)){XG51};
JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0{XG51};
JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0{XG51};
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1{XG51};
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1{XG51};
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1){XG51};
JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1){XG51};
JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1){XG51};
JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1){XG51};
bsLINE:=IF(BARSLAST(JDU2)<BARSLAST(JUD2),IF(REF(CROSS(0,MacD2),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS(0,MACD2),1)))),IF(REF(CROSS(MACD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(MACD2,0),1))))){XG51};
STICKLINE(MACD2>=0,0,MACD2,6,1),COLOR0000FF{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,6,0),COLOR0000FF{XG51};
STICKLINE(MACD2<0,0,MACD2,6,0),COLORFFFF00{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,6,1),COLORFFFF00{XG51};
DIF:DIFF,LINETHICK2,COLOR0000FF{XG51};
MACD:DEA,COLORFF0000{XG51};
DEF:MACD2,LINETHICK0,COLORFFFF00{XG51};
STICKLINE(CLOSE>0,0,0,10,0),COLOR808080{XG51};
DEFUT:=BARSLAST(CROSS(MACD2,0)){XG51};
DEFDT:=BARSLAST(CROSS(0,MACD2)){XG51};
DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1)){XG51};
DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1)){XG51};
DEFU2L:=REF(DEFUL,DEFUT+1){XG51};
DEFD2L:=REF(DEFDL,DEFDT+1){XG51};
DRAWICON(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),MACD2,1){XG51};
DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2,2){XG51};
DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2,2){X.G*5.1.C.N.{};

源码正文：

N1:=6;N2:=60;D:=3;S:=30;M:=30{XG51};
LC:=REF(CLOSE,1){XG51};
rsi1:SMA(maX(CLOSE-LC,0),N1,1)/SMA(Abs(CLOSE-LC),N1,1)*100{XG51};
RSI2:SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100{XG51};
W1:=V*100/CAPITAL{XG51};
W1>REF(W1,1){XG51};
W2:=DYnaINFO(23)-DYNAINFO(22){XG51};
W2>REF(W2,1){XG51};
BU:=crOSS(RSI1,RSI2){XG51};
BU1:=RSI2>50{XG51};
BU2:=SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*1000/5{XG51};
BU2>REF(RSI2,1){XG51};
stICKLINE(BU,OPEN,CLOSE,3.2,0),COLORBLUE{XG51};
DRAWICON(CROSS(RSI1,RSI2),RSI1,1){XG51};
SM:=(OPEN+HIGH+CLOSE+LOW)/4{XG51};
SMID:=MA(SM,D){XG51};
IM:=(INDEXO+INDEXH+INDEXL+INDEXC)/4{XG51};
IMID:=MA(IM,D){XG51};
SI1:=(SMID-REF(SMID,1))/SMID{XG51};
II:=(IMID-REF(IMID,1))/IMID{XG51};
RADER1:SUM((SI1-II)*2,S)*100{XG51};
RADERMA:=SMA(RADER1,M,1){XG51};
XG:W1>REF(W1,1) AND REF(W2,1) AND REF(RSI2,1) AND BU AND BU1 {XG51};
VAR01:=(HIGH+LOW+CLOSE)/3{XG51};
VAR02:=(VAR01-MA(VAR01,14))/(0.015*AVEDEV(VAR01,14)){XG51};
BB: ema(VAR02,2){XG51};
VAR03:=MA(vol,5){XG51};
VAR04:=MA(VOL,10){XG51};
VAR05:=MA(VOL,60){XG51};
VAR06:=MA(CLOSE,5){XG51};
VAR07:=MA(CLOSE,8){XG51};
VAR08:=MA(CLOSE,25){XG51};
VAR09:=MA(CLOSE,60){XG51};
VARA0:=CROSS(VAR02,BB) AND VAR02>80 AND VOL>VAR03 AND VOL>VAR04 AND VOL>VAR05 AND VAR06>VAR09 AND VAR07>VAR09 AND VAR08>VAR09 AND OPEN<VAR06 AND CLOSE>VAR06{XG51};
DRAWTEXT(VARA0,120,' 爆发拉升！'), , COLORBLUE{XG51};
STICKLINE(VARA0,130,-100,1,0), , COLORWHITE{XG51};
底部:=CROSS(BB,-100){XG51};
DRAWICON(底部,-100,1){X+G_5?1+C+N+{};