昨日收盤價(jià):=ref(valuewhen(date<>ref(date,1),close),1);
改成

nn:=barslast(date<>ref(date,1))+1;

昨日收盤價(jià):=ref(close,nn);

或者

昨日收盤價(jià):=callstock(stklabel,vtclose,6,-1);