相關標簽:

?

{MACD-背變}

{設置缺省值：short:9,M:12,long:26}

DRAWTEXTREL(10,5,'正面負面：'+BKNAME),COLORwhite;

DIFF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),COLORGREEN;{http://www.weiqiv.net.cn}
DEA : EMA(DIFF,M),COLORyellow;
MACD : 2*(DIFF-DEA), COLORSTICK,COLOR5454FF;
DD:=C=HHV(C,180);
EE:=DEA< REF(DEA,1) AND REF(DEA< REF(DEA,1),1)=1;
CC:=C> REF(C,1) AND REF(C> REF(C,1),1)=1;
上升背離:(CC AND EE)*DEA,COLOR00FFFF;
頂背離:(DD AND EE AND DEA< HHV(DEA,180))*DEA,STICK,LINETHICK3,COLORGREEN;{http://www.weiqiv.net.cn}
FF:=C=LLV(C,180);
GG:= DEA> REF(DEA,1) AND REF(DEA> REF(DEA,1),1)=1;
LL:=C< REF(C,1) AND REF(C< REF(C,1),1)=1;
下降背離:(LL AND GG)*DEA,COLORMAGENTA;
底背離:(FF AND GG AND DEA> LLV(DEA,180))*DEA,STICK,LINETHICK3,COLORRED;
MM:=IF(MACD< 0,MACD,0);
JJ:=MM> REF(MM,1);
ZZ:=REF(JJ,1)=1;
介入區:(JJ AND ZZ)*DEA,POINTDOT,COLORRED;
STICKLINE(介入區=DEA,DEA,DIFF,3,0),COLORRED;
DRAWTEXT(CROSS(DIFF,DEA ),0,'金叉'),ColorFFFFFF;
DRAWTEXT(CROSS(DEA,DIFF ),0,'死叉'),COLORGREEN;{http://www.weiqiv.net.cn}

PARTLINE(DIFF,DIFF>(REF(DIFF,1)+0.008),RGB(255,0,0)){,COLORMAGENTA},LINETHICK2;
PARTLINE(DEA,DIFF<=(REF(DIFF,1)+0.008){長期線<=REF(長期線,1)},RGB(50,100,100)){,COLORFFFF00,LINETHICK2};

FH1:=REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3) AND REF(MACD,3)<REF(MACD,4);
FH2:=MACD>=0 AND COUNT(MACD>REF(MACD,1),1)=1;
FH3:=FH1 AND FH2 AND EMA(C,13)>REF(EMA(C,13),1);
FH4:=FH1 AND FH2 AND ABS((DIFF-DEA)/C)<0.018;
FH5:=FH1 AND FH2 AND MACD<0.10;

DRAWTEXT(FH3 OR FH4 OR FH5,DIFF,''),COLORred;
{程序化交易 www.weiqiv.net.cn }

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?