Code: Selecteer alles
PAL.WaitForTime(T['23:59:42']);Ik bedoel daarmee dat van 6 t/m 26 december dit gewijzigd wordt in
Code: Selecteer alles
PAL.WaitForTime(T['23:59:32']);Code: Selecteer alles
PAL.WaitForTime(T['23:59:42']);Code: Selecteer alles
PAL.WaitForTime(T['23:59:42']);Code: Selecteer alles
PAL.WaitForTime(T['23:59:32']);Code: Selecteer alles
PAL.WaitForTime(T['23:59:42']);Code: Selecteer alles
VAR Y, M, Dd : Integer ;
DecodeDate(date, Y, M, Dd) ;
//na 5 december tot en met 26 december
IF ((M = 12) AND ((Dd > 5) AND (Dd <= 26))) THEN
PAL.WaitForTime(T['23:59:32'])
ELSE
PAL.WaitForTime(T['23:59:42']);
// hier verder met je codeCode: Selecteer alles
// Zondag 02:00 uur
while DayOfWeek(Now) = Sunday and ((Now >= T['01:59:15']) and (Now <= T['01:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['01:59:42']);
Cat['02 uur'].QueueCat(ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
Queue.AddFile('K:\SAM AUDIO\uurwissel\nos nieuws\nieuws.wav',ipBottom);
Cat['extra nieuws'].QueueCat(ipBottom);
Cat['Giro 555'].QueueBottom(smLRP,NoRules);
Cat['Uuropener'].QueueCat(ipBottom);
Cat['zo-02'].QueueCat(ipBottom);
Cat['playlist zo-02'].QueueCat(ipBottom);
PAL.LockExecution;
end;Code: Selecteer alles
Cat['02 uur'].QueueCat(ipTop);