Radio en batch .bat

Nos tutoriels complets pour vous aider
Répondre
chatonhub
    unknown unknown

Radio en batch .bat

Message par chatonhub »

Bonjour,
juste pour vous faire découvrir se qu'on peut faire en .bat

.BAT est l'extension d'un fichier de commandes MS-DOS. Réaliser un tel fichier permet de concevoir des scripts qui seront interprétés par le "shell"
ou interpréteur de commandes (command.com ou cmd.exe) pour notamment exécuter des fichiers .EXE ou .COM. Cette extension est principalement utilisée sur les systèmes d'exploitation de Microsoft (DOS et Windows).
Elle peut être assimilée (dans une certaine mesure) à l'extension .sh des scripts shell Unix (ceux du Bourne shell plus exactement).

.BAT tire son nom de l'anglais batch, qui signifie lot. .BAT sert à créer des programmes facilement à l'aide du bloc note. Si le fichier est inconnu, il est préférable de ne pas le lancer (à l'aide d'un double clic),
mais au contraire il faut l'éditer (à l'aide d'un clic droit puis éditer) pour voir ce qu'il contient. En effet, il peut s'agir d'un script malveillant tel qu'un cheval de Troie.

Dans l'interpréteur COMMAND.COM (et CMD.EXE), il existe quelques commandes spécifiques aux fichiers de traitements par lots. Voici la liste :

CHOICE (externe)
ECHO (interne)
FOR (interne)
GOTO (interne)
IF (interne)
PAUSE (interne)
REM (interne)
SHIFT (interne)

Se qui suis n'est pas de moi je l'avais trouver sur un forum ...
le code es modifiable a volonté
il suffit de rajouter vos propre Radio préféré

Code : Tout sélectionner

echo  0- Quitter
echo  1- Europe 1
echo  2- RTL2
echo  3- Fun Radio
echo  4- HotMix 90
echo  5- Skyrock
echo  6- Chatonhub
echo.
set /p "RADIO= Entrez le nombre d'une radio pour l'?couter : "
set FLUX=FALSE
if %RADIO%==0 goto exit_prog
if %RADIO%==1 set FLUX=http://vipicecast.yacast.net/europe1
if %RADIO%==1 set "RDIO=Europe 1"
if %RADIO%==2 set FLUX=http://ais.rtl.fr:80/rtl2-1-44-128
if %RADIO%==2 set "RDIO=RTL2"
if %RADIO%==3 set FLUX=http://ais.rtl.fr:80/fun-1-44-128
if %RADIO%==3 set "RDIO=Fun Radio"
if %RADIO%==4 set FLUX=http://streamingads.hotmixradio.fm/hotmixradio-90-128.mp3
if %RADIO%==4 set "RDIO=HotMix 90"
if %RADIO%==5 set FLUX=http://mp3lg2.tdf-cdn.com/4603/sky_120728.mp3
if %RADIO%==5 set "RDIO=Skyrock"
if %RADIO%==6 set FLUX=http://chatonhubradio.dyndns.org:8000
if %RADIO%==6 set "RDIO=Chatonhub"
if %FLUX%==FALSE goto menu

suffit de déclaré d'autre ligne  simple  non

if %RADIO%==7 set FLUX=l'adresse
if %RADIO%==7 set "RDIO=le nom radio"

et de mettre  echo  7- laradio
Image

[video][/video]

je dépose le fichier en ode source suffit de l'enregistré dans un bloc note en sequevousvoulez.bat

Code : Tout sélectionner

@echo off
title                                                           ---- RadioCMD ?? By TTCFR ----
color 1b
mode con cols=90 lines=33

:::: d?claration des variables
set RADIO=9999
set RDIO=NON_DEFINIS
set FLUX=NON_DEFINIS

:menu

