========分析家公式网提示：下面的指标，源码是错误的，有乱码，不能修复，附件里的指标，改为扩展名是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);

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