die mits alles is goed ingesteld de juiste jingle`s laat horen bij de juiste seizoen.
Code: Selecteer alles
// *********
// Seizoens-Jingle PAL
// ****
// PAL voorziet zelf waarneer welke seizoens-jingle wordt afgespeeld
// categorie maken voor je jingle`s (zomer voor zomer-jingle, etc..)
// eventueel bij season_jingle de juiste cat-naam ingeven
// new is de naam waar de gewone jingle`s instaan
//
PAL.Loop := True ;
var jaar, maand, dag : integer ;
var season_jingle : string ;
decodedate (date, jaar, maand, dag) ;
// Kerstmis vanaf 5 December t/m 26 December (2de kerstdag)
if (maand = 12) and ((dag > 5) and (dag <= 26)) then
season_jingle := 'Xmas'
// Zomer
else if ((maand = 6) and (dag >= 21)) or (maand = 7) or ((maand = 8) and (dag <= 21)) then
season_jingle := 'summer'
//
else
season_jingle := 'new' ;
// plaats jingle in queue
Cat[season_jingle].QueueBottom(smRandom, NoRules) ;
// wacht 2 keer voordat het opnieuw begint
PAL.WaitForPlayCount(2);
//broadcasterforum.nl, 8 December 2012 
