Note that this Wiki is a work in progress, items may not be updated or may disappear entirely as the pages are updated.

Playing Station IDs and Advertisements LOUDER than normal music

From SpacialAudio

Jump to: navigation, search

Script to make Promos, Advertisements and Station IDs play LOUDER than normal music

{Volume: 0..255}
const VOL_NORMAL = 200;
const VOL_LOUD   = 250;
PAL.Loop := True;
var P : TPlayer;
var Song : TSongInfo;
var WaitForPlay : Boolean;
P := QueuedPlayer;
if P <> nil then
begin
WaitForPlay := True;
Song := P.GetSongInfo;
case Song['songtype'] of
 'S' : P.Volume := VOL_NORMAL;
 'I','P','J','A','N','V','X' : P.Volume := VOL_LOUD;
 else P.Volume := VOL_NORMAL;
end;
end
else WaitForPlay := False;

while WaitForPlay do
begin
WaitForPlay := False;
PAL.WaitForPlayCount(1);
end;
Personal tools