Титлы в SAMBC!

const change_interval = '+00:00:20';
const endinterval = '+00:00:12';

var CurSong : TSongInfo;
var UpdSong : TSongInfo;
var Toggle  : Boolean = True;
var LinePos : Integer = 0;
var NextSong : String;

PAL.WaitForTime(change_interval);

{Зацикливаем скрипт}
PAL.Loop := True;

UpdSong := TSongInfo.Create;
Toggle := not Toggle;
if Toggle then
begin
  CurSong := ActivePlayer.GetSongInfo;
  Encoders.SongChange(CurSong);
end;

UpdSong['title'] := 'СуперШОУ - Вася Пупкин и Боря Моисеев в студии';
Encoders.SongChange(UpdSong);
PAL.WaitForTime(endinterval);

Toggle := not Toggle;
if Toggle then
begin
  CurSong := ActivePlayer.GetSongInfo;
  Encoders.SongChange(CurSong);
  CurSong.Free;
end;

UpdSong.Free;