b:=(C-O)/(H-L)*vol; IF(O IF(O=C,REF(b,1),REF(b,1)); IF(O=H,REF(b,2)-VOL,REF(b,2)-VOL); IF(O=L,VOL+REF(b,2),REF(b,2)+VOL);