Alternatief nowplaying.php

cyberneticorganism

Hmmmz... ik heb toch 1 nadeel gevonden: Hij geeft nu ook de Jingles weer als die worden afgespeeld

Met de HMTL output kan je instellen dat bestanden langer als "x" seconden niet worden weergegeven, maar dat gaat nu niet. Weet iemand hiervoor een oplossing?

cyberneticorganism

Kees, misschien heb jij een idee? Kan je dit script zo bouwen, dat hij de Jingles niet weergeeft? Alleen de nummers met Songtype S.

Code: Selecteer alles

// PAL SCRIPT VOOR HET WIJZIGEN VAN TEKSTEN IN WINAMP BIJ HET WISSELLEN VAN EEN PROGRAMMA
// POWERED BIJ BROADCASTERFORUM.NL
// 21-02-2008

var Song : TSongInfo;
var myCurrentSong : TSongInfo;
PAL.Loop := True;
PAL.LockExecution;


// HIER DE TEKST VOOR DE FEEST TOP 20
While (DayOfWeek(Now) = Sunday) and ((Now >= T['21:00:00'])) and (Now <= T['22:00:00']) do
begin
PAL.unLockExecution;
    myCurrentSong := ActivePlayer.GetSongInfo;
    Song := TSongInfo.Create;
Song['artist'] := myCurrentSong['artist']; Song['title']  := myCurrentSong['title']+' (Mixuurtje)';
    Encoders.SongChange(Song);
    Song.Free;
PAL.LockExecution;
end;

PAL.UnLockExecution;


// HIER DE TEKST VOOR DE NON-STOP
// HIER HOEF JE GEEN TIJDEN BIJ TE ZETTEN
// SAM PAKT DEZE AUTOMATISCH ALS ER GEEN PROGRAMMA'S ZIJN
    myCurrentSong := ActivePlayer.GetSongInfo;
    Song := TSongInfo.Create;
Song['artist'] := myCurrentSong['artist']; Song['title']  := myCurrentSong['title']+' (Non-Stop Muziek)';
    Encoders.SongChange(Song);
    Song.Free;

2e vraag: Kan ik voor "sunday" ook iets van "all" kiezen ofzo, zodat het voor alle dagen van de week geld. Ik heb namelijk van vast een aantal uurtjes hardcore van 21:00 t/m 23:00 uur, dit elke dag. De rest van de dag nonstop.

Kees · Ongelezen bericht door **Kees** » 05 okt 2008, 22:01

Probeer deze eens...(niet getest)

Code: Selecteer alles

// PAL SCRIPT VOOR HET WIJZIGEN VAN TEKSTEN IN WINAMP BIJ HET WISSELLEN VAN EEN PROGRAMMA
// POWERED BIJ BROADCASTERFORUM.NL
// 21-02-2008

var Song : TSongInfo;
var myCurrentSong : TSongInfo;
PAL.Loop := True;
PAL.LockExecution;


// HIER DE TEKST VOOR DE FEEST TOP 20
While (DayOfWeek(Now) = Sunday) and ((Now >= T['21:00:00'])) and (Now <= T['22:00:00']) and (Song['songtype']='S') do
begin
PAL.unLockExecution;
    myCurrentSong := ActivePlayer.GetSongInfo;
    Song := TSongInfo.Create;
Song['artist'] := myCurrentSong['artist']; Song['title']  := myCurrentSong['title']+' (Mixuurtje)';
    Encoders.SongChange(Song);
    Song.Free;
PAL.LockExecution;
end;

Wout · Ongelezen bericht door **Wout** » 05 okt 2008, 22:16

Kees schreef:Probeer deze eens...(niet getest)

Loopt gruwelijk vast bij mijn. :error:

cyberneticorganism

Helaas Kees... hij slaat de regel:

Code: Selecteer alles

While (DayOfWeek(Now) = Sunday) and ((Now >= T['21:00:00'])) and (Now <= T['22:00:00']) and (Song['songtype']='S') do
begin

over... en ik heb hem tot 23:00:00 gezet uiteraard nu. Dus hij pakt het niet om een of andere reden.

cyberneticorganism

Klopt wout... je moet dit stuk er nog onder plakken:

Code: Selecteer alles

PAL.UnLockExecution;


