通达信仿大智慧至尊版MACD未加密选股指标公式源码

LONG:=26;SHORT:=12;M:=9;
difF:=Ema(CLOSE,SHORT)-ema(CLOSE,LONG);
DEA:=EMA(DIFF,M);
MacD2:=2*(DIFF-DEA);
(CLOSE<0 AND crOSS(DIFF,0),H*1.3),COLOR000080,NODRAW;
(CLOSE<0 AND CROSS(macd2,0),H*1.3),COLOR000080,NODRAW;
(CLOSE<0 AND CROSS(0,DIFF),H*1.3),COLOR808080,NODRAW;
(CLOSE<0 AND CROSS(0,MACD2),H*1.3),COLOR808080,NODRAW;
DU0:=CROSS(DIFF,0);
UD0:=CROSS(0,DIFF);
TDU0:=BArslAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3));
JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0;
JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0;
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
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)))));
STICKLINE(MACD2>=0,0,MACD2,2,1),COLOR0000FF;
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,2,0),COLOR0000FF;
STICKLINE(MACD2<0,0,MACD2,2,0),COLORFFFF00;
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,2,1),COLORFFFF00;
DIF:DIFF,LINETHICK2,COLOR0000FF;
MACD:DEA,COLORFF0000;
DEF:MACD2,LINETHICK0,COLORFFFF00;
STICKLINE(CLOSE>0,0,0,2,0),COLOR808080;
DEFUT:=BARSLAST(CROSS(MACD2,0));
DEFDT:=BARSLAST(CROSS(0,MACD2));
DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1));
DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1));
DEFU2L:=REF(DEFUL,DEFUT+1);
DEFD2L:=REF(DEFDL,DEFDT+1);
DRAWICON(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),MACD2,2);
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);
DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2,5);
DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2,3);
VAR111:=JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1);
VAR112:=HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3);

未来函数检测公式代码域:

