[Batch] Tool Batch Simple.

Mr.Lerzep · 12 Noviembre 2010, 15:27 PM

Bueno aca dejo este code que hice hace bastante y como soy nuevo en el foro lo comparto con ustedes :


@echo off
title Tool Batch By Mr.Lerzep
color b
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - BIENVENIDO %username% Tool Batch.
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ¼
ping localhost -n 2 > nul
cls
:menu_reg
::::::::::::::
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - MENU DE DE INICIO    
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ¼
echo .
echo    1) - Registrar Nuevo Usuario.
echo    2) - Iniciar Sesion.
echo    3) - Ayuda para el Registro.
echo    4) - Salir.
ping localhost -n 1 > nul
set /p opc= Seleccione una Opcion:
if %opc%== 1 goto 1r
if %opc%== 2 goto 2r
if %opc%== 3 goto 3r
if %opc%== 4 (exit)
ping localhost -n 1 > nul
cls
Goto:menu_reg
:1r
set /p uss=Escriba el Nombre de Usuario:
if not exist "%uss%.txt" (echo Usuario Valido.& @echo off>%uss%.txt& goto :usurname2) else (echo El Usuario Ya se Encuentraen Uso Ingrese otro por favor. & ping localhost -n 2 > nul&cls&goto :1r)
ping localhost -n 1 > nul
:usurname2
set /p pass=Escriba su Password:
@echo off>%pass%.txt & echo Creando Su Password Espere...
ping localhost -n 3 > nul
cls
echo Hola %username% , a continuacion daremos la Informacion de su Registro:
ping localhost -n 1 > nul
echo Nombre de Usuario: %uss%
ping localhost -n 1 > nul
echo Password: %pass%
ping localhost -n 2 > nul
echo Acontinuacion el Programa le Pedira Usuario y Password
echo Espere 5 Segundos Por Favor.
ping localhost -n 6 > nul
goto :menu_final
:2r
::::::
goto menu_final
:3r
::::::
cls
title Ayuda Para el Usuario.
:ayuda
::::::::::::::
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - MENU DE DE INICIO    
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ¼
echo .
echo   1) - Como registrarse.
echo   2) - Salir.
ping localhost -n 1 > nul
set /p opc2= Seleccione una Opcion:
if %opc2%== 1 goto :ayu_reg
if %opc2%== 2 goto 4r
cls
Goto :3r
:ayu_reg
::::::::::
echo Registro :
echo Para registrarse debera escribir su
ping localhost -n 3 > nul
echo nombre de usuario y presionar la
ping localhost -n 3 > nul
echo Tecla ENTER.
ping localhost -n 3 > nul
echo Para poder crear su password tambien
ping localhost -n 3 > nul
echo Debera escribir su password a usar
ping localhost -n 3 > nul
echo Y luego presionar ENTER
ping localhost -n 3 > nul
echo para finalizar
echo Presione una tecla para volver al menu...
pause > nul
cls
goto :menu_reg
:menu_final
:::::::
ping localhost -n 3 > Nul
cls
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - BIENVENIDO A Tool Batch.  
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ¼
set /p usu=introduzca su Nombre de Usuario:
if exist "%usu%.txt" (echo Usuario Introducido Correcto. & goto :pass.f) else (echo Usuario Introducido Incorrecto. & goto :menu_final)
:pass.f
:::::::::
set /p pass2=introduzca la Password:
if exist "%pass2%.txt" (echo Password Introducida Correcta. & goto :menu_ts) else (echo Password Introducida Incorrecta. & goto :pass.f)
:menu_ts
:::::::::
cls
ping localhost -n 3 > nul
cls
color b
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - MENU DE OPCIONES    º
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ¼
echo    1 - Hacer Pings.
echo    2 - Comprobar existencia de Archivos o Carpetas de un solo nombre.
echo    3 - Iniciar Paginas Webs.
echo    4 - Iniciar un Programa o Aplciacion.
echo    5 - Finalizar procesos.
echo    6 - Comprobar El Disco Duro.
echo    7 - Salir.
echo.
ping loclahost -n 2 > nul
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
set /p opc=Numero de la Opcion : 
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
if %opc%== 1 goto 1 
if %opc%== 2 goto 2
if %opc%== 3 goto 3
if %opc%== 4 goto 4
if %opc%== 5 goto 5
if %opc%== 6 goto 6
if %opc%== 7 (exit)
cls
goto :menu_ts
:1
::::::::
set /p ping=Escriba la pagina a la cual ara el ping :
ping %ping%
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
echo Ping Finalizado.
echo Presione una tecla para volver al menu.
pause > nul
cls
goto menu_ts
:2
::::::::
cls
@echo off
set /p if=Escriba la ruta del Archivo o Carpeta a Comprobar su Existencia :
if exist "%if%" (echo Comprobado Este/a Archivo o Carpeta Existe!) else (echo Comprobado Este/a Archivo o Carpeta no Existe!)
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
echo Presione una tecla para volver al menu.
pause > nul
cls
goto :menu_ts
:3
::::::::::::
set /p pag=Escriba la Pagina la cual quiera iniciar (Completa):
start %pag%
echo Iniciando la Pagina...
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
echo Presione una tecla para volver al menu.
pause > nul
cls
goto :menu_ts
:4
::::::::::::
set /p pro=Escriba el nombre del Programa o Aplciacion:
start %pro%
echo Iniciando Programa o Aplciacion...
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
echo Presione una tecla para volver al menu.
pause > nul
cls
goto :menu_ts
:5
:::::::::
set /p task=Escriba el nombre del proceso existente a finalizar:
taskkill /f /im %task%
echo El proceso ah Finalizado.
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
echo Presione una tecla para volver al menu.
pause > nul
cls
goto :menu_ts
:6
::::::::::
chkdsk /f /r
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
echo Presione una tecla para volver al menu.
pause > nul
cls
goto :menu_ts

