Re: Скрипты PAL для Sam Broadcaster
Есть скрипт:
var Song : TSongInfo;
var P : TPlayer;
PAL.Loop := True;
PAL.WaitForTime('+00:10:00');
P := SoundFX;
if P <> nil then
begin
Song := CAT['Station IDs (All)'].ChooseSong(smRandom,NoRules);
if Song <> nil then
begin
P.QueueSong(Song);
P.Play;
end;
end;
Нужно сделать следующее:
Скрипт проверяет длительность трека (duration) играющего в деке, если он не короче 1 минуты и не длиннее 30 минут, то выполняется.
Помогите реализовать, буду очень признателен
Отредактировано KyPIIaToB (17-05-2011 01:31:09)
Re: Скрипты PAL для Sam Broadcaster
Народ помогите.
1.Нужен скрипт который бы запускал на 1 час определённого артиста/группу.
2.Нужен скрипт который бы запускал на 1 час определённое направление музыки например Trance, Drum&bass и т.д.
Re: Скрипты PAL для Sam Broadcaster
http://support.spacialaudio.com/wiki/PA … anguage%29
Re: Скрипты PAL для Sam Broadcaster
пишет KyPIIaToB:
Есть скрипт:
var Song : TSongInfo; var P : TPlayer; PAL.Loop := True; PAL.WaitForTime('+00:10:00'); P := SoundFX; if P <> nil then begin Song := CAT['Station IDs (All)'].ChooseSong(smRandom,NoRules); if Song <> nil then begin P.QueueSong(Song); P.Play; end; end;
Нужно сделать следующее:
Скрипт проверяет длительность трека (duration) играющего в деке, если он не короче 1 минуты и не длиннее 30 минут, то выполняется.
Помогите реализовать, буду очень признателен
Ну же, ребятки) Нужна помощь)
Отредактировано KyPIIaToB (17-05-2011 01:31:28)
Re: Скрипты PAL для Sam Broadcaster
Ну вот, вроде как сам попробовал сделать. Если что криво в коде прошу поправить, но нужную функцию с нужными правилами теперь выполняет.
var Song : TSongInfo;
var P : TPlayer;
PAL.Loop := True;
PAL.WaitForTime('+00:10:00');
if(ActivePlayer.Duration>60000) AND (ActivePlayer.Duration<1800000) then
begin
P := SoundFX;
if P <> nil then
begin
Song := CAT['Station IDs (All)'].ChooseSong(smRandom,NoRules);
if Song <> nil then
begin
P.QueueSong(Song); //
P.Play;
end;
end;
end;
Re: Скрипты PAL для Sam Broadcaster
Подскажите плз что прописать в правилах выбора трека для скрипта проигрывания джингла, чтобы выбор трека был не рэндомом а по порядку. Т.е. сначала играет 1-й потом 2-й и.тд
Заранее премного благодарен за помощь.
Re: Скрипты PAL для Sam Broadcaster
Где скачать программу schedule для сема,что бы было рассписание у него,киньте плииз ссылку
Re: Скрипты PAL для Sam Broadcaster
пишет maxon:
Где скачать программу schedule для сема,что бы было рассписание у него,киньте плииз ссылку
Вообще то это опция в самом SAMе
http://support.spacialaudio.com/wiki/Event_Scheduler
Re: Скрипты PAL для Sam Broadcaster
есть такой вот скрипт
PAL.Loop := True;
PAL.WaitForTime('XX:59:55');
Queue.Clear;
Cat['News_1'].QueueTop(smLemmingLogic, noRules);
ActivePlayer.FadeToNext;
соответственно в 59:55 каждого часа делает некое действие, а как сделать чтобы он это делал в 59:55 каждого второго часа?
Re: Скрипты PAL для Sam Broadcaster
пишет Greenhed:
есть такой вот скрипт
PAL.Loop := True;
PAL.WaitForTime('XX:59:55');Queue.Clear;
Cat['News_1'].QueueTop(smLemmingLogic, noRules);
ActivePlayer.FadeToNext;соответственно в 59:55 каждого часа делает некое действие, а как сделать чтобы он это делал в 59:55 каждого второго часа?
PAL.WaitForTime('01:59:55');
Не уж то так тяжело догадаться)
Re: Скрипты PAL для Sam Broadcaster
KyPIIaToB
эээ... он будет ждать когда наступит 1:59:55 и в это время проигрывать. а мне нужно чтобы он проигрывал в 0, 2, 4 и т.д.
Re: Скрипты PAL для Sam Broadcaster
что то даже затрудняюсь ответить как через скрипт сделать, попробуй через шедулер.
Re: Скрипты PAL для Sam Broadcaster
Друзья в Voice FX есть Config(конфигурацию регуляторы и т.п. для микрофона) пожалуйста пришлите кто нибудь самы нормальные и оптимальные настройки,я понимаю что у всех разные микрофоны но хоть какие нить такие норм настроечки)))Благодарен заранее
Добавлено спустя 1 минуту 20 секунд:
Добавлено спустя 25 секунд:
Лучше если вышлите скрин что бы посмотреть и настроить
Re: Скрипты PAL для Sam Broadcaster
Благодарю! Пока не нашел ответов на следующие вопросы, может кто знает...
1. Как запустить последний трэк в категории?
2. Как отобрать рандомом трэки, сумма продолжительности которых не будет превышать 1 час?
3. Как запустить трэйк, который ни разу не проигрывался, тобишь у которого Play Count в деталях равен 0?
4. Как запустить файл с самой поздней датой создания из папки в ротацию?
Еще один решил корректировать сообщение...
5. Как добавить трэки из директории в определенную категорию и что бы без повторов? Либо какая команда в PAL для удаления дубликатов?
Спасибо за любой ответ
Re: Скрипты PAL для Sam Broadcaster
пишет Greenhed:
эээ... он будет ждать когда наступит 1:59:55 и в это время проигрывать. а мне нужно чтобы он проигрывал в 0, 2, 4 и т.д.
Если ты запустишь этот скрипт в 0:00 то получишь каждые 2 часа действие, следовательно в 0,2,4 и т.д.
PAL.Loop := True;
PAL.WaitForTime('02:00:00');
Re: Скрипты PAL для Sam Broadcaster
А как пал-скриптом перечитать теги у всех песен в категории? Что-то не нахожу (
Re: Скрипты PAL для Sam Broadcaster
VladokZzz а если я не успел его в 0:00 запустить? плохая идея. Сделал шедулером стандартным
Re: Скрипты PAL для Sam Broadcaster
пишет Greenhed:
VladokZzz а если я не успел его в 0:00 запустить? плохая идея. Сделал шедулером стандартным
Это был пример!Если ты запустил в 12 ночи...с интервалом в каждые два часа,то ровно через два часа,с точностью до секунды,будет включатся:)
Re: Скрипты PAL для Sam Broadcaster
JamStyle
еще раз. Мне не нужно раз в два часа с отсчетом от какого-то времени. Мне нужно нужно строго в 59:55 каждого второго часа
Re: Скрипты PAL для Sam Broadcaster
пишет Greenhed:
JamStyle
еще раз. Мне не нужно раз в два часа с отсчетом от какого-то времени. Мне нужно нужно строго в 59:55 каждого второго часа
if (OldTime>T ['06:00:00']) думаю проши воспользоваться такими методами, расписывайте скрипт на каждое время когда хотите запускать.
Re: Скрипты PAL для Sam Broadcaster
Народ нужен скрипт который пробежался бы по всем песенкам и удалил песни длиннее 20мин.
Подскажите плиз.
Re: Скрипты PAL для Sam Broadcaster
У меня по проще задача, но никак не могу найти решение.
Есть несколько передач разбитых на несколько файлов. Соединять их в один файл не кошерно, потому что будут писаться ещё так же разбитые.
Задача:
В определённой папке, рандомом выбрать одну любую папку и запихать всё её содержимое в queue (в идеале с сортировкой по дате).
либо
В определённой папке выбрать один файл с плейлистом m3u и запихать его в queue
______________
ни то ни другое пока осуществить не удаётся, не ужели я первопроходец)
Есть вот такой скрипт, но он в queue закидывет пустышку с названием листа, вместо содержимого и не проигрывает его.
var List : TSongInfo;
PAL.Loop := True; //скрипт будет выполнятся постоянно(многократно)
PAL.WaitForPlayCount(1); //ставим задержку на треки
List := Dir['D:\dir\mp3\m3u'].ChooseSong(smRandom,NoRules); //выбираем трек наугад
//добавляем его в начало очереди
Queue.Add(list,ipTop);
Отредактировано Nikem79 (28-06-2011 09:58:40)
Re: Скрипты PAL для Sam Broadcaster
Подскажите пожалуйста скрипт который выводит заказанную песню и сам заказ,где то читал об этом но не понимаю как и куда прописывать