fout met nieuws en lanceerschijf

[Ziekenomroep]

Hoi heb weer een klein vraagje, nogmaals jullie hoeven niets te doen, alleen een beetje op weg te helpen!.

Ik heb nu elk uur het nieuws van Lokaal Media Net.

Daarna moet Advertentieblok 1 komen. en daarna de lanceerschijf jingel en daarna de lanceerschijf mp3.

Onderstaand de code die ik elk uur gebruik.

Code: Selecteer alles

// Maandag 07:00 uur
while DayOfWeek(Now) = Monday and ((Now >= T['06:59:15']) and (Now <= T['06:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['06:59:45']);
Queue.AddFile('C:\server\TIJDSEIN\07.mp3',ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
Queue.AddFile('C:\server\NIEUWS\LMN - Nieuwsbulletin.mp3',ipBottom);
Queue.AddFile('C:\server\UUROPENER\Advertentie Blok 1 - Uuropener.mp3',ipTop);
Cat['RADIO WAUBACH - LANCEERSCHIJFJINGLE'].QueueTop(smRandom, NoRules);
Cat['RADIO WAUBACH - LANCEERSCHIJF'].QueueBottom(smRandom, NoRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - JINGELS'].QueueBottom(smRandom, NoRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - JINGELS'].QueueBottom(smRandom, NoRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - JINGELS'].QueueBottom(smRandom, NoRules);
PAL.LockExecution;
end;

Nu Gebeurt het zo :
07.02.57 - Jingle - Lanceerschijf Moet na het nieuws.
07.02.57 - Advertentieblok 1 - moet dus na het nieuws
07.03.34 - Nieuwsbullentin
07.05.02 - Lanceerschijf

De juiste volgorde moet eigelijk zijn
06.59.50 - Tijdsein
07.00.00 - Nieuwsbullentin
07.02.00 - Advertentieblok 1
07.04.00 - Lanceerschijf Jingel
07.05.00 - Lanceerschijf

Heeft iemand de juiste oplossing?...

[drOhimself]

Queue.AddFile('C:\server\UUROPENER\Advertentie Blok 1 - Uuropener.mp3',ipTop);
Moet worden :
Queue.AddFile('C:\server\UUROPENER\Advertentie Blok 1 - Uuropener.mp3',ipBottom);

Kijk goed dat alles onderaan (Bottom) wordt ingevoerd.....

Dus er is GEEN tijdsein afgespeeld ?
Lijkt wel als of er om 06:59:45 nog een nieuw nummer is gestart.
Heb je volledige overzichtje van wat er is gespeeld vanaf even voor 7:00 tot 7:05 ?

[Ziekenomroep]

Zie onderstaand is wel die van 08.00 uur. maar elk uur gaat hetzelfde als onderstaand?...

[drOhimself]

Ja ieder uur gaat hetzelfde, als je de PAL niet aanpast.
Nogmaals : Kijk naar die regels in de PAL waar ipTop, QueuTop en ipBottom, QueuBottom staan.
Daar zit je fout.

[Ziekenomroep]

Het is nu opgelost. hebben jullie ook nog een tip. om een instrumentaal nummer voor het nieuws te laten lopen, omdat
de vocale plaat nooit helemaal uitloopt?.

Dit was de oplossing van het vorige topic.

Code: Selecteer alles

// Maandag 07:30 uur
while DayOfWeek(Now) = Monday and ((Now >= T['07:29:15']) and (Now <= T['07:29:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['07:29:45']);
Queue.AddFile('C:\server\NIEUWS\LMN - Headlines.mp3',ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - JINGELS'].QueueBottom(smRandom, NoRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - JINGELS'].QueueBottom(smRandom, NoRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - DUITS'].QueueBottom(smLRPA, EnforceRules);
Cat['RADIO WAUBACH - JINGELS'].QueueBottom(smRandom, NoRules);
PAL.LockExecution;
end;

Bedankt voor jullie medewerking.

[drOhimself]

Mooi, dat loopt goed dan !
Graag even je volgende vraag in een nieuw topic.
(Ik herinner me dat jouw vraag al eens is langsgekomen hier op het forum, zie viewtopic.php?f=81&t=1653&start=20&hilit=instrumentaal )