%>
{macb}
DIFF : EMA(C,12) - EMA(C,26),PRECISION2,LINETHICK2,COLORGREEN;
DEA : EMA(DIFF,9),PRECISION2,LINETHICK2,ColorFFA800;
MACD : 2*(DIFF-DEA),PRECISION2,LINETHICK,COLORGRAY;
{kdj}
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:SMA(RSV,3,1),PRECISION2,LINETHICK,COLORWHITE;
D:SMA(K,3,1),PRECISION2,LINETHICK,COLORYELLOW;
J:3*K-2*D,PRECISION2,LINETHICK,ColorFF80FF;
{叠加}
n1:=sysparam(3); n2:=sysparam(2); n3:=(n1-n2)+1; hh:=hhv(DIFF,n3); ll:=llv(MACD,n3);
zhh:=hh[n1]; zll:=ll[n1]; Rh:=hhv(J,0); RL:=LLv(J,0); q:=datacount;
Rb:=(zhh-zll)/(RH[q]-RL[q]); Ry:=(zhh+zll-rb*(RH[q]+RL[q]))/2;
叠K:=k*rb+ry; 叠D:=d*rb+ry; 叠J:=J*rb+ry;
STICKLINE(MACD<ref(MACD,1) and MACD<0,0,MACD,0,0),ColorFFCF78;
STICKLINE(MACD<ref(MACD,1) and MACD>0,0,MACD,0,0),COLORYELLOW;
STICKLINE(MACD>ref(MACD,1) and MACD<0,0,MACD,0,0),COLORMAGENTA;
STICKLINE(MACD>ref(MACD,1) and MACD>0,0,MACD,0,0),COLORRED;
PARTLINE(1,叠K),COLORWHITE;
PARTLINE(1,叠D),COLORYELLOW;
PARTLINE(1,叠J),ColorFF80FF;
//
{股票教程网-http://bkqg.net承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}