相關標簽: 通達信15分鐘選股公式 、 macd背離指標源碼 、 macd紅二波成功率高嗎 、 30分鐘macd底背離戰法 、 macd頂底背離主圖指標 、 頂底背離指標公式 、 macd金叉選股公式 、

?

一直在用，感覺不錯，各位感興趣的拿去研究研究，必有所得

?

?

原理解析：
輸出DIF:收盤價的12日指數移動平均-收盤價的26日指數移動平均,畫紅色,線寬為2 輸出DEA:DIF的9日指數移動平均,畫白色,線寬為2 持倉段賦值:0,COLOR00CFFF 空倉段賦值:0,COLORFFCCFF 當滿足條件DIF>DEA時,在-0.5和-0.6位置之間畫柱狀線,寬度為10,1不為0則畫空心柱.,COLOR00CFFF 當滿足條件DIF<DEA時,在-0.5和-0.6位置之間畫柱狀線,寬度為10,1不為0則畫空心柱.,COLORFFCCFF 輸出平滑異同平均:(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,COLORFF937F,線寬為2 AA賦值:統計上次DEA>=0距今天數日中滿足DIF上穿DEA的天數 二次金叉賦值:DIF上穿DEAANDDEA<0ANDCOUNT(AA=2,21)=1 當滿足條件二次金叉時,在0.2位置書寫文字,畫黃色 A1賦值:上次1日前的DIF上穿DEA距今天數 底背離賦值:A1+1日前的收盤價>CLOSEANDDIF>A1+1日前的DIFANDCROSS(DIF,DEA) 當滿足條件底背離時,在0和0.03位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR00FF00 輸出底背:當滿足條件A1=0時,在DEA位置畫直線起點，當滿足條件底背離時,在DEA位置畫直線終點,0表示是否延長.,畫紅色,線寬為4 當滿足條件底背離時,在0.12位置書寫文字,COLORFF00FF A2賦值:上次1日前的DEA上穿DIF距今天數 頂背離賦值:A2+1日前的收盤價<CLOSEANDREF(DIF,A2+1)>DIFANDCROSS(DEA,DIF) 輸出頂背:當滿足條件A2=0時,在DEA位置畫直線起點，當滿足條件頂背離時,在DEA位置畫直線終點,0表示是否延長.,畫綠色,線寬為4 　　<!--{cke_protected}{C}%3C!%2D%2DENDFRAGMENT%2D%2D%3E-->

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

?

DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORRED,LINETHICK2;
DEA:EMA(DIF,9),COLORWHITE,LINETHICK2;
持倉段:=0,COLOR00CFFF;
空倉段:=0,COLORFFCCFF;
STICKLINE(DIF>DEA,-0.5,-0.6,10,1),COLOR00CFFF;
STICKLINE(DIF<DEA,-0.5,-0.6,10,1),COLORFFCCFF;
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),COLORFF937F,LINETHICK2;

AA:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIF,DEA)ANDDEA<0ANDCOUNT(AA=2,21)=1;
DRAWTEXT(二次金叉,0.2,'二次金叉'),COLORYELLOW;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
底背離:=REF(CLOSE,A1+1)>CLOSEANDDIF>REF(DIF,A1+1)ANDCROSS(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)<CLOSEANDREF(DIF,A2+1)>DIFANDCROSS(DEA,DIF);
頂背:DRAWLINE(A2=0,DEA,頂背離,DEA,0),COLORGREEN,LINETHICK4;　

?

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

?