var Song : TSongInfo; PAL.Loop := True; PAL.WaitForTime('+00:06:00'); {# Add files to queue script #} Song := CAT['PravServer'].ChooseSong(smRandom,NoRules); Queue.Add(song,ipTop);
var Song : TSongInfo; PAL.Loop := True; PAL.WaitForTime('+00:06:00'); {# Add files to queue script #} Song := Dir['D:\Radio\03_PRAVILA_SERVERA\All'].ChooseSong(smRandom, NoRules); Queue.Add(song,ipTop);
PAL.Loop := True; PAL.WaitForTime('+00:05:00'); Dir['D:\Radio\03_PRAVILA_SERVERA\All'].QueueTop(smRandom, NoRules);