Metastock:

LL := Security(".DJI",L);
HH:= Security(".DJI",H);
{avoid division by zero}
Dvs:=If((HH‐Ref(LL ,‐1))+(Ref(HH,‐1)‐LL )=0,.00001,(HHRef(
LL ,‐1)+(Ref(HH,‐1)‐LL )));
MLT P:=If(HHRef(HH,‐1),1,((HHRef(LL ,‐1))‐(Ref(HH,‐1)‐LL ))/dvs));
{avoid division by zero}
Dvsv:=If(V=0,.00001,V);
Sum((MLT P*V),20)/Sum(Dvsv,20);

1. Multiplier = [(High ‐ previous low) ‐
(Previous high ‐ low)] / [(High ‐ previous
low) + (Previous high ‐ low)]
2. Money flow volume = Multiplier ‐ volume
for the period
3. 20‐period MFO = 20‐period sum of money
flow volume / 20‐period sum of volume
Note: Steps 2 and 3 above are similar to the calculation
of the Chaikin money flow (CMF) indicator