以下是通达信精确MDI KDJ副图源码(无源码的请下载附件导入)
DRAWTEXT_FIX(1,0,0.07,0,'(1)白线在黄线上方时,股价处于上升趋势,此时白黄线之间出现红虚线段;'),COLOR99CC32;
DRAWTEXT_FIX(1,0,0.12,0,'(2)黄线在白线上方时,股价处于下降趋势,此时黄白线之间出现绿虚线段;'),COLOR99CC32;
DRAWTEXT_FIX(1,0,0.17,0,'(3)当粉红线从低位(使之-50以下)向上金叉绿线之后再金叉灰白虚线,股价趋势从下降转向上升;'),COLOR99CC32;
DRAWTEXT_FIX(1,0,0.22,0,'(4)当粉红线从高位(数值50以上)向下死叉绿线之后再死叉灰白虚线,股价趋势从上升转向下降; '),COLOR99CC32;
轴距4:50,COLOR545454,DOTLINE;
轴距11:-50,COLOR545454,DOTLINE;
MTR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),13);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),13);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),13);
PDI:=DMP*100/MTR;
MDI:=DMM*100/MTR;
D:=PDI-22;
K:=MDI-22;
A:=D-K;
STICKLINE(A>0 ,D,K,0,-1),COLORRED;
STICKLINE(A<=0,K,D,0,-1),COLORCYAN;
多:D,COLORWHITE;
空:K,COLORYELLOW;
ADX:EXPMEMA((PDI-MDI)/(MDI+PDI)*100,3),COLORMAGENTA;
ADXR:EXPMEMA(ADX,5),COLORGREEN;
趋势:EMA(ADX,13),DOTLINE,COLORGRAY;
550255179.jpg
|