cls
echo    ????????????????????????????????????????????????????????????????????????????????????
echo    ????????????????????????????????????????????????????????????????????????????????????
echo    ????????????????????????????????????????????????????????????????????????????????????
echo    ????????????????????????????????????????????????????????????????????????????????????
echo    ????????????????????????????????????????????????????????????????????????????????????
echo    ??????????????????????????? RadioCMD                       ?????????????????????????
echo    ????????????????????????????????????????????????????????????????????????????????????
echo    ????????????????????????????????????????????????????????????????????????????????????
echo    ????????????????????????????????????????????????????????????????????????????????????
echo    ????????????????????????????????????????????????????????????????????????????????????
echo    ????????????????????????????????????????????????????????????????????????????????????
echo.
echo  0- Quitter
echo  1- Europe 1
echo  2- RTL2
echo  3- Fun Radio
echo  4- HotMix 90
echo  5- Skyrock
echo  6- Chatonhub
echo.
set /p "RADIO= Entrez le nombre d'une radio pour l'?couter : "
set FLUX=FALSE
if %RADIO%==0 goto exit_prog
if %RADIO%==1 set FLUX=http://vipicecast.yacast.net/europe1
if %RADIO%==1 set "RDIO=Europe 1"
if %RADIO%==2 set FLUX=http://ais.rtl.fr:80/rtl2-1-44-128
if %RADIO%==2 set "RDIO=RTL2"
if %RADIO%==3 set FLUX=http://ais.rtl.fr:80/fun-1-44-128
if %RADIO%==3 set "RDIO=Fun Radio"
if %RADIO%==4 set FLUX=http://streamingads.hotmixradio.fm/hotmixradio-90-128.mp3
if %RADIO%==4 set "RDIO=HotMix 90"
if %RADIO%==5 set FLUX=http://mp3lg2.tdf-cdn.com/4603/sky_120728.mp3
if %RADIO%==5 set "RDIO=Skyrock"
if %RADIO%==6 set FLUX=http://chatonhubradio.dyndns.org:8000
if %RADIO%==6 set "RDIO=Chatonhub"
if %FLUX%==FALSE goto menu

:Build_vbs

cls
echo Connection au flux de la radio %RDIO% en cours....

echo Set Sound = CreateObject("WMPlayer.OCX.7")               >%temp%\flux.vbs
echo Sound.URL = "%FLUX%"                                    >>%temp%\flux.vbs
echo Sound.Controls.play                                     >>%temp%\flux.vbs
echo do while Sound.currentmedia.duration = 0                >>%temp%\flux.vbs
echo wscript.sleep 100                                       >>%temp%\flux.vbs
echo loop                                                    >>%temp%\flux.vbs
echo wscript.sleep (int(Sound.currentmedia.duration)+1)*1000 >>%temp%\flux.vbs


:play_flux

start %temp%\flux.vbs
ping localhost -n 3 >nul
cls
echo.
echo  Vous ?coutez %RDIO%.
echo.
echo  Appuyez sur une touche pour stopper la radio...
pause>nul
echo  D?connection en cours...
TASKKILL /F /IM "WScript.exe" /T
del %temp%\flux.vbs
goto menu

:exit_prog
::>>>>>>>>>>>>>>>>>>>>fin du programmme<<<<<<<<<<<<<<<<<<<<<

REM ???         ???
REM ? ? Double  ? ? Simple
REM ???         ???


Le fichier ziper[/align]

Bonne découverte
Avatar du membre
Nash
Administrateur du site
Administrateur du site
Messages : 4403
Enregistré le : sam. 6 nov. 2010 14:19
Localisation : 89
    unknown unknown

Re: Radio en batch .bat

Message par Nash »

thanks chaton ;)
Image
• Ryzen 9 5900x
• B550 AORUS PRO 
• RTX 3060ti phoenix 
• thermaltake core p8 tg
• 1 x SSD 500GB   PCIe4 M.2 SEA
• 32 G DDR4 3600 corsaire
• Corsaire 1000w full modulaire passive
• MasterLiquid ML240R RGB
•1 to stockage NVME.M2 PCIe
Répondre