Bepaalde nummers snachts en overdag meer rotatie

[Ziekenomroep]

Hallo,

Momenteel druk met sam aan de gang. daar er hier een kans is om een lokal omroep te worden, (samen werken met de lokale tv van hier).

Ben ik benieuwd of het met sam mogelijk is om overdag bepaaldde nummers zoals hits wat meer rotatie te geven d.m.v PAL. ik gebruik het weekscript van radio europe en wil dit graag hier in verwerken.

Snachts bijvoorbeeld na 3/4 nummers een liedje die over de nacht gaan . begrijpen jullie me?

en overdag tussen 13:00 uur en 17:00 uur meer hitgerelateerde nummers.

Bedankt voor de hulp

[drOhimself]

Al jouw wensen zijn mogelijk en uit te voeren d.m.v. PAL scripts.
Ik zou zeggen, kijk hier goed rond, dit soort scripts zijn zeker gepasseerd hier.

[Ziekenomroep]

Ik ga proberen sorry voor mijn dubbele post!.
kun je me vertellen onder welke "zoekterm ik moet zoeken" dan zal ik er vast en zeker uit komen.

[drOhimself]

Even gezocht voor je op 'weight', want je wilt bepaalde nummers wat meer rotatie geven.

http://www.broadcasterforum.nl/viewtopi ... lit=weight

Het grote WEIGHT topic, kijk even naar het stukje :
door Wout op 05 jun 2011 23:18. (De 'ins' en 'outs' van WEIGHT)
Dit gaat dan vooral als je AL JOUW NUMMERS die je in SAM hebt staan, hiervoor wilt gaan gebruiken.

Je geeft aan dat je het in jouw weekloper PAL script wilt gaan integreren.
Een voorstel zou zijn, dat je die nummers die je meer wilt laten horen/draaien, (ook) in een aparte CATEGORY zet, en die toevoegd aan jouw weekloper.
Kun je een gedeelte van jouw weekloper hier plaatsen ?
(Bijv. woensdagmiddag 13:00 - 17:00)

[Ziekenomroep]

Hallo Dr.o....

Bij deze het stukje van de weekloper.

Code: Selecteer alles

