om de zoveel tijd naar volgende nummer faden

[radio010]

in dit script faden we naar de volgende song na xxx tijd.
op de onderste rij stel je de tijd in, in dit geval 30 seconden

Code: Selecteer alles

var Song : TSongInfo;
var A, I, Q : TPlayer;
var vol : Integer;

PAL.Loop := True;

A := ActivePlayer;
I := IdlePlayer;

Song := Queue.NextInQueue;

I.QueueSong(Song);
Q := QueuedPlayer;
vol := Q.Volume;
Q.Volume := vol / 5;
Q.SeekTime(60000);
A.FadeToNext;
PAL.WaitForTime('+00:00:01');
Q.Volume := vol / 2;
PAL.WaitForTime('+00:00:01');
Q.Volume := vol;

// queue.clear;

PAL.WaitForTime('+00:00:30');