分享

通达信MACD面积公式

 富贵险中求 2012-03-10
1、通达信MACD面积公式

{MACDMJ:MACD面积,放大比例H0,参数: SHORT=12,LONG=26,MID=9}

H0:=100;

DIF0:=EMA(CLOSE*H0,SHORT)-EMA(CLOSE*H0,LONG);
DEA0:=EMA(DIF0,MID);
MACD0:=(DIF0-DEA0)*2;


A01:=IF(MACD0>0,1,-1);
A02:=REF(A01,1);
A03:=A01*A02;
A04:=BARSLAST(A03<0);
A05:=A04+1;
MJ0:=(SUM(MACD0,0)-REF(SUM(MACD0,0),A05))/5;

DIF:DIF0;
DEA:DEA0;
MJ:MJ0;
MACD:MACD0,COLORSTICK;
2、通达信看上级MACD公式

A:=SUM(C*IF(MOD(DATETODAY(DATE),7)=0,1,0),3)*IF(PERIOD=5,1,0);

DF:=SUM(C*IF(MOD(MINUTE,5)=0,1,0),5)*IF(PERIOD=0,1,0)

    +SUM(C*IF(MOD(MINUTE+55,30)=0,1,0),6)*IF(PERIOD=1,1,0)

    +SUM(C*IF(HOUR-15=0,1,0),8)*IF(PERIOD=3,1,0)

    +A+IF(A=0,REF(A,1),0)

      +IF(REF(A,1)+A=0,REF(A,2),0)

      +IF(REF(A,2)+REF(A,1)+A=0,REF(A,3),0)

      +IF(REF(A,3)+REF(A,2)+REF(A,1)+A=0,REF(A,4),0)

      +IF(REF(A,4)+REF(A,3)+REF(A,2)+REF(A,1)+A=0,REF(A,5),0)

      +IF(REF(A,5)+REF(A,4)+REF(A,3)+REF(A,2)+REF(A,1)+A=0,REF(A,6),0);

XX:=1+4*IF(PERIOD=0,1,0)

     +5*IF(PERIOD=1,1,0)

     +7*IF(PERIOD=3,1,0)

     +4*IF(PERIOD=5,1,0);

 

PDIF:EMA(DF,SHORT*XX)-EMA(DF,LONG*XX);

PDEA:EMA(PDIF,MID*XX);

PMACD:(PDIF-PDEA)*2,COLORSTICK;

3、通达信看上级BOLL公式

 

A:=SUM(C*IF(MOD(DATETODAY(DATE),7)=0,1,0),3)*IF(PERIOD=5,1,0);

DF:=SUM(C*IF(MOD(MINUTE,5)=0,1,0),5)*IF(PERIOD=0,1,0)

    +SUM(C*IF(MOD(MINUTE+55,30)=0,1,0),6)*IF(PERIOD=1,1,0)

    +SUM(C*IF(HOUR-15=0,1,0),8)*IF(PERIOD=3,1,0)

    +A+IF(A=0,REF(A,1),0)

      +IF(REF(A,1)+A=0,REF(A,2),0)

      +IF(REF(A,2)+REF(A,1)+A=0,REF(A,3),0)

      +IF(REF(A,3)+REF(A,2)+REF(A,1)+A=0,REF(A,4),0)

      +IF(REF(A,4)+REF(A,3)+REF(A,2)+REF(A,1)+A=0,REF(A,5),0)

      +IF(REF(A,5)+REF(A,4)+REF(A,3)+REF(A,2)+REF(A,1)+A=0,REF(A,6),0);

XX:=1+4*IF(PERIOD=0,1,0)

     +5*IF(PERIOD=1,1,0)

     +7*IF(PERIOD=3,1,0)

     +4*IF(PERIOD=5,1,0);

 

BOLL:MA(DF,N*XX),COLOR666666;
UPPER:BOLL+2*STD(DF,N*XX),COLOR000066;
LOWER:BOLL-2*STD(DF,N*XX),

 

 

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多