Week-PAL probleem

[Gerrit]

Beste medegebruikers:

Ik heb de week-PAL van Kees binnengehaald (omroep Tholen PAL) en deze aangepast na eigen gebruik maar krijg steeds een foutmelding !
Ik heb alles gecontroleerd en nog eens gecontroleerd met het origineel en ik zie wat over het hoofd maar weet niet wat. :rolleyes:
Na een week proberen gooi ik de handdoek in de ring en ga aan de :drinkers:

Ik zal ff proberen het palletje mee te posten, weet niet of dit lukken gaat !

Mvgr, Gerrit.

[Kees]

En hier in verbeterde versie.

WeekFormat Midland FM TEST.PAL

Je was op het eind een end; vergeten.
Zoektijd..10 seconden..sorry !

[Gerrit]

Kees bedankt voor de oplossing en dan nog zo snel ook !
Maar mag ik dan 1 ding opmerken ?
In het originele script van Omroep Tholen staat die "end;" volgens mij ook niet ?!?!
En ik neem aan als hier een script gepost word dat die dan wel compleet is !

Anyway..........Ik heb een hoop geleerd de laatste week met het zoeken hoe het 1 en ander werkt,
dus het heeft ook zijn positieve kant.............Haha....bijna aan de drank geraakt.

Zo, ik ga hem gelijk testen, ben erg benieuwd,

Gr. Gerrit.

[Kees]

Ik heb het gezien.
Zal het zo veranderen.
Bedankt voor de tip en sorry dat je dat een week hoofdpijn heeft bezorgd.

[Gerrit]

Ik heb het gezien.
Zal het zo veranderen.
Bedankt voor de tip en sorry dat je dat een week hoofdpijn heeft bezorgd.

De hoofdpijn is nog niet over Kees !

Als ik nu het PAL-script start slaat het programma kompleet vast !

Ik heb deze: var QueueTimeKlassiek : Integer = (60*60*1300);
var QueueTimeCabaret : Integer = (60*60*1300); bovenaan de lijst ook verwijderd want die gebruik ik niet en nog geen suc6 !?

EDIT: Ik heb er inmiddels wel een paar ; uitgehaald die er dubbel in stonden maar zonder suc6, het script loopt nog steeds vast aan het begin !?

Gerrit.

[Kees]

Hier zat een fout..er ontbrak een
PAL.UnLockExecution;

Code: Selecteer alles

// einde zaterdag

While Queue.Duration < QueueTime Do
begin
Cat['hits'].QueueBottom(smRandom, NoRules);
Cat['jingles (All)'].QueueBottom(smRandom, NoRules);

Dit is het verbeterde stuk

Code: Selecteer alles

// einde zaterdag

While Queue.Duration < QueueTime Do
begin
PAL.UnLockExecution;
Cat['hits'].QueueBottom(smRandom, NoRules);
Cat['jingles (All)'].QueueBottom(smRandom, NoRules);

WeekFormat Midland FM TEST.PAL

[Gerrit]

Hoi Kees,

Het script loopt iig niet meer vast, maar nu krijg ik de deze foutmelding : "Syntax Error:";" expected [line 2909.column:1]"

Ik heb geen flauw idee wat dat betekend, zal wel iets heel simpels zijn maar ik ben nog maar een "Newbie" !! :headbash:

Gerrit.

PS. Kees het heeft toch niets te maken met Clockwheel want die is bij mij nog helemaal leeg ? (zover ik gelezen heb niet?!?)

[Kees]

Onderste end; even weghalen..dan doet hij het wel !

[Gerrit]

Pfffff, Ik (we) hebben hem draaien !!! daar moet op :drinkers: worden.............Haha.......Hik....

Kees, nog 1 vraagje : Klopt het dat het script blijft "schakelen" tussen "PAL.loop:=true" (bovenaan) en "PAL,Unkockexecution;" (onderaan) ???

Gerrit.

[Kees]

Ja..klopt...daar zijn die PAL.LockExecution; en PAL.UnLockexecution; voor.
Dan gaat hij razendsnel door een script heen op zoek naar een opdracht.

[Gerrit]

Ik had al een vermoeden, pakt tie nou aut. de goeie dag en tijd ?

Verder draait het tot dusver goed, mijn compliments 2 U.

1 ding doet het script nog raar, het lijkt wel of hij op het halve uur nog een playlist genegeerd en aan de bestaande vastplakt!

Als je een keer zin een tijd hebt zou je er dan een keer naar willen kijken waaraan dat ligt ?
Het heeft absoluut geen haast want het draait allemaal nog in testfase voorlopig !

Alvast bedankt, Gerrit.

[Kees]

Ik kan je dat wel even uitleggen..
Ik heb het script zo geschreven dat hij kijkt naar het aantal nummers wat in de queue staat.
Komt tie beneden een bepaald aantal dan vult hij hem automatisch bij volgens format..
Op deze manier heb je altijd voldoende muziek in de queue.

[Gerrit]

OK Kees bedankt voor het antwoord.

Beter teveel dan te weinig !

Gerrit.