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

04.10.2011

У кого получилось реализовать?
Нужно запускать в определенное время из определенной папки, НО что бы добавлялись трэйки пока не пройдет 1 час с начала запуска.
То бишь есть 3 трэйка по 20 минут, нужно что бы в 20:00 запустился рандомный трэк, а потом шла проверка прошел ли час, если нет (а по факту всего 20 минут прошло) и добавлялся следующий из папки. Получается 3 раза.
Трэки могут быть любой продолжительности.
По истечении 1 часа добавление из папки прекращается.
Спасибо за внимание!

04.10.2011

и что тут такого сложного?
делаем по типу (синтаксис не помню точно)
Loop
PAL.WaitForTime( 20:00) - ждем 20.00
запускаем трек
PAL.WaitForTime (+1:00) - ждем час
запускаем трек

другий скрипт из другой папки

04.10.2011

**********

05.10.2011

Дак надо удалить лишние если они больше часа занимают... получается через час надо делать очистку всего queue и добавлять снова трэки основной ротации?

Пришлось сделать так:
1. Подходит время 20:00 идет очистка Queue
2. Добавление всех трэков из папки
3. Запуск шафла этих песен в Queue
4. Проходит 1 час Идет очистка
5. Добавление трэков основного потока
6. Шафл на них в Queue
Работает, но мне кажется есть способ корректнее )

05.10.2011

VladokZzz Я тебе дал выше постом тему, там есть скрипт.

23.10.2011

Народ подскажите скрипт который будет перемешивать треки в Queue

23.10.2011

изначально неправильно мыслите, их надо "рандумно" добавлять в queue, а не добавлять и потом перемешивать

23.10.2011

да да именно так, у меня есть скрипт который делает так, если 2 деки свободны он берет целый плейлист и воспроизводит, хотелось бы чтобы треки мешались

24.10.2011

ап

10.11.2011

Queue.Shuffle;

Добавлено спустя 1 минуту 27 секунд:
Может нашелся смельчак? Какой код для отслеживания кол-ва раз проигрывания? К примеру хочу включать трэйки, которые меньше всего раз проигрывались.

14.11.2011

Народ подскажите как можно реализовать например рандомный трек из категории CAT['New'], но перед этим проиграл джингл, итак каждый раз когда из этой категории загружается трек?

14.11.2011

джингл определенный?

14.11.2011

да, определённый

14.11.2011

1. var Song : TSongInfo;
2. PAL.Loop := True;
3. Queue.AddFile('C:\jingl.mp3',ipTop); // путь до джингла
4. Song := CAT['CAT (New)'].ChooseSong(smRandom,NoRules);
5. Queue.Add(song,ipTop);
6. PAL.WaitForTime('+00:20:00'); //ожидаем до повтора

Не проверял, но должно быть все ок, если что пиши

14.11.2011

Спасибо большое, работает

27.11.2011

Добавлено спустя 1 минуту 27 секунд:
Может нашелся смельчак? Какой код для отслеживания кол-ва раз проигрывания? К примеру хочу включать трэйки, которые меньше всего раз проигрывались.

ап

27.11.2011

На сколько я знаю в базе отмечается сколько какой трек был проигран. Бери и выводи себе табличку для удобства.

27.11.2011

Вывести то не проблема на уровне PHP, а на уровне SAM как?
У меня идет ротация шафлом, какие-то трэки проигрались раз 15, а какие-то 1-2 раза. Это не есть хорошо.

17.12.2011

Есть скрипт, который постоянно выпускает джинглы:

PAL.Loop := True;
PAL.WaitForPlayCount(1);
PAL.WaitForTime('+00:02:00');
CAT['Station IDs (All)'].QueueTop(smLRPA, NoRules);

Как его отключать в определённые часы? К примеру в воскресенье с 16:00:00 до 16:50:00 и в понедельник с 0:00:00 до 0:50:00, чтобы в это время он не втсавлял джинглы после каждого трека?
Спасибо!

18.12.2011

Только с помощью добавления правила по типу

if ((now >= T['18:00:00']) and (now <= T['18:00:30']) and (DayOfWeek(Now) = Wednesday)) or
((now >= T['18:00:00']) and (now <= T['18:00:30']) and (DayOfWeek(Now) = Friday)) then
begin

Это просто пример.