心愛變色MAKDJ副圖指標公式源碼[通達信公式]

相關標簽:通達信四量圖指標源碼 、 通達信主圖指標公式 、 通達信最好的副圖指標 、 通達信龍虎榜副圖指標 、 通達信副圖全倉指標 、 通達信分時副圖指標 、 通達信分時圖指標公式 、 通達信macd變色指標 、 通達信cci變色指標 、 通達信變色均線指標 、 通達信乖離率指標副圖 、 通達信kdj變色指標 、 通達信變色布林線指標 、

?

?

?

?

原理解析：
M5賦值:收盤價的5日簡單移動平均 輸出五日乖離:(收盤價/M5-1)*100,NODRAW 上乖離賦值:(最高價/M5-1)*100,NODRAW,畫青色 下乖離賦值:(最低價/M5-1)*100,NODRAW,畫紅色 KX賦值:收盤價上穿M5 XFX賦值:1日前的最低價=13日內最低價的最低值 AND 1日前的收盤價=13日內收盤價的最低值AND 1日前的成交量(手)<成交量(手)的13日簡單移動平均 輸出下分形:如果XFX,返回-0.5,否則返回-1,畫黃色 M賦值:上次XFX距今天數 輸出買:如果KXANDM<=5,返回-0.5,否則返回-1,畫紅色 SFX賦值:1日前的最高價=13日內最高價的最高值 AND 1日前的收盤價=13日內收盤價的最高值AND 1日前的成交量(手)>成交量(手)的13日簡單移動平均 KX1賦值:M5上穿收盤價 M1賦值:上次SFX距今天數 輸出上分形:如果SFX,返回0.5,否則返回1,畫綠色 輸出賣:如果KX1ANDM1<=5,返回0.5,否則返回1,畫青色 輸出MCD:"平滑異同平均的MACD"*2,COLORSTICK,畫淡紅色 DIF賦值:"平滑異同平均的DIF" 當滿足條件DIF>0ANDMCD>0時,在MCD和0位置之間畫柱狀線,寬度為0.01,0不為0則畫空心柱.,畫紅色 當滿足條件DIF>0ANDMCD<0時,在MCD和0位置之間畫柱狀線,寬度為0.01,0不為0則畫空心柱.,畫青色 RSV賦值:(收盤價-8日內最低價的最低值)/(8日內最高價的最高值-8日內最低價的最低值)*2-1 輸出K:RSV的3日[1日權重]移動平均,畫白色 輸出D:K的3日[1日權重]移動平均,畫黃色 輸出J:3*K-2*D,畫黃色 A賦值:上次星期-1日前的星期<0距今天數 B賦值:如果星期=5,返回收盤價,否則返回A+1日前的收盤價 X賦值:如果B不等于1日前的B,返回B,否則返回無效數 輸出周末收:B,NODRAW,畫白色 如果K<1日前的K,返回K,否則返回無效數,畫綠色,線寬為1 如果D<1日前的D,返回D,否則返回無效數,畫綠色,線寬為1 如果J<1日前的J,返回J,否則返回無效數,COLORFFFF00,線寬為1 如果K>1日前的K,返回K,否則返回無效數,畫紅色,線寬為1 如果D>1日前的D,返回D,否則返回無效數,畫紅色,線寬為1 如果J>1日前的J,返回J,否則返回無效數,COLORFF00FF,線寬為1 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

M5:=MA(C,5);
五日乖離:(CLOSE/M5-1)*100,NODRAW;
上乖離:=(HIGH/M5-1)*100,NODRAW,COLORCYAN;
下乖離:=(LOW/M5-1)*100,NODRAW,COLORRED;
KX:=CROSS(CLOSE,M5);
XFX:=REF(LOW,1)=LLV(LOW,13) AND REF(CLOSE,1)=LLV(CLOSE,13)
AND REF(VOL,1)<MA(VOL,13);
下分形:IF(XFX,-0.5,-1),COLORYELLOW;
M:=BARSLAST(XFX);
買:IF(KX AND M<=5,-0.5,-1),COLORRED;
SFX:=REF(HIGH,1)=HHV(HIGH,13) AND REF(CLOSE,1)=HHV(CLOSE,13)
AND REF(VOL,1)>MA(VOL,13);
KX1:=CROSS(M5,CLOSE);
M1:=BARSLAST(SFX);
上分形:IF(SFX,0.5,1),COLORGREEN;
賣:IF(KX1 AND M1<=5,0.5,1),COLORCYAN;
MCD:"MACD.MACD"*2,COLORSTICK,COLORLIRED;
DIF:="MACD.DIF";
STICKLINE(DIF>0 AND MCD>0,MCD,0,0.01,0),COLORRED;
STICKLINE(DIF>0 AND MCD<0,MCD,0,0.01,0),COLORCYAN;
{變色KDJ 分段線源碼};
{變色KDJ 分段線源碼}
RSV:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*2-1;
K:SMA(RSV,3,1),COLORWHITE;
D:SMA(K,3,1),COLORYELLOW;
J:3*K-2*D,COLORYELLOW;
A:=BARSLAST(WEEKDAY-REF(WEEKDAY,1)<0);
B:=IF(WEEKDAY=5,CLOSE,REF(CLOSE,A+1));
X:=IF(B!=REF(B,1),B,DRAWNULL);
周末收:B,NODRAW,COLORWHITE;
IF(K<REF(K,1),K,DRAWNULL),COLORGREEN,LINETHICK1;
IF(D<REF(D,1),D,DRAWNULL),COLORGREEN,LINETHICK1;
IF(J<REF(J,1),J,DRAWNULL),COLORFFFF00,LINETHICK1;
IF(K>REF(K,1),K,DRAWNULL),COLORRED,LINETHICK1;
IF(D>REF(D,1),D,DRAWNULL),COLORRED,LINETHICK1;
IF(J>REF(J,1),J,DRAWNULL),COLORFF00FF,LINETHICK1;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.tumamayizhan.com '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?