Wij zijn bijna klaar met ons interactieve station nou mis ik nog 1 ding misschienm dat iemand ons nog kan helpen. Jullie op dit forum hebben ons al zo goed geholpen.
gaat om het volgende wij gebruiken onderstaand script om de dag top 10 te maken nou hebben we eindelijk onze jingles klaar voor de top 10
deze start met een intro blablablade top10
en dan moet ie het volgende doen hij brult 10.mp3
en dan het nummer en dat geld dus ook voor 9,8,7,6,5 etc....
Dus script start
-jingle dag top 10
-nr 10
- nummer 10 uit de lijst draaien
-nr.9
- nummer 9 uide lijst draaien
etc etc etc
hij zet nu wel alle nummers in de queue maar gewoon achter mekaar .. is dit aan te passen ??
de mp3's voor de nummer roeping heten 01.mp3, 02.mp3 03.mp3 etc etc
Code: Selecteer alles
PAL.Loop := True;
PAL.WaitForTime(T['17:00:00']); {Wait for 5pm}
{==================================================}
var D : TDataSet;
var C : Integer;
D := Query('SELECT songlist.*, count(*) as cnt '+
'FROM songlist,requestlist '+
'WHERE songlist.ID = requestlist.songID '+
' AND requestlist.code < 700 '+
'GROUP BY songlist.ID '+
'ORDER BY cnt DESC LIMIT 10',[],True);
{Add requests to Queue.
We add to the top of the Queue, effectively reversing the
order of the requests - playing #10 first and #1 last}
C := 0;
D.First;
while not D.EOF do
begin
C := C + 1;
WriteLn('#'+IntToStr(C)+'. '+D['artist']+' - '+D['title']);
Queue.AddFile(D['filename'],ipTop);
D.Next;
end;
{==================================================}
PAL.WaitForTime(T['23:59:59']); {Wait for next day}
KeihardHollands
in sam heet de map "NL Hits"
Iets te veel credit Gerrit, ben maar een amateurtje. 
Ik hoop dat het je toch ooit eens gaat lukken alvast bedankt voor de supersnelle reactie...
