MACD改成 通达信的

编写要求：

DIFF:=((EMA(CLOSE,26) - EMA(CLOSE,12)) * -1); DEA:=EMA(DIFF,9); DEA1:=EMA(DIFF,18); MACD:=(2 * (DIFF - DEA)); 操盘:STICKLINE(((MACD >= 0) AND (MACD >= REF(MACD,1))),0,MACD,4,1),color0000FF; 减仓:STICKLINE(((MACD >= 0) AND (MACD < REF(MACD,1))),0,MACD,4,0),colorFF00FF; 反弹:STICKLINE(((MACD < 0) AND (MACD >= REF(MACD,1))),0,MACD,4,1),color00FFFF; 寻底:STICKLINE(((MACD < 0) AND (MACD < REF(MACD,1))),0,MACD,4,0),colorFFFF00; IF((DIFF < 0),DIFF,0),LINETHICK2,color00FFFF; IF((DIFF < DEA),DIFF,DEA),LINETHICK2,colorFFFFFF; IF((DIFF < 0),0,DIFF),LINETHICK2,color0000FF; PARTLINE(DIFF,(DIFF < MA(DIFF,2))),LINETHICK2,colorFFFFFF; IF((DIFF > DEA),DEA,DEA),LINETHICK2,color0000FF; PARTLINE(DEA,(DEA < MA(DEA,5))),LINETHICK2,colorFFFFFF; FILLRGN(diff,dea,diff>=dea),Color000044; FILLRGN(diff,dea,diff

解答：

?DIFF:=((EMA(CLOSE,26) - EMA(CLOSE,12)) * -1);

DEA:=EMA(DIFF,9);