Bueno eso es un simple Tool que tiene diferentes opciones para realizar , con un registro de Usuario para poder usarlo.

Salu2.

xassiz~ · 12 Noviembre 2010, 15:31 PM

Los usuarios se deberían de guardar en un archivo general, no crear un archivo para cada usuario

Luego, no deberías concatenar lineas en los if, el code queda sucio.

Mr.Lerzep · 12 Noviembre 2010, 15:34 PM

Cita de: pablomi en 12 Noviembre 2010, 15:31 PM
Los usuarios se deberían de guardar en un archivo general, no crear un archivo para cada usuario

Em creo que si eso lo tendria que haber echo pero es algo viejo uno de los primeros que hice , luego hago si saco otra "version" .

Cita de: pablomi en 12 Noviembre 2010, 15:31 PM
Luego, no deberías concatenar lineas en los if, el code queda sucio.

Perdona pero a que te refieres con sucio

PD : Que rapidez al contestar y analizar el code

Salu2 pablomi.

xassiz~ · 12 Noviembre 2010, 21:34 PM

No lo analicé mucho, lo vi por encima, pero de todas formas es muy sencillo

Sucio me refiero a que se ve mejor así:

Código (dos) [Seleccionar]


if condicion (
    acciones
    acciones
    ...
)

que así:

Código (dos) [Seleccionar]


if condicion (acciones&acciones&...)

Saludos!

Mr.Lerzep · 12 Noviembre 2010, 21:51 PM

Cita de: pablomi en 12 Noviembre 2010, 21:34 PM
No lo analicé mucho, lo vi por encima, pero de todas formas es muy sencillo

Sucio me refiero a que se ve mejor así:
Código (dos) [Seleccionar] Expandir
if condicion ( acciones acciones ... )

que así:
Código (dos) [Seleccionar] Expandir
if condicion (acciones&acciones&...)

Saludos!

Ahh eso

, ahora le pego un baño

$:-\$

PD : Ahora me voy a la pileta y empiezo a modificarlo y ah agregar cosas.

Salu2.

Edu · 12 Noviembre 2010, 23:18 PM

Tambien acuerdate de usar:

if not defined %variable% goto :Bucle
goto :Bucle

Al final de las opciones

xassiz~ · 12 Noviembre 2010, 23:59 PM

Cita de: XXX-ZERO-XXX en 12 Noviembre 2010, 23:18 PM
Tambien acuerdate de usar:

if not defined %variable% goto :Bucle
goto :Bucle

Al final de las opciones

De hecho ya tiene un GoTo que soluciona eso.

Y lo correcto sería:

Código (dos) [Seleccionar]

if not defined variable (acciones)

Ya que con:

Código (dos) [Seleccionar]

if not defined %variable% (acciones)
estás expandiendo la variable en cuestión.

Edu · 13 Noviembre 2010, 00:02 AM

Con lo de %variable% me confundi si, pero lo hice asi nomas porq el de seguro ya sabe como hacerlo solo se ha olvidado.

No se q es lo q decis de q ya tiene un GoTo no se.. yo ejecute el programa y cuando me pidio para elegir una opcion solo presione enter sin poner nada y se cerro el programa

edit: Lo mire denuevo y vi q tiene si solo q esta mal