ff333333 发表于 2011-2-24 17:50

【请高手将这个通达信指标改成博易大师】

我这里有一个很好的MACD+KDJ的指标,可以适用于各个周期,但是想用到博易大师里面,就是弄不进去,我去淘宝找收费的帮我改,也没改成。
还是来请论坛的高手帮忙吧。

或者谁能帮忙提供一个适用于博易大师的MACD+KDJ指标。

主要要求:
适用于各个周期,不会有比例失调问题;
DIFF/DEA、KDJ需要调成色带;

=======================================
下面是通达信版的源码和截图

A:=CURRBARSCOUNT;
A1:=DAY!=REF(DAY,1);
A2:=BARSLAST(A1)+1;
A3:=MA(C,A2);
A4:=SUM(AMO,A2)/SUM(VOL,A2)/100;
A5:=IF(CAPITAL>0,A4,A3);
均价线:=IF(A<=CONST(A2),A5,DRAWNULL);
分钟有效周期:=IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,DRAWNULL))));
分时价:=TFILT(CLOSE,CURRBARSCOUNT,00,CURRBARSCOUNT,00);
分时判断:=IF(分时价=DRAWNULL,1,IF(分钟有效周期=DRAWNULL,DRAWNULL,1));
{-----------------------------由MACD定位顶底-------------------------------}
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
KX:=BARSSINCE(CLOSE);{←首次开盘价距金的天数}
HHN:=CONST(HHV(DIFF,KX));
HLN:=CONST(LLV(DEA,KX));
RC1:=CONST((HHN+HLN)/2);
SS:=((HHN-HLN)/200);
MACD底部:=(-100*SS+RC1)+-(-100*SS+RC1),COLOR669999;
MACD顶部:=(100*SS+RC1)+-(-100*SS+RC1),COLORFF0033;
MACD中轴:=0+-(-100*SS+RC1);
DIFF修正:=DIFF+-(-100*SS+RC1),COLOR008080;
DEA修正:=DEA+-(-100*SS+RC1),COLOR00FF00;
MACD修正1:=2*(DIFF修正-DEA修正)+MACD中轴,COLOR0000BB,NODRAW;
MACD修正2:= EMA(MACD修正1,3);

MACD超跌:=CONST(LLV(MACD修正1,KX));
MACD超跌线:=IF(MACD超跌<MACD底部,MACD超跌,MACD底部);

{----------------------利用MACD趋势进行精确顶底判断------------------------}
顶部:=MACD顶部+-MACD超跌线;
天际:=顶部*0.809;
中轴:=MACD中轴+-MACD超跌线;
海面:=顶部*0.191;
底部:=MACD底部;

{------------------------顶部线,天际线,海面线,底部线重画-------------------}
金色背景修边1:STICKLINE(C>0 AND CURRBARSCOUNT>=2,顶部,底部,3.05,0),COLOR003333;
金色背景修边2:STICKLINE(C>0 AND CURRBARSCOUNT>=2,顶部,中轴,3.05,0),COLOR003333;
金色背景补充:DRAWBAND(顶部,RGB(51,51,0),中轴,RGB(51,51,0));
金色背景:DRAWBAND(顶部,RGB(51,51,0),底部,RGB(128,128,128));

顶部线:DRAWBAND(顶部,RGB(51,0,255),顶部,RGB(51,0,255));
天际线:DRAWBAND(天际,RGB(128,64,64),天际,RGB(128,64,64));
海面线:DRAWBAND(海面,RGB(0,153,153),海面,RGB(0,153,153));
底部线:DRAWBAND(0,RGB(153,153,102),0,RGB(153,153,102));

{------------------------传统KDJ指标结合MACD优化---------------------------}
RSVA:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*顶部*0.8;{采用21日月线优化}
K:SMA(RSVA,3,1),COLORFFFFFF,NODRAW;
D:SMA(K,3,1),COLOR00FFFF,NODRAW;
J:=3*K-2*D;

{---------------------------MACD多空量能判断-------------------------------}
MACD多头:DIFF修正+-MACD超跌线,COLOR339999;
空头:DEA修正+-MACD超跌线,COLOR00FF00;
量能柱:2*(MACD多头-空头)+中轴,COLOR0000BB,NODRAW;
超前DEA:=(EMA(MACD多头,7));
超前MACD:=2*(MACD多头-超前DEA)+中轴;

MACD多空趋势:DRAWBAND(MACD多头,RGB(204,51,51),空头,RGB(0,130,244{0,179,0}));
MACD多头重画:DRAWBAND(MACD多头,RGB(153,153,51),MACD多头,RGB(153,153,51));
MACD空头重画:DRAWBAND(空头,RGB(0,224,224),空头,RGB(0,224,224));


{-------------------------------传统KDJ指标线重画--------------------------}
D线重画:DRAWBAND(D,RGB(80,80,80),D*0.998,RGB(80,80,80));
K线重画:DRAWBAND(K,RGB(80,80,80),K,RGB(80,80,80));
J线重画:DRAWBAND(J,RGB(80,80,80),J,RGB(80,80,80));

DRAWBAND(J线重画,RGB(120,120,120{230,130,0}), D线重画,RGB(210,225,230));
DRAWBAND(K线重画,RGB(210,150,80{230,130,0}), D线重画,RGB(210,150,80));

{--------------------------MACD多空量能柱----------------------------------}
MACD红柱1:STICKLINE(量能柱>=中轴,量能柱,中轴,1.5,0),COLOR2E0022{COLOR000077};
MACD红柱2:STICKLINE(量能柱>=中轴,量能柱,中轴,1.1,0),COLOR372635{COLOR809A3C}{COLOR000088};
MACD红柱3:STICKLINE(量能柱>=中轴,量能柱,中轴,0.6,0),COLORFF00FF{COLOR000099};
MACD红柱4:STICKLINE(量能柱>=中轴,量能柱,中轴,0.15,0),COLORFF00FF{COLOR0000AA};
MACD兰柱1:STICKLINE(量能柱<=中轴,量能柱,中轴,1.5,0),COLOR2E0022{COLOR808040}{COLORAA6633};
MACD兰柱2:STICKLINE(量能柱<=中轴,量能柱,中轴,1.1,0),COLOR372635{COLOR809A3C}{COLORBB7744};
MACD兰柱3:STICKLINE(量能柱<=中轴,量能柱,中轴,0.6,0),COLORGREEN{COLORCC8855};
MACD兰柱4:STICKLINE(量能柱<=中轴,量能柱,中轴,0.15,0),COLORGREEN{COLORDD9966};

{---------中轴线重画及顶部线,天际线,海面线,底部线,多空线文字说明-----------}
中轴线:DRAWBAND(中轴,RGB(128,128,255),中轴,RGB(128,128,255));
BAA:=量能柱<=中轴 AND 量能柱>REF(量能柱,1);
STICKLINE(BAA,量能柱,中轴,0.6,0),COLORYELLOW{COLOR8400FF};
BAB:=量能柱>中轴 AND 量能柱<REF(量能柱,1);
STICKLINE(BAB,量能柱,中轴,0.6,0),COLORFFCC33{COLOR00A600}{COLOR00FF00};



页: [1]
查看完整版本: 【请高手将这个通达信指标改成博易大师】