同花顺大牛MA副图指标源码[同花顺公式]

相关标签:

同花顺牛MA副图指标源码

原理解析：
填充背景 输出DIFF:收盘价的6日指数移动平均-收盘价的16日指数移动平均,COLORFFFF26 输出DEA:DIFF的5日指数移动平均,COLOR8A15FF MACD赋值:2*(DIFF-DEA) 输出对DIFF :0-(收盘价的6日指数移动平均 - 收盘价的16日指数移动平均) 输出对DEA :0-(DIFF的5日指数移动平均) 输出对称 : 0-(2*(DIFF-DEA)),STICK,COLORFF6060,线宽为1 当满足条件MACD>=0时,在MACD和0位置之间画柱状线,宽度为4,1不为0则画空心柱.,COLORF00FF0 当满足条件MACD<0时,在MACD和0位置之间画柱状线,宽度为4,1不为0则画空心柱.,画白色 当满足条件MACD<1日前的MACDANDMACD>0时,在0和MACD位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLOR00C4C4 当满足条件MACD<1日前的MACDANDMACD>0时,在0和MACD位置之间画柱状线,宽度为6.3,0不为0则画空心柱.,COLOR00EAEA 当满足条件MACD<1日前的MACDANDMACD>0时,在0和MACD位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLOR0BFFFF 当满足条件MACD<1日前的MACDANDMACD>0时,在0和MACD位置之间画柱状线,宽度为1.65,0不为0则画空心柱.,COLOR46FFFF 当满足条件MACD>=1日前的MACDANDMACD>0时,在0和MACD位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR0000BB 当满足条件MACD>=1日前的MACDANDMACD>0时,在0和MACD位置之间画柱状线,宽度为6.3,0不为0则画空心柱.,COLOR0000F0 当满足条件MACD>=1日前的MACDANDMACD>0时,在0和MACD位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLOR1111FF 当满足条件MACD>=1日前的MACDANDMACD>0时,在0和MACD位置之间画柱状线,宽度为1.65,0不为0则画空心柱.,COLOR3535FF 当满足条件MACD>1日前的MACDANDMACD<0时,在0和MACD位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLOR9B009B 当满足条件MACD>1日前的MACDANDMACD<0时,在0和MACD位置之间画柱状线,宽度为6.3,0不为0则画空心柱.,COLORCA00CA 当满足条件MACD>1日前的MACDANDMACD<0时,在0和MACD位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLORF000F0 当满足条件MACD>1日前的MACDANDMACD<0时,在0和MACD位置之间画柱状线,宽度为1.65,0不为0则画空心柱.,COLORFF28FF 当满足条件MACD<=1日前的MACDANDMACD<0时,在0和MACD位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR00AA00 当满足条件MACD<=1日前的MACDANDMACD<0时,在0和MACD位置之间画柱状线,宽度为6.3,0不为0则画空心柱.,COLOR00CE00 当满足条件MACD<=1日前的MACDANDMACD<0时,在0和MACD位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLOR00F700 当满足条件MACD<=1日前的MACDANDMACD<0时,在0和MACD位置之间画柱状线,宽度为1.65,0不为0则画空心柱.,COLOR2DFF2D 低位金叉赋值:DIFF上穿DEA AND DIFF<-0.1 当满足条件低位金叉时,在0和-0.18位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLORE8E8E8 当满足条件低位金叉时,在0和-0.18位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLORF2F2F2 当满足条件低位金叉时,在0和-0.18位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFFFFFF 当满足条件低位金叉时,在-0.2位置书写文字,COLORFFFFFF JCCOUNT赋值:统计上次DEA>=0距今天数日中满足DIFF上穿DEA的天数 二次金叉赋值:DIFF上穿DEA AND DEA<0 AND 统计21日中满足JCCOUNT=2的天数=1 当满足条件二次金叉时,在0和-0.18位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLOR0042CC 当满足条件二次金叉时,在0和-0.18位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR004FF2 当满足条件二次金叉时,在0和-0.18位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR3375FF 当满足条件二次金叉时,在-0.2位置书写文字,COLOR3375FF A1赋值:上次1日前的DIFF上穿DEA距今天数 底背离赋值:A1+1日前的收盘价>收盘价 AND DIFF>A1+1日前的DIFF AND DIFF上穿DEA 当满足条件底背离时,在0和0.13位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLORCECE00 当满足条件底背离时,在0和0.13位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLORFFFF00 当满足条件底背离时,在0和0.13位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFFFF44 当满足条件A1=0时,在DEA位置画直线起点，当满足条件底背离时,在DEA位置画直线终点,0表示是否延长.,COLORFFFFFF,线宽为1 当满足条件底背离时,在0.3位置书写文字,COLORFFFF26 A2赋值:上次1日前的DEA上穿DIFF距今天数 顶背离赋值:A2+1日前的收盘价<收盘价 AND A2+1日前的DIFF>DIFF AND DEA上穿DIFF 当满足条件A2=0时,在DEA位置画直线起点，当满足条件顶背离时,在DEA位置画直线终点,0表示是否延长.,画绿色,线宽为1

