Fout in pall?

[ActueelFM]

Beste forum gebruikers,

inmiddels mijn oude PAL gevonden maar deze geeft een foutmelding..
kan iemand even mee kijke?


lvast bedankt

[Gerrit]

Probeer deze maar eens, ik heb er de fouten uitgehaald en hem wat aangepast !
Je bent weer bezig geweest als "een kip zonder kop".........Sorry dat ik het zeg..

Het is gewoon een kwestie van "Kijken en vergelijken" met een bestaand script !!!!

Suc6, Gerrit.

[ActueelFM]

Beste forum gebruikers,

inmiddels mijn oude PAL gevonden maar deze geeft een foutmelding..
kan iemand even mee kijke?


lvast bedankt

Hoi Gerrit, net thuis, sorry, dat ik zo bezig ben geweest hihi, mischien vraag ik te veel ..
Ik heb deze net getest hij geen met deze nieuwe versie, geef hij de volgende fout :
Line 2224, collumn; 20
end of block exspected...

Nu snap ik dat dat rege; 2duizend vier en twintig is, maar ontdek ik de fout daar niet?

Groetjes
Johnny

[bvdg]

Ik heb dat weekscript ook , het kan liggen aan dit ---> ; <--- of aan dit ---> end <---.
Ik heb hem nu eindelijk zonder fouten maar werkt nog niet correct.
Je moet in die regel waar hij de fout aan geeft een beetje prutsen en dan bijv. een spatie ergens tussen zetten bij ;end <--- of ---> ; end

Zo ben ik er ook uit gekomen maar dan komt misschien weer de volgende fout.....!

Groetjes Beau

[bvdg]

Ik heb even naar je script gekeken , maak bij de onderste regel van het script dit is :

Code: Selecteer alles

Cat['Weekprogrammering'].QueueBottom(smRandom, NoRules);
PAL.LockExecution;
end;
PAL.UnLockExecution
end;  <-----

I.P.V. dit

Code: Selecteer alles

Cat['Weekprogrammering'].QueueBottom(smRandom, NoRules);
PAL.LockExecution;
end;
PAL.UnLockExecution

Ik hoor het wel of hij het nu wel doet...

Groetjes Beau

[ActueelFM]

Hoi Beau,

Als ik dit verander Cat['Weekprogrammering'].QueueBottom(smRandom, NoRules);
PAL.LockExecution;
end;
PAL.UnLockExecution
end; <-----

Dan blijft sam hangen, en krijg ik hem niet meer aan de praat, hij runt wel, maar hangt totaal vast..

[bvdg]

Oke het was maar even een test , ik ben er ook heel lang mee bezig geweest en nu geeft hij bij mij thuis geen Errors meer aan , maar werkt nog niet 100 %.

Ik hoor nog wel of het nog gelukt is...

Groetjes Beau

[ActueelFM]

Heelaas niet gelukt....


Ik probeer te kijken of ik het nog voor a.s woensdag kan starten, want woensdag beginnen de uitzendingen...

[Kees]

Code: Selecteer alles

while DayOfWeek(Now) = Saturday and ((Now >= T['23:59:15']) and (Now <= T['23:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['23:59:45']);
ActivePlayer.FadeTonext;
Queue.Clear;
Queue.AddFile('G:\SamScripts\Novum Nieuws\Het Novum Nieuws.mp3',ipBottom);
PAL.LockExecution;
end;

veranderen in

Code: Selecteer alles

while DayOfWeek(Now) = Saturday and ((Now >= T['23:59:15']) and (Now <= T['23:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['23:59:45']);
Queue.AddFile('G:\SamScripts\Novum Nieuws\Het Novum Nieuws.mp3',ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
PAL.LockExecution;
end;

[ActueelFM]

Net een nieuwe xp instalatie uitgevoerd, en uitgeprobeerd wat kees zij, heelaas deze doet het ook niet...

Groetjes
Johnny

[ActueelFM]

Het script werkt, ik heb een ander gevonden, en deze aangepast.

Bedankt voor jullie tips... alleen merk ik nu dat het nieuws niet loopt.. datis dus maar even klussen..