相關標簽:macd交易主圖公式源碼 、 通達信ox主圖公式源碼 、 通達信超牛macd指標 、 通達信副圖macd指標 、 豬羊變色主圖指標源碼 、 macd指標公式交叉變色 、 文華macd變色指標公式 、 極品變色macd指標公式 、 通達信主圖疊加macd 、 通達信精準主圖macd 、 通達信分時主圖macd 、 通達信新macd指標公式 、 macd背離指標公式源碼 、 文華macd指標公式源碼 、 變色帶macd指標源碼 、

?

?

原理解析：
RC賦值:前收盤價*1.1 DK賦值:"平滑異同平均的MACD"(60,130,45)*2 控盤賦值:DK 當滿足條件控盤<0AND控盤<1日前的控盤時,在控盤+RC和RC位置之間畫柱狀線,寬度為0.05,0不為0則畫空心柱.,畫淡藍色 當滿足條件控盤<0AND控盤>1日前的控盤時,在控盤+RC和RC位置之間畫柱狀線,寬度為0.05,0不為0則畫空心柱.,畫白色 當滿足條件控盤>1日前的控盤AND控盤>0時,在控盤+RC和RC位置之間畫柱狀線,寬度為0.05,0不為0則畫空心柱.,畫紅色 當滿足條件控盤<1日前的控盤AND控盤>0時,在控盤+RC和RC位置之間畫柱狀線,寬度為0.05,0不為0則畫空心柱.,COLOR00FF00 KS賦值:(收盤價-收盤價的13日簡單移動平均)/收盤價的13日簡單移動平均*(-100) RKS賦值:1日前的KS MLS賦值:RKS/KS>=1.23 AND RKS>=8 AND 收盤價/1日前的收盤價>=1.02 輸出超跌:當滿足條件KS>=8時,在最高價和最低價位置之間畫柱狀線,寬度為0,1不為0則畫空心柱.,畫白色,線寬為1 當滿足條件KS>=8時,在開盤價和收盤價位置之間畫柱狀線,寬度為7,1不為0則畫空心柱.,畫白色,線寬為1 輸出反彈:當滿足條件MLS=1時,在最高價和最低價位置之間畫柱狀線,寬度為0,1不為0則畫空心柱.,畫洋紅色,線寬為1 當滿足條件MLS=1時,在開盤價和收盤價位置之間畫柱狀線,寬度為7,1不為0則畫空心柱.,畫洋紅色,線寬為1 輸出MA5:收盤價的5日指數移動平均,畫白色 線寬為1 如果MA5>=1日前的MA5,返回MA5,否則返回無效數,線寬為2,畫紅色 如果MA5<=1日前的MA5,返回MA5,否則返回無效數,線寬為1,畫綠色 輸出MA10:收盤價的10日指數移動平均,畫白色 線寬為1 如果MA10>=1日前的MA10,返回MA10,否則返回無效數,線寬為2,畫紅色 如果MA10<=1日前的MA10,返回MA10,否則返回無效數,線寬為1,畫綠色 輸出MA20:收盤價的20日指數移動平均,畫白色 線寬為1 如果MA20>=1日前的MA20,返回MA20,否則返回無效數,線寬為2,畫紅色 如果MA20<=1日前的MA20,返回MA20,否則返回無效數,線寬為1,畫綠色 輸出M30:收盤價的30日指數移動平均,畫白色 POINTDOT 如果M30>=1日前的M30,返回M30,否則返回無效數,線寬為2,COLOR0066FF 如果M30<=1日前的M30,返回M30,否則返回無效數,線寬為1,畫青色 輸出M60:收盤價的60日指數移動平均,畫白色 POINTDOT 如果M60>=1日前的M60,返回M60,否則返回無效數,線寬為2,畫黃色 如果M60<=1日前的M60,返回M60,否則返回無效數,線寬為1,COLORCC9900 輸出M120:收盤價的120日指數移動平均,畫白色 POINTDOT 如果M120>=1日前的M120,返回M120,否則返回無效數,線寬為1,COLOR0066FF POINTDOT 如果M120<=1日前的M120,返回M120,否則返回無效數,線寬為1,畫白色 POINTDOT 輸出M240:收盤價的240日指數移動平均,畫白色 POINTDOT 如果M240>=1日前的M240,返回M240,否則返回無效數,線寬為1,COLOR0066FF POINTDOT 如果M240<=1日前的M240,返回M240,否則返回無效數,線寬為1,畫洋紅色 POINTDOT 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

