相關標簽:

?

?

原理解析：
輸出DIFF:不定周期收盤價的12日指數移動平均-不定周期收盤價的26日指數移動平均 輸出DEA:DIFF的9日指數移動平均,COLORFFFF00 輸出平滑異同平均:(DIFF-DEA)*2 當滿足條件MACD>=0ANDMACD>=1日前的MACD時,在0和MACD位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫紅色 當滿足條件MACD>=0ANDMACD<=1日前的MACD時,在0和MACD位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫綠色 當滿足條件MACD<=0ANDMACD>=1日前的MACD時,在0和MACD位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFF00FF 當滿足條件MACD<=0ANDMACD<=1日前的MACD時,在0和MACD位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FFFF 多轉空賦值:((((4日內MACD的最低值>0) AND (MACD<1日前的MACD)) AND (1日前的MACD>2日前的MACD)) AND (2日前的MACD>3日前的MACD)) 空轉多賦值:((((4日內MACD的最高值<0) AND (MACD>1日前的MACD)) AND (1日前的MACD<2日前的MACD)) AND (2日前的MACD<3日前的MACD)) 當滿足條件多轉空時,在MACD位置畫2號圖標 當滿足條件空轉多時,在MACD位置畫1號圖標 低位金叉賦值:DIFF上穿DEA AND DIFF<-0.1 當滿足條件低位金叉時,在DEA位置書寫文字,COLORFF00FF JCCOUNT賦值:統計上次DEA>=0距今天數日中滿足DIFF上穿DEA的天數 二次金叉賦值:DIFF上穿DEA AND DEA<0 AND 統計21日中滿足JCCOUNT=2的天數=1 當滿足條件二次金叉時,在0和0.2位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFF00FF 當滿足條件二次金叉時,在DEA*1.06位置書寫文字,畫紅色 A1賦值:上次1日前的DIFF上穿DEA距今天數 底背離賦值:A1+1日前的收盤價>收盤價 AND DIFF>A1+1日前的DIFF AND DIFF上穿DEA 當滿足條件A1=0時,在DEA位置畫直線起點，當滿足條件底背離時,在DEA位置畫直線終點,0表示是否延長.,畫紅色,線寬為3 A2賦值:上次1日前的DEA上穿DIFF距今天數 頂背離賦值:A2+1日前的收盤價<收盤價 AND A2+1日前的DIFF>DIFF AND DEA上穿DIFF 當滿足條件A2=0時,在DEA位置畫直線起點，當滿足條件頂背離時,在DEA位置畫直線終點,0表示是否延長.,畫藍色,線寬為3 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

DIFF:EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA:EMA(DIFF,9),COLORFFFF00;
MACD:(DIFF-DEA)*2;
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLORRED;
STICKLINE(MACD>=0 AND MACD<=REF(MACD,1),0,MACD,1,0),COLORGREEN;
STICKLINE(MACD<=0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLORFF00FF;
STICKLINE(MACD<=0 AND MACD<=REF(MACD,1),0,MACD,1,0),COLOR00FFFF;
多轉空:=((((LLV(MACD,4)>0) AND (MACD<REF(MACD,1))) AND (REF(MACD,1)>REF(MACD,2))) AND (REF(MACD,2)>REF(MACD,3)));
空轉多:=((((HHV(MACD,4)<0) AND (MACD>REF(MACD,1))) AND (REF(MACD,1)<REF(MACD,2))) AND (REF(MACD,2)<REF(MACD,3)));
DRAWICON(多轉空,MACD,2);
DRAWICON(空轉多,MACD,1);
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
DRAWTEXT(低位金叉,DEA,' 低位金叉'),COLORFF00FF;
{STICKLINE(低位金叉,0,0.3,8,0),COLORYELLOW;
DRAWICON(低位金叉,0.3,1)};
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,0,0.2,2,0),COLORFF00FF;
DRAWTEXT(二次金叉,DEA*1.06,'二次金叉'),COLORRED;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背離:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
{STICKLINE(底背離,0.5,0.8,2,0),COLORRED};
DRAWLINE(A1=0,DEA,底背離,DEA,0),COLORRED,LINETHICK3;
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),COLORBLUE,LINETHICK3;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?