Alternatief nowplaying.php

PHP, HTML, Joomla, WordPress, etc..
Gebruikersavatar
cyberneticorganism
VIP
Berichten: 914
Lid geworden op: 11 jun 2008, 18:14
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 7 64-bits
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door 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?
Gebruikersavatar
cyberneticorganism
VIP
Berichten: 914
Lid geworden op: 11 jun 2008, 18:14
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 7 64-bits
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door 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.
Gebruikersavatar
Kees
VIP
Berichten: 3021
Lid geworden op: 28 nov 2005, 22:07
Answers: 1
SAM-versie: 4.2.2.*
Database: MySQL 5.0
Windows: Windows 10
Locatie: Bergen op Zoom
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door Kees »

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;
Gebruikersavatar
Wout
Moderator
Berichten: 3338
Lid geworden op: 03 dec 2007, 14:17
Answers: 1
SAM-versie: SAM 2019.3
Database: MySQL 8.0
Windows: Windows 10
Locatie: Bergen op Zoom
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door Wout »

Kees schreef:Probeer deze eens...(niet getest)
Loopt gruwelijk vast bij mijn. :error:
Afbeelding
Gebruikersavatar
cyberneticorganism
VIP
Berichten: 914
Lid geworden op: 11 jun 2008, 18:14
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 7 64-bits
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door 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.
Gebruikersavatar
cyberneticorganism
VIP
Berichten: 914
Lid geworden op: 11 jun 2008, 18:14
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 7 64-bits
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door 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 :lol:
Gebruikersavatar
Kees
VIP
Berichten: 3021
Lid geworden op: 28 nov 2005, 22:07
Answers: 1
SAM-versie: 4.2.2.*
Database: MySQL 5.0
Windows: Windows 10
Locatie: Bergen op Zoom
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door Kees »

Sorry Wout..Foutje van mij...
En hier slaat hij hem ook over.
Moet er nog even over nadenken.
Soms gaat niet alles even gemakkelijk.
Gebruikersavatar
Wout
Moderator
Berichten: 3338
Lid geworden op: 03 dec 2007, 14:17
Answers: 1
SAM-versie: SAM 2019.3
Database: MySQL 8.0
Windows: Windows 10
Locatie: Bergen op Zoom
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door Wout »

cyberneticorganism schreef:Klopt wout... je moet dit stuk er nog onder plakken:
Owh, :oops:
Afbeelding
Gebruikersavatar
cyberneticorganism
VIP
Berichten: 914
Lid geworden op: 11 jun 2008, 18:14
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 7 64-bits
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door cyberneticorganism »

Mjah... het script is ook erg ingewikkeld (vind ik dan). Ik kan er geen touw aan vast knopen eerlijk gezegd :lol: 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).
Gebruikersavatar
cyberneticorganism
VIP
Berichten: 914
Lid geworden op: 11 jun 2008, 18:14
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 7 64-bits
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door 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 :twisted: Er zit dus nog ergens een fout in...
Gebruikersavatar
Wout
Moderator
Berichten: 3338
Lid geworden op: 03 dec 2007, 14:17
Answers: 1
SAM-versie: SAM 2019.3
Database: MySQL 8.0
Windows: Windows 10
Locatie: Bergen op Zoom
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door Wout »

Moet er achter end geen ; staan ?

Code: Selecteer alles

Encoders.SongChange(Song);
    Song.Free;
    end <----hierho!
else
  begin
    PAL.WaitForTime('+00:00:30');
  end;
Afbeelding
Gebruikersavatar
cyberneticorganism
VIP
Berichten: 914
Lid geworden op: 11 jun 2008, 18:14
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 7 64-bits
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door 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.
Gebruikersavatar
skeleton
******
Berichten: 212
Lid geworden op: 15 aug 2008, 20:25
SAM-versie: SAM 2017.9
Database: MySQL 5.5
Windows: Windows 10
Locatie: Belgie
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door skeleton »

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
Radio NOVA
Eigenzinnig, Anders!
Luister via deze pagina : Radio Nova Stream
Gebruikersavatar
cyberneticorganism
VIP
Berichten: 914
Lid geworden op: 11 jun 2008, 18:14
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 7 64-bits
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door 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 :|
Gebruikersavatar
skeleton
******
Berichten: 212
Lid geworden op: 15 aug 2008, 20:25
SAM-versie: SAM 2017.9
Database: MySQL 5.5
Windows: Windows 10
Locatie: Belgie
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door skeleton »

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.
Radio NOVA
Eigenzinnig, Anders!
Luister via deze pagina : Radio Nova Stream
Gebruikersavatar
cyberneticorganism
VIP
Berichten: 914
Lid geworden op: 11 jun 2008, 18:14
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 7 64-bits
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door 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.
Gebruikersavatar
skeleton
******
Berichten: 212
Lid geworden op: 15 aug 2008, 20:25
SAM-versie: SAM 2017.9
Database: MySQL 5.5
Windows: Windows 10
Locatie: Belgie
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door skeleton »

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
Radio NOVA
Eigenzinnig, Anders!
Luister via deze pagina : Radio Nova Stream
Gebruikersavatar
cyberneticorganism
VIP
Berichten: 914
Lid geworden op: 11 jun 2008, 18:14
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 7 64-bits
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door 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.
Gebruikersavatar
skeleton
******
Berichten: 212
Lid geworden op: 15 aug 2008, 20:25
SAM-versie: SAM 2017.9
Database: MySQL 5.5
Windows: Windows 10
Locatie: Belgie
Contacteer:

Re: Alternatief nowplaying.php

Ongelezen bericht door skeleton »

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 !
Radio NOVA
Eigenzinnig, Anders!
Luister via deze pagina : Radio Nova Stream
Plaats reactie
  • Vergelijkbare Onderwerpen
    Reacties
    Weergaves
    Laatste bericht