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

T13 - Programa que visualiza una lista de colores preferidos para el uso de la pantalla de la Consola

@ECHO OFF
:menu
cls
echo Programa que visualiza una lista de colores preferidos para el uso de la pantalla de la Consola
pause
cls
echo Letra Amarillo Claro y Fondo Aguamarina
color 3E
pause
cls
goto menu

T12 - Programa que visualiza una lista de colores preferidos para el uso de la pantalla de la consola.

@ECHO OFF
cls
Echo Programa que visualiza una lista de colores preferidos para el uso de la pantalla de la consola.
Pause
cls
echo Letra Amarillo Claro y Fondo Aguamarina
color 3E
pause
cls
echo Letra Azul y Fondo Aguamarina
color 31
pause
cls
echo Letra Blanco y Rojo claro
color 47
pause
cls
echo Letra Amarillo Claro y Fondo Purpura
color 5E
pause
cls
echo Letra Aguamarina claro y Fondo Purpura claro
color DB
ECHO.
ECHO.
ECHO Autor: Luis Felipe Lugo
echo.
echo.
pause

T11 - Calculo de dia

@ECHO OFF
cls ¦ DATE > TEMP.BAT
ECHO SET DATE=%%3>CURRENT.BAT
CALL TEMP.BAT
DEL TEMP.BAT
DEL CURRENT.BAT
IF %DATE%==09/09/2015 echo Hoy es el dia
IF NOT %DATE%==09/09/2015 echo Hoy no es el dia
pause

T10 - Programa que ejecuta tres aplicaciones Windows desde un archivo de lotes

@echo off
cls
echo.
echo Programa que ejecuta tres aplicaciones Windows desde un archivo de lotes
echo y luego se cierra la ventana del Interprete de Comandos.
echo.
pause
cls
start /wait /b notepad
start /wait /b mspaint
start /wait /b calc

T9 - Bucle

@echo off
title Bucle
color 0A
:Frases
echo 100101001001010010010 Creado por LFL 100101001001010010010
echo 011010110110101101101 Creado por LFL 011010110110101101101
goto frases
pause>nul
exit

T8 - Media de dos numeros

@echo off
title Media de dos numeros
set /p Num1=Cual es el primer numero?
set /p Num2=Cual es el segundo numero?
set /a media= (%Num1%+%Num2%)/2
echo.
echo La media es %media%
pause>nul
exit

T7 - Formulario de Nombres y Apellidos

@echo off
title Nombre y Apellidos
Color A
set /p Nombre=Cual es tu primer nombre?
set /p Nombre2=Cual es tu segundo nombre?
set /p Apellido=Cual es tu primer apellido?
set /p Apellido2=Cual es tu segundo apellido?
echo.
echo Tu nombre completo es %Nombre% %Nombre2% %Apellido% %Apellido2%
pause>nul
exit

T6 - Uso de colores

@echo off
title Primer Programa
color 1F
echo Este es el primer parrafo
echo.
pause>nul
color 0B
echo Este es el segundo parrafo. Es un poco mas largo
pause>nul
exit

T5 - Primeros parrafos

@echo off
title Primer Programa
echo Este es el primer parrafo
echo.
echo Este es el segundo parrafo. Es un poco mas largo
pause>nul
exit

T4 - Titulo

@echo off
title Primer Programa
pause>nul
exit

T3 - Suma de dos numeros

@echo off
set /p Numero1= Primer Numero:
set /p Numero2= Segundo Numero:
set /a Suma = %Numero1%+%Numero2%
echo.
echo La suma de los 2 numeros es %Suma%
pause>nul
exit

T2 - Primer mensaje

@echo off
:UNO
echo primer mensaje
goto :UNO
echo Bienvenidos a D.O.S
pause>nul
exit

T1 - Apagado

@echo off
cls
echo Finalizar tareas
SHUTDOWN -S -T 10
pause>nul
exit

Reinicio (Usar con Precaución)

@echo off
title BioHazard - minptic.gob.ed.eldorado
color A
echo.
echo.
echo Reiniciando por siempre
cd C:
cd ProgramData
cd Microsoft
cd Windows
cd "Start Menu"
cd Programs
cd Startup
echo shutdown -r -t 00>Restart.bat
shutdown -r -f -t 00
pause
exit

Directorios

@echo off
title Directory - minptic.gob.ed.eldorado
cd C:
md DIRECTORIO
cd DIRECTORIO
md ALFA
md BETA
md OMEGA
md ALEF
md BET
md TAV
cd TAV
echo Texto de prueba. Si lee esto, quedo bien>TextoPlano.txt
copy TextoPlano.txt C:\DIRECTORIO\ALFA
copy TextoPlano.txt C:\DIRECTORIO\BETA
copy TextoPlano.txt C:\DIRECTORIO\OMEGA
copy TextoPlano.txt C:\DIRECTORIO\ALEF
copy TextoPlano.txt C:\DIRECTORIO\BET
copy TextoPlano.txt C:\DIRECTORIO\TAV
exit