 |
|
Модераторы: korob2001, ginnie |
 
|
|
Perl Скрипт, Скрипт проигрывания музыки 
| Badmne |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 16 Регистрация: 4.4.2011 Репутация: нет Всего: нет |
хорошо. А можно сделать, чтобы просто в определенное время играла музыка из другой папочки? Ведь с джинглами получилось, только там была зависимость от кол-ва песенок, а нельзя сделать зависимость от времени?
|
|||
|
||||
Загрузка ...
| arto |
|
|||
|
Эксперт  Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
что делать, если в определенное время уже играет музыка?
как ее прервать? как ее восстановить после проигрывания музыки из другой папки? или -- определяем перед каждым проигрыванием длину файла, и вычисляем, сколько он может играть. как запустить на проигрывание только части файла? |
|||
|
||||
| Badmne |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 16 Регистрация: 4.4.2011 Репутация: нет Всего: нет |
Ну скрипт который я предоставил, он сам обрывает песенку и включает другую из указанной папки. Следовательно в нём лежит информация, как останавливать музыку.
|
|||
|
||||
| arto |
|
|||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
вы его подробно прокомментируйте, и я, если будет время, прочитаю
|
|||
|
||||
| gcc |
|
|||
 Агент алкомафии Профиль Группа: Участник Сообщений: 2691 Регистрация: 25.4.2008 Где: %&й Репутация: 1 Всего: 17 |
Badmne, Вам сюда: http://forum.vingrad.ru/forum/Vingrad-help-center.html
Это сообщение отредактировал(а) gcc - 5.4.2011, 22:16 |
|||
|
||||
| Badmne |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 16 Регистрация: 4.4.2011 Репутация: нет Всего: нет |
arto, кого именно прокоментировать? Я в скриптах не очень. Код который я выложил добавляем в програмку которая работает под Виндовсом и там всё происходит само. Значит в тех строчках всё прописано. Вот я и думал, поскольку там другой язык, то возможно ли его перевести на пэрл язык?
|
|||
|
||||
| arto |
|
|||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
для того, чтобы понять, что надо сделать, надо смотреть на вашу систему, а это займет время.
|
|||
|
||||
| Badmne |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 16 Регистрация: 4.4.2011 Репутация: нет Всего: нет |
хм... и как Вам в этом помочь? что необходимо?
|
|||
|
||||
| arto |
|
|||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
50€/hour
вам ведь еще fade понадобится для прерванного фрагмента? |
|||
|
||||
| Badmne |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 16 Регистрация: 4.4.2011 Репутация: нет Всего: нет |
Так.. нашел в интернете, что можно использовать скрипт который вы уже написали, но дополнить его. суть такова:
Такое реально сделать? |
|||
|
||||
| arto |
|
|||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
как ловить сигнал? как я понимаю, у вас embedded perl.
в предложенном решении нет понятия fade (приглушения), музыка будет рваться резко. так что все равно надо будет вашу систему изучать. |
|||
|
||||
| Badmne |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 16 Регистрация: 4.4.2011 Репутация: нет Всего: нет |
"оборваться" не даст сервер.
Так скажем это транслятор, который выполняет скрипты. А сервер плавные переходы делает. Поэтому может сделать чтобы он обрывал их? |
|||
|
||||
| arto |
|
|||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
какие сигналы он ловит?
как он прерывает музыку? после прерывания он вызывает ices_get_next? |
|||
|
||||
| Badmne |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 16 Регистрация: 4.4.2011 Репутация: нет Всего: нет |
всё что он ловит, было написано в скрипте указанном выше..
а подробнее я не скажу , т.к. не знаю эту программу так досканально. Ну скорей всего ices_get_next, в том то скрипте он этот сигнал цепляет? |
|||
|
||||
| arto |
|
|||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
все упирается в то, что в любом случае надо смотреть, как ваша система работает.
Добавлено через 11 минут и 2 секунды sub ices_get_next { my ($h, $m, $s) = ( localtime )[2,1,0]; if ($h == 12 && $m == 55 && $s == 0) return ( </home/gguser/radio/other_muzika/*.mp3> )[0]; return shift @mp3; } |
|||
|
||||
|
|
| Правила форума "Perl" | |
|
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Perl: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.0839 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |