超级MACD+转9+背离+红绿柱体变色+金叉死叉提示

DIF1:=EMA(CLOSE,12) - EMA(CLOSE,26);

DEA1:=EMA(DIF1,9);

MACD1:=2*(DIF1-DEA1),STICK;

MACD2:=EMA(MACD1,3);

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1,0),COLORRED;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1,0),COLORF00FF0;

STICKLINE(MACD1<MACD2,0,MACD1,1,0),COLORCYAN;

STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE;

DIFF:DIF1,COLOR33FF33;

DEA:DEA1,COLORYELLOW;

MACD:MACD1,NODRAW,COLORMAGENTA;

强:IF(DIF1>=DEA1,DIF1,DRAWNULL),COLORRED,LINETHICK2;

低位金叉:= CROSS(DIFF,DEA) AND DIFF<(-0.1);

STICKLINE(低位金叉,0,-0.3,1,0),COLOR00FFFF;

DRAWTEXT(低位金叉,-0.3,' 低位金叉'),COLOR00FFFF;

JCCOUNT:= COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));

二次金叉:= CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;

STICKLINE(二次金叉,0,-0.15,1,0),COLORFF00FF;

DRAWICON(二次金叉,DEA*1.04,1),COLOR0000FF;

DRAWTEXT(二次金叉,-0.15,' 二次金叉'),COLORFF00FF;

A1:= BARSLAST(REF(CROSS(DIFF,DEA),1));

底背离:= REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);

STICKLINE(底背离,0,0.15,1,0),COLOR00FF00;

DRAWLINE(A1=0,DEA,底背离,DEA,0),LINETHICK3,COLORWHITE;

DRAWTEXT(底背离,0.15,' 底背离'),COLOR00FF00;

A2:= BARSLAST(REF(CROSS(DEA,DIFF),1));

顶背离:= REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);

DRAWLINE(A2=0,DEA,顶背离,DEA,0),LINETHICK3,COLORBLUE;

AA:=C>REF(C,4);{股票指标网 WWW. 整理}

NT:=BARSLASTCOUNT(AA);

TJ11:=NT=9;

TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);

AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;

DRAWTEXT(AY>0,MACD*1.02,VAR2STR(AY,0)),COLORLIRED;

DRAWTEXT(NT=9,MACD*1.02,'9'),COLORGREEN;

B1:=C;

NT0:=BARSLASTCOUNT(B1);

TJ21:=NT0=9 ;

TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);

AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;

DRAWTEXT(AY1>0,MACD*0.98,VAR2STR(AY1,0)),COLORGREEN;

DRAWTEXT(NT0=9,MACD*0.98,'9'),COLORRED;

DRAWICON(CROSS(DEA1,DIF1),DEA1,2);

 

原理解析：
DIF1赋值:收盘价的12日指数移动平均 - 收盘价的26日指数移动平均
DEA1赋值:DIF1的9日指数移动平均
MACD1赋值:2*(DIF1-DEA1),STICK
MACD2赋值:MACD1的3日指数移动平均
当满足条件MACD1>MACD2 AND MACD1>0时,在0和MACD1之间画柱状线
当满足条件MACD1>MACD2 AND MACD1<0时,在0和MACD1之间画柱状线
当满足条件MACD1当满足条件MACD1>=0 OR MACD1<=0时,在0和0之间画柱状线
输出DIFF:DIF1,COLOR33FF33
输出DEA:DEA1,画黄色
输出MACD:MACD1,NODRAW,画洋红色
如果D1>=DEA1返回DIF1否则返回DRAWNULL
低位金叉赋值: DIFF上穿DEA AND DIFF<(-0.1)
当满足条件低位金叉时,在0和-0.3之间画柱状线
当满足条件低位金叉时,在-0.3和' 低位金叉'位置书写文字
JCCOUNT赋值: COUNT(DIFF上穿DEA,上次DEA>=0距今天数)
二次金叉赋值: DIFF上穿DEA AND DEA<0 AND 统计21日满足JC=2的天数=1
当满足条件二次金叉时,在0和-0.15之间画柱状线
当满足条件二次金叉时,在DEA*1.04和1之间画图标
当满足条件二次金叉时,在-0.15和' 二次金叉'位置书写文字
A1赋值: 上次1日前的DIFF上穿DEA距今天数
底背离赋值: A1+1日前的收盘价>收盘价 AND DIFF>A1+1日前的DIFF AND DIFF上穿DEA
当满足条件底背离时,在0和0.15之间画柱状线
DRAWLINE(A1=0,DEA,底背离,DEA,0), 线宽为3,画白色
当满足条件底背离时,在0.15和' 底背离'位置书写文字
A2赋值: 上次1日前的DEA上穿DIFF距今天数
顶背离赋值: A2+1日前的收盘价<收盘价 AND A2+1日前的DIFF>DIFF AND DEA上穿DIFF
DRAWLINE(A2=0,DEA,顶背离,DEA,0), 线宽为3, 画蓝色
AA赋值:C>4日前的C
{股票指标网 WWW. 整理}
NT赋值:BARSLASTCOUNT(AA)
TJ11赋值:NT=9
TJ13赋值:ISLASTBAR AND BETWEEN(NT,5,8)
AY赋值:(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT
DRAWTEXT(AY>0,MACD*1.02,VAR2STR(AY,0)),COLORLIRED
当满足条件NT=9时,在MACD*1.02和'9'位置书写文字
B1赋值:C
NT0赋值:BARSLASTCOUNT(B1)
TJ21赋值:NT0=9
TJ23赋值:ISLASTBAR AND BETWEEN(NT0,5,8)
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0
DRAWTEXT(AY1>0,MACD*0.98,VAR2STR(AY1,0)),画绿色
当满足条件NT0=9时,在MACD*0.98和'9'位置书写文字
DRAWICON(DEA1上穿DIF1,DEA1,2)