Hoe maak ik zo de playlist ?

[Marcel]

Het begin is gemaakt.
We hebben mapjes aangemaakt met genres en wat muziek erin gezet om te testen.
Nu heb ik graag het volgende.
Ik wil zorgen dat in 1 uur.
om de 4 nummers een jingle te horen is.
En graag zou ik willen hebben dat er een uursluiter daarna spot daarna uuropener.
We hebben ook de cd van de week kan ik die zo instellen dat die regelmatig te horen is om de 2 uur.
Alvast bedankt voor het antwoord.

Groet,
Marcel

[Kees]

Hallo Marcel..
Allereerst welkom op het forum...

Je zou een PAL script kunnen gebruiken voor je playlist..
Hier een leuk voorbeeldje...
Uiteraard moet je zelf even de plaats van je uurloper, spot en uuropener wijzigen en je catogerien.

• PAL.Loop :=True;
  PAL.WaitForTime(T['xx:59:52']);
  Queue.Clear;
  Queue.AddFile('D:\uursluiter.mp3',ipTop);
  ActivePlayer.FadeToNext;
  Queu.Addfile('D:\spot.mp3',ipBottom);
  Queue.AddFile('D:\uuropener.mp3',ipBottom);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);

Wat betreft je cd van week moet je even iets specifieker zijn.
Wil je deze in de even of oneven uren laten horen ?
Kan geregeld worden met SAM.

[Marcel]

Hallo Marcel..
Allereerst welkom op het forum...

Je zou een PAL script kunnen gebruiken voor je playlist..
Hier een leuk voorbeeldje...
Uiteraard moet je zelf even de plaats van je uurloper, spot en uuropener wijzigen en je catogerien.

