通达信MACD面积未加密选股指标公式源码

源码正文：

dif:ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA:EMA(DIF,9){XG51};
macd:(DIF-DEA)*2,COLORstICK{XG51};
红面积:SUM(MacD,BArslAST(MACD<0))*(MACD>0),COLOR0000FF,NODRAW{XG51};
绿面积:SUM(MACD,BARSLAST(MACD>0))*(MACD<0),COLORFFFF00,NODRAW{XG51};
AA:=ROUND(REF(绿面积,1)*100){XG51};
BB:=ROUND(REF(红面积,1)*100){XG51};
DRAWNUMBER(crOSS(0,MACD),HHV(REF(MACD,1),5)+0.03,Abs(BB)),COLORLIMAGENTA{XG51};
DRAWNUMBER(CROSS(MACD,0),LLV(REF(MACD,1),5)-0.03,ABS(AA)),COLORCYAN{X.G-5~1.C.N.{};

源码正文：

WY1001:=(2*CLOSE+HIGH+LOW)/4{XG51};
WY1002:=ema(WY1001,4){XG51};
WY1003:=Ema(WY1002,4){XG51};
WY1004:=EMA(WY1003,4){XG51};
XYS0:=(WY1004-REF(WY1004,1))/REF(WY1004,1)*100{XG51};
XYS1:=MA(XYS0,2){XG51};
XYS2:=MA(XYS0,1){XG51};
A:=crOSS(XYS1,XYS2){XG51};
B:=CROSS(XYS2,XYS1){XG51};
DRAWTEXT(B,O,'▲-狙击涨停-----下破止损-------------------------'),COLOR00FF00{X=G+5_1=C=N={};