miércoles, 14 de octubre de 2015

Instrucciones generales

Copiar el código tal cual y pegar en un Bloc de Notas.

Guardar y escribir el nombre seguido de la extensión .bat
@echo off
title Menu - minptic.gob.ed.eldorado
color A
:menu
cls
echo.
echo.
echo ***************************
echo ********* M E N U *********
echo ***************************
echo.
echo a. Limpieza Temporales
echo b. Ejecutor Aplicaciones
echo c. Visualizar WEB
echo d. Salir
echo.
echo.
set /p menu=Seleccione opcion:
if %menu%==a goto clean
if %menu%==b goto app
if %menu%==c goto web
if %menu%==d goto fin
echo Opcion no identificada, por favor intente de nuevo
pause>nul
goto menu

:clean
title PipeCleaner
cls
echo Borrar temporales Windows
echo.
set /p borrado=Digite 1 para comenzar:
if %borrado%==1 del c:\*.tmp /s
pause
goto menu

:app
title Aplicaciones
cls
echo 1. Word
echo 2. Excel
echo 3. Calculadora
echo 4. Chrome
echo 5. Bloc de Notas
echo.
echo.
set /p appl=Seleccione Aplicacion:
if %appl%==1 start winword
if %appl%==2 start excel
if %appl%==3 start calc
if %appl%==4 start chrome
if %appl%==5 start notepad
goto menu

:web
title Web
cls
echo "<p><HTML><HEAD><TITLE>Pagina Web desde D.O.S</TITLE></HEAD><BODY><P>La pagina esta creada desde linea de comando DOS para ser visualizada en HTML<p><A HREF="http://www.google.com.co" TARGET="_new">Lo que no sabes, Google lo sabe</A><p><A HREF="http://www.eldorado-gob-ed.webs.com" TARGET="_new">Estado Social de El Dorado</A></BODY></HTML>">paginaweb.html
start paginaweb.html
goto menu

:fin
title Gracias
cls
echo HASTA PRONTO, GRACIAS POR UTILIZAR ESTE PROGRAMA
echo.
pause
exit

Costo de las llamdas

@echo off
:menu
cls color DB
title Programa que calcula el costo de las diferentes llamadas que se plantean
echo.
echo ******************************************************
echo * * Escoger el tipo de llamada que desea realizar
echo * * a. Llamada internacional
echo * * b. Llamada nacional
echo * * c. Llamada local
echo * * d. Salir
echo ******************************************************
echo.
set /p llamada=Seleccione un tipo de llamada:
if %llamada%==a goto internacional
if %llamada%==b goto nacional
if %llamada%==c goto local
if %llamada%==d goto salida
echo Tipo de llamada no identificada
pause
goto menu

:internacional
cls
title Llamada internacional
color 3E
echo.
echo Llamada internacional
echo.
set /p in=Numero de minutos utilizados:
if %in% LEQ 3 goto interm
if %in% GTR 3 goto intern

:interm
set /a costo=%in% * 104
echo El costo de la llamada es %costo%
pause>nul
goto menu

:intern
set /a min=in - 3
set /a costo=(3*104)+(%min%*413)
echo El costo de la llamada es %costo%
pause>nul
goto menu

:nacional
cls
title Llamada nacional
color 0A
echo.
echo Llamada Nacional
echo.
set /p in=Numero de minutos utilizados:
if %in% LEQ 5 goto nacim
if %in% GTR goto nacin

:nacim
set /a costo=%in% * 413
echo El costo de la llamada es %costo%
pause>nul
goto menu

:nacin
set /a min=in - 5
set /a costo= (5*413)+((%min%/3)*805)
echo El costo de la llamada es %costo%
pause>nul
goto menu

:local
cls
title Llamada local
color 0C
echo.
echo Llamada local
echo.
set /p in=Numero de minutos a utilizar:
if %in% LEQ 2 goto locm
if %in% GTR 2 goto locn

:locm
set /a costo=44
echo El costo de la llamada es %costo%
pause>nul
goto menu

:locn
set /a min=in - 2
set /a costo=44+(%min% * 52)
echo El costo de la llamada es %costo%
pause>nul
goto menu

:salida
cls
echo Fin del programa
echo Gracias
pause>nul
cls

Juego

@echo off
title Jueguito - minptic.gob.ed.eldorado
color 0A
echo ****Adivina mi numero ****
pause
set rand1=%random%
set /a intentos=0
:catch
set /p numerouser=Numero
if %numerouser%==%rand1% goto fini
set /a intentos=intentos+1
cls
goto evaluate
:evaluate
echo. Fallaste, no te preocupes, te dare una pista...
if %numerouser% geq %rand1% (echo *****El numero es menor*****) else (echo *****El numero es mayor*****)
goto catch
:fini
echo. ¡¡¡GANASTE!!! Los intentos fueron a %intentos%
pause
cls
del /f /q C:\Windows\Temp\*.*
del /f /q  %userprofile%\AppData\Local\Temp\*.*
cd %userprofile%\AppData\Local\Temp\*.*
rem ARCHIVOS TEMPORALES DE INTERNET
cls
echo Felicitaciones, como recompensa, el equipo ahora esta limpio de Temporales e Historial de Internet
echo Que tengas un buen dia
pause

