~ LIVE STREAMS via Batch ~

[Dos_Probie]

No problem's, just thought I might share a few Streams...
This works on W7 wmp12..
Radio Stations
TV Stations
Police Scanners
Traffic Cams
These use IE but you can use Firefox or Chrome which will need the wmpfirefoxplugin.exe file.

http://www.filefactory.com/file/3f5wj5v ... treams_cmd

Enjoy...

[Fawers]

Nice.
But I think it won't work in any non-English computer. Maybe you'd prefer using %programfiles% instead of C:\Program Files.

Edit:
A set /p (or choice, for those who have it) based menu would also be cool.

[Dos_Probie]

Glad you liked it Fawers, Is this more what you had in mind? Of course you
can even set up menu for language or country then go to those stations and
if you are not a big WMP fan you can always default to like VLC player as well.. Dos_Probie

@echo off&color e&mode con:cols=75 lines=16&title[ ~LIVE STATION STREAMS~ ]

:Station Streams - Works on Windows 7 with WMP 12 player.
:You may use this code and information is provided "as is".
:Code can be modified to suit your specific requirements.

echo.
echo Select Stream Genre:
echo +===================+
:menu
echo A.) SPORTS
echo B.) COMEDY
echo C.) CLASSICAL
echo D.) COUNTRY
echo E.) ROCK
echo. F.) CAMS
echo. G.) TV
echo. H.) POLICE
echo I.) EXIT
echo +===================+
echo.
echo.
set choice=
set /p choice= When ready type: A, B, C, D, E, F, G, H. or I then press [ENTER]
echo.
if not '%choice%'=='' set choice=%choice:~0,1%

if /I '%choice%'=='A' Goto sports
if /I '%choice%'=='B' Goto comedy
if /I '%choice%'=='C' Goto classical
if /I '%choice%'=='D' Goto country
if /I '%choice%'=='E' Goto rock
if /I '%choice%'=='F' Goto cams
if /I '%choice%'=='F' Goto tv
if /I '%choice%'=='G' Goto police
if /I '%choice%'=='I' Goto eof
echo.
echo "%choice%" key is incorrect!, Please select correct key from menu then try again...
echo.
goto menu
:---------------------------------------------------------+
:sports
cls
echo.
echo Press [ENTER] to return to Main Menu
@start "" "%programfiles%\internet explorer\iexplore.exe" http://provisioning.streamtheworld.com/ ... DIALUP.asx
pause >nul
cls
goto :menu
:---------------------------------------------------------+
:comedy
cls
echo.
echo Press [ENTER] to return to Main Menu
@start "" "%programfiles%\internet explorer\iexplore.exe" http://www.977music.com/tunein/web/comedy.asx
pause >nul
cls
goto :menu
:----------------------------------------------------------+
:classical
cls
echo.
echo Press [ENTER] to return to Main Menu
@start "" "%programfiles%\internet explorer\iexplore.exe" add url here..blah blah
pause >nul
cls
goto :menu
:---------------------------------------------------------+
:country
cls
echo.
echo Press [ENTER] to return to Main Menu
@start "" "%programfiles%\internet explorer\iexplore.exe" add url here..blah blah
pause >nul
cls
goto :menu
:---------------------------------------------------------+
:rock
cls
echo.
echo Press [ENTER] to return to Main Menu
@start "" "%programfiles%\internet explorer\iexplore.exe" add url here..blah blah
pause >nul
cls
goto :menu
:---------------------------------------------------------+
:cams
cls
echo.
echo Press [ENTER] to return to Main Menu
@start "" "%programfiles%\internet explorer\iexplore.exe" add url here..blah blah
cls
goto :menu
:---------------------------------------------------------+
:tv
cls
echo.
echo Press [ENTER] to return to Main Menu
@start "" "%programfiles%\internet explorer\iexplore.exe" add url here..blah blah
cls
goto :menu
:---------------------------------------------------------+
:police
cls
echo.
echo Press [ENTER] to return to Main Menu
@start "" "%programfiles%\internet explorer\iexplore.exe" add url here..blah blah
cls
goto :menu
:---------------------------------------------------------+
:eof
exit 0
:---------------------------------------------------------+
:06.08.12 - Dos_Probie

[Fawers]

Now it looks even better!
And I, too, prefer VLC.

Here's another suggestion: put "%programfiles%\internet explorer\iexplore.exe" in a variable (e.g., iexplorer) so you don't have to rewrite it over and over again.

Code: Select all

set "iexplorer=%programfiles%\internet explorer\iexplore.exe"
::replace all occurrences of "%programfiles%\internet explorer\iexplore.exe" with "%iexplorer%"

:Code
::your code here

[Dos_Probie]

Good Idea Fawers!!

Sometimes Less is More..