Clockweel in palscript

[Qtronix]

Een tijd geleden vond ik hier een makkelijk scriptje om op een bepaalde tijd een bepaald nummer in te laden (tune dus).Nu is mijn pc helemaal gecrasht geweest en ik ben dus dat script kwijt.Nu ben ik hier heel dapper op zoek gegaan en het e.e.a gevonden.Ik heb ondertussen vanuit verschillende topics stukjes van scripts gehaald wat dus allemaal werkt.Nu wil ik nog een ding toevoegen wat ik helaas niet kan vinden.Ik wil graag een bepaalde clockweelfile inladen waarmee ik dus op dat tijdstip dat genre muziek ga draaien,als het programma ten einde is zou deze clockweelfile moeten stoppen en verder moeten gaan met een andere clockweel.

het script wat ik uit de verschillende stukjes bij elkaar heb gemaakt ziet er als volgt uit.

Code: Selecteer alles

PAL.Loop := false;
PAL.WaitForTime('XX:00:00');
Encoders[3].Stop ;
{==================================================}
const shoutcast_password = 'paswoord';
const shoutcast_host     = 'ip adres';
const shoutcast_port     = 'poort';
{==================================================}
var URL : String;
URL := 'http://admin:'+shoutcast_password+'@'+shoutcast_host+':'+shoutcast_port+'/admin.cgi?mode=kicksrc';
WebToFile('c:\dummy.txt',URL);
Encoders[3].Start;

Queue.AddFile('e:\Muziek\0Tune\eu1.mp3',iptop);
ActivePlayer.FadeToNext;

Queue.AddFile('e:\Muziek\0Tune\ZP.mp3',iptop);
ActivePlayer.FadeToNext;

PAL.WaitForTime('XX:00:00');
Queue.AddFile('e:\Muziek\0Tune\lievemensen1.mp3',iptop);

PAL.WaitForTime('XX:56:34');
Queue.AddFile('e:\Muziek\0Tune\ZP.mp3',iptop);
ActivePlayer.FadeToNext;
Queue.Clear;

PAL.WaitForTime('XX:59:59');
Encoders[3].Stop ;

Ik hoop dat er iemand is die me verder hiermee kan helpen.

Alvast THNX

[Qtronix]

Ik start dit script via de ES op.

[Wout]

Als je je clockwheel ook via ES opstart heb je bovenstaande PAL-script niet nodig.

[Qtronix]

expirimenteren dan maar ermee.

thnx iig voor je support