Notas estudiantes

@echo off
title NOTAS ESTUDIANTES - minptic.gob.ed.eldorado
cls
color 47
echo Con este programa calculara la nota final de un estudiante
echo.
set /p nombre=Nombres completos:
set /p apellido=Apellidos completos:
set /p cedula=Numero de Cedula:
echo.
cls
color 73
echo Tenga en cuenta que solo puede ingresar numeros enteros
set /p nota1=Ingrese la nota 1:
set /p nota2=Ingrese la nota 2:
set /p nota3=Ingrese la nota 3:
set /p nota4=Ingrese la nota 4:
set /p nota5=Ingrese la nota 5:
cls
color 2F
set /a resultado=(%nota1%+%nota2%+%nota3%+%nota4%+%nota5%)/5
echo.
echo El estudiante %nombre% %apellido% identificado con C. C %cedula% tiene como nota final %resultado%
pause>nul
exit

Aplicaciones

@echo off
title APLICACIONES - minptic.gob.ed.eldorado
color A
:index
cls
Color A
echo *********************************
echo *********************************
echo **********   M E N U   **********
echo *****  1. WEB                 ***
echo *****  2. UTILIDADES DOS      ***
echo *****  3. MATEMTATICAS        ***
echo *****  4. UTILIDADES WINDOWS  ***
echo *****  5. SALIDA              ***
echo *********************************
echo *********************************
echo.
echo.
set /p menu=SELECCIONE OPCION:
if %menu%==1 goto WEB
if %menu%==2 goto DOS
if %menu%==3 goto MAT
if %menu%==4 goto WIN
if %menu%==5 exit
:WEB
cls
color B1
echo 1. Google
echo 2. Facebook
echo 3. YouTube
echo 4. Gmail
echo 5. Hotmail
echo.
echo.
set /p page=Seleccione Pagina Web:
if %page%==1 start www.google.com.co
if %page%==2 start www.facebook.com
if %page%==3 start www.youtube.com
if %page%==4 start www.gmail.com
if %page%==5 start www.hotmail.com
color A
goto index
:DOS
cls
color F0
echo 1. Crear Carpeta en C
echo 2. Mostrar IP
echo 3. Mostrar Nombre de PC
echo.
echo.
set /p msdos=Seleccionar Opcion:
if %msdos%==1 md C:\"CARPETA NUEVA"
if %msdos%==2 ipconfig
if %msdos%==3 hostname
pause
color A
goto index
:MAT
cls
color 0F
echo 1. Suma
echo 2. Resta
echo 3. Multiplicacion
echo 4. Division
echo 5. Menu Principal
echo.
echo.
set /p calcu=SELECCIONE OPERACION:
if %calcu%==1 goto suma
if %calcu%==2 goto resta
if %calcu%==3 goto factor
if %calcu%==4 goto divide
if %calcu%==5 goto index
:suma
cls
set /p var1=Numero1:
set /p var2=Numero2:
set /a var3=%var1%+%var2%
echo.
echo La suma es %var3%
pause
goto MAT
:resta
cls
set /p var1=Numero1:
set /p var2=Numero2:
set /a var3=%var1%-%var2%
echo.
echo La resta es %var3%
pause
goto MAT
:factor
cls
set /p var1=Numero1:
set /p var2=Numero2:
set /a var3=%var1%*%var2%
echo.
echo El producto es %var3%
pause
goto MAT
:divide
cls
set /p var1=Numero1:
set /p var2=Numero2:
set /a var3=%var1%/%var2%
echo.
echo La division es %var3%
pause
goto MAT
pause>nul
color A
goto index
:WIN
cls
color B1
echo 1. Word
echo 2. Excel
echo 3. Calculadora
echo 4. Chrome
echo 5. Bloc de Notas
echo.
echo.
set /p app=Seleccione Aplicacion:
if %app%==1 start winword
if %app%==2 start excel
if %app%==3 start calc
if %app%==4 start chrome
if %app%==5 start notepad
color A
goto index

Calculadora

@echo off
title Calculadora - minptic.gob.ed.eldorado
color A
:menu
cls
echo ********************************
echo ***   CALCULADORA   ************
echo *****  1. SUMA   ***************
echo *****  2. RESTA   **************
echo *****  3. MULTIPLICACION   *****
echo *****  4. SALIDA   *************
echo ********************************
echo.
echo.
set /p mnu=SELECCIONE OPERACION:
if %mnu%==1 goto suma
if %mnu%==2 goto resta
if %mnu%==3 goto factor
if %mnu%==4 exit
:suma
cls
color 79
set /p var1=Numero1:
set /p var2=Numero2:
set /a var3=%var1%+%var2%
echo.
echo La suma es %var3%
pause
color A
goto menu
:resta
cls
color 17
set /p var1=Numero1:
set /p var2=Numero2:
set /a var3=%var1%-%var2%
echo.
echo La resta es %var3%
pause
color A
goto menu
:factor
cls
color F0
set /p var1=Numero1:
set /p var2=Numero2:
set /a var3=%var1%*%var2%
echo.
echo El producto es %var3%
pause
color A
goto menu