Pr0gramer icon

DS App v1.0

Pr0gramer | PRO | 04/20/14 04:10:23 AM UTC | 0 ⭐ | 2469 👁️ | Never ⏰ | []
Winbatch |

4.5 KB

|

None

|

0 👍

/

0 👎

::DS app www.darksight.tk
:ini
Set uu=Dark
Set win=www.
Set endwin=.tk
Set slash=Sight
@echo off
mode con cols=80 lines=25
set app-vertion=1.0
title %win%%uu%%slash%%endwin% App V%app-vertion%   -Por: %uu% %slash%
Cls
::
::
:nombre
Set nombre=type-in
Cls
Echo escribe tu primer nombre y presiona ENTER.
Echo.
Set /p nombre=Nombre:
Cls
Set tipo=nombre
If %nombre%==type-in goto type-in
::
::
:genero
Set genero=type-in
Cls
Echo Hola %nombre%
Echo Eres hombre o mujer?
Echo.
Echo 1.) Hombre
Echo 2.) Mujer
Echo.
Set /p genero=Opcion Numero:
Cls
Set tipo=genero
If %genero%==type-in goto type-in
If %genero%==0 goto undefined
If %genero%==1 goto genero1
If %genero%==2 goto genero2
If %genero% geq 3 goto undefined
Goto undefined
Exit
:genero 1
Cls
set saludo=Bienvenido
Goto menuprincipal
Exit
:genero2
Cls
set saludo=Bienvenida
Goto menuprincipal
::
::---------------MENU_PRINCIPAL----------------
::
:menuprincipal
Set menu=type-in
title %win%%uu%%slash%%endwin% App V%app-vertion%   -Por: %uu% %slash%
Cls
Echo %saludo% %nombre%
Echo.
Echo Escoje el NUMERO de opcion y presiona ENTER.
Echo.
Echo 1.) Ver Informacion Util
Echo 2.) Visitar Pagina (%win%%uu%%slash%%endwin%)
Echo 3.) Abrir Navegador
Echo 4.) Salir
Echo.
Set /p menu=Opcion Numero:
Cls
Set tipo=principal
If %menu%==type-in goto type-in
If %menu%==salir goto exit
If %menu%==Salir goto exit
If %menu%==SALIR goto exit
If %menu%==exit goto exit
If %menu%==Exit goto exit
If %menu%==EXIT goto exit
If %menu%==1 goto info
If %menu%==2 goto visitar
If %menu%==3 goto navegador
If %menu%==4 goto exit
If %menu% geq d goto undefined
Goto undefined
::
:visitar
Cls
If exist chrome.exe goto chrome
If exist opera.exe goto opera
If exist iexplore.exe goto iexplore
:chrome
Cls
Start chrome.exe http://%win%%uu%%slash%%endwin%
Goto menuprincipal
:opera
Cls
Start opera.exe http://%win%%uu%%slash%%endwin%
Goto menuprincipal
:iexplore
Cls
Start iexplore.exe http://%win%%uu%%slash%%endwin%
Goto menuprincipal
::
:navegador
Set tipo=navegador
Set open=type-in
Cls
Echo Escoje la LETRA de la opcion y presiona ENTER.
Echo.
If exist chrome.exe Echo c.) Google Chrome
If exist chrome.exe Echo o.) Opera
If exist iexplore.exe Echo i.) Internet Explorer
Echo.
Set /p open=Letra:
Cls
If %open%==type-in goto type-in
If %open%==salir goto exit
If %open%==Salir goto exit
If %open%==SALIR goto exit
If %open%==exit goto exit
If %open%==Exit goto exit
If %open%==EXIT goto exit
If %open%==C goto chrome1
If %open%==c goto chrome1
If %open%==O goto opera1
If %open%==o goto opera1
If %open%==I goto iexplore1
If %open%==i goto iexplore1
Goto undefined
:chrome1
Cls
If exist chrome.exe (start chrome.exe http://google.com) else goto undefined
Goto menuprincipal
:opera1
Cls
If exist opera.exe (start opera.exe http://google.com) else goto undefined
Goto menuprincipal
:iexplore1
Cls
If exist iexplore.exe (start iexplore.exe http://google.com) else goto undefined
Goto menuprincipal
::
:info
Title Informacion Util
Cls
Echo %saludo% %nombre%
Echo.
Echo Version de la aplicacion: %app-vertion%
Echo Creador de la aplicacion: %uu% %slash%
Echo pagina web: %win%%uu%%slash%%endwin%
Echo.
Echo Presione cualquier tecla para volver al menu principal
Pause >nul
Cls
Goto menu principal
::
::--------------------ERRORES-----------------------
::
:type-in
Cls
Echo    ERROR 532
Echo   Escoje una opcion.
Echo.
Echo Presiona cualquier tecla.
Pause >nul
Cls
If %tipo%==nombre goto nombre
If %tipo%==genero goto genero
If %tipo%==navegador goto navegador
If %tipo%==principal goto menuprincipal
Exit
:undefined
Cls
Echo    ERROR 404
Echo   Escoje una opcion.
Echo.
Echo Presiona cualquier tecla.
Pause >nul
Cls
If %tipo%==nombre goto nombre
If %tipo%==genero goto genero
If %tipo%==navegador goto navegador
If %tipo%==principal goto menuprincipal
Exit
::
:salir
Cls
title -CERRANDO APP-  %win%%uu%%slash%%endwin%
Cls
@echo off
Cls
Echo Cerrando APP.
Echo.
Echo ESPERE 5
Ping localhost -n 2 >nul
@echo off
Cls
Echo Cerrando APP.
Echo.
Echo ESPERE 4
Ping localhost -n 2 >nul
@echo off
Cls
Echo Cerrando APP.
Echo.
Echo ESPERE 3
Ping localhost -n 2 >nul
@echo off
Cls
Echo Cerrando APP.
Echo.
Echo ESPERE 2
Ping localhost -n 2 >nul
@echo off
Cls
Echo Cerrando APP.
Echo.
Echo ESPERE 1
Ping localhost -n 2 >nul
@echo off
Cls
Echo Cerrando APP.
Echo.
Echo ESPERE 0
Ping localhost -n 2 >nul
Cls
Msg * Hasta La proxima %nombre%
Ping localhost -n 1 >nul
Exit

Comments

  •  icon
    01/01/70 12:00:00 AM UTC
    Plain Text |

    0 B

    |

    👍

    /

    👎

    
        
  •  icon
    01/01/70 12:00:00 AM UTC
    Plain Text |

    0 B

    |

    👍

    /

    👎