Скрипти PAL для Sam Broadcaster - Радіомовлення

Скрипти PAL для Sam Broadcaster

Для початку відкриваємо вкладку Playlist

Далі потрібно завантажити сам PAL-скрипт. Відкриваємо вікно PAL Scripts, тиснемо на + у вікні ставимо галочку як показано на скріншоті (для автозапуску). Потім вибираємо місце зберігання скрипту та вантажимо його.

PAL. Loop: = True; // скрипт буде виконуватися постійно PAL. WaitForPlayCount (5); // ставимо затримку на 5 треків//вибираємо випадковий трек зі "Station IDs" і ставимо його вгору черги CAT ['Station IDs (All)']. QueueTop (smRandom, NoRules);

Якщо хтось не знає - вставити в блокнот і зберегти у форматі .pal

Цей скрипт вставлятиме через кожні 30 хвилин

var Song: TSongInfo;

//скрипт буде виконуватися постійно (багаторазово) PAL. Loop: = True; //ставимо затримку на 30 хвилин PAL. WaitForTime ('+00:30:00'); //вибираємо трек навмання Song := CAT [ 'Station IDs (All)' ]. ChooseSong (smRandom, NoRules); //додаємо його на початок черги Queue. Add (song, ipTop);

var Song: TSongInfo; var P: TPlayer;

PAL. Loop: = True; // скрипт буде виконуватися постійно PAL. WaitForTime ('+00:10:00'); // Затримка 10 секунд

P: = SoundFX; // через що грати if P <> nil then begin Song := CAT [ 'Каталог' ]. ChooseSong (1, NoRules); if Song <> nil then begin P . QueueSong (Song); // P. Play; end; end;

var P: TPlayer; var Song: TSongInfo; var strFile, strPath, strJingle: String;

strPath := 'C:\CLOCK\'; // Шлях до папки, де лежать відбивання годин strJingle := ' C :\ CLOCK \ start_hour . mp3'; //Шлях та назва джингла після відбивання годинника

PAL.WaitForTime('XX:59:15'); //запускаємося внаприкінці кожної години. 45 сек - час буферезації, підбираємо за своїми параметрами, смаками

strFile := strPath + FormatDateTime('hh', now+1/24) + '- 00.mp3'; // Визначаємо назву файлу з потрібним годинником. Формат імені файлу XX-XX.mp3

P := Aux1; if P <> nil then begin

Queue.AddFile(strJingle, ipTop); Queue.AddFile(strFile, ipTop);

P := ActivePlayer; if P <> nil then P.FadeToNext;

var strFile, strPath: String; var P, F: Tplayer;