• PAL.Loop :=True;
  PAL.WaitForTime(T['xx:59:52']);
  Queue.Clear;
  Queue.AddFile('D:\uursluiter.mp3',ipTop);
  ActivePlayer.FadeToNext;
  Queu.Addfile('D:\spot.mp3',ipBottom);
  Queue.AddFile('D:\uuropener.mp3',ipBottom);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['60'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['70'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
  Cat['Hits'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['80'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['90'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Nederpop'].QueueBottom(smLemmingLogic, EnforceRules);
  Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);

Wat betreft je cd van week moet je even iets specifieker zijn.
Wil je deze in de even of oneven uren laten horen ?
Kan geregeld worden met SAM.

Hallo Kees,

Bedankt voor je snelle reactie.
Nu heb ik het volgende het script laad wel in sam alleen speelt niet automatisch af is dat nog te maken.
Verder had ik een vraag over de spot ik heb verschillende blokjes gemaakt.
Kan ik hem dus ook in een map afspelen en er een cat van maken.
De cd van de week zou ik graag in de even uren willen laten horen.
Ik zie nu later dan ik een foutmelding krijg met het volgende
Error: Invalid class typecast

Inmiddels heb ik een 2de fout ondekt.

Error: Access violation at addres 00404146 in module 'SAMBC.exe'. Read of adress 4C676E69

Wat het betekent dat weet ik niet verder viel me op dat de laatste nummers van de playlist alleen maar jingle's zijn.
Heel vreemd.

Alvast bedankt voor de hulp.


Groet

[Kees]

Hallo Marcel...

Zet je gewijzigde script even online.
Kan ik kijken of er fouten in zitten.

[Marcel]

Hallo Marcel...

Zet je gewijzigde script even online.
Kan ik kijken of er fouten in zitten.

PAL.Loop :=True;
PAL.WaitForTime(T['xx:59:52']);
Queue.Clear;
Queue.AddFile('C:\Documents and Settings\Marcel Sanders\Mijn documenten\jingle\13 Jingle - 24 uur te ontvangen via het internet op.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Addfile('C:\Documents and Settings\Marcel Sanders\Mijn documenten\jingle\Donatie.mp3',ipBottom);
Queue.AddFile('C:\Documents and Settings\Marcel Sanders\Mijn documenten\jingle\01 Jingle - Uuropener Schuimkoppen Radio.mp3',ipBottom);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Engels'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingle'].QueueBottom(smRandom, NoRules);
Cat['Nlnieuw'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Engels'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingle'].QueueBottom(smRandom, NoRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Engels'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingle'].QueueBottom(smRandom, NoRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Engels'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingle'].QueueBottom(smRandom, NoRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nlnieuw'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Engels'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingle'].QueueBottom(smRandom, NoRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Engels'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingle'].QueueBottom(smRandom, NoRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nlnieuw'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Engels'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingle'].QueueBottom(smRandom, NoRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Engels'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingle'].QueueBottom(smRandom, NoRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nlnieuw'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Engels'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingle'].QueueBottom(smRandom, NoRules);




Bij deze.

[Kees]

Queue.AddFile('C:\Documents and Settings\Marcel Sanders\Mijn documenten\jingle\13 Jingle - 24 uur te ontvangen via het internet op.mp3',ipTop);

Dit is wel een erg lange bestandsnaam.
Ik gebruik meestal een korte directory- en bestandsnaam.

Dan deze ...

Cat['Jingle'].QueueBottom(smRandom, NoRules);

Jingels moet je opslaan onder Content en dan Jingles (All)
Dan worden ze door SAM ook als jingle herkend.
Wel eerst de oude uit de database weghalen.
Het feit dat je op het eind jingles krijgt kan aan het aantal files dat je hebt liggen.
SAM draait met een bepaalde logistiek.
Zoiets van, he, deze artiest heb ik pas gedraaid, even op zoek naar een andere.
"potjandikiedosie"..ik kan niks meer vinden.
Dan maar niet...
Hij raakt dus even het spoor bijster ! :irre:

[Marcel]

Queue.AddFile('C:\Documents and Settings\Marcel Sanders\Mijn documenten\jingle\13 Jingle - 24 uur te ontvangen via het internet op.mp3',ipTop);

Dit is wel een erg lange bestandsnaam.
Ik gebruik meestal een korte directory- en bestandsnaam.

Dan deze ...

Cat['Jingle'].QueueBottom(smRandom, NoRules);

Jingels moet je opslaan onder Content en dan Jingles (All)
Dan worden ze door SAM ook als jingle herkend.
Wel eerst de oude uit de database weghalen.
Het feit dat je op het eind jingles krijgt kan aan het aantal files dat je hebt liggen.
SAM draait met een bepaalde logistiek.
Zoiets van, he, deze artiest heb ik pas gedraaid, even op zoek naar een andere.
"potjandikiedosie"..ik kan niks meer vinden.
Dan maar niet...
Hij raakt dus even het spoor bijster ! :irre:

Hoi Kees,

Bedankt voor je antwoord volgens mij loopt het nu beter ik ga het zo even proberen.
Even terug te komen op de cd van de week die zal ik het liefst om de even uren willen laten horen hoe moet ik te werk gaan het liefst werk ik dan ook met een cat aangezien dat ik 3 cd's van de week heb.
Verder heb ik hier het volgende ik heb 1x per week een cabaret programma die wil ik elke donderdag om 20.00 uur laten starten hoe kan ik het beste te werk gaan dat deze ook om 20.01 uur start.
Alvast bedankt voor je goede hulp.

Groet Marcel

[Kees]

Wat betreft de CD van de week, als je random uit een catogerie draai, zou ik de event scheduler gebruiken.
Dit zou je ook kunnen doen met je cabaret programma.
Start hij altijd op dag en tijd die je aangeeft en je hoeft niks aan je PAL script te veranderen.
Nog een optie is om met 3 PAL scripts te draaien.
1 voor de normale nonstop.
1 voor je cd van de week
1 voor je cabaret programma.
Je haalt dit weg uit je PAL scripts

Code: Selecteer alles

PAL.Loop :=True; 
PAL.WaitForTime(T['xx:59:52']);

en je vinkt de optie Automaticly start script uit.
Je gebruikt de Event Scheduler voor het starten van alle 3 de scripts.

[Marcel]

Wat betreft de CD van de week, als je random uit een catogerie draai, zou ik de event scheduler gebruiken.
Dit zou je ook kunnen doen met je cabaret programma.
Start hij altijd op dag en tijd die je aangeeft en je hoeft niks aan je PAL script te veranderen.

Nu heb ik met dat cabaret programma getest nu is het zo dat hij het onderaan de playlist zet.
En hij maakt elk uur een nieuw playlist dus ik neem aan dat hij hem weer verwijderd na het instellen van de tijd kan ik ook zorgen dat hij meteen na de uuropener komt ?
Alvast bedankt

[Kees]

Wat betreft de CD van de week, als je random uit een catogerie draai, zou ik de event scheduler gebruiken.
Dit zou je ook kunnen doen met je cabaret programma.
Start hij altijd op dag en tijd die je aangeeft en je hoeft niks aan je PAL script te veranderen.

Nu heb ik met dat cabaret programma getest nu is het zo dat hij het onderaan de playlist zet.
En hij maakt elk uur een nieuw playlist dus ik neem aan dat hij hem weer verwijderd na het instellen van de tijd kan ik ook zorgen dat hij meteen na de uuropener komt ?
Alvast bedankt

Zie bovenstaand gewijzigd bericht

[Marcel]

Wat betreft de CD van de week, als je random uit een catogerie draai, zou ik de event scheduler gebruiken.
Dit zou je ook kunnen doen met je cabaret programma.
Start hij altijd op dag en tijd die je aangeeft en je hoeft niks aan je PAL script te veranderen.

Nu heb ik met dat cabaret programma getest nu is het zo dat hij het onderaan de playlist zet.
En hij maakt elk uur een nieuw playlist dus ik neem aan dat hij hem weer verwijderd na het instellen van de tijd kan ik ook zorgen dat hij meteen na de uuropener komt ?
Alvast bedankt

Zie bovenstaand gewijzigd bericht

Ik ga is inderdaad kijken of het werkt als ik het zo ga doen nu zet hij elke keer wat ik klaarzet onderaan de playlist vandaar.
Nu nog een vraag ik neem aan dat ik dan elke keer de tijd niet 20.00 uur van moet maken maar bijvoorbeeld 19:59:52 Om de playlisten te starten.
Als dat zo is dan gaat dat goed komen.

[Kees]

Goed gezien Marcel...
Met die 8 seconden vang je de tijd voor de deckfade op.
Meestal een seconde of 8.
Ik weet niet of de snelheid van de pc en/of type geluidskaart daar invloed op hebben.
Op mijn pc, een P4 / 1800 met een Soundblaster Audigy 5.1, is 8 seconde meestal genoeg.

[Marcel]

Goed gezien Marcel...
Met die 8 seconden vang je de tijd voor de deckfade op.
Meestal een seconde of 8.
Ik weet niet of de snelheid van de pc en/of type geluidskaart daar invloed op hebben.
Op mijn pc, een P4 / 1800 met een Soundblaster Audigy 5.1, is 8 seconde meestal genoeg.

Het werkt goed hier perfect alleen heb 1 probleem.
De reclame blokjes hebben in het begin mee gedraaid nu draaien ze niet meer mee.
Ze komen elk uur in een cat voorbij maar nu niet meer ?
Hoe kan ik zorgen dat de spots weer terug komt ieder uur.
Alvast bedankt

[Kees]

Heb je smRandom, NoRules gebruikt ?

[Marcel]

Heb je smRandom, NoRules gebruikt ?

Er staat achter de cat QueBottom(smLemmingLogic,EnforceRules)

[Marcel]

Heb je smRandom, NoRules gebruikt ?

Er staat achter de cat QueBottom(smLemmingLogic,EnforceRules)

Kees wederom bedankt daarvoor het is inderdaad opgelost tot nu toe.
Nu heb ik nog een vraag alweer denk je
We hebben een elke week een top 15 nu wil ik die ook nonstop uitzenden kan ik dat in een soort PAL script doen of hoe kan ik het beste zoiets in elkaar zetten .

[Kees]

Hallo Marcel..

Als je alle files op volgorde van draaien in een dir zet dan kun je dit in een script gebruiken.

Code: Selecteer alles

Queue.AddDir('c:\top15\',False,ipTop);

[Marcel]

Hallo Marcel..

Als je alle files op volgorde van draaien in een dir zet dan kun je dit in een script gebruiken.

Code: Selecteer alles

Queue.AddDir('c:\top15\',False,ipTop);

Hoi hoi Kees,

Sorry voor mijn late reactie was een paar dagen afwezig geweest.
De top 15 wat is nu precies de bedoeling dat ik een map aanmaak daar de top 15 in zet hoe ik hem gedraaid wil hebben.
Nu heb ik een vraag als ik regelmatig een jingle wil laten horen kan ik dat dan er ook in plannen ?

Alvast bedankt

Groet Marcel

[Kees]

Klopt Marcel...

Ik heb dit een keer gedaan met een Top 100 van 1966.
100 noemde ik 001.mp3
99 002.mp3
98 003.mp3

Enz. enz enz.
Nummer 1 werd uiteindelijk 100.mp3
Dit werkt feilloos.
Wel 3 cijferig houden. dus 1 t/m 99 met nullen er voor.

Wat betreft jou vraag voor de jingle.
Is dat voor continu te draaien of alleen tijdens je top 15 ?

[Marcel]

Klopt Marcel...

Ik heb dit een keer gedaan met een Top 100 van 1966.
100 noemde ik 001.mp3
99 002.mp3
98 003.mp3

Enz. enz enz.
Nummer 1 werd uiteindelijk 100.mp3
Dit werkt feilloos.
Wel 3 cijferig houden. dus 1 t/m 99 met nullen er voor.

Wat betreft jou vraag voor de jingle.
Is dat voor continu te draaien of alleen tijdens je top 15 ?

Het continu draaien werkt hier prima.
Geen probleem mee alleen zaterdag heeft hij even gek gedaan maar dat is nu ook weer over.
De jingle's zijn puur alleen voor de top 15
Ik heb bijvoorbeeld ook jingle's met cijfers zoals nummer 3 nummer 4 enz
Maar ook programma naam jingle's
Zoals dit is de schuimkoppen top 15