三背离主图指标公式源码 上出下买[通达信公式]

相关标签: macd顶底背离指标公式 、 rsi指标背离选股公式 、 背离指标公式 、 obv指标背离公式 、 rsi背离画线指标公式 、 rsi背离指标公式 、 macd指标背离公式 、 macd三次背离选股指标 、 macd三次背离 公式 、

源码：
A:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1)); B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1); 分水岭:IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORFF00FF,LINETHICK2; 操作线:分水岭-(EMA(C,3)-分水岭),COLOR00FFFF,LINETHICK2; PM:MA(C,5),COLORWHITE,LINETHICK2; IF(PM>REF(PM,1),PM,DRAWNULL),COLORRED,LINETHICK2; IF(PM=REF(PM,1),PM,DRAWNULL),COLORRED; IF(PM<REF(PM,1),PM,DRAWNULL),COLORFF9900,LINETHICK2; S:=(PM>操作线); DD:=分水岭<REF(分水岭,1); IF(DD,分水岭,DRAWNULL),COLOR00FF00,LINETHICK2; IF(S,分水岭,DRAWNULL),COLOR00FF00,POINTDOT,LINETHICK4; DRAWICON(CROSS(分水岭,操作线),分水岭-0.1,1);{买入红箭头} A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1)); B1:=REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA"); DRAWTEXT(B1>0,L-0.02,4),COLOR00FFFF;{MACD底背离} A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1)); B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"); DRAWTEXT(B2,L-0.10,5),COLORFF00FF;{KDJ底背离} A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1)); B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2"); DRAWTEXT(B3>0,L-0.18,6),COLOR0000FF;{RSI底背离} C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1)); D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF"); DRAWTEXT(D1>0,H+0.16,4),COLOR00FF00;{MACD顶背离} C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)); D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K"); DRAWTEXT(D2>0,H+0.08,5),COLORFFFFCC;{KDJ顶背离} C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)); D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1"); DRAWTEXT(D3>0,H+0.04,6),COLORFF9900;{RSI顶背离}; STICKLINE(C>REF(C,1),H,L,0,1),COLOR0000FF; STICKLINE(C>REF(C,1),O,C,3.2,0),COLOR000055; STICKLINE(C>REF(C,1),O,C,2.7,0),COLOR000077; STICKLINE(C>REF(C,1),O,C,2.1,0),COLOR000099; STICKLINE(C>REF(C,1),O,C,1.5,0),COLOR0000BB; STICKLINE(C>REF(C,1),O,C,0.9,0),COLOR0000DD; STICKLINE(C<REF(C,1),O,C,0.3,0),COLOR0000FF; STICKLINE(C<REF(C,1),H,L,0,1),COLORFFFF00; STICKLINE(C<REF(C,1),O,C,3.2,0),COLOR990000; STICKLINE(C<REF(C,1),O,C,2.7,0),COLORCC0000; STICKLINE(C<REF(C,1),O,C,2.1,0),COLORFF4400; STICKLINE(C<REF(C,1),O,C,1.5,0),COLORFF8800; STICKLINE(C<REF(C,1),O,C,0.9,0),COLORFFCC00; STICKLINE(C<REF(C,1),O,C,0.3,0),COLORFFFF00; STICKLINE(C=REF(C,1),H,L,0,1),COLORFFFFFF; STICKLINE(C=REF(C,1),O,C,3.2,0),COLOR555555; STICKLINE(C=REF(C,1),O,C,2.7,0),COLOR777777; STICKLINE(C=REF(C,1),O,C,2.1,0),COLOR999999; STICKLINE(C=REF(C,1),O,C,1.5,0),COLORBBBBBB; STICKLINE(C=REF(C,1),O,C,0.9,0),COLORDDDDDD; STICKLINE(C=REF(C,1),O,C,0.3,0),COLORFFFFFF;DRAWTEXT_FIX(C>O,0.01,0.9,0,'WWW.CXH99.COM'),COLORRED; DRAWTEXT_FIX(C>O,1,1,0,'<span style="display:none;"><a data-cke-saved-href="http://www.cxh99.com" href="http://www.cxh99.com">程序化交易模型</a></span>'),COLORRED;
点击复制上述代码粘贴到到公式管理器

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

