Promos via PAL script Nummers weg

[frank12]

Hoi beste mensen

Ik draai met sam 3 op dit moment. Nu heb ik d eplaylist gewoon lopen.
Ik heb een PAL script die promotie nummers om de 12 playlist nummers een prmo nummer boven in de Queue zet.
Ik heb de nummers voor de playlist in content/music(all) staan.
De Promotie nummers in content/promos(all) staan.
Dit alles loopt goed.

Ma als de PAL script 1 nummer in de Queue zet en die word afgespeeld en ik refresh de music(all)map dan ben ik de zojuist afgespeelde promotie nummer kwijt uit deze lijst.
De promotie nummer moet wel in de music(all) map zitten want daar haald de samhtmweb ook de nummers weg.

Hier onder de PAL script die ik heb lopen:

Code: Selecteer alles

{Basic use}
{##########################}

{ This script shows how to Enforce playlist rotation rules on Station IDs.
Generally these rules can not be enforced simply because most stations only
have a few IDs in rotation and can thus not satisfy the rules.

In this script we lower the required minimum times to better suit Station IDs.
After we are done we put them back to their original values.
}

procedure PutSweeper(Category : String);
var
 OldArtist, OldSong : Integer;
begin
  OldArtist := PlaylistRules.MinArtistTime;
  OldSong := PlaylistRules.MinSongTime;
  
  PlaylistRules.MinArtistTime := 0;
  PlaylistRules.MinSongTime   := 10;
  
  CAT[Category].QueueTop(smLemmingLogic,EnforceRules);
  
  PlaylistRules.MinArtistTime := OldArtist;
  PlaylistRules.MinSongTime   := OldSong;

end;

PAL.Loop := True;
PAL.WaitForPlayCount(3);
PutSweeper('Promos (ALL)');





WriteLn('[=== THE END ===]');

{== Helper Function ==
DO NOT CREATE YOUR OWN FUNCTIONS (YET...)
They *might* cause SAM2 to FREEZE!
}
procedure WriteTime(A : DateTime);
begin
 WriteLn(TimeToStr(A));
end;

{IGNORE THESE!}
Cat.Free;
Dir.Free;
SubDir.Free;

{=== [ THE END ] ===}

Ik hoop dat ik zo duidelijk ben geweest. Zoniet zeg het even en ik probeer naders uit teleggen.
Voor alle eventuele reactie's of oplossingen al vast mijn dank.

Groet Frank

[Kees]

Hallo frank12, welkom op het forum.
Ik hoop dat ik je verhaal inderdaad goed begrijp.
Wil je uit een bepaalde categorie (b.v. Promo nummers) om de 12 platen een nummer laten draaien voorafgegaan door een sweeper uit de categorie ('Promos (ALL)'); ?
Is dat hetgeen wat je bedoeld ?

[frank12]

Hoi kees

Ik wil dus dat de playlist gewoon door blijft lopen en dat de PAL script dan om de 12 nummer 1 nummer uitde map promos(all) haald en dan die dan boven in de Queue zet.
Dit alles doet het ook wel en loopt ook wel goed. Maar als de promo nummer gedraait is en ik refresh de music(all) map dan is het zojuist afgespeelde promo nummmer uit de map music(all).
In dir is niet de bedoeling want de promo nummers moet ook aan gevraagt kunnen wordne door de luisteraars.

En wat jij bedoelt met voorafgaande door een sweeper dat snap ik niet.

[Kees]

Ik denk dat je met jou bedoelingen een totaal verkeerd PAL script gebruikt.
Je kan in jou geval het beste met de clockwheel draaien.
Uitleg hierover vindt je ruimschoots op het forum.
Wat betreft de promos..daar is wel een PAL script voor nodig.
Dit PAL script moet je daarvoor gebruiken.

Code: Selecteer alles

PAL.WaitForPlayCount(12);
Cat['Promos (All)'].QueueTop(smRandom, NoRules);

Suc6 !

[frank12]

Ik ben bezig om al mijn muziek in groepen tezetten. ma dit is ene heel karwei met ruim 40.000 nummers die getagt, op bitrate zetten da sheel werkje. Daarom werk ik nog niet met een clockweel.

Ma die PAL script die je liet zien kan ik die gewoon met de extensie .PAL opslaan en dan laden in de PAL module van sam. Want is wle lekker kort PAL scriptje dan as dit zo gaat.

ga het eens proberen bedankt voor je hulp alvast.

groet frank

[frank12]

Heej Kees

Zover ik nu kan zien werkt dit PAL scriptje na behoren en zo tezien laa thij de nummer sook nu in d eplaylist staan.

Nog maals bedankt voor de script.

groet

[frank12]

heej kees

De PAL script werkt verde goed. Hij laat nu de nummers in de playlist staan.

Ma alleen stopt de scirpt elke keer als hij 1 promo nummer in de Queue zet.

Ma ik weet niet welke regel ik moet toevoegen om hem door telaten lopen.

Groet Frank