Barrie Vwap Formula