schedlure met PAL script

[poprockfm]

Hallo ik heb een script gemaakt met PAL alleen wil die niet elk uur verversen


Nml nieuws wil die niet afspelen en de uur opener . Kunnen jullie me zeggen wat ik verkeerd doe?

Code: Selecteer alles

// Ochtend Classics Clockwheel rotation via PAL scripting
Queue.Clear;
{# Add files to queue script #}
Cat['Nieuws'].QueueBottom(smWeighted, EnforceRules);
Cat['Uuropener'].QueueBottom(smWeighted, EnforceRules);
Cat['Playlist jaren 00'].QueueBottom(smRandom, EnforceRules);
Cat['Promo Ochtend Classics'].QueueBottom(smWeighted, EnforceRules);
Cat['Liners nederlands'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist jaren 90'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist jaren 90'].QueueBottom(smRandom, EnforceRules);
Cat['Liners internationaal'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist Mega 40'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist Mega 40'].QueueBottom(smRandom, EnforceRules);
Cat['Liners engels'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist jaren 00'].QueueBottom(smRandom, EnforceRules);
Cat['Promo Ochtend Classics'].QueueBottom(smWeighted, EnforceRules);
Cat['Headlines'].QueueBottom(smWeighted, EnforceRules);
Cat['Uuropener'].QueueBottom(smWeighted, EnforceRules);
Cat['Playlist jaren 00'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles gezongen'].QueueBottom(smWeighted, EnforceRules);
Cat['Playlist Mega 40'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist Mega 40'].QueueBottom(smRandom, EnforceRules);
Cat['Liners internationaal'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist jaren 90'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist jaren 90'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles gezongen'].QueueBottom(smWeighted, EnforceRules);
Cat['Playlist jaren 80'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist jaren 80'].QueueBottom(smRandom, EnforceRules);
Cat['Liners internationaal'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist Mega 40'].QueueBottom(smRandom, EnforceRules);
Cat['Playlist Mega 40'].QueueBottom(smRandom, EnforceRules);;
//Lets wait for queue to get near empty
{while Queue.Count > 1 do
begin
  PAL.WaitForPlayCount(1);
end;

//Restart script

Thanks

[poprockfm]

Hallo

We hebben nu een scripte gemaakt dat ie de PAL lijst wil starten alleen wil die niet exact op het hele uur starten. Kunnen jullie eens kijken wat we verkeerd doen

Code: Selecteer alles

// Mega 40 deel1 Clockwheel rotation via PAL scripting
Queue.Clear;
{# Add files to queue script #}
//Drivetimeclassics Clockwheel rotation via PAL scripting
var P    : TPlayer;
var Song : TSongInfo;

PAL.WaitForTime('18:00:00:00');
{## Detect the empty player and queue a station ID in it}
P := IdlePlayer;
if P <> nil then
begin
 Song := CAT['C:\Muziek Pop Rock FM\Jingles\Jingles reclame sounder\- Pingel Summer.mp3'].ChooseSong(smRandom,NoRules);
 if Song <> nil then P.QueueSong(Song);

 {## Detect the active player and start the fade-out}

 P := ActivePlayer;
 if P <> nil then P.FadeToNext;
 end;
Queue.Clear;

Thanks

[Wout]

viewtopic.php?f=81&t=2909#p18308
En dan naar "Een simpele uuropener voor elk uur".
Dan zal waarschijnlijk het kwartje (€0,25) vallen.

[poprockfm]

Thanks wout

He hoe vookom ik dat ik iedere keer i bottem krijg is dit niet eea manier aan te passen. We komen zo weer elke dag weer een stappie verder

Goos

[poprockfm]

Die staat er dus al eigenlijk in als je onderstaande ziet

Code: Selecteer alles

ueue.Clear;
{# Add files to queue script #}
//Drivetimeclassics Clockwheel rotation via PAL scripting
var P    : TPlayer;
var Song : TSongInfo;

PAL.WaitForTime('20:00:00:00');
{## Detect the empty player and queue a station ID in it}
P := IdlePlayer;
if P <> nil then
begin
 Song := CAT['C:

Maar de vraag is hoe kappen we de plaat af dat de TOTH gaat beginnen op het hele uur en vervolgens nieuwe muziek lijst afspeelt. Je kan hem niet geforceerd af laten spelen wat ik in de scheduler zie . Dus is er ergens een script die dus
De reclame op 58.35 en de toth en nieuwe lijst op 00 start.

Ben benieuwd