PAL script waarin URL word geladen met beschrijving

[rhradmin]

Beste allemaal!

Ik zoek een PAL script waarin een URL en een description word ingeladen.

Ik gebruik het volgende script wat van te voren goed werkte om dat hij dan in de shoutcast statistics de goede naam laat zien:

Code: Selecteer alles

PAL.Loop := false;

QueUe.Clear;

var runStart : Boolean;
var runRestOfScript : boolean = false;

  begin
runStart  := False;

   Queue.AddURL('http://192.168.0.101:8000', ipTop);
   ActivePlayer.FadeToNext;
   runRestOfScript := true;

while (runRestOfScript) do
  begin
   runRestOfScript := False;

    var Song : TSongInfo;

Song := TSongInfo.Create;



  Song['artist'] := 'Real Hardstyle Radio Presents';
  Song['title']  := 'Mind.Illusion LIVE';
    Encoders.SongChange(Song);



Song.Free;

  end;
  end;

Helaas nu ik een ander script gebruik via de PHP functie van SAM laat hij nu het IP zien.
Als ik handmatig de description in vul werkt het prima, maar aangezien Real Hardstyle Radio groot is er vaak DJ's bijkomen en weggaan wil ik het automatisch.

[Evertje]

Als je de url éénmalig toevoegd, kan je het een naam in de playlist geven, waardoor het ipadres dus niet meer wordt weergegeven..

[rhradmin]

Dat klopt, maar er connecten meerdere DJ's naar de server.
Dus dan moet ik de beschrijving elke keer wijzigen dat is geen optie.

[Guus]

Er staat wel ergens een script wat de output wijzigd naar de stream toe ..

[ojee66]

ander draadje hier op het forum had het over 2 shoutcast servers waar de externe dj's naar connecten.
Als je dat systeem gebruikt hoef je maar 2 regels in je PAL te hebben (je eigen ip met de 2 poorten)
Met een soort van IF active encoder oid. kun je dan je PAL die je vroeger draaide gewoon weer gebruiken.

[rhradmin]

helaas heb ik meer dan 2 DJs die live gaan dus het zou echt fijn zijn als het via een script kan...

[ojee66]

helaas heb ik meer dan 2 DJs die live gaan dus het zou echt fijn zijn als het via een script kan...

Heb je het draadje gelezen??
De Dj's connecten om de beurt de 2 shoutcast servers.

http://www.broadcasterforum.nl/viewtopi ... =81&t=1004 reactie van Guus

[rhradmin]

Ik kijk er naar maar staan niet echt concrete scripts...

[ojee66]

ok complete uitleg

Je maakt 2 shoutcast servers aan
op de SAM pc
1 met poort 8000
1 met poort 8010

dan je eigen PAL script.

Code: Selecteer alles

PAL.Loop := false;

Queue.Clear;

var runStart : Boolean;
var runRestOfScript : boolean = false;

  begin
runStart  := False;

   Queue.AddURL('http://192.168.0.101:8000', ipTop); // LET OP IP en POORT
   ActivePlayer.FadeToNext;
   runRestOfScript := true;

while (runRestOfScript) do
  begin
   runRestOfScript := False;

    var Song : TSongInfo;

Song := TSongInfo.Create;



  Song['artist'] := 'Real Hardstyle Radio Presents';
  Song['title']  := 'Mind.Illusion LIVE';
    Encoders.SongChange(Song);



Song.Free;

  end;
  end;

2 maal als PAL met verschillende namen opslaan.
Zet in die PAL naam dan gelijk het poortnummer
Bovenstaande code zou dan shoutcast8000.PAL oid worden.
De andere zou dan shoutcast8010.PAL worden.
In die andere moet je dan natuurlijk wel ook de poort op 8010 zetten en in beide PAL's ook de juiste IP nummers.

Via de clockwheel kan je dan om en om de PAL's aanroepen.
Dan nog even je Dj's laten connecten op de tijden zoals in de clockwheel met de shoutcast
Dus 1 rijtje DJ's connect met de 8000 en het andere rijtje DJ's connect met 8010
Poorten wel open zetten in je firewall/router

[rhradmin]

Dat is mijn eigen script wat daar staat...

Helaas werkt niet dit...

Ik gebruik die methode die jij nu uitlegt al jaren.

Helaas nu ik niet meer de shoutcast output gebruik, maar de SAM output laat hij het IP zien.

Tenzij ik natuurlijk de description aan pas dan geeft hij wel het goede aan.

Aangezien ik 8 liveshows per week heb is het (tot nog toe) geen optie om 8 shoutcast server te laten draaien.

[Guus]

Je kunt in sam ook even de stream laden in een player en die dan hernoemen door de eigenschappen van de stream te wijzigen zo zie je bij mij lived dj 1 en live dj 2 staan als er een dj draait.
Simpele oplossing en het werkt... geen moeilijke scripts of zo..
Wie meer wil zal moeten scripten idd...
Volgens mij is dat zon beetje hetzelfde als evertje

[rhradmin]

Dat klopt maar ik zie niet zitten dat ik bij elke liveshow aanwezig moet zijn om de description aan moet passen.

Dan ga ik maar voor de radicalere oplossing om 8 shoutcast dnas te starten.

Als iemand toch een script heeft zou ik die heel graag ontvangen.

[ojee66]

Dat klopt maar ik zie niet zitten dat ik bij elke liveshow aanwezig moet zijn om de description aan moet passen.

Krijgt elke DJ zijn eigen tekst?
Dan idd meer shoutcast servers maken..
Meer PAL maken..

In de PAL staat toch de omschrijving???
Dus als de PAL start wordt de omschrijving veranderd

[ojee66]

ok complete uitleg
.....

Code: Selecteer alles

.....
  Song['artist'] := 'Real Hardstyle Radio Presents';
  Song['title']  := 'Mind.Illusion LIVE';
    Encoders.SongChange(Song);

....

.......

[rhradmin]

ok complete uitleg
.....

Code: Selecteer alles

.....
  Song['artist'] := 'Real Hardstyle Radio Presents';
  Song['title']  := 'Mind.Illusion LIVE';
    Encoders.SongChange(Song);

....

.......

Dit werkt allemaal prima als je de shoutcast now playing pakt.
Echter bij de SAM PHP output laat hij dit niet zien.