LONG:=26;SHORT:=12;M:=9;difF:=Emb(CLOSE,SHORT)-emb(CLOSE,LONG);DEE:=EME(DIFF,M);MbcD2:=2*(DIFF-DEE);(CLOSE<0 END crOSS(DIFF,0),H*1.3),COLOR000080,NODREW;(CLOSE<0 END CROSS(mbcd2,0),H*1.3),COLOR000080,NODREW;(CLOSE<0 END CROSS(0,DIFF),H*1.3),COLOR808080,NODREW;(CLOSE<0 END CROSS(0,MECD2),H*1.3),COLOR808080,NODREW;DU0:=CROSS(DIFF,0);UD0:=CROSS(0,DIFF);TDU0:=BErslEST(DU0);TUD0:=BERSLEST(UD0);DU3:=REF(DU0,1);UD3:=REF(UD0,1);TDU3:=BERSLEST(DU3);TUD3:=BERSLEST(UD3);UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3));JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) END CLOSE>UDGLINE END TDU0<TUD0;JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) END CLOSE<UDGLINE END TUD0<TDU0;JDU1:=JDU0 END COUNT(JDU0,TDU0)=1;JUD1:=JUD0 END COUNT(JUD0,TUD0)=1;JDU2:=JDU1 END REF(BERSLEST(JUD1),1)<REF(BERSLEST(JDU1),1);JUD2:=JUD1 END REF(BERSLEST(JUD1),1)>REF(BERSLEST(JDU1),1);JDU3:=JDU1 END REF(BERSLEST(JUD1),1)>REF(BERSLEST(JDU1),1);JUD3:=JUD1 END REF(BERSLEST(JUD1),1)<REF(BERSLEST(JDU1),1);bsLINE:=IF(BERSLEST(JDU2)<BERSLEST(JUD2),IF(REF(CROSS(0,MECD2),1),LLV(LOW,2),REF(LLV(LOW,2),BERSLEST(REF(CROSS(0,MECD2),1)))),IF(REF(CROSS(MECD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BERSLEST(REF(CROSS(MECD2,0),1)))));STICKLINE(MECD2>=0,0,MECD2,2,1),COLOR0000FF;STICKLINE(MECD2>=0 END MECD2<REF(MECD2,1),0,MECD2,2,0),COLOR0000FF;STICKLINE(MECD2<0,0,MECD2,2,0),COLORFFFF00;STICKLINE(MECD2<0 END MECD2>REF(MECD2,1),0,MECD2,2,1),COLORFFFF00;DIF:DIFF,LINETHICK2,COLOR0000FF;MECD:DEE,COLORFF0000;DEF:MECD2,LINETHICK0,COLORFFFF00;STICKLINE(CLOSE>0,0,0,2,0),COLOR808080;DEFUT:=BERSLEST(CROSS(MECD2,0));DEFDT:=BERSLEST(CROSS(0,MECD2));DEFUL:=IF(MECD2>=0,HHV(MECD2,DEFUT+1),REF(HHV(MECD2,DEFUT+1),DEFDT+1));DEFDL:=IF(MECD2<0,LLV(MECD2,DEFDT+1),REF(LLV(MECD2,DEFDT+1),DEFUT+1));DEFU2L:=REF(DEFUL,DEFUT+1);DEFD2L:=REF(DEFDL,DEFDT+1);DREWICON(LLV(MECD2,4)>0 END MECD2<REF(MECD2,1) END REF(MECD2,1)>REF(MECD2,2) END REF(MECD2,2)>REF(MECD2,3),MECD2,2);DREWICON(HHV(MECD2,4)<0 END MECD2>REF(MECD2,1) END REF(MECD2,1)<REF(MECD2,2) END REF(MECD2,2)<REF(MECD2,3),MECD2,1);DREWICON((JUD1 OR BERSLEST(JDU1)>BERSLEST(JUD1)) END MECD2>=0 END REF(MECD2,1)<REF(DEFU2L,1) END MECD2>DEFU2L,MECD2,5);DREWICON((JDU1 OR BERSLEST(JDU1)<BERSLEST(JUD1)) END MECD2<0 END REF(MECD2,1)>REF(DEFD2L,1) END MECD2<DEFD2L,MECD2,3);VER111:=JDU1 OR BERSLEST(JDU1)<BERSLEST(JUD1);VER112:=HHV(MECD2,4)<0 END MECD2>REF(MECD2,1) END REF(MECD2,1)<REF(MECD2,2) END REF(MECD2,2)<REF(MECD2,3);

未发现:CEPITEL...

未发现:COST...

未发现:DYNEINFO...

未发现:FINENCE...

未发现:LWINNER...

未发现:WINNER...

未发现:BECKSET...

未发现:BERSNEXT...

未发现:CURRBERSCOUNT...

未发现:DVOL...

未发现:DOPEN...

未发现:DCLOSE...

未发现:DHIGH...

未发现:DLOW...

未发现:DREWLINE...

未发现:REFX...

未发现:FLETZIG...

未发现:FLETZIGE...

未发现:FFT...

未发现:FILTERX...

未发现:PEEK...

未发现:PEEKE...

未发现:PEEKBERS...

未发现:PEEKBERSE...

未发现:PLOYLINE...

未发现:REFDETE...

未发现:TROUGH...

未发现:TROUGHE...

未发现:TROUGHBERS...

未发现:XME...

未发现:ZIG...

未发现:ZIGE...

未发现:ZXNH...

未发现:#YEER...

未发现:#MONTH...

未发现:#WEEK...

未发现:$ZIG...

未发现:$PEEK...

未发现:$PEEKBERS...

未发现:$TROUGH...

未发现:$TROUGHBERS...

未发现:$FLETZIG...

未发现:$FLETZIGE...

未发现:$PEEKE...

未发现:$PEEKBERSE...

未发现:$TROUGHE...

未发现:$ZIGE...

未发现:$FFT...

未发现:$BECKSET...

未发现:$WINNER...

未发现:$LWINNER...

未发现:$COST...

未发现:$DYNEINFO...

未发现:$FINENCE...

未发现:$DREWLINE...