Source code of Matrix Animation + DJ Buzz Radio
@echo off
Title Matrix Animation with DJ Buzz Radio by Hackoo 2017
mode con cols=64 lines=35 & color 0A
echo(
echo Please wait a while ... DJ Buzz Radio is loading ...
Call :Play_DJ_Buzz_Radio
cls
:Matrix
echo %random% %random% Hackoo %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% Hackoo %random% %random% %random% %random% %random%
echo %random% %random%%random% %random% %random% %random% %random% %random% %random%
echo Hackoo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% Hackoo %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random%%random% Hackoo %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% Hackoo %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% Hackoo %random% %random% %random% %random% %random% %random% %random% %random% %random%
echo %random% %random% %random% %random% %random% Hackoo %random% %random% %random%
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
set /a Counter+=1
if "%Counter%" EQU "200" goto End_Animation
ping 10.109.199.199 -n 1 -w >nul
goto Matrix
::************************************************************************
:End_Animation
cls
echo(
echo Press enter button to continue .....
runas /user:# "" >nul 2>&1
cls
:::
::: __ __ _______ ___ ___ _______
::: | | | || || | | | | |
::: | |_| || ___|| | | | | _ |
::: | || |___ | | | | | | | |
::: | || ___|| |___ | |___ | |_| |
::: | _ || |___ | || || |
::: |__| |__||_______||_______||_______||_______|
:::
::: _ _,---._
::: ,-',' `-.___
::: /-;' `._
::: /\/ ._ _,'o \
::: ( /\ _,--'\,','"`. )
::: |\ ,'o \' //\
::: | \ / ,--'""`-.
::: : \_ _/ ,-' `-._
::: \ `--' / )
::: `. \`._ ,' ________,','
::: .--` ,' ,--` __\___,;'
::: \`.,-- ,' ,`_)--' /`.,'
::: \( ; | | ) (`-/
::: `--'| |) |-/
::: | | | | |
::: | | |,.,-. | |_
::: | `./ / )---` )
::: _| / ,', ,-'
::: ,'|_( /-<._,' |--,
::: | `--'---. \/ \
::: | / \ /\ \
::: ,-^---._ | \ / \ \
::: ,-' \----' \/ \--`.
::: / \ \ \
:::
for /f "delims=: tokens=*" %%A in ('findstr /b ::: "%~f0"') do @echo(%%A
echo Press any key to stop the DJ Buzz Radio
pause>nul & Call :Stop_Radio & exit
::**************************************************************
:Play_DJ_Buzz_Radio
Taskkill /IM "wscript.exe" /F >nul 2>&1
Set vbsfile=%temp%\DJBuzzRadio.vbs
Set "URL=http://www.chocradios.ch/djbuzzradio_windows.mp3.asx"
Call:Play %URL% %vbsfile%
Start %vbsfile%
Exit /b
::**************************************************************
:Play
(
echo Play "%~1"
echo Sub Play(URL^)
echo Dim Sound
echo Set Sound = CreateObject("WMPlayer.OCX"^)
echo Sound.URL = URL
echo Sound.settings.volume = 100
echo Sound.Controls.play
echo do while Sound.currentmedia.duration = 0
echo wscript.sleep 100
echo loop
echo wscript.sleep (int(Sound.currentmedia.duration^)+1^)*1000
echo End Sub
)>%~2
exit /b
::**************************************************************
:Stop_Radio
Taskkill /IM "wscript.exe" /F >nul 2>&1
::**************************************************************