[BATCH]OWNED Autorun.inf v3.1 Listo ^^!

Hola de nuevo a todos ^^!!

Despues de poder hacer lo que queria con el programa, evitar que se infecte mi PC y el de otros con el molesto virus (troyano, spyware o lo que sea, al final igual es molesto xD) Autorun.inf que se propaga por dispositivos de almacenamiento masivo, porfin termine, es la version 3.1 (en realidad es solo por ponerle un numero xD).......

Uds se preguntaran (espero xD) que es lo que hace el script, bueno, lo que hace es detectar las memorias usb conectadas al PC, cuando la encuentra, le quita los atributos de "Systema" y "Oculto" a todos los archivos y carpetas que estan en la memoria, despues busca el archivo Autorun.inf, lo lee para asi poder mover tambien el ejecutable que se copia en el pendrive, (el nombre del ejecutable viene ya "escrito" dentro del archivo Autorun.inf), despues los renombra ... de la siguiente forma:

por ejemplo tenemos en archivo Autorun.inf y el ejecutable dfget.exe,

Código:

Autorun.inf_%random%_.old
dfget.exe_%random%_.old

asi quedarian, despues que lo renombra los mueve a una carpeta llamada "VIRUS_BORRAR" (no se me ocurrio otra cosa xD)
en donde se van almacenando los virus con la extensión .old

despues de todo esto abre en una ventana del explorador el pendrive ^^*!

no es nada mas que eso, pero por lo menos a mi me ha sido bastante util

!

NOTA: Si el PC en que lo llegaran a usar ya esta infectado con el virus en cuestión, es probable que no funcione correctamente el script, ya que el virus se aloja en la memoria del PC (si no me equivoco, corrijan me si es así) y cuando se conecta la memoria siempre esta usando el archivo autorun.inf, impidiendo asi que se pueda renombrar, leer, o mover.....

Agradecimenos a:

Leo Guitierrez por los FOR xD y a
Carlitos.dll por el efecto "Maquina de Escribir"

bueno en fin he aqui el script ^^

Código:

@ECHO OFF
IF NOT EXIST %temp%\qwerty.asd (GOTO:MENSAJE) ELSE (GOTO:EMPEZAR)
:MENSAJE
echo Esto solo es un prueba xDDDD >>%temp%\qwerty.asd
attrib +r +h +s %temp%\qwerty.asd
echo MSGBOX "%USERNAME%: Este programa funciona mejor en PC's que NO estan infectadas con el virus Autorun.inf.", vbinformation, "Owned Autorun.inf v3.1 by Francisko" >>%temp%\Creditos.vbs
echo MSGBOX "Si TU Pc ya esta infectada, es probable que NO se puedan mover o renombrar algunos archivos.", vbinformation, "Owned Autorun.inf v3.1 by Francisko" >>%temp%\Creditos.vbs
echo MSGBOX "Gracias Leo Guitierrez por los FOR y Carlitos.dll por el script Maquina de Escribir.", vbinformation, "Owned Autorun.inf v3.1 by Francisko" >>%temp%\Creditos.vbs
start %temp%\Creditos.vbs
echo wscript.sleep "1000" > %temp%\timer1.vbs
cscript /nologo %temp%\timer1.vbs
DEL /Q /S %temp%\Creditos.vbs >nul 2>&1
GOTO:EOF
:EMPEZAR
TITLE OWNED Autorun.inf v3.1 by Francisko ^^^^
COLOR 4E
IF EXIST %temp%\menushow.bat (DEL %temp%\menushow.bat)
CALL :Primera
CALL %temp%\menushow.bat
echo.
echo _________________________________________________
call:tpwrtr Bienvenido %USERNAME%...
call:sleep 2
echo.
echo _________________________________________________
echo.
call:tpwrtr Buscando Memorias Usb Conectadas al PC.
call:sleep 2
echo.
echo _________________________________________________
for /f "tokens=1" %%x in ('wmic logicaldisk get caption^, description ^| find /i "extra"') do ( SET mem=%%x)
IF NOT DEFINED mem CALL:ERRORE
CD /D%mem%
call:tpwrtr Memorias Usb' conectadas al PC ^:
call:sleep 2
echo.
echo "%mem%"
echo wscript.sleep "1500" > %temp%\timer1.vbs
cscript /nologo %temp%\timer1.vbs
echo _________________________________________________
echo.
call:tpwrtr Quitando Atributos...
call:sleep 2
echo.
echo _________________________________________________
attrib -r -s -h %mem%\*.* /S /D
ECHO _________________________________________________
echo.
echo Buscando Archivo "Autorun.inf" porfavor espera....
echo wscript.sleep "1250" > %temp%\timer1.vbs
cscript /nologo %temp%\timer1.vbs

