2014年5月1日MACD峰谷副图183

2014年5月1日MACD峰谷副图183 

 公司名称：MACD峰谷副图（存招商证劵）

公式描述：自动画MACD波峰线与MACD波谷线；

画线方式：副图

参数设置：最小 最大      缺省

SHORT  2     200   12

LONG   2     200   26

MID     2     200   9

N                  8     300   30              

 

源码

DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);

DEA:EMA(DIF,MID);

MACD:(DIF-DEA)*2,COLORSTICK;

HD:=FILTER(BACKSET(FILTER(REF(L,N)=HHV(L,2*N+1),N),N+1),N);

LD:=FILTER(BACKSET(FILTER(REF(L,N)=LLV(L,2*N+1),N),N+1),N);

 

前低:=IF(BARSLAST(HD)<BARSLAST(LD) AND NOT(HD),REF(L,BARSLAST(HD)),

REF(L,BARSLAST(HD))), COLORYELLOW,POINTDOT;

下穿前低:=CROSS(前低,REF(L,0))AND "MACD.MACD"<0 AND REF(VOL,0)/MA(VOL,25)>3;     

HD1:=FILTER(BACKSET(FILTER(REF(DIF,9)=HHV(DIF,2*9+1),9),9+1),9);

LD1:=FILTER(BACKSET(FILTER(REF(DIF,9)=LLV(DIF,2*9+1),9),9+1),9);

 

波谷:IF(BARSLAST(LD1)>BARSLAST(HD1) AND NOT(LD1),REF(DIF,BARSLAST(LD1)),REF

(DIF,BARSLAST(LD1))), COLORLIRED,POINTDOT;

波谷推高:=REF(DIF,0)>波谷 AND下穿前低;

HD2:=FILTER(BACKSET(FILTER(REF(H,N)=HHV(H,2*N+1),N),N+1),N);

LD2:=FILTER(BACKSET(FILTER(REF(H,N)=LLV(H,2*N+1),N),N+1),N);

 

前高:=IF(BARSLAST(HD2)<BARSLAST(LD2) AND NOT(HD2),REF(H,BARSLAST(HD2)),

REF(H,BARSLAST(HD2))),COLORFF00FF,POINTDOT;

突破前高:=CROSS(REF(H,0),前高)AND "MACD.MACD">0 AND REF(VOL,0)/MA(VOL,25)>3;     

HD3:=FILTER(BACKSET(FILTER(REF(DIF,9)=HHV(DIF,2*9+1),9),9+1),9);

LD3:=FILTER(BACKSET(FILTER(REF(DIF,9)=LLV(DIF,2*9+1),9),9+1),9);

 

波峰:IF(BARSLAST(HD3)<BARSLAST(LD3) AND NOT(HD3),REF(DIF,BARSLAST(HD3)),REF

(DIF,BARSLAST(HD3))), COLORGREEN,POINTDOT;

前高降低:=REF(DIF,0)<波峰 AND 突破前高;

 A1:=CROSS(DIF,DEA);

{A1赋值:DIF上穿DEA}

                                                                                                                                                                       

A2:=IF(A1 AND DIF<-0.25 ,1,0);

{A2赋值:如果A1ANDDIF<-0.25,返回1,否则返回0}

DRAWTEXT(A2, CROSS(DIF,DEA)*-0.65,'偏离'),COLORMAGENTA;

DRAWICON(A2, CROSS(DIF,DEA)*-0.50,1);