Entertainers/writers submit your articles now! |
Let'm catch you in
City Entertainment Magazine! |
// PAL-SCRIPT by fraggle.FM
PAL.Loop := false;
// SETUP & CONFIG
var streamURL : String = 'http://62.112.159.213:8765';
var showDuration : Integer = 120*60*1000;
var waitTime : String = '+02:00:00';
var textArtist : String = 'DJ Cuno';
var textTitle : String = 'Live-Broadcast';
// ADD STREAM & FADE CURRENT SONG
Queue.AddURL(streamURL, ipTop);
var P : TPlayer = ActivePlayer;
if P <> nil then P.FadeToNext;
// CHANGE STREAM-TITLE & SHOW-INFO
var Song : TSongInfo;
Song := TSongInfo.Create;
Song['artist'] := textArtist;
Song['title'] := textTitle;
Song['duration'] := showDuration;
Encoders.SongChange(Song);
// WAIT FOR END OF SHOW
PAL.WaitForTime(waitTime);
// ADD JINGLE, FADE & RESET SHOW-INFO
P := ActivePlayer;
if P <> nil then P.FadeToNext;
Song.Free;