好用MACD MACD背离副图指标公式[同花顺公式]

同花顺好用MA副图指标源码

原理解析：
填充背景 输出DIF:收盘价的5日指数移动平均-收盘价的10日指数移动平均,画红色,线宽为2 输出DEA:DIF的3日指数移动平均,画白色,线宽为2 当满足条件DIF上穿DEA时,在DIF-0位置书写文字,画红色 当满足条件DEA上穿DIF时,在DIF+0位置书写文字,画绿色 输出MACD彩柱:(DIF-DEA)*2,COLORSTICK 当满足条件((MACD彩柱<1日前的MACD彩柱)AND(MACD彩柱>0))时,在0和MACD彩柱位置之间画柱状线,宽度为1,0不为0则画空心柱.,画淡蓝色,线宽为2 当满足条件((MACD彩柱>1日前的MACD彩柱)AND(MACD彩柱<0))时,在0和MACD彩柱位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFF00FF,线宽为2 输出持仓段:如果DIF<0,返回DIF,否则返回0,画黄色,线宽为2 输出加仓段:如果DIF<0,返回0,否则返回DIF,画红色,线宽为2 输出白线空仓段:如果DIF<DEA,返回DIF,否则返回DEA,画白色,线宽为2 输出趋势强弱:如果DIF>DEA,返回DEA,否则返回DEA,COLORFFFF00,线宽为2 AA赋值:统计上次DEA>=0距今天数日中满足DIF上穿DEA的天数 二次金叉赋值:DIF上穿DEA AND DEA<0 AND 统计21日中满足AA=2的天数=1 当满足条件二次金叉时,在0.2位置书写文字,画黄色 A1赋值:上次1日前的DIF上穿DEA距今天数 底背离赋值:A1+1日前的收盘价>收盘价 AND DIF>A1+1日前的DIF AND DIF上穿DEA 当满足条件底背离时,在0和0.03位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR00FF00 输出底背:当满足条件A1=0时,在DEA位置画直线起点，当满足条件底背离时,在DEA位置画直线终点,0表示是否延长.,画红色,线宽为4 当满足条件底背离时,在0.12位置书写文字,COLORFF00FF A2赋值:上次1日前的DEA上穿DIF距今天数 顶背离赋值:A2+1日前的收盘价<收盘价 AND A2+1日前的DIF>DIF AND DEA上穿DIF 输出顶背:当满足条件A2=0时,在DEA位置画直线起点，当满足条件顶背离时,在DEA位置画直线终点,0表示是否延长.,画绿色,线宽为4

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

源码：

DRAWGBK(V>1,STRIP(RGB(60,100,255),RGB(180,180,255),1));
DIF:EMA(CLOSE,5)-EMA(CLOSE,10),colorred,LINETHICK2;
DEA:EMA(DIF,3),colorwhite,LINETHICK2;
DRAWTEXT(CROSS(DIF,DEA),DIF-0,'建仓'),colorred;
DRAWTEXT(CROSS(DEA,DIF),DIF+0,'空仓'),colorgreen;
MACD彩柱:(DIF-DEA)*2,COLORSTICK;
STICKLINE(((MACD彩柱<REF(MACD彩柱,1)) AND (MACD彩柱>0)),0,MACD彩柱,1,0),COLORLIBLUE,LINETHICK2;
STICKLINE(((MACD彩柱>REF(MACD彩柱,1)) AND (MACD彩柱<0)),0,MACD彩柱,1,0),COLORFF00FF,LINETHICK2;
持仓段:IF(DIF<0,DIF,0),coloryellow,LINETHICK2;
加仓段:IF(DIF<0,0,DIF),colorred,LINETHICK2;
白线空仓段:IF(DIF<DEA,DIF,DEA),colorwhite,LINETHICK2;
趋势强弱:IF(DIF>DEA,DEA,DEA),ColorFFFF00,LINETHICK2;
AA:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(AA=2,21)=1;
DRAWTEXT(二次金叉,0.2,' 二次金叉'),coloryellow;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);
STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;
底背:DRAWLINE(A1=0,DEA,底背离,DEA,0),colorred,LINETHICK4;
DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF;
A2:=BARSLAST(REF(CROSS(DEA,DIF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF);
顶背:DRAWLINE(A2=0,DEA,顶背离,DEA,0),colorgreen,LINETHICK4;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' WWW.CXH99.COM '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花顺程序化交易');

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