// HIER DE TEKST VOOR DE NON-STOP
// HIER HOEF JE GEEN TIJDEN BIJ TE ZETTEN
// SAM PAKT DEZE AUTOMATISCH ALS ER GEEN PROGRAMMA'S ZIJN
    myCurrentSong := ActivePlayer.GetSongInfo;
    Song := TSongInfo.Create;
Song['artist'] := myCurrentSong['artist']; Song['title']  := myCurrentSong['title']+' (Non-Stop Muziek)';
    Encoders.SongChange(Song);
    Song.Free;

Dan werkt het. Alleen dat met die Songtype S dus niet

Die jingles zien er ook zo onprofessioneel uit op de site

Kees · Ongelezen bericht door **Kees** » 05 okt 2008, 22:59

Sorry Wout..Foutje van mij...
En hier slaat hij hem ook over.
Moet er nog even over nadenken.
Soms gaat niet alles even gemakkelijk.

Wout · Ongelezen bericht door **Wout** » 05 okt 2008, 22:59

cyberneticorganism schreef:Klopt wout... je moet dit stuk er nog onder plakken:

Owh,

cyberneticorganism

Mjah... het script is ook erg ingewikkeld (vind ik dan). Ik kan er geen touw aan vast knopen eerlijk gezegd

Ik zat ook al te kijken of er niet iets met die variabelen te doen is ofzo... Een andere optie is nog om nummers die korter zijn als "x" seconden niet weer te geven... maar hoe doe je dat dan weer? :rolleyes: 3e optie is om iets te doen met het php script wat de info weergeeft op de website (alleen dan staat het voor de winamp luisteraars nog steeds niet goed natuurlijk).

En het is een script wat uit een andere topic komt Wout, maar ik gebruik het nu i.c.m. dat aangepaste php script op de website wat de titel + artiest van de shoutcast server aftrekt, i.p.v. via de SAM php of html. Dan kan ik er extra informatie aan toevoegen. Bijkomend voordeel is ook dat bij een live uitzending (van iemand anders), de informatie op de website klopt.. omdat dat van diegene's encoder afkomt. En dan zie je niet de titel info van de nonstop pc die blijft doorlopen (wat eerst het geval was).

cyberneticorganism

Even hulptroepen ingeschakeld bij het Spacialaudio forum. De administrator daar gaf mij een tip, daar heb ik dit script mee gemaakt nu (dit is het onderste deel daarvan wat gewijzigd is):

Code: Selecteer alles

    myCurrentSong := ActivePlayer.GetSongInfo;
    if ( myCurrentSong['songtype'] = 'S' ) then
  begin
    Song := TSongInfo.Create;
    Song['artist'] := myCurrentSong['artist']; Song['title']  := myCurrentSong['title']+' (Non-Stop Muziek)';
    Encoders.SongChange(Song);
    Song.Free;
    end
else
  begin
    PAL.WaitForTime('+00:00:30');
  end;

Ik ben erg warm aan het worden... het werkt, hij telt netjes de 30 seconden af als er een jingle wordt afgespeeld (mijn langste jingle is 30 seconden), alleen hij geeft nog steeds de jingle titelinformatie door aan de encoders grrr

Er zit dus nog ergens een fout in...

Wout · Ongelezen bericht door **Wout** » 10 okt 2008, 23:40

Moet er achter end geen ; staan ?

Code: Selecteer alles

Encoders.SongChange(Song);
    Song.Free;
    end <----hierho!
else
  begin
    PAL.WaitForTime('+00:00:30');
  end;

cyberneticorganism

Nope...om een of andere reden daar niet... als ik dat doe krijg ik namelijk een foutmelding. Maar ik heb het wel goed gedaan volgens mij, maar volgens iemand op het forum (die daarna poste) wordt die informatie zoiezo naar de encoders verstuurt..en kan je dat niet tegenhouden

Volgens hem is de enige mogelijkheid om een 2e PAL script te laten draaien, die het werk doet:

Use parts of the TITLESTREAMBANNERS.PAL, or similar in conjunction with another PAL script. The 2nd PAL script would have to contantly monitor to see if the next upcoming song is something other than a jingle, and once it starts playing, it would need to change the ourgoing title on the encoder. This would not be my specialty (writing PAL scripts,) so you'd need to consult with someone on that.

skeleton · Ongelezen bericht door **skeleton** » 14 nov 2008, 12:47

Kees schreef:Sorry Wout..Foutje van mij...
En hier slaat hij hem ook over.
Moet er nog even over nadenken.
Soms gaat niet alles even gemakkelijk.