{MACD}
RC:=DYNAINFO(3)*1.1;
DK:="MACD.MACD"(60,130,45)*2;
控盤:=DK;
STICKLINE(控盤<0 AND 控盤<REF(控盤,1),控盤+RC,RC,0.05,0),COLORLIBLUE;
STICKLINE(控盤<0 AND 控盤>REF(控盤,1),控盤+RC,RC,0.05,0),COLORWHITE;
STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤+RC,RC,0.05,0),COLORRED;
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤+RC,RC,0.05,0),COLOR00FF00;
{超跌反彈原碼}{加在主圖即可}
KS:=(C-MA(C,13))/MA(C,13)*(-100);
RKS:=REF(KS,1);
MLS:=RKS/KS>=1.23 AND RKS>=8 AND C/REF(C,1)>=1.02;
超跌:STICKLINE(KS>=8,H,L,0,1),COLORWHITE,LINETHICK1;
STICKLINE(KS>=8,O,C,7,1),COLORWHITE,LINETHICK1;
反彈:STICKLINE(MLS=1,H,L,0,1),COLORMAGENTA,LINETHICK1;
STICKLINE(MLS=1,O,C,7,1),COLORMAGENTA,LINETHICK1;
MA5:EMA(C,5),COLORWHITE LINETHICK1;
IF(MA5>=REF(MA5,1),MA5,DRAWNULL),LINETHICK2,COLORRED;
IF(MA5<=REF(MA5,1),MA5,DRAWNULL),LINETHICK1,COLORGREEN;
MA10:EMA(C,10),COLORWHITE LINETHICK1;
IF(MA10>=REF(MA10,1),MA10,DRAWNULL),LINETHICK2,COLORRED;
IF(MA10<=REF(MA10,1),MA10,DRAWNULL),LINETHICK1,COLORGREEN;
MA20:EMA(C,20),COLORWHITE LINETHICK1;
IF(MA20>=REF(MA20,1),MA20,DRAWNULL),LINETHICK2,COLORRED;
IF(MA20<=REF(MA20,1),MA20,DRAWNULL),LINETHICK1,COLORGREEN;
M30:EMA(C,30),COLORWHITE POINTDOT;
IF(M30>=REF(M30,1),M30,DRAWNULL),LINETHICK2,COLOR0066FF;
IF(M30<=REF(M30,1),M30,DRAWNULL),LINETHICK1,COLORCYAN;
M60:EMA(C,60),COLORWHITE POINTDOT;
IF(M60>=REF(M60,1),M60,DRAWNULL),LINETHICK2,COLORYELLOW;
IF(M60<=REF(M60,1),M60,DRAWNULL),LINETHICK1,COLORCC9900;
M120:EMA(C,120),COLORWHITE POINTDOT;
IF(M120>=REF(M120,1),M120,DRAWNULL),LINETHICK1,COLOR0066FF POINTDOT;
IF(M120<=REF(M120,1),M120,DRAWNULL),LINETHICK1,COLORWHITE POINTDOT;
M240:EMA(C,240),COLORWHITE POINTDOT;
IF(M240>=REF(M240,1),M240,DRAWNULL),LINETHICK1,COLOR0066FF POINTDOT;
IF(M240<=REF(M240,1),M240,DRAWNULL),LINETHICK1,COLORMAGENTA POINTDOT;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?