elk uur Het Nieuws/met een andere jingle

Voor vragen over Playlist Automation Language.
Plaats reactie
martijn2018

elk uur Het Nieuws/met een andere jingle

Ongelezen bericht door martijn2018 »

Hallo ik ben op zoek naar een PAL Script die elk uur Het Nieuws draait maar dan wel met ieder uur een andere jingle Het is nu 9 uur vervolgens het nieuws
Is dat mogelijk en hoe moet ik dit doen groet Martijn

PAL.Loop:=True;
PAL.WaitForTime(T['xx:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;
Omhoog
Gebruikersavatar
Wout
Beheerder
Berichten: 3511
Lid geworden op: 03 dec 2007, 14:17
SAM-versie: 2019.3
Database: MariaDB
Windows: 11
Locatie: West-Brabant
Contacteer:
Contacteer Wout

Re: elk uur Het Nieuws/met een andere jingle

Ongelezen bericht door Wout »

PAL/PAL-voor-nieuws-tijdmelding-t2232-20.html#p17827
Afbeelding
Omhoog
martijn2018

Re: elk uur Het Nieuws/met een andere jingle

Ongelezen bericht door martijn2018 »

Kunt u mij vertellen en uitleggen hoe het werkt
gr martijn
Omhoog
martijn2018

Re: elk uur Het Nieuws/met een andere jingle

Ongelezen bericht door martijn2018 »

ik heb het nu zo gedaan

Code: Selecteer alles

 PAL.Loop:=True;
PAL.WaitForTime(T['08:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 9uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['09:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 10uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['10:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 11uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['11:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 12uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['12:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 1uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['13:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 2uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['14:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 3uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['15:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 4uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['16:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 5uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['17:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 6uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['18:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 7uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['19:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 8uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['20:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 9uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['21:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 10uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['22:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 11uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['23:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 12uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['00:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 1uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['01:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 2uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['02:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 3uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['03:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 4uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['04:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 5uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['05:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 6uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['06:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 7uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['07:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Queue.AddFile('E:\Jingles\uren\GFM 8uur.WAV',ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;
Omhoog
martijn2018

Re: elk uur Het Nieuws/met een andere jingle

Ongelezen bericht door martijn2018 »

of zo

Code: Selecteer alles

PAL.Loop:=True;
PAL.WaitForTime(T['08:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['9uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['09:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['10uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['10:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['11uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['11:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['12uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['12:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['1uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['13:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['2uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['14:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['3uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['15:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['4uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['16:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['7uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['17:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['6uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['18:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['7uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['19:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['8uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['20:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['9uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['21:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['10uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['22:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['11uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['23:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['12uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['00:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['1uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['01:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['2uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['02:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['3uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['03:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['4uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['04:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['5uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['05:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['6uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['06:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['7uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;

PAL.Loop:=True;
PAL.WaitForTime(T['07:59:00']);
PAL.LockExecution;
Queue.Clear;
Cat['@'].QueueCat(ipBottom);
Cat['Reclame1'].QueueBottom(smRandom, NoRules);
Cat['Reclame2'].QueueBottom(smRandom, NoRules);
Cat['Reclame3'].QueueBottom(smRandom, NoRules);
Cat['@'].QueueCat(ipBottom);
Cat['8uur'].QueueCat(ipBottom);
Cat['wnc'].QueueCat(ipBottom);
ActivePlayer.FadeToNext;
PAL.UnLockExecution;
Omhoog
Plaats reactie
  • Vergelijkbare Onderwerpen
    Reacties
    Weergaves
    Laatste bericht

Terug naar “PAL”