========分析家公式网提示：下面的指标，源码是错误的，有乱码，不能修复，附件里的指标，改为扩展名是AKL，用交易师软件，可以导入的时候，可以看到公式名称，但是源码还是错误的，，，，这下面的错误的源码，就给大家参考吧，希望能有人修复好。 2015.12.11

很好的飞狐，交易师，MACD顶底钝化指标，再用不担心被套了！！指标很不错，但用飞狐、交易师不多，经常用通达信，希望论坛有高手把这个指标改成通达信的，谢谢各位了。

--------------------
这里是指标源代码

DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;

SWIFTK:="MACD.MACD" * REF("MACD.MACD",1)<0;
EARLYDAY_1:=BARSLAST(SWIFTK,1);
EARLYDAY_2:=BARSLAST(SWIFTK,2);
EARLYDAY_3:=BARSLAST(SWIFTK,3);
EARLYDAY_4:=BARSLAST(SWIFTK,4);
EARLYDAY_5:=BARSLAST(SWIFTK,5);
CLOW_0:=REF(LLV(MIN(O,C),EARLYDAY_5-EARLYDAY_4-1),EARLYDAY_4+2);
CLOW_1:=REF(LLV(MIN(O,C),EARLYDAY_3-EARLYDAY_2-1),EARLYDAY_2+2);
CLOW_2:=LLV(MIN(O,C),EARLYDAY_1);
DIFFLOW_0:=REF(LLV("MACD.DIFF",EARLYDAY_5-EARLYDAY_4-1),EARLYDAY_4+2);
DIFFLOW_1:=REF(LLV("MACD.DIFF",EARLYDAY_3-EARLYDAY_2-1),EARLYDAY_2+2);
DIFFLOW_2:=LLV("MACD.DIFF",EARLYDAY_1);
钝化L:=
"MACD.MACD"<0 AND (
(INTPART(DIFFLOW_2)-INTPART(DIFFLOW_1)>0 AND CLOW_1>CLOW_2) OR
(INTPART(DIFFLOW_2)-INTPART(DIFFLOW_0)>0 AND CLOW_0>CLOW_2)
);
结构L:=
"MACD.MACD"<0 AND INTPART("MACD.DIFF")>REF(INTPART("MACD.DIFF"),1) AND (
(INTPART(DIFFLOW_2)-INTPART(DIFFLOW_1)>0 AND CLOW_1>CLOW_2 AND INTPART("MACD.DIFF")>INTPART(DIFFLOW_2)) OR
(INTPART(DIFFLOW_2)-INTPART(DIFFLOW_0)>0 AND CLOW_0>CLOW_2 AND INTPART("MACD.DIFF")>INTPART(DIFFLOW_2))
);
DRAWTEXT(钝化L,"MACD.DIFF",'L');
DRAWICON(结构L,"MACD.DIFF",4);

CHIGH_0:=REF(HHV(MAX(O,C),EARLYDAY_5-EARLYDAY_4-1),EARLYDAY_4+2);
CHIGH_1:=REF(HHV(MAX(O,C),EARLYDAY_3-EARLYDAY_2-1),EARLYDAY_2+2);
CHIGH_2:=HHV(MAX(O,C),EARLYDAY_1);
DIFFHIGH_0:=REF(HHV("MACD.DIFF",EARLYDAY_5-EARLYDAY_4-1),EARLYDAY_4+2);
DIFFHIGH_1:=REF(HHV("MACD.DIFF",EARLYDAY_3-EARLYDAY_2-1),EARLYDAY_2+2);
DIFFHIGH_2:=HHV("MACD.DIFF",EARLYDAY_1);
钝化H:=
"MACD.MACD">0 AND (
(INTPART(DIFFHIGH_2)-INTPART(DIFFHIGH_1)<0 AND CHIGH_1<CHIGH_2) OR
(INTPART(DIFFHIGH_2)-INTPART(DIFFHIGH_0)<0 AND CHIGH_0<CHIGH_2)
);
结构H:=
"MACD.MACD">0 AND INTPART("MACD.DIFF")<REF(INTPART("MACD.DIFF"),1) AND(
(INTPART(DIFFHIGH_2)-INTPART(DIFFHIGH_1)<0 AND CHIGH_1<CHIGH_2 AND INTPART("MACD.DIFF")<INTPART(DIFFHIGH_2)) OR
(INTPART(DIFFHIGH_2)-INTPART(DIFFHIGH_0)<0 AND CHIGH_0<CHIGH_2 AND INTPART("MACD.DIFF")<INTPART(DIFFHIGH_2))
);
DRAWTEXT(钝化H,"MACD.DIFF",'H');
DRAWICON(结构H,"MACD.DIFF",5);

----------------------