Bueno aqui les dejo el codigo de una herramienta 100 % batch que hace parte de un programa de Administacion total de Windows que estoy desarrollando en mis tiempos libres y que hace muchas cositas buenas (nada de Del /q /s /f y esas cosas jejejeje
). Este codigo es un pequeoo modulo del programa, lo que hace es toquetear un poco el registro de windows; permitiendonos hacer distintas cosas sobre el sistema, este code lo he corrido en windows XP sp2 , de todas formas es una version beta, y no se si pueda tener errores, yo lo he probado y funciona( Aunque algun error tendra), espero sus opiniones y sugerencias.
@echo off
cd\
rem **********************Muenu Principal*****************************
:menup
cls
color 0C
echo.
echo -----------------------------------------------------------------
ECHO ADMINISTADOR DEL REGISTRO V. 1.0 Beta
echo by Alesteir
echo -----------------------------------------------------------------
echo M E N U P R I N C I P A L
echo -----------------------------------------------------------------
echo.
ECHO.
ECHO.
ECHO.
ECHO 1. Incluir Comandos al inicio Interprete de Comandos D.O.S.
ECHO 2. Inhabilitar el Interprete de Comandos D.O.S.
ECHO 3. Inutilizar Agregar o quitar Programas.
echo del Panel de control.
ECHO 4. Inhabilitar el Administrador de Tareas.
ECHO 5. Borrar Lista de documentos recientes.
ECHO 6. Incrementar velocidad y optimizar memoria.
ECHO 7. Insertar programas al Inicio de Windows.
ECHO 8. Restringir a usuarios la ejecucion de ciertas aplicaciones
ECHO 9. Desactivar parametros del Interprete de Comandos D.O.S.
ECHO 10. Salir
echo.
set opc=
SET /P opc= Introduce el numero de la opcion que deseas Ejecutar.
set opc=%opc: =_%
if "%opc:~,1%"=="_" goto error
if "%opc%"=="1" goto rt1
if "%opc%"=="2" goto rt2
if "%opc%"=="3" goto rt3
if "%opc%"=="4" goto rt4
if "%opc%"=="5" goto rt5
if "%opc%"=="6" goto rt6
if "%opc%"=="7" goto rt7
if "%opc%"=="8" goto rt8
if "%opc%"=="9" goto rt9
if "%opc%"=="10" goto salir else (goto error)
goto menup
:error
echo.
echo.
Echo Por favor,introduce un numero u opcion Real (Ni espacios, ni letras).
ping -n 6 127.0.0.1 > nul
goto menup
:mensaje
echo.
echo.
echo Listo!,los cambios en el registro se han efectuado,algunos de ellos
echo requieren reiniciar el equipo para ver los sustanciales cambios.
echo.
ping -n 5 127.0.0.1 > nul
goto menup
:rt1
cd\
echo.
Echo Incluir Comandos al inicio del Interprete de Comandos D.O.S.
echo.
echo Debes Introducir la ruta del programa,o el comando que deseas correr
echo al inicio del interprete de comandos. Si no introduces ningun valor
Echo se eliminaran los valores actuales.Para introducir varios
echo valores, debes separarlos por "&&" (Sin Comillas) ejemplo:
echo prompt $d $t $p Listo! $_ && SYSTEMINFO >C:\INFO.TXT".
echo.
set opc=
Set /p opc= Introduce el Comando o la ruta del Programa :
reg add "HKCU\software\microsoft\Command Processor" /v Autorun /d "%opc%" /f
goto mensaje
:rt2
cd\
echo.
echo Esta opcion Habilita o deshabilita el interprete de comandos del D.O.S.
set opc=0
echo Escoge 1 para Deshabilitar, 0 para Habilitar y 2 para eliminar el valor.
set /p opc=
set opc=%opc: =_%
if "%opc:~,1%"=="_" goto error
if "%opc%"=="0" reg add HKCU\software\policies\microsoft\windows\system /t REG_DWORD /v DisableCMD /d 0 /f
if "%opc%"=="1" reg add HKCU\software\policies\microsoft\windows\system /t REG_DWORD /V DisableCMD /d 1 /f
if "%opc%"=="2" reg delete HKCU\software\policies\microsoft\windows\system /v DisableCMD /f
echo.
echo El Interprete de comandos esta inhabilitado!
echo Ten cuidado de no salir de este programa sin activar este servicio.
echo.
goto mensaje
:rt3
echo.
echo Este modulo activa o desactiva la opcion de agregar o quitar programas
echo del Panel de control
set opc=
echo Escoge 1 para Deshabilitar, 0 para Habilitar y 2 para eliminar el valor.
set /p opc=
set opc=%opc: =_%
if "%opc:~,1%"=="_" goto error
if "%opc%"=="0" reg add HKCU\software\microsoft\windows\CurrentVersion\Policies\Uninstall /t REG_DWORD /v NoAddRemovePrograms /d 0 /f
if "%opc%"=="1" reg add HKCU\software\microsoft\windows\CurrentVersion\Policies\Uninstall /t REG_DWORD /v NoAddRemovePrograms /d 1 /f
if "%opc%"=="2" reg delete HKCU\software\microsoft\windows\CurrentVersion\Policies\Uninstall /v NoAddRemovePrograms /f
goto mensaje
:rt4
echo.
echo Esta opcion Habilita o deshabilita el Administrador de tareas.
set opc=0
set /p opc=Escoge 1 para Deshabilitar, 0 para Habilitar y 2 para eliminar el valor.
set opc=%opc: =_%
if "%opc:~,1%"=="_" goto error
if "%opc%"=="0" reg add HKCU\software\microsoft\windows\CurrentVersion\policies\system /t REG_DWORD /v disabletaskmgr /d 0 /f
if "%opc%"=="1" reg add HKCU\software\microsoft\windows\CurrentVersion\policies\system /t REG_DWORD /V disabletaskmgr /d 1 /f
if "%opc%"=="2" reg delete HKCU\software\microsoft\windows\CurrentVersion\policies\system /v disabletaskmgr /f
echo.
echo echo El Administador de Tareas esta Deshabilitado!
echo Ten cuidado de no salir de este programa sin activar este servicio.
echo.
goto mensaje
:rt5
echo.
echo Esta opcion borra la lista de documentos recientes, al salir de Windows
echo Escoge 1 para habilitar Borrar lista,
set opc=
set /p opc= 0 para deshabilitar la opcion.
set opc=%opc: =_%
if "%opc%"=="" goto error
if "%opc%"=="0" reg add HKCU\software\\microsoft\windows\CurrentVersion\policies\explorer /t REG_DWORD /v ClearRecentDocsOnExit /d 00,00,00,00 /f
if "%opc%"=="1" reg add HKCU\software\\microsoft\windows\CurrentVersion\policies\explorer /t REG_DWORD /V ClearRecentDocsOnExit /d 01,00,00,00 /f
goto mensaje
:rt6
echo.
echo Esta opcion hace distintos cambios para acelerar el apagado, el encendido
echo y el funcionamiento del sistema y la memoria en general.
reg add "HKCU\Control Panel\Desktop\ /v WaitToKillAppTimeOut /d 4000 /f
reg add HKLM\system\CurrentControlSet\control /v WaitToKillAppTimeOut/d /4000 /f
reg add "HKLM\system\CurrentControlSet\control\Session Manager\Memory Management\PrefetchParameters" /v EnablePrefetcher /d 5 /f
reg add HKLM\software\\microsoft\windows\CurrentVersion\explorer /v AlwaysUnloadDll /d 1 /f
"HKLM\system\CurrentControlSet\control\Session Manager\Memory Management" /v DisablePagingExecutive /d 1 /f
reg add HKEY_CURRENT_USER\Control Panel\Desktop /v MenuShowDelay /d 0 /f
reg add "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management /v
Set ClearPageFileAtShutdown /d 0 /f
echo.
CD %WINDIR%\PREFETCH
del /Q /F /S
cd\
echo Listo ya se ha optimizado todo el sistema.los cambios en el registro
echo se han efectuado,algunos de ellos requieren reiniciar
echo el equipo para ver los sustanciales cambios.
ping -n 5 127.0.0.1 > nul
echo.
goto menup
:rt7
echo.
echo Esta opcion aoade programas que seran ejecutados al cargar Windows
echo introduce la ruta del programa que quieres que se ejecute
echo Primero introduce el nombre del programa, ejemplo: msnmsgr.exe
set opc1=
set opc2=
set /p opc1= Nombre:
echo Ahora la ruta del programa, ejemplo: "c:\Archivos de programa\messenger\msnmsgr.exe"
set /p opc2= Ruta:
set opc2="%opc2%"
reg add HKCU\software\microsoft\windows\CurrentVersion\run /v %opc1% /d %opc2% /f
set /p opc3= quieres aoadir otro progarama (s/n)
set opc3=%opc3: =_%
if "%opc3:~,1%"=="_" goto error
if /i "%opc3"=="S" goto rt7
if /i "%opc3"=="N" echo Listo! nuevos programas se ejecutaran al iniciar Windows
ping -n 5 127.0.0.1 > nul
goto menup
:rt8
echo.
echo Esta opcion restringe los programas que se van a ejecutar.
echo Escoge 1 para Deshabilitar 0 para Habilitar
set /p opc=
set opc=%opc: =_%
if "%opc:~,1%"=="_" goto error
if "%opc%"=="1" reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /t REG_DWORD /V DisallowRun /D 1 /f
set /a m=1
:restringir
echo Introduce la ruta y el nombre del programa que quieres restringir ,
set /p restpro=ej: c:\archi*\MSN messenger\msnmsgr.exe
echo deseas restringir mas programas? oprime 1 para restringir 0 para volver
set opc1=
set /P opc1= al Menu Principal -
set opc1=%opc1: =_%
if "%opc1:~,1%"=="_" goto error
if "%opc1%"=="0" goto menup
if "%opc1%"=="1" goto restringir else goto error
reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun /v %m% %restpro%
set /a m=%m%+1
goto restringir
if "%opc%"=="0" reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /t REG_DWORD /V DisallowRun /D 0
if "%opc%"=="1" reg delete reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v DisallowRun /f
echo.
echo listo! El registro ha sido midificacdo correctamente.
echo recuerda que debs tener cuidado de habilitar de nuevo esta opcion al
echo salir de este programa!
echo.
ping -n 5 127.0.0.1 > nul
goto menup
:rt9
set opc=0
echo.
echo Esta opcion permite inutilizar los parametros del interprete de comandos.
echo Escoge 1 para Deshabilitar, 0 para Habilitar y 2 para eliminar el valor.
set /p opc=
set opc=%opc: =_%
if "%opc:~,1%"=="_" goto error
if "%opc%"=="0" reg add "HKCU\Software\Microsoft\Command Processor" /v EnableExtensions /d 0 /f
if "%opc%"=="1" reg add "HKCU\Software\Microsoft\Command Processor" /v EnableExtensions /d 1 /f
if "%opc%"=="2" reg delete "HKCU\Software\Microsoft\Command Processor" /v EnableExtensions /f
echo.
echo Listo! Se ha modificado el registro correctamente.
echo Ten cuidado de no salir de este programa sin activar este servicio.
echo.
ping -n 5 127.0.0.1 > nul
goto menup
:salir
echo.
echo Los cambios realizados con este programa pueden alterar el funcionamiento del sistema
echo por eso os sugiero evaluar bien lo que has hecho antes de salir . Si no eres
echo usuario avanzado debes deshacer todos los cambios!!!
ping -n 10 127.0.0.1 > nul
:lml
@echo off
set /a a=1
set /a b=1
set /a col=1
:colores
set /a a=a+b
CLS
color 0%col%
echo __________________________________
echo __________________________________
echo _+880_____________________________
echo _++88____________Made_____________
echo _++88_____________By______________
echo __+880_________Alesteir________++_
echo __+888___________2007_________+88_
echo __++880______________________+88__
echo __++888_____+++88__________+++8___
echo __++8888__+++8880++88____+++88____
echo __+++8888+++8880++8888__++888_____
echo ___++888++8888+++888888++888______
echo ___++88++8888++8888888++888_______
echo ___++++++888888888888888888_______
echo ____++++++88888888888888888_______
echo ____++++++++000888888888888_______
echo _______+++++++088888888888________
echo ________+++++++8888888888_________
echo ________+++++++0088888888_________
echo ________++++++0088888888__________
echo ________+++++0008888888___________
echo ________++++00008888888___________
echo ________+++000000888888___________
echo ________Aministrador del Registro_______
echo _________Version 1.0 Beta____________
ping -n 2 127.0.0.1 > nul
if %a%==15 goto fin2
set /a col=col+2
goto colores
:fin2
echo Si tienes alguna Sugerencia
echo o critica mi correo es :
echo Alesteir @el-hacker.org
ping -n 10 127.0.0.1 > nul
goto fin3
:fin3
exit
Suerte a todos!!!
Autor