palscript voor nonstop 24 uur

[bodyshape]

Hoi

Gebruik dit palscript voor de nonstop, maar hij werkt niet, wat is er fout aan.
Als er fouten zijn graag aanpassen kom er anders niet in uit.
Gebruik het voor 1 plaat uit ieder categorie/ met op het hele uur het lnm nieuws, en om de 3 platen een jingle.

Gr Erik

[Gerrit]

Misschien wel zo makkelijk dat je het Script hier ook even neerzet dan ! [smilie=wink3.gif]

Kan kunnen wij evt. zien wat en waar het fout gaat, dat wordt nu moeilijk.

Gerrit.

[bodyshape]

Hoi Gerrit

Ja stom van me, hier is ie.

Gr Erik

Code: Selecteer alles

PAL.Loop:=True;
PAL.WaitForTime(T['XX:00:00']);
Queue.AddFile('C:\uuropener.mp3',ipTop); 
PAL.Loop:=True;
Cat['Jingles (All)'].QueueTop(smLRP, NoRules);
PAL.WaitForPlayCount(3);

Cat['80s'].QueueBottom(smRandom, EnforceRules);
Cat['90s'].QueueBottom(smRandom, EnforceRules);
Cat['Dance Classics'].QueueBottom(smRandom, EnforceRules);
Cat['Top40'].QueueBottom(smRandom, EnforceRules);
Cat['Fout'].QueueBottom(smRandom, EnforceRules);
Cat['Long Versions'].QueueBottom(smRandom, EnforceRules);
Cat['70s'].QueueBottom(smRandom, EnforceRules);
Cat['60s'].QueueBottom(smRandom, EnforceRules);
Cat['Veronica'].QueueBottom(smRandom, EnforceRules);

[Gerrit]

Probeer deze maar eens:

[bodyshape]

Hoi Gerrit

Super bedankt, hij werkt goed alleen het wereldnieuws van lnp pakt ie niet.

Gr Erik

[bodyshape]

Hoi Gerrit

Heb hem verder uitgetest maar hij doet heel erg vreemd
Hij pakt het wereldnieuws niet en hij pakt de jingles ook niet terwijl alle jingles in map jingles al staan en bij een nieuw uur pakt hij wel 8 jingles achter elkaar.
Bij playlist rotation rules staat 2 songs in que, maar bij een nieuw uur laat hij in de queue veel meer nummers zien.

Gr Erik

[Gerrit]

Probeer het eens met deze:

Code: Selecteer alles

PAL.Loop:=True;
PAL.WaitForTime(T['XX:00:00']);
Queue.Clear; 
Queue.AddFile('C:\uuropener.mp3',ipTop);
ActivePlayer.FadeToNext; 
var QueueTime : Integer = (50*50*600); 
While Queue.Duration < QueueTime do 

