把KDJ+DMI选股改成飞狐版本的

把KDJ+DMI选股改成飞狐版本的

编写要求：

解答：

网友求助：

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;
MDI:=DMM*100/MTR;
A1:=PDI>=MDI;
A2:=PDI<MDI;
XG:CROSS(A1,A2);