三背離主圖指標(biāo)公式源碼 上出下買[通達(dá)信公式]

相關(guān)標(biāo)簽: macd頂?shù)妆畴x指標(biāo)公式 、 rsi指標(biāo)背離選股公式 、 背離指標(biāo)公式 、 obv指標(biāo)背離公式 、 rsi背離畫線指標(biāo)公式 、 rsi背離指標(biāo)公式 、 macd指標(biāo)背離公式 、 macd三次背離選股指標(biāo) 、 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.tumamayizhan.com'),COLORRED; DRAWTEXT_FIX(C>O,1,1,0,'<span style="display:none;"><a data-cke-saved-href="http://www.tumamayizhan.com" href="http://www.tumamayizhan.com">程序化交易模型</a></span>'),COLORRED;
點(diǎn)擊復(fù)制上述代碼粘貼到到公式管理器

公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】

源碼解析:

A賦值:收盤價(jià)的17日簡單移動(dòng)平均+收盤價(jià)的17日簡單移動(dòng)平均-昨日收盤價(jià)的17日簡單移動(dòng)平均的絕對值
B賦值:收盤價(jià)的17日簡單移動(dòng)平均+收盤價(jià)的17日簡單移動(dòng)平均-昨日收盤價(jià)的17日簡單移動(dòng)平均
輸出分水嶺:如果收盤價(jià)的17日簡單移動(dòng)平均<B,返回B,否則返回收盤價(jià)的17日簡單移動(dòng)平均,COLORFF00FF,線寬為2
輸出操作線:分水嶺-(收盤價(jià)的3日指數(shù)移動(dòng)平均-分水嶺),COLOR00FFFF,線寬為2
輸出PM:收盤價(jià)的5日簡單移動(dòng)平均,畫白色,線寬為2
如果PM>昨日PM,返回PM,否則返回?zé)o效數(shù),畫紅色,線寬為2
如果PM=昨日PM,返回PM,否則返回?zé)o效數(shù),畫紅色
如果PM<昨日PM,返回PM,否則返回?zé)o效數(shù),COLORFF9900,線寬為2
S賦值:(PM>操作線)
DD賦值:分水嶺<昨日分水嶺
如果DD,返回分水嶺,否則返回?zé)o效數(shù),COLOR00FF00,線寬為2
如果S,返回分水嶺,否則返回?zé)o效數(shù),COLOR00FF00,POINTDOT,線寬為4
當(dāng)滿足條件分水嶺上穿操作線時(shí),在分水嶺-0.1位置畫1號(hào)圖標(biāo)
A1賦值:上次昨日"平滑異同平均的DIF"上穿"平滑異同平均的DEA"距今天數(shù)
B1賦值:A1+1日前的收盤價(jià)>收盤價(jià) AND A1+1日前的"平滑異同平均的DIF"<"平滑異同平均的DIF" AND "平滑異同平均的DIF"上穿"平滑異同平均的DEA"
當(dāng)滿足條件B1>0時(shí),在最低價(jià)-0.02位置書寫文字,COLOR00FFFF
A2賦值:上次昨日"KDJ的K"上穿"KDJ的D"距今天數(shù)
B2賦值:A2+1日前的收盤價(jià)>收盤價(jià) AND A2+1日前的"KDJ的K"<"KDJ的K" AND "KDJ的K"上穿"KDJ的D"
當(dāng)滿足條件B2時(shí),在最低價(jià)-0.10位置書寫文字,COLORFF00FF
A3賦值:上次昨日"RSI的RSI1"上穿"RSI的RSI2"距今天數(shù)
B3賦值:A3+1日前的收盤價(jià)>收盤價(jià) AND A3+1日前的"RSI的RSI1"<"RSI的RSI1" AND "RSI的RSI1"上穿"RSI的RSI2"
當(dāng)滿足條件B3>0時(shí),在最低價(jià)-0.18位置書寫文字,COLOR0000FF
C1賦值:上次昨日"平滑異同平均的DEA"上穿"平滑異同平均的DIF"距今天數(shù)
D1賦值:C1+1日前的收盤價(jià)<收盤價(jià) AND C1+1日前的"平滑異同平均的DIF">"平滑異同平均的DIF" AND "平滑異同平均的DEA"上穿"平滑異同平均的DIF"
當(dāng)滿足條件D1>0時(shí),在最高價(jià)+0.16位置書寫文字,COLOR00FF00
C2賦值:上次昨日"KDJ的D"上穿"KDJ的K"距今天數(shù)
D2賦值:C2+1日前的收盤價(jià)<收盤價(jià) AND C2+1日前的"KDJ的K">"KDJ的K" AND "KDJ的D"上穿"KDJ的K"
當(dāng)滿足條件D2>0時(shí),在最高價(jià)+0.08位置書寫文字,COLORFFFFCC
C3賦值:上次昨日"RSI的RSI2"上穿"RSI的RSI1"距今天數(shù)
D3賦值:C3+1日前的收盤價(jià)<收盤價(jià) AND C3+1日前的"RSI的RSI1">"RSI的RSI1" AND "RSI的RSI2"上穿"RSI的RSI1"
當(dāng)滿足條件D3>0時(shí),在最高價(jià)+0.04位置書寫文字,COLORFF9900

當(dāng)滿足條件收盤價(jià)>昨收時(shí),在最高價(jià)和最低價(jià)位置之間畫柱狀線,寬度為0,1不為0則畫空心柱.,COLOR0000FF