Begin 

Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['80s'].QueueBottom(smRandom, EnforceRules);
Cat['90s'].QueueBottom(smRandom, EnforceRules);
Cat['Dance Classics'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['Top40'].QueueBottom(smRandom, EnforceRules);
Cat['Fout'].QueueBottom(smRandom, EnforceRules);
Cat['Long Versions'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['70s'].QueueBottom(smRandom, EnforceRules);
Cat['60s'].QueueBottom(smRandom, EnforceRules);
Cat['Veronica'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['80s'].QueueBottom(smRandom, EnforceRules);
Cat['90s'].QueueBottom(smRandom, EnforceRules);
Cat['Dance Classics'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['Top40'].QueueBottom(smRandom, EnforceRules);
Cat['Fout'].QueueBottom(smRandom, EnforceRules);
Cat['Long Versions'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['70s'].QueueBottom(smRandom, EnforceRules);
Cat['60s'].QueueBottom(smRandom, EnforceRules);
Cat['Veronica'].QueueBottom(smRandom, EnforceRules);

end;

Het probleem met de jingles zou nu opgelost moeten zijn.
En die link van het LMN nieuws kon ik nergens vinden, dus die staat er dan ook niet in.
Die moet je er zelf maar even in zetten want ik weet niet wat voor link dat is.
Kijk voor meer info hier over die link hier : http://www.broadcasterforum.nl/viewtopi ... =80&t=3108

Gerrit.

[bodyshape]

Hoi Gerrit

Het wil niet lukken gerrit, hij pakt nu wel het wereldnieuws maar daarna pakt hij 8 jingles tegelijk, heb naast jou PAL een jingle PAL bij staan anders pakt hij bij een nieuw uur geen jingles om de 3 platen maar laat in de queu wel een hele lijst platen zien.
Hieronder de pals

Gr Erik

Code: Selecteer alles

While Queue.Duration < QueueTime do 

Begin 

Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['80s'].QueueBottom(smRandom, EnforceRules);
Cat['90s'].QueueBottom(smRandom, EnforceRules);
Cat['Dance Classics'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['Top40'].QueueBottom(smRandom, EnforceRules);
Cat['Fout'].QueueBottom(smRandom, EnforceRules);
Cat['Long Versions'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['70s'].QueueBottom(smRandom, EnforceRules);
Cat['60s'].QueueBottom(smRandom, EnforceRules);
Cat['Veronica'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['80s'].QueueBottom(smRandom, EnforceRules);
Cat['90s'].QueueBottom(smRandom, EnforceRules);
Cat['Dance Classics'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['Top40'].QueueBottom(smRandom, EnforceRules);
Cat['Fout'].QueueBottom(smRandom, EnforceRules);
Cat['Long Versions'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['70s'].QueueBottom(smRandom, EnforceRules);
Cat['60s'].QueueBottom(smRandom, EnforceRules);
Cat['Veronica'].QueueBottom(smRandom, EnforceRules);

end;

PAL.Loop:=True;
Cat['Jingles (All)'].QueueTop(smLRP, NoRules);
PAL.WaitForPlayCount(3);

[Gerrit]

Hoe doe je dat dan met het wereldnieuws ?
Ik zie dat nergens staan in het script.

[bodyshape]

Hoi Gerrit

Hieronder de nonstoppal. met het wereldnieuws.
Daar onder staat een PAL die ik appart gebruik naast de nonstop PAL voor de jingles.
Heb die ook al een keer uitgezet en alleen de nonstop PAL maar hij blijft raar doen.
Met alleen de jingle PAL doet hij het ook niet dan pakt hij ze om de plaat of om de 2 platen 2 jingles.

Erik

Code: Selecteer alles

PAL.Loop:=True;
PAL.WaitForTime(T['XX:00:00']);
Queue.Clear; 
Queue.AddURL('http://www.lokaalmedia.net/download/**********/wereldnieuws.mp3',ipTop);
ActivePlayer.FadeToNext; 
var QueueTime : Integer = (50*50*600); 
While Queue.Duration < QueueTime do 

Begin 

Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['80s'].QueueBottom(smRandom, EnforceRules);
Cat['90s'].QueueBottom(smRandom, EnforceRules);
Cat['Dance Classics'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['Top40'].QueueBottom(smRandom, EnforceRules);
Cat['Fout'].QueueBottom(smRandom, EnforceRules);
Cat['Long Versions'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['70s'].QueueBottom(smRandom, EnforceRules);
Cat['60s'].QueueBottom(smRandom, EnforceRules);
Cat['Veronica'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['80s'].QueueBottom(smRandom, EnforceRules);
Cat['90s'].QueueBottom(smRandom, EnforceRules);
Cat['Dance Classics'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['Top40'].QueueBottom(smRandom, EnforceRules);
Cat['Fout'].QueueBottom(smRandom, EnforceRules);
Cat['Long Versions'].QueueBottom(smRandom, EnforceRules);
Cat['Jingles (All)'].QueueTop(smRandom, NoRules);
Cat['70s'].QueueBottom(smRandom, EnforceRules);
Cat['60s'].QueueBottom(smRandom, EnforceRules);
Cat['Veronica'].QueueBottom(smRandom, EnforceRules);

end;


PAL.Loop:=True;
Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
PAL.WaitForPlayCount(3);

[Gerrit]

Ik ben eruit, ik had even de "QueueTop" over het hoofd gezien achter de Jingles, dit moet "QueueBottom" zijn. [smilie=yes2.gif]
Ik heb hem hier getest en het werkt nu.

Die jingle-PAL die onderaan stond kun je nu vergeten en heb je niet meer nodig want de jingles zitten nu om de 3 platen in het script verwerkt !!

Succes,

Gerrit.

Ps. Het enige wat je nog even moet doen is bij LMN de toegangscode invoeren waar nu de sterretjes staan, die heb ik weg gehaald want daar heeft niemand wat mee te maken !!

[Guus007]

Hoi Gerrit,

Ik kan je Nonstop uur bodyshape.PAL niet openen.... is toch gewoon een Word bestand?

Guus

[drOhimself]

Hoi Gerrit,
Ik kan je Nonstop uur bodyshape.PAL niet openen.... is toch gewoon een Word bestand?
Guus

Nee Guus, het is een TEXT bestand.
Niet in Word openen, want die zet er ook weer andere 'vuiligheid' bij , indien je het daarna opslaat.
Dus gewoon in een text editor openen, notepad of zoiets.

[Guus007]

Bedankt voor je snelle hulp....
Maar wat moet ik nu veranderen als ik om de twee nummers een jingle wil

Alvast bedankt

Guus

[Wout]

Bedankt voor je snelle hulp....
Maar wat moet ik nu veranderen als ik om de twee nummers een jingle wil

Alvast bedankt

Guus

*kuch
viewtopic.php?f=81&t=2909#p18308

[Guus007]

Allemaal super bedankt voor jullie hulp.
Ben pas bezig met scripts en met een aantal voorbeelden hier gevonden lukt het vrij aardig, door dit forum ben ik weer een stuk verder met Sam.
Alleen nu willen we voor ons station een nieuw uur script, heb al van alles geprobeert maar kom er niet echt uit, dus heb eigenlijk jullie hulp nodig.

Dit is wat we zouden willen:

- uuropener jingle voor het LMN Nieuws
- afsluit jingle na het LMN Nieuws
- Een nummer uit de map "lekkere muziek"
- Jingle
- Een nummer uit de map "70s"
- Een nummer uit de map "80s"
- Jingle
- Een nummer uit de map "nederlands"
- Een nummer uit de map "lekkere muziek"
- Jingle

En dan weer boven aan beginnen met om de twee nummers een jingle.

Zoals je ziet willen we na de afsluit jingle van het nieuws een nummer lekkere muziek dan een jingle en dan pas om de twee nummers weer een jingle.

Mischien dat jullie me willen helpen.

Alvast heel erg bedankt voor jullie hulp

Guus

[drOhimself]

Nou, laat maar zien wat je tot nu toe hebt gedaan, en waar het fout gaat.

[Guus007]

Ik heb jou palscript voor nonstop een beetje verkracht denk ik.... ben daar in het rommelen gegaan, maar werkte niet echt meer, vandaar graag jullie hulp, zit met me handen in het haar

[drOhimself]

Nou, laat maar zien wat je tot nu toe hebt gedaan, en waar het fout gaat.

upload PAL aub

[Guus007]

Hoe moet ik hem uploaden, heb hem als kladblop opgeslagen

Guus