Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Старожил


Сообщения: 415
Благодарности: 257

Профиль | Отправить PM | Цитировать


Для работы скрипта нужен wget и grep. Умеет как добавлять строку с радио в m3u-плейлист, так и заменять UID в уже существующей. Не забудьте поменять имя плейлиста на ваше, и, если в плейлисте используется юникод - сохранить скрипт в UTF-8 без BOM.

Код: Выделить весь код
@Echo Off
SetLocal EnableDelayedExpansion
Set Playlist=playlist.m3u

:: Получаем страницу и вытягиваем UID
For /F "tokens=2 delims='" %%A In ('bin\wget "http://www.radiodacha.ru/player.htm" -O-^|bin\grep -Eo "uid: '[0-9A-Z]{32}'"') Do (Set UID=%%A)

:: Вписываем требуемое значение в m3u-плейлист
Find "radiodacha.ru" "%Playlist%">nul&&(
	rem Если станция найдена - заменяем значение UID
	For /F "usebackq eol= delims=" %%A In ("%Playlist%") Do (
		Set Data=%%A
		If Not "!Data:~,25!"=="http://stream2.radiodacha" (
			Echo %%A>>"%Playlist%.tmp"
		) Else (
			Echo http://stream2.radiodacha.ru:9000/radiodacha_64?type=.mp3^&UID=%UID%>>"%Playlist%.tmp"
		)
	)
	Del "%Playlist%" && Move "%Playlist%.tmp" "%Playlist%"
)||(
	rem Если станции до этого не было в плейлисте, просто добавляем её в конец
	Echo #EXTINF:-1,RadioDacha>>"%Playlist%"
	Echo http://stream2.radiodacha.ru:9000/radiodacha_64?type=.mp3^&UID=%UID%>>"%Playlist%"
)
Exit
Архив со скриптом, тестовым плейлистом и необходимыми утилитами: http://rghost.ru/43413044
Это сообщение посчитали полезным следующие участники:

Отправлено: 11:23, 30-01-2013 | #5