Elke uur 2 jingles

Voor vragen over Playlist Automation Language.
Gesloten
Gebruikersavatar
helldaddy
*
Berichten: 16
Lid geworden op: 29 dec 2015, 12:53
SAM-versie: 4.2.2.*
Database: FireBird
Windows: Windows 10

Elke uur 2 jingles

Ongelezen bericht door helldaddy » 01 nov 2016, 17:46

Hoi mede radiomakers,

Klein probleempje hier. Ik heb 2 jingles draaien in een Pal, 1 om 15 over en 1 kwart voor het uur.
Dit gaat prima en werkt. Alleen als ik Sam opstart, en het is b.v. 8.00 uur, laad ie alle jingles in vanaf 0.00 uur tot 08.00 uur.
Da's niet handig en zou toch anders moeten kunnen?
De Pal ziet er zo uit als hieronder. Met de enige verandering dan om 12.00 uur goedemiddag.mp3 en om 18.00 uur goedenavond.mp3 ingeladen word.

Het loopt ook netjes mee, werkt goed, alleen dat opstapelen bij het opstarten is hinderlijk.

Groet,
Henk

PAL.Loop := True;

PAL.WaitForTime(T['00:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['00:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

Gebruikersavatar
drOhimself
Moderator
Berichten: 2941
Lid geworden op: 27 mar 2010, 11:44
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 2000

Re: Elke uur 2 jingles

Ongelezen bericht door drOhimself » 02 nov 2016, 00:11

Dit lijkt mij niet de complete PAL.
Groedjez,
drO

Gebruikersavatar
helldaddy
*
Berichten: 16
Lid geworden op: 29 dec 2015, 12:53
SAM-versie: 4.2.2.*
Database: FireBird
Windows: Windows 10

Re: Elke uur 2 jingles

Ongelezen bericht door helldaddy » 02 nov 2016, 05:51

Dit is de hele pal,

Code: Selecteer alles

PAL.Loop := True; 

PAL.WaitForTime(T['00:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['00:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['01:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['01:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['02:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['02:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['03:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['03:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['04:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['04:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['05:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['05:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['06:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['06:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['07:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['07:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['08:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['08:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['09:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['09:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['10:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['10:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['11:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;
PAL.WaitForTime(T['11:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemorgen.mp3',ipTop) ;

PAL.WaitForTime(T['12:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;
PAL.WaitForTime(T['12:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;


PAL.WaitForTime(T['13:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;
PAL.WaitForTime(T['13:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;


PAL.WaitForTime(T['14:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;
PAL.WaitForTime(T['14:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;


PAL.WaitForTime(T['15:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;
PAL.WaitForTime(T['15:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;


PAL.WaitForTime(T['16:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;
PAL.WaitForTime(T['16:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;


PAL.WaitForTime(T['17:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;
PAL.WaitForTime(T['17:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedemiddag.mp3',ipTop) ;


PAL.WaitForTime(T['18:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;
PAL.WaitForTime(T['18:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;

PAL.WaitForTime(T['19:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;
PAL.WaitForTime(T['19:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;

PAL.WaitForTime(T['20:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;
PAL.WaitForTime(T['20:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;

PAL.WaitForTime(T['21:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;
PAL.WaitForTime(T['21:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;

PAL.WaitForTime(T['22:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;
PAL.WaitForTime(T['22:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;

PAL.WaitForTime(T['23:15:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;
PAL.WaitForTime(T['23:45:00']) ;
Queue.AddFile('F:\Muziek\Jingles\goedeavond.mp3',ipTop) ;
Laatst gewijzigd door drOhimself op 08 nov 2016, 14:18, 1 keer totaal gewijzigd.
Reden: EDIT: script in CODE gezet

seaside
**
Berichten: 32
Lid geworden op: 10 jan 2010, 12:18
Database: Geen Database

Re: Elke uur 2 jingles

Ongelezen bericht door seaside » 03 nov 2016, 19:48

Code: Selecteer alles

Pal.LockExecution;

pal.loop := true;
// jingle 20 minuten na het uur
pal.waitforTime('xx:20:00');
cat['tunes'].QueueTop(smRandom, Norules);

//jingle 40 minuten na het uur
pal.waitforTime('xx: 40:00');
cat['tunes'].QueueTop(smRandom, Norules);

Pal.unlockExecution;
Dit is simpeler. Elk uur twee jingles.
Bij mij staan de jingles in het mapje tunes
En is makkelijk uit te breiden naar bv 3 jingles per uur.

Met de event scheduler kan je de goede middag, avond avond of wat dan ook op elk gewenst tijdstip programmeren ook dat werkt perfect.
Laatst gewijzigd door drOhimself op 08 nov 2016, 14:18, 1 keer totaal gewijzigd.
Reden: script in CODE gezet

Gebruikersavatar
helldaddy
*
Berichten: 16
Lid geworden op: 29 dec 2015, 12:53
SAM-versie: 4.2.2.*
Database: FireBird
Windows: Windows 10

Re: Elke uur 2 jingles

Ongelezen bericht door helldaddy » 04 nov 2016, 07:48

Seaside,

Klopt dat is handiger, ware het niet dat jou pal random een jingle pakt uit een map.
Echter, bij mij moet ie van 0.00 tot 12.00 uur Goedemorgen, van 12.00 tot 18.00 uur Goedemiddag en van 18.00 uur tot 0.00 uur Goedenavond pakken.

Dat doet ie wel, maar als ik Sam uit zet, om zeg 16.00 en de volgende dag weer om 8.00 uur aan dan zet ie vanaf 0.00 uur tot 8.00 uur de jingles in de queue.
En dat zou ik er graag uit willen hebben. Zal best wat knullig zijn wat ik weer vergeet, maar ik zie het even niet.

Groet,
Henk

Gebruikersavatar
Wout
Moderator
Berichten: 3227
Lid geworden op: 03 dec 2007, 14:17
SAM-versie: SAM 2018.10
Database: MySQL 8.0
Windows: Windows 10
Locatie: Bergen op Zoom
Contacteer:

Re: Elke uur 2 jingles

Ongelezen bericht door Wout » 06 nov 2016, 19:34

Afbeelding

Gebruikersavatar
helldaddy
*
Berichten: 16
Lid geworden op: 29 dec 2015, 12:53
SAM-versie: 4.2.2.*
Database: FireBird
Windows: Windows 10

Re: Elke uur 2 jingles

Ongelezen bericht door helldaddy » 07 nov 2016, 08:12

Dank je, tis gelukt van deze kant!!

Gebruikersavatar
drOhimself
Moderator
Berichten: 2941
Lid geworden op: 27 mar 2010, 11:44
SAM-versie: SAM 2014.7
Database: MySQL 5.0
Windows: 2000

Re: Elke uur 2 jingles

Ongelezen bericht door drOhimself » 08 nov 2016, 14:22

Handig die zoek functie !
Bedankt Wout.
Slotje erop.
Groedjez,
drO

Gesloten
  • Vergelijkbare Onderwerpen
    Reacties
    Weergaves
    Laatste bericht