variable:n=0;

if weekday=5 then n:=n+1;

每月第一個(gè)周五:n=1 and weekday=5;

晚上: time>010000 and time<=063000;

if month<>ref(month,1) then n:=0;

所以開倉(cāng) 條件加上

not( 每月第一個(gè)周五 and 晚上)