programar en .bat ayuda

Iniciado por yolman23, 7 Enero 2010, 07:31 AM

0 Miembros y 1 Visitante están viendo este tema.

Imprimir
Ir Abajo Páginas1
Acciones del Usuario

yolman23

7 Enero 2010, 07:31 AM Ultima modificación: 10 Enero 2010, 05:47 AM por yolman23
hola
alguin me podria orientar sobre un trabajo que estoy haciendo para U es programar en .bat. tengo casi todo echo pero eh llegado aun punto que se me cierra el progrma y n o me hace lo que yo quiero.

gracias por su atencion prestada y espero pronta respuesta..

aqui esta el codigo

@echo off
cls
color 40
echo.
echo    ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo    º         Bienvenidos Al Programa Para Legalizar Todos Los              º
echo    º                Programas De La Suite Adobe CS3                        º
echo    ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo                        º                              º
echo                        º   !! Antes De Instalar: !!   º
echo                        º                              º
echo    ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo    º             Cerrar Cualquier Aplicacion De Adobe CS3                  º
echo    º       Ejecutar Esta Aplicacion Ejecutar Como Administrador            º
echo    ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
set /p usuario= ingrese su nombre de usuario
If %usuario%==admin (goto sistema) else (goto error)

:error
color 07
cls
echo Acceso Denegado
echo LO sentimos, Comuniquese con el Departamento Tecnico de
echo hay estaran Los Tecnico para Colaborarle
pause
exit

:sistema
color 1E
cls
echo ..::(Bienvenido al sistema)::..
echo.
:menu
cls
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º                        MENU                               º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 1           Activar   COREL                               º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 2           Activar   After Effects CS3                   º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 3           Actvar    Audition 3.0                        º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 4           Activar   Dreamweaver CS3                     º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 5           Activar   Fireworks CS3                       º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 6           Activar   Flash CS3                           º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
pause
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 7           Activar   Illustrator CS3                     º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 8           Actvar    InDesign CS3                        º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 9           Activar   Photoshop CS3                       º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º A           Activar   Premiere Pro CS3                    º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º B           Activar   3ds Max 2010                        º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º C                Actvar    Todos                          º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º D                    SALIR                                º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
[color=black]
DESDE AQUI TENGO EL ERROR Y NO SE QUE HACER POR AYUDEMEN[/color]

crack\otro\choice.exe /C:123456789ABCD /N "Pulse la tecla deseada: "
) ELSE (
choice /C 123456789ABCD /N /M "Pulse la tecla deseada: "
)
pause
echo.
IF ERRORLEVEL D GOTO :Salir
IF ERRORLEVEL C GOTO :Actvar    Todos
IF ERRORLEVEL B GOTO :Activar   3ds Max 2010
IF ERRORLEVEL A GOTO :Activar   Premiere Pro CS3
IF ERRORLEVEL 9 GOTO :Activar   Photoshop CS3
IF ERRORLEVEL 8 GOTO :Actvar    InDesign CS3
IF ERRORLEVEL 7 GOTO :Activar   Illustrator CS3
IF ERRORLEVEL 6 GOTO :Activar   Flash CS3
IF ERRORLEVEL 5 GOTO :Activar   Fireworks CS3
IF ERRORLEVEL 4 GOTO :Activar   Dreamweaver CS3
IF ERRORLEVEL 3 GOTO :Actvar    Audition 3.0
IF ERRORLEVEL 2 GOTO :Activar   After Effects CS3
IF ERRORLEVEL 1 GOTO :Activar   Corel
pause
echo.
:Activar   corel
copy "\\192.168.0.174\monito\crack" "c:\crack\CorelPP.dll"
copy "\\192.168.0.174\monito\crack" "c:\crack\CorelDrw.dll"
copy "\\192.168.0.174\monito\crack" "c:\crack\crlutl.dll"
copy "c:\crack\CorelPP.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\CorelPP.dll"
copy "c:\crack\crlutl.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\crlutl.dll"
copy "c:\crack\CorelDrw.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\CorelDrw.dll"
echo se copiaron satifactoriamente los archivo
del "c:\crack\*.*
rd "c:\crack
echo.
goto :menu
:Activar   After Effects CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\AfterFX.dll"
copy "c:\crack\AfterFX.dll" "C:\Archivos de programa\Adobe\Adobe After Effects CS3\Support Files\AfterFX.dll"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Actvar    Audition 3.0
copy "\\192.168.0.174\monito\crack" "c:\crack\Audition.exe"
copy "c:\crack\Audition.exe" "C:\Archivos de programa\Adobe\Adobe Audition 3.0\Audition.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Dreamweaver CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Dreamweaver.exe"
copy "c:\crack\Dreamweaver.exe" "C:\Archivos de programa\Adobe\Adobe Dreamweaver CS3\Dreamweaver.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Fireworks CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Fireworks.exe"
copy "c:\crack\Fireworks.exe" "C:\Archivos de programa\Adobe\Adobe Fireworks CS3\Fireworks.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Flash CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Flash.exe"  
copy "c:\crack\Flash.exe" "C:\Archivos de programa\Adobe\Adobe Flash CS3\Flash.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Illustrator CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Illustrator.exe"  
copy "c:\crack\Illustrator.exe" "C:\Archivos de programa\Adobe\Adobe Illustrator CS3\Support Files\Contents\Windows