Bij mij worden jingles NOOIT op de shoutcast weergegeven, dus kunnen ze ook nooit op mijn webpagina komen te staan

Soms gaat alles heel makkelijk :d

cyberneticorganism

Hoe doe jij dat dan? Jij veranderd ook de tags van je jingles ofzo, in teksten als: ""Welkom bij Studio 26 Radio" en "Vraag nu jou favoriete nummer aan via de request button" etc. Dan lijkt het al aardig op een RDS display. Ik moet dit nog doen...alleen twijfel nog, want het nadeel is dat je dus niet meer weet wat welke jingle is

skeleton · Ongelezen bericht door **skeleton** » 14 nov 2008, 14:26

cyberneticorganism schreef:Hoe doe jij dat dan? Jij veranderd ook de tags van je jingles ofzo, in teksten als: ""Welkom bij Studio 26 Radio" en "Vraag nu jou favoriete nummer aan via de request button" etc. Dan lijkt het al aardig op een RDS display. Ik moet dit nog doen...alleen twijfel nog, want het nadeel is dat je dus niet meer weet wat welke jingle is

Bij html output staat bij mij ==> auto generate on song change. Skip for songs less than 45 seconds in duration.
Dit bestand laat ik naar mijn 2de pc versturen (via mijn netwerk) telkens het bestand veranderd van inhoud.
Mijn shoutcast laat hierbij dus nooit deze jingles zien.

cyberneticorganism

Aha... dus jij haalt info uit dat html bestand, en verstuurt het mee met de streaminformatie van je encoder ofzo? Of snap ik het nu niet...? Ik had eerst gewoon de html output op mijn webpagina staan, en dan heb je er inderdaad geen last van. Alleen als er een andere dj inlogt (of ik gebruik de live pc), dan klopt die titel informatie niet meer (je ziet dan wat de nonstop pc draait, want die draait gewoon door). Vandaar dat ik dus nu de informatie direct van de shoutcast af pak en op m'n website weergeef.

skeleton · Ongelezen bericht door **skeleton** » 14 nov 2008, 15:55

cyberneticorganism schreef:Aha... dus jij haalt info uit dat html bestand, en verstuurt het mee met de streaminformatie van je encoder ofzo? Of snap ik het nu niet...? Ik had eerst gewoon de html output op mijn webpagina staan, en dan heb je er inderdaad geen last van. Alleen als er een andere dj inlogt (of ik gebruik de live pc), dan klopt die titel informatie niet meer (je ziet dan wat de nonstop pc draait, want die draait gewoon door). Vandaar dat ik dus nu de informatie direct van de shoutcast af pak en op m'n website weergeef.

Ik heb mijn config. al eerder vermeld

maar ik zal het hier nog eens bondig zeggen :rolleyes:

pc1 : hier staat SAM op geinstalleerd + mijn songs (op een aparte externe HD)
Sam maakt hier een html bestand aan telkens de song veranderd. In dat tekst bestand staat gewoon de titel van de song vermeld. Geen HTML code dus.
Ik heb een zelfgemaakt programma op deze pc draaien, die dit bestand iedere keer doorstuurd naar mijn shoutcast server (= pc2)

dit programma monitort het bestand
c:\Program Files\SpacialAudio\SAMBC\samHTMweb\nova-songtitle.html
en geeft dan het commando => http://172.19.3.100:8500/admin.cgi?pass ... dinfo&song met de info van dit html bestandje

pc2 : hier staat mijn shoutcast programma op + mijn soundprocessing-software

cyberneticorganism

Ok... dan snap ik het. Het is wel vrij omslachtig, maar als het maar goed werkt heh

Waarin heb je dat programmaatje geschreven dan? Wel een handige oplossing, want met PAL scripten krijg ik het tot nu toe in elk geval niet goed voor elkaar.

skeleton · Ongelezen bericht door **skeleton** » 15 nov 2008, 00:06

cyberneticorganism schreef:Ok... dan snap ik het. Het is wel vrij omslachtig, maar als het maar goed werkt heh Waarin heb je dat programmaatje geschreven dan? Wel een handige oplossing, want met PAL scripten krijg ik het tot nu toe in elk geval niet goed voor elkaar.

Het is gemaakt door een werk-collega van mij

Hij heeft dit geprogrammeerd in Visual Basic.
Werkt perfect !

BroadcasterForum Nederland

Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php

Re: Alternatief nowplaying.php