源码解析:

A赋值:收盘价的17日简单移动平均+收盘价的17日简单移动平均-昨日收盘价的17日简单移动平均的绝对值
B赋值:收盘价的17日简单移动平均+收盘价的17日简单移动平均-昨日收盘价的17日简单移动平均
输出分水岭:如果收盘价的17日简单移动平均<B,返回B,否则返回收盘价的17日简单移动平均,COLORFF00FF,线宽为2
输出操作线:分水岭-(收盘价的3日指数移动平均-分水岭),COLOR00FFFF,线宽为2
输出PM:收盘价的5日简单移动平均,画白色,线宽为2
如果PM>昨日PM,返回PM,否则返回无效数,画红色,线宽为2
如果PM=昨日PM,返回PM,否则返回无效数,画红色
如果PM<昨日PM,返回PM,否则返回无效数,COLORFF9900,线宽为2
S赋值:(PM>操作线)
DD赋值:分水岭<昨日分水岭
如果DD,返回分水岭,否则返回无效数,COLOR00FF00,线宽为2
如果S,返回分水岭,否则返回无效数,COLOR00FF00,POINTDOT,线宽为4
当满足条件分水岭上穿操作线时,在分水岭-0.1位置画1号图标
A1赋值:上次昨日"平滑异同平均的DIF"上穿"平滑异同平均的DEA"距今天数
B1赋值:A1+1日前的收盘价>收盘价 AND A1+1日前的"平滑异同平均的DIF"<"平滑异同平均的DIF" AND "平滑异同平均的DIF"上穿"平滑异同平均的DEA"
当满足条件B1>0时,在最低价-0.02位置书写文字,COLOR00FFFF
A2赋值:上次昨日"KDJ的K"上穿"KDJ的D"距今天数
B2赋值:A2+1日前的收盘价>收盘价 AND A2+1日前的"KDJ的K"<"KDJ的K" AND "KDJ的K"上穿"KDJ的D"
当满足条件B2时,在最低价-0.10位置书写文字,COLORFF00FF
A3赋值:上次昨日"RSI的RSI1"上穿"RSI的RSI2"距今天数
B3赋值:A3+1日前的收盘价>收盘价 AND A3+1日前的"RSI的RSI1"<"RSI的RSI1" AND "RSI的RSI1"上穿"RSI的RSI2"
当满足条件B3>0时,在最低价-0.18位置书写文字,COLOR0000FF
C1赋值:上次昨日"平滑异同平均的DEA"上穿"平滑异同平均的DIF"距今天数
D1赋值:C1+1日前的收盘价<收盘价 AND C1+1日前的"平滑异同平均的DIF">"平滑异同平均的DIF" AND "平滑异同平均的DEA"上穿"平滑异同平均的DIF"
当满足条件D1>0时,在最高价+0.16位置书写文字,COLOR00FF00
C2赋值:上次昨日"KDJ的D"上穿"KDJ的K"距今天数
D2赋值:C2+1日前的收盘价<收盘价 AND C2+1日前的"KDJ的K">"KDJ的K" AND "KDJ的D"上穿"KDJ的K"
当满足条件D2>0时,在最高价+0.08位置书写文字,COLORFFFFCC
C3赋值:上次昨日"RSI的RSI2"上穿"RSI的RSI1"距今天数
D3赋值:C3+1日前的收盘价<收盘价 AND C3+1日前的"RSI的RSI1">"RSI的RSI1" AND "RSI的RSI2"上穿"RSI的RSI1"
当满足条件D3>0时,在最高价+0.04位置书写文字,COLORFF9900

当满足条件收盘价>昨收时,在最高价和最低价位置之间画柱状线,宽度为0,1不为0则画空心柱.,COLOR0000FF