Nieuw-Nieuw jingle

[Wout]

Een leuk klein PAL-script! Als je nieuwe muziek hebt toegevoegd, zal dit script de jingle "nieuw-nieuw" over het lopende nummer afspelen na 15 seconden.

Indien het nieuwe nummer al meer dan 21 keer is afgespeeld, zal de jingle niet worden afgespeeld. Als je dit aantal te veel of te weinig vindt, kun je dit aanpassen in de volgende regel:

Code: Selecteer alles

if Q['count_played'] < 21 then

De jingle bevindt zich op de volgende locatie:

Code: Selecteer alles

opbouw := 'D:\Jingle\Nieuw.mp3';

Je kunt dit pad aanpassen aan de locatie van jouw station (bijvoorbeeld D:\, C:\).

Code: Selecteer alles

VAR Song, A1: TSongInfo ;
VAR Q       : TDataSet ;
VAR opbouw  : String ;
A1 := TSongInfo.Create ;

 // Wacht 15 seconden voordat de query wordt uitgevoerd
PAL.WaitForTime('+00:00:15');
Q := Query('SELECT count_played FROM songlist t WHERE t.ID = (SELECT songID FROM historylist ORDER BY date_played DESC LIMIT 1)',[],True);
if not Q.IsEmpty then
begin
    WriteLn(Q['count_played']) ;
    opbouw := 'D:\Jingle\Nieuw.mp3';
    A1['filename'] := opbouw ;
    if Q['count_played'] < 21 then
    begin
		WriteLn('<21') ;
        Aux1.QueueSong(A1) ;
        Aux1.Play ;
    end
    else WriteLn('>21') ;
end
else WriteLn('geen resultaat') ;

Q.Free ;
PAL.WaitForPlayCount(1) ;
PAL.Loop := True ;

[radioomega]

hoi wout

ik weet niet of dat de bedoeling is van de PAL hij gooi ook de jingel over een nr die al tijd in playlist sta
klop dat ???

[Wout]

ik weet niet of dat de bedoeling is van de PAL hij gooi ook de jingel over een nr die al tijd in playlist sta

Als hij niet meer dan 21 keer heeft gespeeld zal de jingle te horen zijn. Je kunt in SAM bij songinfo de aantal keren zien wat hij heeft gespeelt.

[NCR]

Leuk script! Vindt het alleen jammer dat het zo nu en dan dwars door de zang heen gaat. Zou het niet mooier zijn als de jingle "nieuw" voor de plaat gedraaid wordt. Zou veel vloeiender zijn en daarbij zijn er vele die de Queue na het hele uur automatisch laden. Script zou dan kunnen kijken of er een plaat bij zit die nieuw is en zet daar dan de jingle voor, elk uur opnieuw. Even hard op gedacht.