Atp(vwap) percent change from previous days atp(vwap) in columns in exploration

i want to show columns of vwap of last 5 days in the exploration
and simultaneously show the change in vwap from last days vwap in percentage form

can someone guide me

for vwap i have this code

Bars_so_far_today = 1 + BarsSince( Day() != Ref(Day(), -1));
StartBar = ValueWhen(TimeNum() == 091500, BarIndex());
TodayVolume = Sum(V,Bars_so_far_today);
ATP = Sum (C * V, Bars_so_far_today ) / TodayVolume;

Plot (ATP,"ATP",colorblue, styleThick);

dn = DateNum();
LastBarOfDay = dn != Ref( dn, 1 );

i dont know how to write the code for showing vwap percentage change

thanks in advance

vwap columns look like this
similarly vwap change in % needed