PAL script een playlist laten lopen op een uur

[netmeet]

Wie kan mij helpen met een script om automatisch een playlist te laten lopen...
BV . kwil van 13 - 14 uur R&b hebben uit de R&B map. Dat hij dan zelf liedjes kan kiezen uit de map die eral staat..

Wie o wie kan mij helpen?? Kees ?? HELP

[Cootje81]

Ik ben ook opzoek naar zoiets..

Wie kan ons hiermee helpen?

Alvast bedankt

[Kees]

Code: Selecteer alles

PAL.Loop:=True;
PAL.LockExecution;
while ((Now >= T['12:59:45']) and (Now <= T['12:59:50'])) do
begin
PAL.UnLockExecution;
Queue.Clear;
var QueueTime : Integer = (60*60*1230); 
While Queue.Duration < QueueTime do 
Begin 
Cat['R&B'].QueueBottom(smLemmingLogic, EnforceRules);
end; 
PAL.LockExecution;
  end;
PAL.UnLockExecution;

[Cootje81]

Als ik het goed begrijp moet ik alleen de tijden

Code: Selecteer alles

while ((Now >= T['12:59:45']) and (Now <= T['12:59:50'])) do
begin

veranderen en de categorie

Code: Selecteer alles

Cat['R&B']. ?

en uiteraard de script herhalen?

en waar staat deze voor al sik vragen mag

Code: Selecteer alles

((Now >= T['12:59:45']) and (Now <= T['12:59:50']))

[Kees]

Tussen die tijd plaatst sam voor +/- 1 uur de muziek uit die cat. in de queue.

[Cootje81]

Hoelaat ik Bv. dan 3u achter elkaar Cat Nl draaien?

[Kees]

Dan ben je beter uit met een compleet PAL script.
Als je standaard tijden hebt waarin je weet welke muziek er gedraaid moet worden is dit wel te realiseren.

[netmeet]

Hey Kees,

Dit hebben wij ook op de radio lopen... Kan dat dan werken met dat nieuw script ???

Code: Selecteer alles

PAL.Loop:=True;
PAL.LockExecution;

