laatst gespeelde nummer blijft hangen

[frank-future]

hoi hoi als de dj's live gaan blijft het laatst gespeelde nummer staan... ik heb ooit een script gehad dat dit verhielp alleen kom ik er niet meer uit wie wil me helpen?

opstelling is bij de dj's

sammachine- mengpaneel-samcast

Code: Selecteer alles

PAL.loop := True ;

    // variabelen aanwijzen.
    var    Song : TSongInfo;
    var    Getstr : String;

    // wacht totdat nummer is afgelopen
    PAL.WaitForPlayCount(1);
    PAL.WaitForTime('+00:00:05');
//1
    Song := ActivePlayer.GetSongInfo();
    Song := TSongInfo.Create; 
    Song['artist'] := ' xxxxx ';
    Song['title'] := ' Nu LIVE met Dj-xxxx ';
    GetStr := 'http://192.168.1.37:8181/?artist=' + Song['artist'] + '&title=' + Song['title'] +'&duration='+Song['duration'];
    WebToStr(getStr);

    Encoders.SongChange(Song); 
    Song.Free;

    PAL.WaitForTime('+00:00:15');

    Song := ActivePlayer.GetSongInfo();

    GetStr := 'http://192.168.1.37:8181/?artist=' + Song['artist'] + '&title=' + Song['title'] +'&duration='+Song['duration'];
    WebToStr(getStr);
   
    Encoders.SongChange(Song); 
    Song.Free; 
 
    PAL.WaitForPlayCount(1);
    PAL.WaitForTime('+00:00:05');
//2
    Song := ActivePlayer.GetSongInfo();

    GetStr := 'http://192.168.1.37:8181/?artist=' + Song['artist'] + '&title=' + Song['title'] +'&duration='+Song['duration'];
    WebToStr(getStr);
   
    Encoders.SongChange(Song); 
    Song.Free; 

    PAL.WaitForPlayCount(1);
    PAL.WaitForTime('+00:00:05');
//3
    Song := ActivePlayer.GetSongInfo();

    GetStr := 'http://192.168.1.37:8181/?artist=' + Song['artist'] + '&title=' + Song['title'] +'&duration='+Song['duration'];
    WebToStr(getStr);
   
    Encoders.SongChange(Song); 
    Song.Free; 

    PAL.WaitForPlayCount(1);
    PAL.WaitForTime('+00:00:05');
//4
    Song := ActivePlayer.GetSongInfo();

    GetStr := 'http://192.168.1.37:8181/?artist=' + Song['artist'] + '&title=' + Song['title'] +'&duration='+Song['duration'];
    WebToStr(getStr);
   
    Encoders.SongChange(Song); 
    Song.Free; 

    PAL.WaitForPlayCount(1);
    PAL.WaitForTime('+00:00:05');
//5
    Song := ActivePlayer.GetSongInfo();

    GetStr := 'http://192.168.1.37:8181/?artist=' + Song['artist'] + '&title=' + Song['title'] +'&duration='+Song['duration'];
    WebToStr(getStr);
   
    Encoders.SongChange(Song); 
    Song.Free; 

dit voer ik in op de sambroadcaster machine werkt niet...
op de samcast machine ook niet... iemand enig idee hoe het komt?

[drOhimself]

....als de dj's live gaan blijft het laatst gespeelde nummer staan...

Wat bedoel je met STAAN precies?

[frank-future]

als de live dj draait blijft het laatst gespeelde nummer van de auto dj in de now playing staan en verandert niet naar live dj..