Dit Script laat tussen 55 uur en 5 over geen Jingles in
Maar ik zou ook heel graag willen dat die ook tussen 25 over en 35 geen jingles Inlaat
Code: Selecteer alles
PAL.Loop:=True;
PAL.LockExecution;
while (Now >= T['00:05:00']) and (Now <= T['00:55:00']) or
(Now >= T['01:05:00']) and (Now <= T['01:55:00']) or
(Now >= T['02:05:00']) and (Now <= T['02:55:00']) or
(Now >= T['03:05:00']) and (Now <= T['03:55:00']) or
(Now >= T['04:05:00']) and (Now <= T['04:55:00']) or
(Now >= T['05:05:00']) and (Now <= T['05:55:00']) or
(Now >= T['06:05:00']) and (Now <= T['06:55:00']) or
(Now >= T['07:05:00']) and (Now <= T['07:55:00']) or
(Now >= T['08:05:00']) and (Now <= T['08:55:00']) or
(Now >= T['09:05:00']) and (Now <= T['09:55:00']) or
(Now >= T['10:05:00']) and (Now <= T['10:55:00']) or
(Now >= T['11:05:00']) and (Now <= T['11:55:00']) or
(Now >= T['12:05:00']) and (Now <= T['12:55:00']) or
(Now >= T['13:05:00']) and (Now <= T['13:55:00']) or
(Now >= T['14:05:00']) and (Now <= T['14:55:00']) or
(Now >= T['15:05:00']) and (Now <= T['15:55:00']) or
(Now >= T['16:05:00']) and (Now <= T['16:55:00']) or
(Now >= T['17:05:00']) and (Now <= T['17:55:00']) or
(Now >= T['18:05:00']) and (Now <= T['18:55:00']) or
(Now >= T['19:05:00']) and (Now <= T['19:55:00']) or
(Now >= T['20:05:00']) and (Now <= T['20:55:00']) or
(Now >= T['21:05:00']) and (Now <= T['21:55:00']) or
(Now >= T['22:05:00']) and (Now <= T['22:55:00']) or
(Now >= T['23:05:00']) and (Now <= T['23:55:00']) do
begin
PAL.UnLockExecution;
cat['nonstop'].QueueTop(smLrp,NoRules);
PAL.WaitForPlayCount(2);
PAL.LockExecution;
end;
PAL.UnLockExecution;