以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  策略编写求助区  (http://weistock.com/bbs/list.asp?boardid=11)
----  请写一个指标公式  (http://weistock.com/bbs/dispbbs.asp?boardid=11&id=66916)
--  作者：order
--  发布时间：2014/7/3 19:02:46
--  请写一个指标公式
请帮忙写一个macd红绿柱面积公式
macd是有连续红柱和连续绿柱组成，呈现出正弦波浪形，请写一下，MACD一段连续红绿柱子的数字之和。【每根柱子都有一个数值，没一段连续大于等于3根连续红/绿柱子之和】
谢谢
--  作者：fly
--  发布时间：2014/7/7 14:17:32
--  

variable:flag=0;

 

DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA  : EMA(DIFF,9);
MACD1 : 2*(DIFF-DEA), COLORSTICK;


con1:=macd1>0 and ref(macd1,1)<0;
con2:=macd1<0 and ref(macd1,1)>0;
x1:=sum(macd1,BARSLAST(con1)+1);
x2:=sum(macd1,BARSLAST(con2)+1);

if macd1>0 then flag:=x1;
if macd1<0 then flag:=x2;

 

x:flag;//MACD一段连续红绿柱子的数字之和
--  作者：qq代人发帖
--  发布时间：2014/7/8 10:40:12
--  

VARIABLE:n:=0,g:=0;

 

DIFF:EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:EMA(DIFF,9),COLORYELLOW;
MACD1:2*(DIFF-DEA),colorstick;


if macd1>0 then n:=n+macd1;
if macd1<0 THEN g:=g+macd1;

if macd1<0 then n:=0;
if macd1>0 then g:=0;


nn:n,LINETHICK0;//连续红柱子之和

gg:g,LINETHICK0;//连续绿柱子之和