通达信2468改编源码副图
{2468改编PDI指标}
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);
PDI: DMP*100/MTR,COLORRED;
MDI: DMM*100/MTR,COLORGREEN;
DRAWBAND(PDI,RGB(255,0,0),MDI,RGB(0,55,250));
ADX:= EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=EXPMEMA(ADX,6);
STICKLINE(PDI,PDI,0,0.00001,0),COLORRED;
20,DOTLINE;
40,DOTLINE;
{IF(PDI<REF(PDI,1),PDI,DRAWNULL),COLORCYAN;}
STICKLINE(CROSS(20,PDI),PDI,0,0.0001,0),COLORGREEN;
STICKLINE(CROSS(PDI,20),0,PDI,0.0001,0),COLORYELLOW;
上穿: CROSS(PDI,MDI),COLORRED,NODRAW;
下穿: CROSS(MDI,PDI),COLORCYAN,NODRAW;
DRAWICON(上穿,PDI,25);
DRAWICON(下穿,PDI,24);
顶: PDI>40,COLORWHITE,NODRAW;
底: MDI>40,COLORCYAN,NODRAW;
STICKLINE(PDI>40,40,PDI,1,0),COLORWHITE;
STICKLINE(MDI>40,0,PDI,1,0),COLORCYAN;
- 上一篇公式:通达信动向趋势源码
- 下一篇公式:通达信雨季彩虹(源码副图贴图)顶底参考