(!empty($user->lang['QUOTE'])) ? $user->lang['QUOTE'] : ucwords(strtolower(str_replace('_', ' ', 'QUOTE'))):
Hmm.. The script i posted injects only one file into the queue (C:\news\News Update.mp3). Are you sure you`re not missing anything?
You're right. I did modify the script this way:
(!empty($user->lang['CODE'])) ? $user->lang['CODE'] : ucwords(strtolower(str_replace('_', ' ', 'CODE'))):
PAL.Loop := True;
Pal.WaitforTime ('XX:29:45'); {## Wait for next hour}
Queue.Clear;
CAT['Station Image'].QueueTOP(smLRP, NoRules);
Queue.AddFile('C:\news\newspromo.mp3',ipTop);
Queue.AddFile('C:\news\News Update.mp3',ipTop);
If ((ActivePlayer.Duration)-(ActivePlayer.CurTime) > 600000) and FileExists('C:\news\News Update.mp3') then
Begin
If DeckA.Status = psPlaying then
Begin
DeckB.QueueSong(Queue.NextInQueue);
DeckA.Pause;
DeckB.Play;
End
Else
Begin
DeckA.QueueSong(Queue.NextInQueue);
DeckB.Pause;
DeckA.Play;
End;
End
Else
If FileExists('C:\news\News Update.mp3') then
ActivePlayer.FadeToNext;
Queue.Clear;
I removed the last string upon realizing that it cleared the queue almost immediately and so did not play the
newsupdate.
I still would want the script be able to clear the other two items from the queue in the even there's
(!empty($user->lang['CODE'])) ? $user->lang['CODE'] : ucwords(strtolower(str_replace('_', ' ', 'CODE'))):
((ActivePlayer.Duration)-(ActivePlayer.CurTime) > 600000)
only.
But the script itself is a huge help as it is. Perhaps, the reason I didn't want to bother you any further.