通达信KDJ的MACD未加密选股指标公式源码

源码正文：

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=Sma(K,3,1){XG51};
J:=3*K-2*D{XG51};
difF:ema(J,8) - EMA(J,16),COLOR0044FF{XG51};
DEA:EMA(DIFF,5),COLOR00FF00{XG51};
DRAWBAND(DIFF,RGB(255,80,0),DEA,RGB(0,255,100)){XG51};
macd:2*(DIFF-DEA), COLORstICK{XG51};
0,COLORFF9900,DOTLINE{XG51};
KC:=FORCAST(((2*C+H+L)/4*0.618+C*0.382),3){XG51};
AAX:=(KC-MA(KC,9))/MA(KC,9)*100{XG51};
VAR0:=MIN(EXIST(KC,55),9){XG51};
AAX1:=EMA(AAX,VAR0)*VAR0{XG51};
AAX2:=MA(AAX1,3){XG51};
AAX3:=MA(AAX1,5){XG51};
DRAWTEXT(AAX3>10 AND AAX1<REF(AAX1,1) AND crOSS(AAX2,AAX1) ,12,'卖'),COLOR00FFFF,LINETHICK3{XG51};
DRAWTEXT(AAX3>10 AND AAX1<REF(AAX1,1) AND CROSS(AAX2,AAX1) ,15,'◆'),COLOR0000FF,LINETHICK3{XG51};
DRAWTEXT_FIX(1,0.02,0,0,'■现在kdj的参数是:N=9,M1=3,M2=3;'),COLOR0000FF{XG51};
DRAWTEXT_FIX(1,0.02,0.1,0,'■【kdJ】的【MacD】的参数是:LONG=8,LONG=16,M=5;'),COLOR00FF00{X*G_5~1*C*N*{};

源码正文：

现:=100*(C-REF(C,1))/REF(C,1){XG51};
量:=SUM(V,FROMOPEN){XG51};
大买:=SUM(IF(现>=0 AND V>CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN){XG51};
大卖:=SUM(IF(现<0 AND V>CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN){XG51};
小买:=SUM(IF(现>=0 AND V<CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN){XG51};
小卖:=SUM(IF(现<0 AND V<CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN){XG51};
B1:=100*大买/量{XG51};
B2:=100*大卖/量{XG51};
B3:=100*小买/量{XG51};
B4:=100*小卖/量{XG51};
DRAwrECTREL(433,CONst(100-B1)*1000/100,459,1000,RGB(255,0,0)){XG51};
DRAWRECTREL(469,CONST(100-B2)*1000/100,494,1000,RGB(0,255,0)){XG51};
DRAWRECTREL(505,CONST(100-B3)*1000/100,526,1000,RGB(128,0,0)){XG51};
DRAWRECTREL(536,CONST(100-B4)*1000/100,557,1000,RGB(0,128,0)){XG51};
DRAWTEXT_FIX(PERIOD=0,0.4355,8,0,CON2STR(B1,0)) COLORFFFFFF{XG51};
DRAWTEXT_FIX(PERIOD=0,0.4713,8,0,CON2STR(B2,0)) COLORFF0000{XG51};
DRAWTEXT_FIX(PERIOD=0,0.5053,8,0,CON2STR(B3,0)) COLORFFFFFF{XG51};
DRAWTEXT_FIX(PERIOD=0,0.5388,8,0,CON2STR(B4,0)) COLORFF0000{X_G*5*1_C_N_{};