标题：[原创]请老师改写MACD面积公式

1楼

tom2046 发表于：2015/1/2 18:12:42

请老师把通达信MACD面积公式改成金字塔能用的，谢谢。

红面积:SUM(MACD,BARSLAST(MACD<0))*(MACD>0)*10000,COLOR0000FF,NODRAW;

绿面积:SUM(MACD,BARSLAST(MACD>0))*(MACD<0)*10000,COLORFFFF00,NODRAW;

AA:=ROUND(REF(绿面积,1));BB:=ROUND(REF(红面积,1));

DRAWNUMBER(CROSS(0,MACD),HHV(REF(MACD,1),5)+0.03,ABS(BB)),COLORMAGENTA;

DRAWNUMBER(CROSS(MACD,0),LLV(REF(MACD,1),5)-0.03,ABS(AA)),COLORGREEN;

[此贴子已经被作者于2015/1/2 18:13:14编辑过]

2楼

jinzhe 发表于：2015/1/4 10:40:48

p:=26;

s:=12;

m:=9;

DIFF : EMA(CLOSE,S) - EMA(CLOSE,P);
DEA : EMA(DIFF,M);
MACD : 2*(DIFF-DEA), COLORSTICK;

红面积:SUM(MACD,BARSLAST(MACD<0))*(MACD>0)*10000,COLOR0000FF,NODRAW;
绿面积:SUM(MACD,BARSLAST(MACD>0))*(MACD<0)*10000,COLORFFFF00,NODRAW;

AA:=ROUND(REF(绿面积,1));BB:=ROUND(REF(红面积,1));
DRAWNUMBER(CROSS(0,MACD),HHV(REF(MACD,1),5)+0.03,ABS(BB),7),COLORMAGENTA;
DRAWNUMBER(CROSS(MACD,0),LLV(REF(MACD,1),5)-0.03,ABS(AA),7),COLORGREEN;

共2 条记录, 每页显示 10 条, 页签: [1]