// Woensdag 13:00 uur
while DayOfWeek(Now) = Wednesday and ((Now >= T['12:59:15']) and (Now < T['12:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['12:59:45']);
Queue.AddFile('C:\server\TIJDSEIN\13.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',ipBottom);
Cat['Lanceerschijf'].QueueTop(smRandom, NoRules);
Cat['Lanceerschijfjingle'].QueueBottom(smLRP, NoRules);
PAL.LockExecution;
end;

// Woensdag 13:30 uur
while DayOfWeek(Now) = Wednesday and ((Now >= T['13:29:15']) and (Now <= T['13:29:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['13:29:45']);
Queue.AddFile('C:\server\NIEUWS\LMN - Headlines.mp3',ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
PAL.LockExecution;
end;

// Woensdag 14:00 uur
while DayOfWeek(Now) = Wednesday and ((Now >= T['13:59:15']) and (Now <= T['13:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['13:59:45']);
Queue.AddFile('C:\server\TIJDSEIN\14.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',ipBottom);
Cat['Lanceerschijf'].QueueTop(smRandom, NoRules);
Cat['Lanceerschijfjingle'].QueueBottom(smLRP, NoRules);
PAL.LockExecution;
end;

// Woensdag 14:30 uur
while DayOfWeek(Now) = Wednesday and ((Now >= T['14:29:15']) and (Now <= T['14:29:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['14:29:45']);
Queue.AddFile('C:\server\NIEUWS\LMN - Headlines.mp3',ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
PAL.LockExecution;
end;

// Woensdag 15:00 uur
while DayOfWeek(Now) = Wednesday and ((Now >= T['14:56:50']) and (Now <= T['14:57:00'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['14:57:17']);
Queue.AddFile('C:\server\TIJDSEIN\15.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',ipBottom);
Cat['Lanceerschijf'].QueueTop(smRandom, NoRules);
Cat['Lanceerschijfjingle'].QueueBottom(smLRP, NoRules);
PAL.LockExecution;
end;

// Woensdag 15:30 uur
while DayOfWeek(Now) = Wednesday and ((Now >= T['15:29:15']) and (Now <= T['15:29:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['15:29:45']);
Queue.AddFile('C:\server\NIEUWS\LMN - Headlines.mp3',ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
PAL.LockExecution;
end;

// Woensdag 16:00 uur
while DayOfWeek(Now) = Wednesday and ((Now >= T['15:59:15']) and (Now <= T['15:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['15:59:45']);
Queue.AddFile('C:\server\TIJDSEIN\16.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',ipBottom);
Cat['Lanceerschijf'].QueueTop(smRandom, NoRules);
Cat['Lanceerschijfjingle'].QueueBottom(smLRP, NoRules);
Queue.AddFile('C:\server\SYNDICATE\Hans De Knegt - The Middle Of The Road Show (Woensdag).mp3',ipBottom);
PAL.LockExecution;
end;

// Woensdag 17:00 uur
while DayOfWeek(Now) = Wednesday and ((Now >= T['16:59:15']) and (Now <= T['16:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['16:59:45']);
Queue.AddFile('C:\server\TIJDSEIN\17.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',ipBottom);
Cat['Lanceerschijf'].QueueTop(smRandom, NoRules);
Cat['Lanceerschijfjingle'].QueueBottom(smLRP, NoRules);
PAL.LockExecution;
end;

Bedankt alvast. ik ga wat oefenen hier. Waar ik van af wil is dat er zoveel palscript draaien, daarom wil ik dat in de weekloper samen voegen.

[drOhimself]

Hmmm.... wat mij opvalt aan het stukje script wat hierboven staat : er wordt niets met je muziek gedaan.
Alleen wordt er het nieuws, advertenties en hier en daar een jingle ingevoerd.

Met andere woorden : de keuze van jouw muziek wordt dus op een andere manier geregeld.
De vraag is nu : welke ?
Gebeurd dat met een andere PAL, of is het puur je Clockwheel (Playlist Rotation Rules) instelling?

Laat maar even zien hoe je dat regelt.

[Ziekenomroep]

Klopt het wordt dus wel met weekloper gedaan.

alleen staat het onderaan. ik post anders ff de hele weekloper mee.

dit is het stukje voor de playlist.

Code: Selecteer alles

// Zaterdag 23:30 uur
while DayOfWeek(Now) = Saturday  and ((Now >= T['23:29:15']) and (Now <= T['23:29:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['23:29:45']);
Queue.AddFile('C:\server\NIEUWS\LMN - Headlines.mp3',ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
PAL.LockExecution;
end;

// einde zaterdag

While Queue.Duration < QueueTime Do
begin
PAL.UnLockExecution;
Cat['RADIO WAUBACH'].QueueBottom(smLRP, EnforceRules);
Cat['JINGELS'].QueueBottom(smRandom,NoRules);
Cat['RADIO WAUBACH'].QueueBottom(smLRP, EnforceRules);
Cat['RADIO WAUBACH'].QueueBottom(smLRP, EnforceRules);
Cat['RADIO WAUBACH'].QueueBottom(smLRP, EnforceRules);
Cat['JINGELS'].QueueBottom(smRandom,NoRules);
Cat['RADIO WAUBACH'].QueueBottom(smLRP, EnforceRules);
Cat['RADIO WAUBACH'].QueueBottom(smLRP, EnforceRules);
Cat['RADIO WAUBACH'].QueueBottom(smLRP, EnforceRules);
Cat['JINGELS'].QueueBottom(smRandom,NoRules);
Cat['RADIO WAUBACH'].QueueBottom(smLRP, EnforceRules);
Cat['RADIO WAUBACH'].QueueBottom(smLRP, EnforceRules);
PAL.LockExecution;
end;
PAL.UnLockExecution;

[drOhimself]

dat verklaart een hoop...
Ik meen dat ik daar al een keer ben ingestonken... hahahaha
En wat is dan je bedoeling ?
Rond vaste tijden in enkele uren een nummer in de queue plaatsten ?
Bijv. tussen 12:00 en 16:00, iedere 20 minuten ?

[Ziekenomroep]

Heelaas ff een storing, maar inderdaad het kan kloppen dat je in het verleden daar ingedoken bent, maar wil graaghet verleden achter me laten en een nieuwe start daar er nu ook onderhandelingen zijn met omroep landgraaf (tv)

Om samen RTV Waubach/Landgraaf te maken ervan.

Ik bedoel inderdaad dat tussen 12:00 uur en 16:00 uur alleen nummers tussendoor pakt die hitgerelateerd zijn en in de nacht nummers die over night, nacht en slaap gaan. etc. in de ochtend dan weer over de morgen. maar belangrijkste is de middag momenteel. daar ik de jeugd wil gaan berijken.

Het stukje weight vond ik ook wel intresant. mocht het zijn dat deze post dubbel is sorry hiervoor. had een internet storing.

[Ziekenomroep]

Overigens was ik iets vergeten te vermelden.
in de nacht wil ik ook graag wa t meer nederlandstalig inplanne.

tussen 23.00 uur en 01.00 uur...

[Wout]

Johnny, wat verwacht je van ons?

[drOhimself]

Idd, het totaal omzetten van een weekloper, is niet helemaal de bedoeling van dit forum.
We willen je helpen met problemen die je tegenkomt tijdens wijzigingen die je doorvoert.

[Ziekenomroep]

Nee is ook niet debedoeling. ik hoef maar enkele scripts. zodat ik weet hoe het moet. de rest zal zelf heel goed lukken. maar zoek gewoon beetje de juiste script die ik eventueel zou kunne gebruiken. jullie moeten ook niet alles doen, dat is helemaal niet mijn bedoeling. mischien formuleer ik het een beetje verkeerd.

[drOhimself]

Goed, onderstaand script is een gedeelte van een weekloper, aangepast door Gerrie Kamsteeg, oorspronkelijk afkomstig van MidlandFM.
Hier wordt een uur (dinsdagochtend, van 01:00 tot 02:00 uur) gevuld met een variatie van nummers uit uiteenlopende categorien.
Indien je dit zou aanvullen voor de dagen en uren zoals jij hierboven beschreven hebt, dan moet het helemaal goed komen.
Indien je nog vragen hebt, dan zien we ze vanzelf wel weer.

Code: Selecteer alles

// WeekFormat voor Radio Vredenburg 
// Mastering PAL From MidlandFM

PAL.Loop := True;
PAL.LockExecution;
PAL.MemoryLeakWarning := True;
var s : Integer = 0;

// Dinsdag 01:00 uur	Nachtbraker

while DayOfWeek(Now) = Tuesday and ((Now >= T['00:56:00']) and (Now <= T['00:56:15'])) do
	begin
		PAL.UnLockExecution;
			var QueueTimeNachtbraker : Integer = (60*60*1100);
			PAL.WaitForTime(T['00:57:13']);
			Queue.AddFile('C:\Sound\Nachtbraker.mp3',ipTop);
			ActivePlayer.FadeTonext;
			Queue.Clear;
			Queue.AddFile('C:\Nieuws\NieuwsLMN.mp3',ipBottom);
			While Queue.Duration < QueueTimeNachtbraker do
				begin
					PAL.LockExecution;
						Cat['Nederlands'].QueueBottom(smLRPA, EnforceRules);
						Cat['Nederlands'].QueueBottom(smLRPA, EnforceRules);
						Cat['Jaren60'].QueueBottom(smLRPA, EnforceRules);
						Cat['Jingles'].QueueBottom(smRandom, NoRules);
						Cat['Jaren70'].QueueBottom(smLRPA, EnforceRules);
						Cat['Top40'].QueueBottom(smLRPA, EnforceRules);
						Cat['Nederlands'].QueueBottom(smLRPA, EnforceRules);
						Cat['Jingles'].QueueBottom(smRandom, NoRules);
						Cat['Jaren70'].QueueBottom(smLRPA, EnforceRules);
						Cat['Jaren80'].QueueBottom(smLRPA, EnforceRules);
						Cat['Jaren00'].QueueBottom(smLRPA, EnforceRules);
					PAL.UnLockExecution;
				end;
		PAL.LockExecution;
	end;

[Ziekenomroep]

Bedankt en sorry dat ik zo opdringerig overkom. maar datis echt niet mijn bedoeling. wat mij betreft mag dit topic gesloten worden. kan iemand van jullie trouwens de gebruikersnaam aanpassen?

[Wout]

Lees onderstaande link eens door.
viewtopic.php?f=81&t=2910#p18329

Dan kan je zien dat je tegenwoordig zelf je topic kan laten sluiten.