\Illustrator.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Actvar    InDesign CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Public.dll"  
copy "c:\crack\Public.dll" "C:\Archivos de programa\Adobe\Adobe InDesign CS3\Public.dll"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Photoshop CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Photoshop.exe"  
copy "c:\crack\Photoshop.exe" "C:\Archivos de programa\Adobe\Adobe Photoshop CS3\Photoshop.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Premiere Pro CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Premiere.dll"
copy "c:\crack\Premiere.dll" "C:\Archivos de programa\Adobe\Adobe Premiere Pro CS3\Premiere.dll"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   3ds Max 2010
copy "\\192.168.0.174\monito\crack" "c:\crack\adlmint.dll"
copy "c:\crack\adlmint.dll" "C:\Archivos de programa\Autodesk\3ds Max 2010\adlmint.dll"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Actvar    Todos
xcopy "\\192.168.0.174\monito\crack" "c:\crack"
copy "c:\crack\CorelPP.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\CorelPP.dll"
copy "c:\crack\crlutl.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\crlutl.dll"
copy "c:\crack\CorelDrw.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\CorelDrw.dll"
copy "c:\crack\AfterFX.dll" "C:\Archivos de programa\Adobe\Adobe After Effects CS3\Support Files\AfterFX.dll"
copy "c:\crack\Audition.exe" "C:\Archivos de programa\Adobe\Adobe Audition 3.0\Audition.exe"
copy "c:\crack\Dreamweaver.exe" "C:\Archivos de programa\Adobe\Adobe Dreamweaver CS3\Dreamweaver.exe"
copy "c:\crack\Fireworks.exe" "C:\Archivos de programa\Adobe\Adobe Fireworks CS3\Fireworks.exe"
copy "c:\crack\Flash.exe" "C:\Archivos de programa\Adobe\Adobe Flash CS3\Flash.exe"
copy "c:\crack\Illustrator.exe" "C:\Archivos de programa\Adobe\Adobe Illustrator CS3\Support Files\Contents\Windows

\Illustrator.exe"
copy "c:\crack\Public.dll" "C:\Archivos de programa\Adobe\Adobe InDesign CS3\Public.dll"
copy "c:\crack\Photoshop.exe" "C:\Archivos de programa\Adobe\Adobe Photoshop CS3\Photoshop.exe"
copy "c:\crack\Premiere.dll" "C:\Archivos de programa\Adobe\Adobe Premiere Pro CS3\Premiere.dll"
copy "c:\crack\adlmint.dll" "C:\Archivos de programa\Autodesk\3ds Max 2010\adlmint.dll"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Salir

[L]ord [R]NA

#1
7 Enero 2010, 20:26 PM
quita esto "@echo off"

leogtz

#2
7 Enero 2010, 21:35 PM
Cita de: R.N.A. en  7 Enero 2010, 20:26 PM
quita esto "@echo off"
¿Y eso para qué?, sino se va a responder solo por responder, es preferible no hacerlo.

