漲停量縮不下來

input: lastvolume1(2000); setinputname(1,"漲停期間放量張數");
input: lastvolume2(10000); setinputname(2,"當日總成交量上限");
input:TXT1("需使用逐筆洗價"); setinputname(3,"使用限制");

variable: UPLVol(0);

if Date <> Date[1] then UPLVol = 0;

if Close =q_DailyUplimit then 
begin
UPLVol += q_TickVolume;
if q_BestBidSize1 <lastvolume1 and 
q_DailyVolume >lastvolume2 and
UPLVol > lastvolume1 
then RET=1;
end;