ОсновноеRadiotalkПользовательское
Технологии вещания, софт, скрипты
7   •   Посмотреть все темы

Скрипт джингл через определенное количество треков

 

86
Dakar @Dakar
@reboot cd /home/icecast/; /usr/local/bin/icecast -b -c icecast.xml & >/dev/null 2>&1
sleep 5
@reboot cd /home/icecast/; /usr/local/bin/ices -c ices.conf

Sleep - значение в чем измеряеться ?

0
86
Dakar @Dakar
о как О_о ices не запускаеться от другого пользователя О_О только из под рута

0
86
pusik @pusik
еще кто нибудь поделился бы модулем заказа песен под icecast2+ices было бы вообще шикарно)

0
833
metra52 @metra52
ну его писать придется самому с использованием MySQL

0
86
pusik @pusik
metra52 пишет:

ну его писать придется самому с использованием MySQL

я понимаю, может кто уже писал, чтоб не изобретать велосипед)

0
86
Dakar @Dakar
tarasian666 пишет:

можно, просто там где в модуле есть "о тегах" "ретурнить" пустую строку

Этьо ф конфиге ? просто я его немного почистил можно пример


а всё понял добавил суб на получение титла

Отредактировано Dakar - 13.02.2011
0
11
Louie @Louie
Извинитеч что поднимаю эту тему заного, но у меня какой то глюк с перл скриптом.
Вроде всё работает, джинглы проигрываются как надо, но после проигрывания джинла снова начинает играть та песня которая была до джинла и потом идет без повтора, до очередного джингла .. в чём причина может быть.


И еще один вопросик , как выключить рандом??
тег в ices.conf
<Randomize>0</Randomize>
прописан, но он всё равно играет рандомно..

0
6245
Тарас @tarasian666
рандум в скрипте задан
начсет повтора - может быть, скрипт не идеален, написан на быструю руку, чтоб показать вам как это делаеться, дальше сами )

0
11
Louie @Louie
так. а как его убрать из скрипта?

$play=int(rand($num));

я так понял эта строчка за это отвечает. С перлом я вообще не дружу, поэтому и прошу о помощи.

0
86
pusik @pusik
Попробуй так.

  1. $play=int($num);

не уверен!

0
6245
Тарас @tarasian666
ну мануал в руки и вперед, я ведь тоже так делал )
лишиться рандума в этом скрипте не обойдеться изменением одной строчки

Добавлено спустя 45 секунд:
pusik пишет:

Попробуй так.

  1. $play=int($num);

не уверен!

ничего хорошего из этого не выйдет ))

0
11
Louie @Louie
Гхм... интересно. Какой именно мануал? тыкните пальчиком +)

Вот блин. Из-за рандома, надо половину и-нета пролистать +)) а заменить надо будет как всегда 1 или 2 строчки +)

0
6245
Тарас @tarasian666
Louie пишет:

Гхм...  интересно. Какой именно мануал? тыкните пальчиком +)

забанили в гугле? ищите мануал по языке perl
Louie пишет:

Вот блин. Из-за рандома, надо половину и-нета пролистать +)) а заменить надо будет как всегда 1 или 2 строчки +)

ну если вы такой умный то заменяйте )) но скажу вам что 2мя строчками точно не обойдеться, обойдеться где-то в 3 ))

0
11
Louie @Louie
tarasian666 пишет:

Louie пишет:

Гхм...  интересно. Какой именно мануал? тыкните пальчиком +)

забанили в гугле? ищите мануал по языке perl
Louie пишет:

Вот блин. Из-за рандома, надо половину и-нета пролистать +)) а заменить надо будет как всегда 1 или 2 строчки +)

ну если вы такой умный то заменяйте )) но скажу вам что 2мя строчками точно не обойдеться, обойдеться где-то в 3 ))

Спасибо!!!! +) замучался правдо, зато работает +) спс за подмогу !

0
3
Victor @zanshee
Застрял на той-же описанной ранее ошибке:

Logfile opened
Initialization of playlist handler failed. []
Ices Exiting...

ices.conf вот (искомый кусок):

Показать текст


сам /usr/local/etc/modules/ices.pm вот (полностью):

Показать текст


помогите пожалуйста! Кто как решил эту проблему? Вы-ж так ничего и не написали толком.. :(

0
6245
Тарас @tarasian666
<Module>ices.pm</Module> надо без .pm

0
3
Victor @zanshee
Спасибо, всё получилось, дальше буду курить мануал по perl.

Меня просто сбила с толку эта фраза:
tarasian666 пишет:

<Module>ices</Module> - название файла скрипта должно в таком случае быть ices.pm

..теперь только понимаю что фразу можно понять двояко, а не только так как я её понял. :)

0
7094
Dim @Render
Louie пишет:

tarasian666 пишет:

Louie пишет:

Гхм...  интересно. Какой именно мануал? тыкните пальчиком +)

забанили в гугле? ищите мануал по языке perl
Louie пишет:

Вот блин. Из-за рандома, надо половину и-нета пролистать +)) а заменить надо будет как всегда 1 или 2 строчки +)

ну если вы такой умный то заменяйте )) но скажу вам что 2мя строчками точно не обойдеться, обойдеться где-то в 3 ))

Спасибо!!!! +) замучался правдо, зато работает +) спс за подмогу !

Хоть бы отписался, как удалось рандом убрать правильно.
Не выходит его снести. :/

0
7094
Dim @Render
Может кто из знающих Perl помочь, подсказать ?
Как заменить этот рандом на последовательную подстановку числа ?
То есть чтобы цифры подставлялись последовательно от 1 до N. Где N = $num (то есть кол-во строк[файлов])
И ещё. Дойдя до числа $num, последнего номера строки (последнего файла из списка), происходил повтор всего цикла, то есть от 1 и снова до значения в переменной $num.
Курение perl и гугление циклов - не помогают решить задачу. :(


//upd
Уже не нужно. Ices и perl - фтопку.

Отредактировано Render - 07.07.2011
0
10
radchuk007 @radchuk007
Здравствуйте. В теме добрый человек поделился скриптом для автоматического воспроизведения джиинглов через определённое количество треков. Кто может помочь усовершенствовать скрипт? Работу оплатим.
Нужно добавить ещё 4 переменные в этот скрипт, сейчас там одна - джинглы. Нужно что бы через определенное количество треков можно было запускать в эфир анекдоты, записанные программы и т.д. Идея та же что и со джинглами, но расширенная. Кто разбирается в Perl, откликнитесь, пожалуйста, если всё получиться, скрипт опубликую здесь, я думаю это многим будет полезно.

0





Согласие на обработку данных на нашем сайте

Продолжая просматривать страницу, вы соглашаетесь с использованием файлов «Cookie» и с Политикой конфиденциальности «Privacy».
Наверху или внизу страницы вы можете изменить валюту и язык по умолчанию. Английская версия сайта ещё находится в доработке и доступна не полностью.