El primer error visible está aquí:
Código (dos) [Seleccionar]
crack\otro\choice/C:123456789ABCD /N "Pulse la tecla deseada: "
) ELSE (
choice /C 123456789ABCD /N /M "Pulse la tecla deseada: "
)

Esa clausula ELSE no corresponde a ningún IF anterior, quitalo.

El segundo error visible es el nombre de tus etiquetas, las etiquetas no deben de tener más de 8 caracteres, cmd.exe sólo reconoce los primeros 8 caracteres.

Así que quita esos espacios, y dejalo algo así:

Código (dos) [Seleccionar]
IF ERRORLEVEL D GOTO :Salir
IF ERRORLEVEL C GOTO :_all
IF ERRORLEVEL B GOTO :_3dmax
IF ERRORLEVEL A GOTO :_premier
IF ERRORLEVEL 9 GOTO :_photo
IF ERRORLEVEL 8 GOTO :_indese
IF ERRORLEVEL 7 GOTO :_illust
IF ERRORLEVEL 6 GOTO :_flash
IF ERRORLEVEL 5 GOTO :_fire
IF ERRORLEVEL 4 GOTO :dream
IF ERRORLEVEL 3 GOTO :audition
IF ERRORLEVEL 2 GOTO :_effects
IF ERRORLEVEL 1 GOTO :_corel

Y por tercero, los codigos de error están mal, choice.exe devuelve codigos de error dependiendo de las opciones especificadas en el parametro /C, así que los error devueltos no son A, B, C ó D, son 10, 11, 12 y 13.

Así:

Código (dos) [Seleccionar]
IF ERRORLEVEL 13 GOTO :Salir
IF ERRORLEVEL 12 GOTO :_all
IF ERRORLEVEL 11 GOTO :_3dmax
IF ERRORLEVEL 10 GOTO :_premier
IF ERRORLEVEL 9 GOTO :_photo
IF ERRORLEVEL 8 GOTO :_indese
IF ERRORLEVEL 7 GOTO :_illust
IF ERRORLEVEL 6 GOTO :_flash
IF ERRORLEVEL 5 GOTO :_fire
IF ERRORLEVEL 4 GOTO :dream
IF ERRORLEVEL 3 GOTO :audition
IF ERRORLEVEL 2 GOTO :_effects
IF ERRORLEVEL 1 GOTO :_corel


El código base corregido es así, usalo y no tendrás otros errores:

Código (dos) [Seleccionar]
@echo off
cls
color 0a
echo.
echo    ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo    º         Bienvenidos Al Programa Para Legalizar Todos Los              º
echo    º                Programas De La Suite Adobe CS3                        º
echo    ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo                        º                              º
echo                        º   !! Antes De Instalar: !!   º
echo                        º                              º
echo    ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo    º             Cerrar Cualquier Aplicacion De Adobe CS3                  º
echo    º       Ejecutar Esta Aplicacion Ejecutar Como Administrador            º
echo    ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
set /p "usuario=ingrese su nombre de usuario : "
If "%usuario%"=="admin" (goto sistema) else (goto error)

:error
color 07
cls
echo Acceso Denegado
echo LO sentimos, Comuniquese con el Departamento Tecnico de Multitech
echo hay estaran Los Tecnico para Colaborarle
pause
exit

:sistema
color 1E
cls
echo ..::(Bienvenido al sistema)::..
echo.
:menu
cls
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º                        MENU                               º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 1           Activar   COREL                               º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 2           Activar   After Effects CS3                   º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 3           Actvar    Audition 3.0                        º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 4           Activar   Dreamweaver CS3                     º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 5           Activar   Fireworks CS3                       º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 6           Activar   Flash CS3                           º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 7           Activar   Illustrator CS3                     º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 8           Actvar    InDesign CS3                        º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 9           Activar   Photoshop CS3                       º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º A           Activar   Premiere Pro CS3                    º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º B           Activar   3ds Max 2010                        º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º C                Actvar    Todos                          º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º D                    SALIR                                º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
choice /C:123456789ABCD /N /M "Pulse la tecla deseada: "
IF ERRORLEVEL 13 GOTO :Salir
IF ERRORLEVEL 12 GOTO :_all
IF ERRORLEVEL 11 GOTO :_3dmax
IF ERRORLEVEL 10 GOTO :_premier
IF ERRORLEVEL 9 GOTO :_photo
IF ERRORLEVEL 8 GOTO :_indese
IF ERRORLEVEL 7 GOTO :_illust
IF ERRORLEVEL 6 GOTO :_flash
IF ERRORLEVEL 5 GOTO :_fire
IF ERRORLEVEL 4 GOTO :dream
IF ERRORLEVEL 3 GOTO :audition
IF ERRORLEVEL 2 GOTO :_effects
IF ERRORLEVEL 1 GOTO :_corel

