Hapering bij stream title verandering via PAL

[DareDevil85]

Elke x als er een PAL draait. met stream title wijzigingen. hapert het geluid bij de titel wijziging. wat kan ik hier aan doen?

Alvast bedankt voor het reageren.

[Ivan]

Elke x als er een PAL draait. met stream title wijzigingen. hapert het geluid bij de titel wijziging. wat kan ik hier aan doen?

Telkens als je de streamtitel verandert in je encoder maakt deze weer opnieuw verbinding met de server.
Dat geeft dus die hik.
Het wijzigen van streamtitels zul je dus anders moeten organiseren.

[Borg]

Telkens als je de streamtitel verandert in je encoder maakt deze weer opnieuw verbinding met de server.
Dat geeft dus die hik.

Lijkt me sterk, bij verandering van plaat veranderd ook de title die meegestreamd wordt
en dan haperd hij ook niet..


Jos

[Kees]

Inderdaad..het wijzigen van tekst in de encoder heeft hier niets mee te maken.
Zet eens wat meer gegevens online.
Welke encoder je gebruikt en welke codec in de encoder en de bitrate.

[DareDevil85]

ACM Encoder 128kb, 48kHz

Maar ik heb het met elke encoder. want ik heb ook een tijdje aacplus op 48kb, 44khz en normale mp3 encoder 128kb, 44khz in combi. maar elke x heeft ie dit. en ik heb ook nog de WMA codec gedraait.

[Kees]

Naar wat voor server stream je naar toe ?

[DareDevil85]

Shoutcast. V1.9.8

[Kees]

Kan het daar niet aan liggen..tenzij je zoveel luisteraars hebt dat je upload "vol" is.
Zet je PAL script eens online !

[DareDevil85]

Nou aan het overvol aan luisteraars ligt het niet.

En het palscript heb ik van dit forum gehaald.
Hij werkt wel maar dat haperen tijdens titel wisselen is zwaar hinderlijk.

Code: Selecteer alles

PAL.Loop := True; 

var Song : TSongInfo; 

PAL.WaitForTime('+00:05:30');

Song := TSongInfo.Create; 
Song['artist'] := 'Je luister naar GeForceFM ';
Song['title'] := 'www.geforcefm.nl';
Encoders.SongChange(Song); 
Song.Free; 

PAL.WaitForTime('+00:00:35'); 

if ActivePlayer <> nil then 
Encoders.SongChange(ActivePlayer.GetSongInfo);

[Borg]

Zou niet weten wat het probleem kan zijn, zie wel 2x PAL wait for time, klopt dat wel ?

Ik gebruik(te) onderstaande PAL naar volle tevredenheid, misschien iets om te testen..

Code: Selecteer alles

{ ABOUT:
    Script to change title displayed in listener's streaming player.
    This script will read a banner text source file to get a list of
    messages to display, then switch between the normal song information
    and the banner text on regular intervals.
    
    Not only does this make for a more interesting experience for listeners,
    it also prevents stream rippers from being able to make copies of your
    tracks.
    
  USAGE:
    a) Create a normal plain text file and type your banner messages into this file.
       Each new line should contain one new banner message.
    b) Change the configuration settings below to point to your file and
       specify the interval to wait between changes.
}
    
{ CONFIGURATION }
{==================================================}
const bannertext_file = 'C:\Program Files\SpacialAudio\SAMBC\PAL\BannerText.txt';
const change_interval = '+00:00:45';
{==================================================}


{ IMPLEMENTATION }
{--------------------------------------------------}
var CurSong : TSongInfo;
var UpdSong : TSongInfo;
var Banners : TStringList;
var Toggle  : Boolean = True;
var LinePos : Integer = 0;

{Set this script to restart itself}
PAL.Loop := True;

{ Create some objects that we will need}
UpdSong := TSongInfo.Create;
Banners := TStringList.Create;

{ Load banner lines into stringlist object }
if FileExists(bannertext_file) then
 Banners.LoadFromFile(bannertext_file)
else
 WriteLn('Banner source file does not exist!');
 
LinePos := 0;
while (LinePos<Banners.Count) do
begin
  {Wait for specified time}
  PAL.WaitForTime(change_interval);
  
  {Retrieve the current banner line and assign it to song object}
  UpdSong['title'] := Banners[LinePos];
  
  {Tell encoders to update song information:
    When Toggle is True, we use the normal song information from
    the active player - otherwise we use our banner song object
  }
  Toggle := not Toggle;
  if Toggle then
   begin
    CurSong := ActivePlayer.GetSongInfo;
     Encoders.SongChange(CurSong);
    CurSong.Free;
   end
  else
    Encoders.SongChange(UpdSong);

  {Move to the next line in the banner file before we continue}
  LinePos := LinePos + 1;
end;

{Destroy objects once we no longer need them}
Banners.Free;
UpdSong.Free;
{--------------------------------------------------}

Hier een voorbeeld banner.txt

Code: Selecteer alles

Je luister naar GeForceFM
Kijk meer info op www.geforcefm.nl
De beste muziek hoor je hier op GeForceFM 
 

In dit voorbeeld zal hij om de 45 seconden 1 regel tekst laten zien en je kunt
dus 1 of meer regels ingeven..


Jos

[DareDevil85]

Datzelfde palscript gebruikte ik ook. maar precies hetzelfde probleem.

[DareDevil85]

Ik heb het probleem gevonden. bij de encoder had ik altijd allow stream scripts. ingeschakeld gehad.
Sinds die uitgevinkt staat. geen problemen meer gehad.

Wilde ik even melden. thnx voor de nodige info