Código fuente dmi de Xu Wenming
{La comunicación pasó la prueba, pruébalo, debería ser lo que deseas}
n:= 14; MM:= 6;
MTR:=EXPMEMA(MAX(MAX( Alto-Bajo, ABS(Alto-REF(Cerca, 1))), ABS(REF(Cerca, 1)-Bajo), N);
HD:=ALTO-REF(Alto, 1) ;
LD:=REF(LOW,1)-Bajo;
DMP:= exp mema(IF(HD gt;0 amp ampHD gtLD,HD,0),N) ;
DMM:= exp mema(IF(LD gt;0 amp ampLD gtHD,LD,0),N);
PDI:= DMP * 100/MTR; p>
p>
MDI:= DMM * 100/MTR;
ADX: = EXPMEMA(ABS(inhalador de dosis medicinal-PDI)/(inhalador de dosis medidas PDI)*100 , MM);
ADXR:=EXPMEMA(ADX,MM);
CROSS(ADX,MDI) y CROSS(ADX,ADXR);