rds

[John2023]

Ben ik weer, ik werk met sam broadcaster heel graag op dit moment, echter mijn stream draait op icecast 2. nu zie ik dat icecast 2 geen apparte titelstreaming heeft in sam 4.2.2

Ik had op het forum diverse rds script gevonden, maar tot verbazing werken deze niet. heeft iemand een rds script werkend voor icecast 2 ik wil heel graag :

Nonstop : Artiest + Titel vanuit "Studio Locatie". laten zien. om terug te switchen naar shoutcast 2 vind ik geen optie. of moet ik kijken op het engelstalige forum van spacial zelf hiervoor?.

[Wout]

Ik lees dat met IceCast dat je de titel streaming apart moet aanbieden.

Code: Selecteer alles

http://USER:PASS@HOST:PORT/admin/metadata?mount=MOUNTPOINT&mode=updinfo&song=%an%%20-%20%sn%

Als je hier de juiste gegevens invult dat zal hij in de stream de title veranderen.

Als je dat werkend heb dan kan je gebruik maken van de PAL in de topic PAL/topic6447.html

[John2023]

Ik lees dat met IceCast dat je de titel streaming apart moet aanbieden.

Code: Selecteer alles

http://USER:PASS@HOST:PORT/admin/metadata?mount=MOUNTPOINT&mode=updinfo&song=%an%%20-%20%sn%

Als je hier de juiste gegevens invult dat zal hij in de stream de title veranderen.

Als je dat werkend heb dan kan je gebruik maken van de PAL in de topic PAL/topic6447.html

Tnks! echter het is me niet duidelijk waar ik de bovenstaande regel van je vandaan moet halen. moet ik die in een PAL script verwerken? want met icecast kun je in de stream encoder alleen titel streaming aanvinken verder niets erbij?.

Groetjes en bedankt alvast!

[John2023]

edit ik ga er vanacht na kijken. zie al waar ik het invullen moet.

[John2023]

klopt onderstaande op de 2 # staat mijn gebruikersnaam en usernaam, hij telt af in PAL, maar er gebeurt verder niets?

wat doe ik fout

[offtopic]PAL.Loop := True ;

PAL.LockExecution ;
const SecPerDag = 86400 ;
const SecPerUur = 3600 ;
const SecPerMinuut = 60 ;
var combi, url, min_s, sec_s, wissel_r : String ;
var temp, max, minuut, seconde, t_b, tijd : Integer ;
var Song : TSongInfo ;
var A : TPlayer ;
Song := ActivePlayer.GetSongInfo ;
url := '#:#@server-28.stream-server.nl:8262/admin/metadata?mount=stream&mode=updinfo&song=%an%%20-%20%sn%' ;
var D : Array of string = [
'Artiest is :'+Song['artist'],
'met :'+Song['title'],
'uit '+Song['albumyear'],
'van het album :'+Song['album']
] ;
max := D.length ;
temp := 0 ;
A := ActivePlayer ;
PAL.UnLockExecution ;

function afteltijd :string ;
begin
tijd := (Activeplayer.Duration - ActivePlayer.CurTime)/1000 ;
t_b := ((tijd mod SecPerDag) mod SecPerUur) ;
minuut := t_b div SecPerMinuut ;
seconde := t_b mod SecPerMinuut ;
min_s := IntToStr(minuut) ;
sec_s := IntToStr(seconde) ;
if minuut < 10 then min_s := '0'+min_s ;
if seconde < 10 then sec_s := '0'+sec_s ;
combi := '%20(-'+min_s+':'+sec_s+')' ;
Result := combi ;
end ;

function wissel : string ;
begin
if temp = max then temp := 0 ;
wissel_r := URLencode(D[temp]) ;
temp := temp + 1 ;
Result := wissel_r ;
end ;

repeat
WebToStr(url+wissel+afteltijd) ;
PAL.WaitForTime('+00:00:02') ;
until (A <> ActivePlayer) ; [/offtopic]