MIDA:=CLOSE-MIN(REF(CLOSE,1),LOW);
MIDB:=IF(CLOSE<REF(CLOSE,1),CLOSE-MAX(REF(CLOSE,1),HIGH),0);
WAD:=SUM(IF(CLOSE>REF(CLOSE,1),MIDA,MIDB),0);
MAWAD:=MA(WAD,18);
ZM:CROSS(WAD,MAWAD);