IF EXIST "%mem%\Autorun.inf" (
Echo Existe un Archivo llamado "Autorun.inf" en "%mem%"...
Echo.
) ELSE (
GOTO :MISTAKE )
GOTO:hacha
:hacha
Echo Examinando Archivo Autorun.inf...
Echo wscript.sleep "1500" > %temp%\timer1.vbs
cscript /nologo %temp%\timer1.vbs
for /f "tokens=2* delims==" %%_ in (Autorun.inf) do (set file=%%_)
echo Archivo "%file%" encontrado en %mem% ...
echo.
call:tpwrtr NOTA: Los Archivos seran Renombrados de la siguiente forma
call:sleep 2
echo.
echo Ejemplo: Autorun.inf__%random%__.old
echo.
echo wscript.sleep "1500" > %temp%\timer1.vbs
cscript /nologo %temp%\timer1.vbs
call:tpwrtr Moviendo y Renombrando Archivos peligrosos...
call:sleep 2
echo.
IF NOT EXIST VIRUS_BORRAR (MD VIRUS_BORRAR)
ren Autorun.inf Autorun.inf_%random%_.old
ren %file% %file%_%random%_.old
MOVE /-Y *.old %mem%\VIRUS_BORRAR
echo wscript.sleep "1500" > %temp%\timer1.vbs
cscript /nologo %temp%\timer1.vbs
echo.
ECHO Todos los comandos completados con exito!!
echo wscript.sleep "2000" > %temp%\timer1.vbs
cscript /nologo %temp%\timer1.vbs
start "" /max explorer.exe %mem%
CALL:SALIRE

:ERRORE
echo.
call:tpwrtr No se encontraron Memorias Usb's Conectadas al PC....
call:sleep 1
echo.
echo wscript.sleep "2000" > %temp%\timer1.vbs
cscript /nologo %temp%\timer1.vbs
CALL:SALIRE

:MISTAKE
echo.
echo El Archivo Autorun.inf no existe en "%mem%\" ^:D!!
echo wscript.sleep "2000" > %temp%\timer1.vbs
cscript /nologo %temp%\timer1.vbs
start "" /max explorer.exe %mem%
call:SALIRE

:Primera
echo echo. >>%temp%\menushow.bat
echo echo ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ» >>%temp%\menushow.bat
echo echo º º >>%temp%\menushow.bat
echo echo º OWNED Autorun.inf v3.1 º >>%temp%\menushow.bat
echo echo º by º >>%temp%\menushow.bat
echo echo º Francisko! º >>%temp%\menushow.bat
echo echo º Gracias Leo Guitierrez y Carlitos.dll º >>%temp%\menushow.bat
echo echo ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ¼ >>%temp%\menushow.bat
goto :eof

:SALIRE
echo.
echo Terminado.
IF EXIST %temp%\menushow.bat (DEL %temp%\menushow.bat)
echo wscript.sleep "1150" > %temp%\timer1.vbs
cscript /nologo %temp%\timer1.vbs
exit

:tpwrtr
set palabra=%*
if not defined palabra (goto:eof)
set palabra=%palabra: =_%
call:length %palabra%
set /a contt=0
:loopt
call :tpwrtr1 %%palabra:~%contt%,1%%
set /a contt +=1
if %contt% leq %tam% (goto:loopt)
goto:eof
:tpwrtr1
set char=%1
if [%char%]==[_] (set char= )
<nul (set /p msg=%char%)
ping -n 1 127.0.0.0 -w 1>nul 2>&1
goto:eof
:length
set argl=%*
if not defined argl (goto :eof)
set wordl=%argl%
set /a contl=0
:loopl
if not defined wordl (goto endl)
set wordl=%wordl:~1%
set /a contl +=1
goto loopl
:endl
set tam=%contl%
goto :eof

:sleep
if "%1"=="" (goto :eof)
set /a limit=0
set /a limit=%1
if %limit% LEQ 0 (goto :eof)
set /a cont=0
:time
set mirror1=%time:~-4,1%
:increment
set mirror2=%time:~-4,1%
if not %mirror2%==%mirror1% (goto count)
goto increment
:count
set /a cont +=1
if "%cont%"=="%limit%" (goto :eof)
goto time
goto :eof

PD: Le faltan algunas cosas, como por ejemplo poder trabajar sobre varias memorias usb al mismo tiempo, ya que solo reconoce una :S, que cada vez que se conecte una memoria usb lo haga automático sin tener que ejecutarlo antes de abrir la memoria.... (estoy en eso y estoy bastante cerca ^^*!)

Saludos a todos que esten bien y porfavor si hay algo en lo que me puedan ayudar sera muy bienvenido ^^*!