公式模型编写问题提交-请帮写几行代码金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  请帮写几行代码  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=60481)

--  作者：chricel
--  发布时间：2013/12/30 20:53:08
--  请帮写几行代码

DIF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA : EMA(DIF,9);
MACD : 2*(DIF-DEA), COLORSTICK;
{面积计算}
绿柱面积:IF (MACD<0,SUM(MACD,BARSLAST(MACD>0)) * 100,0),linethick0,colorblue;
红柱面积:IF (MACD>0,SUM(MACD,BARSLAST(MACD<0)) * 100,0),linethick0,colorred;
以上是写好的代码，请帮我完成以下几个行代码
如果当下MACD<0，请记录下面面积
g1:=前面第一段MACD>0的红柱面积赋值给g1
g2:=前面第二段MACD>0的红柱面积赋值给g2
g3:=前面第三段MACD>0的红柱面积赋值给g3
如果当下MACD>0，请记录下面面积
d1:=前面第一段MACD<0的绿柱面积赋值给d1
d2:=前面第二段MACD<0的绿柱面积赋值给d2
d3:=前面第三段MACD<0的绿柱面积赋值给d3

--  作者：jinzhe
--  发布时间：2013/12/31 8:46:55
--

nn:=barslast(macd<0);

d1:=ref(绿柱面积,nn+1);

d2:=ref(ref(绿柱面积,nn+1),nn+1);

d3:=ref(ref(ref(绿柱面积,nn+1),nn+1),nn+1);

kk:=barslast(macd>0);

g1:=ref(红柱面积,kk+1);

g2:=ref(ref(红柱面积,kk+1),nkk+1);

g3:=ref(ref(ref(红柱面积,kk+1),kk+1),kk+1);