源码：

DRAWGBK(DATE>900103,STRIP(RGB(43,33,100),RGB(83,73,200),1));
DIFF:EMA(CLOSE,6)-EMA(CLOSE,16),ColorFFFF26;
DEA:EMA(DIFF,5),Color8A15FF;
MACD:=2*(DIFF-DEA);
对DIFF :0-(EMA(CLOSE,6) - EMA(CLOSE,16));
对DEA :0-(EMA(DIFF,5));
对称 : 0-(2*(DIFF-DEA)),STICK,ColorFF6060,LINETHICK1;
{D1:EMA(C,16)-EMA(C,6),Color26FF26;
E2:EMA(D1,5),ColorFF1EFF;};
STICKLINE(MACD>=0,MACD,0,4,1),COLORF00FF0;
STICKLINE(MACD<0,MACD,0,4,1),colorwhite;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,10,0 ),Color00C4C4;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,6.3,0 ),Color00EAEA;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),Color0BFFFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.65,0 ),Color46FFFF;STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,8 ,0 ),Color0000BB;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,6.3 ,0 ),Color0000F0;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),Color1111FF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.65 ,0 ),Color3535FF;STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,10,0 ),Color9B009B;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,6.3 ,0 ),ColorCA00CA;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,2.2,0 ),ColorF000F0;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.65,0 ),ColorFF28FF;STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,8,0 ),Color00AA00;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,6.3 ,0 ),Color00CE00;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,2.2,0 ),Color00F700;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1.65 ,0 ),Color2DFF2D;低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金叉,0,-0.18,10,0),ColorE8E8E8;
STICKLINE(低位金叉,0,-0.18,4,0),ColorF2F2F2;
STICKLINE(低位金叉,0,-0.18,2,0),ColorFFFFFF;
DRAWTEXT(低位金叉,-0.2,' 金叉'),ColorFFFFFF;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,0,-0.18,10,0),Color0042CC;
STICKLINE(二次金叉,0,-0.18,8,0),Color004FF2;
STICKLINE(二次金叉,0,-0.18,8,0),Color3375FF;
DRAWTEXT(二次金叉,-0.2,' 金叉二'),Color3375FF;
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.13,10,0),ColorCECE00;
STICKLINE(底背离,0,0.13,4,0),ColorFFFF00;
STICKLINE(底背离,0,0.13,2,0),ColorFFFF44;
DRAWLINE(A1=0,DEA,底背离,DEA,0),ColorFFFFFF,linethick1;
DRAWTEXT(底背离,0.3,' 底背离'),ColorFFFF26;
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),colorgreen,linethick1;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' WWW.CXH99.COM '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花顺程序化交易');

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