MACD彩带速率副图指标公式源码 自制MACD填色[同花顺公式]

相关标签:

1，粉红是多头上涨，不做卖出
2，大红是空头反弹
3，绿色是多头回调
4，蓝色是空头下跌，不做买入
5，白色为原速率开始减缓，后续有可能会出现变盘点，以金叉或死叉为变盘点
6，配合KDJ或DMI指标

原理解析：
输出DIFF :收盘价的12日指数移动平均 - 收盘价的26日指数移动平均,画白色 输出DEA :DIFF的9日指数移动平均,画黄色 输出平滑异同平均 : 2*(DIFF-DEA) 输出ZERO:0 当满足条件DIFF上穿DEA时,在DEA*1.02位置画1号图标 当满足条件DEA上穿DIFF时,在DEA*0.98位置画2号图标 FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF>1日前的DIFF AND DEA>1日前的DEA,画淡红色) FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF>1日前的DIFF AND DEA<1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF<=1日前的DIFF AND DEA>1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF<=1日前的DIFF AND DEA<1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF>1日前的DIFF AND DEA>1日前的DEA,画红色) FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF>1日前的DIFF AND DEA<1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF<=1日前的DIFF AND DEA>1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF<=1日前的DIFF AND DEA<1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF<1日前的DIFF AND DEA>1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF<1日前的DIFF AND DEA<1日前的DEA,画绿色) FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF>=1日前的DIFF AND DEA>1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF>=1日前的DIFF AND DEA<1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF<1日前的DIFF AND DEA>1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF<1日前的DIFF AND DEA<1日前的DEA,画蓝色) FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF>=1日前的DIFF AND DEA>1日前的DEA,画白色) FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF>=1日前的DIFF AND DEA<1日前的DEA,画白色) TIPTEXT(ISNULL(1日后的&收盘价),0,' WWW.CXH99.COM '),画红色 TIPTEXT(ISNULL(1日前的收盘价),0,'同花顺程序化交易')

 来源:程序化99（ WWW.CXH99.COM ）

源码：

DIFF :EMA(CLOSE,12) - EMA(CLOSE,26),colorwhite;
DEA :EMA(DIFF,9),coloryellow;
MACD : 2*(DIFF-DEA);
ZERO:0;
DRAWICON(CROSS(DIFF,DEA),DEA*1.02,1);
DRAWICON(CROSS(DEA,DIFF),DEA*0.98,2);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF>REF(DIFF,1) AND DEA>REF(DEA,1),colorlired);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF>REF(DIFF,1) AND DEA<REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF<=REF(DIFF,1) AND DEA>REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF>0 AND DIFF<=REF(DIFF,1) AND DEA<REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF>REF(DIFF,1) AND DEA>REF(DEA,1),colorred);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF>REF(DIFF,1) AND DEA<REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF<=REF(DIFF,1) AND DEA>REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF>DEA AND DIFF<0 AND DIFF<=REF(DIFF,1) AND DEA<REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF<REF(DIFF,1) AND DEA>REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF<REF(DIFF,1) AND DEA<REF(DEA,1),colorgreen);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF>=REF(DIFF,1) AND DEA>REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF>0 AND DIFF>=REF(DIFF,1) AND DEA<REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF<REF(DIFF,1) AND DEA>REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF<REF(DIFF,1) AND DEA<REF(DEA,1),colorblue);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF>=REF(DIFF,1) AND DEA>REF(DEA,1),colorwhite);
FILLRGN(DIFF,DEA,DIFF<DEA AND DIFF<0 AND DIFF>=REF(DIFF,1) AND DEA<REF(DEA,1),colorwhite);
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' WWW.CXH99.COM '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花顺程序化交易');

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】