while ((Now >= T['23:59:53']) and (Now <= T['23:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['00:59:53']) and (Now <= T['00:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['01:59:53']) and (Now <= T['01:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['02:59:53']) and (Now <= T['02:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['03:59:53']) and (Now <= T['03:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['04:59:53']) and (Now <= T['04:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['05:59:53']) and (Now <= T['05:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['06:59:53']) and (Now <= T['06:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['07:59:53']) and (Now <= T['07:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['08:59:53']) and (Now <= T['08:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['09:59:53']) and (Now <= T['09:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['10:59:53']) and (Now <= T['10:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['11:59:53']) and (Now <= T['11:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['12:59:53']) and (Now <= T['12:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['13:59:53']) and (Now <= T['13:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['14:59:53']) and (Now <= T['14:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['15:59:53']) and (Now <= T['15:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['16:59:53']) and (Now <= T['16:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['17:59:53']) and (Now <= T['17:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.AddFile('D:\Douglas\douglas_nonstop.mp3',ipTop);
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['18:59:53']) and (Now <= T['18:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['19:59:53']) and (Now <= T['19:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['20:59:53']) and (Now <= T['20:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['21:59:53']) and (Now <= T['21:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;

while ((Now >= T['22:59:53']) and (Now <= T['22:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime(T['+00:00:15']);
PAL.Lockexecution;
end;
PAL.UnlockExecution;

[Cootje81]

Nederlands 12:00 - 14:00
R&B 14:00-16:00
Hardstyle 16:00-18:00
Dance 18:00-23:00

is het ook moegelijk dat het samen werkt met een andere script?

[Kees]

Nederlands 12:00 - 14:00
R&B 14:00-16:00
Hardstyle 16:00-18:00
Dance 18:00-23:00

Zijn dit de exacte namen van je cat. ?

is het ook mogelijk dat het samen werkt met een andere script?

LIgt er helemaal aan wat dat voor scripts zijn.

[Cootje81]

Ja dat zijn de juiste Cats en de tijden nou het zelfde script als die Netmeet weergeeft paar posten naar boven

Alvast bedankt

[Cootje81]

En weet je al iets meer kees?

Alvast bedankt

[Kees]

Geduld....aub..dank u !

[Cootje81]

Ja hoor ik w8 geduldig af

Sorry als ik u op jaag

[Kees]

HET IS OP DIT FORUM ZWAAR VERBODEN MIJ U TE NOEMEN WANT U BEN JIJ EN JIJ BEN DUS IKKE !

[Kees]

Even voor Cootje81...heb je normaal een clockwheel draaien..zo ja...zet deze eens online !

[Cootje81]

Oke sorry :D

[netmeet]

dit is men clockwheel

Code: Selecteer alles

Cat['new mp3'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['collecties'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['retrohouse'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['advertisements (All)'].QueueBottom(smRandom, NoRules);
Cat['va'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['new mp3'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
Cat['collecties'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['va'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['new single'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['advertisements (All)'].QueueBottom(smRandom, NoRules);
Cat['va'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['collecties'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['house'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
Cat['retrodance'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['dance'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['collecties'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['advertisements (All)'].QueueBottom(smRandom, NoRules);
Cat['artist'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['va'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
Cat['trance'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['dance'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['advertisements (All)'].QueueBottom(smRandom, NoRules);
Cat['new mp3'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['va'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['collecties'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
Cat['va'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['house'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['collecties'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['advertisements (All)'].QueueBottom(smRandom, NoRules);
Cat['trance'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['dance'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['collecties'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
Cat['new mp3'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['va'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['collecties'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['artist'].QueueBottom(smLemmingLogic, EnforceRules);

bedankt kees om te kijken.

dus samen met de PAL script die jij nog gemaakt hebt...

mvg
Steve

[Kees]

Nou..hier komt een voorbeeld script wat je zelf mag of moet aanpassen.

Code: Selecteer alles

PAL.Loop:=True;
PAL.LockExecution;

while ((Now >= T['23:59:53']) and (Now <= T['23:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['00:59:53']) and (Now <= T['00:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['01:59:53']) and (Now <= T['01:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['02:59:53']) and (Now <= T['02:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['03:59:53']) and (Now <= T['03:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['04:59:53']) and (Now <= T['04:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['05:59:53']) and (Now <= T['05:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['06:59:53']) and (Now <= T['06:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['07:59:53']) and (Now <= T['07:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.Lockexecution;
end;

while ((Now >= T['08:59:53']) and (Now <= T['08:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['09:59:53']) and (Now <= T['09:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['10:59:53']) and (Now <= T['10:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['11:59:53']) and (Now <= T['11:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
var QueueTime : Integer = (60*60*1300);
While Queue.Duration < QueueTime do 
Begin 
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
end;
PAL.Lockexecution;
end;

while ((Now >= T['12:59:53']) and (Now <= T['12:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
var QueueTime : Integer = (60*60*1300);
While Queue.Duration < QueueTime do 
Begin 
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
end;
PAL.Lockexecution;
end;

while ((Now >= T['13:59:53']) and (Now <= T['13:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
var QueueTime : Integer = (60*60*1300);
While Queue.Duration < QueueTime do 
Begin 
Cat['R&B'].QueueBottom(smLemmingLogic, EnforceRules);
end;
PAL.Lockexecution;
end;

while ((Now >= T['14:59:53']) and (Now <= T['14:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
var QueueTime : Integer = (60*60*1300);
While Queue.Duration < QueueTime do 
Begin 
Cat['R&B'].QueueBottom(smLemmingLogic, EnforceRules);
end;
PAL.Lockexecution;
end;

while ((Now >= T['15:59:53']) and (Now <= T['15:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
var QueueTime : Integer = (60*60*1300);
While Queue.Duration < QueueTime do 
Begin 
Cat['Hardstyle'].QueueBottom(smLemmingLogic, EnforceRules);
end;
PAL.Lockexecution;
end;

while ((Now >= T['16:59:53']) and (Now <= T['16:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
Queue.AddFile('D:\Douglas\douglas_nonstop.mp3',ipTop);
var QueueTime : Integer = (60*60*1300);
While Queue.Duration < QueueTime do 
Begin 
Cat['Dance'].QueueBottom(smLemmingLogic, EnforceRules);
end;
PAL.Lockexecution;
end;


while ((Now >= T['17:59:53']) and (Now <= T['17:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
Queue.AddFile('D:\Douglas\douglas_nonstop.mp3',ipTop);
var QueueTime : Integer = (60*60*1300);
While Queue.Duration < QueueTime do 
Begin 
Cat['Dance'].QueueBottom(smLemmingLogic, EnforceRules);
end;
PAL.Lockexecution;
end;


while ((Now >= T['18:59:53']) and (Now <= T['18:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
var QueueTime : Integer = (60*60*1300);
While Queue.Duration < QueueTime do 
Begin 
Cat['Dance'].QueueBottom(smLemmingLogic, EnforceRules);
end;
PAL.Lockexecution;
end;

while ((Now >= T['19:59:53']) and (Now <= T['19:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['20:59:53']) and (Now <= T['20:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['21:59:53']) and (Now <= T['21:59:57'])) do
begin
PAL.UnlockExecution;
Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

while ((Now >= T['22:59:53']) and (Now <= T['22:59:57'])) do
begin

Queue.AddFile('C:\scripts\uurwissel.mp3',ipTop);
ActivePlayer.FadeToNext;
Queue.Clear;
PAL.Lockexecution;
end;

// LET OP...HIERONDER STAAT DE NON-STOP DIE NORMAAL IN JE CLOCKWHEEL STAAT..ZELF EVEN AANPASSEN DUS !!
// DIT BETEKENT DAT JE DE INHOUD VAN JE CLOCKWHEEL HIER MOET INVULLEN EN..
// DAT JE DE CLOKWHEEL MOET LEEGHALEN 


while (queue.count <3) do
begin
PAL.UnlockExecution;
Cat['70s'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['80s'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['90s'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['2000'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['60s'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
Cat['70s'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['80s'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
Cat['90s'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['2000'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Nederlands'].QueueBottom(smLemmingLogic, EnforceRules);
Cat['Jingles (All)'].QueueBottom(smRandom, NoRules);
PAL.lockExecution;
END;
PAL.UnlockExecution;

[netmeet]

Hey bedankt kees,

maar kan je miss nog 1 lijntje bijzetten voor tussen 17- 18 uur..

ook die douglas aub

Ik heb het al gedaan maar wilde niet gaan...
en is dit alles voor in de clockwheel ??? of PAL ????