:_corel
echo Estoy en Corel
set /p "=Pulse algo para salir : ";
exit /b 0

:_effects
echo Estoy en Effects
set /p "=Pulse algo para salir : ";
exit /b 0

:audition
echo Estoy en ALL
set /p "=Pulse algo para salir : ";
exit /b 0


:dream
echo Estoy en Dreamweaver
set /p "=Pulse algo para salir : ";
exit /b 0

:_fire
echo Estoy en ALL
set /p "=Pulse algo para salir : ";
exit /b 0

:_flash
echo Estoy en Flash
set /p "=Pulse algo para salir : ";
exit /b 0

:_illust
echo Estoy en Illustrator
set /p "=Pulse algo para salir : ";
exit /b 0

:_indese
echo Estoy en Indesign
set /p "=Pulse algo para salir : ";
exit /b 0

:_photo
echo Estoy en photo
set /p "=Pulse algo para salir : ";
exit /b 0

:_premier
echo Premier
set /p "=Pulse algo para salir : ";
exit /b 0

:_3dmax
echo Estoy en 3dmax
set /p "=Pulse algo para salir : ";
exit /b 0

:_all
echo Estoy en ALL
set /p "=Pulse algo para salir : ";
exit /b 0
:Salir
exit /b 0
Código (perl) [Seleccionar]

(( 1 / 0 )) &> /dev/null || {
echo -e "stderrrrrrrrrrrrrrrrrrr";
}

http://leonardogtzr.wordpress.com/
leogutierrezramirez@gmail.com

yolman23

#3
8 Enero 2010, 23:10 PM
gracias  leo gutierrez por haberme corregido el codigo ya que apena me estoy entrando en el mundo de la programacion y esto lo necesitaba con urgencia.


MUCHISIMAS GRACIAS POR CORREGUIRMELO TE LO AGRDEZCO

una pregunta que me recomiendas par aprender a programar no se nada solo lo que viste es lo unico que se de programacion espero tu respuesta.

Shell Root

#4
8 Enero 2010, 23:12 PM
Cita de: yolman23 en  8 Enero 2010, 23:10 PMentrando en el mundo de la programacion
Batch NO es un Lenguaje de Programación

Cita de: yolman23 en  8 Enero 2010, 23:10 PMuna pregunta que me recomiendas par aprender a programar no se nada solo lo que viste es lo unico que se de programacion espero tu respuesta.
http://foro.elhacker.net/scripting/programacion_batch_avanzada_nuevo-t132924.0.html

Saludos!
Por eso no duermo, por si tras mi ventana hay un cuervo. Cuelgo de hilos sueltos sabiendo que hay veneno en el aire.

leogtz

#5
9 Enero 2010, 00:18 AM
Cita de: yolman23 en  8 Enero 2010, 23:10 PM
gracias  leo gutierrez por haberme corregido el codigo ya que apena me estoy entrando en el mundo de la programacion y esto lo necesitaba con urgencia.


MUCHISIMAS GRACIAS POR CORREGUIRMELO TE LO AGRDEZCO

una pregunta que me recomiendas par aprender a programar no se nada solo lo que viste es lo unico que se de programacion espero tu respuesta.

Te recomiendo que te aventures a aprender un lenguaje de programación, pero no Batch(te vas a topar con muchas limitaciones), que aprendas python, perl, C/C++ o Java.
Código (perl) [Seleccionar]

(( 1 / 0 )) &> /dev/null || {
echo -e "stderrrrrrrrrrrrrrrrrrr";
}

http://leonardogtzr.wordpress.com/
leogutierrezramirez@gmail.com
Imprimir
Ir Arriba Páginas1
Acciones del Usuario