Advertisement
LightProgrammer000

Menu Tarefas Basicas

Nov 21st, 2018
239
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Batch 1.43 KB | None | 0 0
  1. @echo off
  2. cls
  3.  
  4. :: Dimensao de Tela
  5. mode 40,15
  6.  
  7. :: Rotulo
  8. :menu
  9.    
  10.     :: Tela Inicial
  11.     cls
  12.     color B
  13.     title Menu
  14.  
  15.     echo.
  16.     echo ----------------
  17.     echo *     MENU     *
  18.     echo ----------------
  19.     echo.
  20.     echo [1] Calculadora
  21.     echo [2] Tarefas
  22.     echo [3] Bloco de Notas
  23.     echo [4] Worpad
  24.     echo [5] Paint
  25.     echo [6] Internet Explorer
  26.     echo.
  27.  
  28.     :: Entrada de Dados
  29.     set /p esc=Opcao:
  30.  
  31.     ::::::::::::::::::::::::::
  32.     :: Estrutura de Excecao ::
  33.     ::::::::::::::::::::::::::
  34.  
  35.     :: Caso (leq): <= 0
  36.     if %esc% leq 0 (
  37.    
  38.         :: Retorno
  39.         goto menu
  40.     )
  41.  
  42.     :: Caso(geq): >= 7
  43.     if %esc% geq 7 (
  44.        
  45.         :: Retorno
  46.         goto menu
  47.     )
  48.  
  49.     ::::::::::::::::::::::::::
  50.     :: Estrutura de Decisao ::
  51.     ::::::::::::::::::::::::::
  52.    
  53.     :: Caso: Calculadora
  54.     if %esc% == 1 (
  55.    
  56.         :: Execucao
  57.         start calc.exe
  58.        
  59.         :: Retorno
  60.         goto menu
  61.     )
  62.  
  63.     :: Caso: Gerenciador de Tarefas
  64.     if %esc% == 2 (
  65.        
  66.         :: Excecucao
  67.         start taskmgr.exe
  68.        
  69.         :: Retorno
  70.         goto menu
  71.     )
  72.  
  73.     :: Caso: Bloco de Notas
  74.     if %esc% == 3 (
  75.        
  76.         :: Excecucao
  77.         start notepad.exe
  78.        
  79.         :: Retorno
  80.         goto menu
  81.     )
  82.  
  83.     :: Caso: Worpad
  84.     if %esc% == 4 (
  85.        
  86.         :: Execucao
  87.         start write
  88.        
  89.         :: Retorno
  90.         goto menu
  91.     )
  92.  
  93.     :: Caso: Paint
  94.     if %esc% == 5 (
  95.        
  96.         :: Excecucao
  97.         start mspaint.exe
  98.        
  99.         :: Retorno
  100.         goto menu
  101.     )
  102.  
  103.     :: Caso: Internet Explorer
  104.     if %esc% == 6 (
  105.        
  106.         :: Execucao
  107.         start iexplore.exe www.google.com.br
  108.        
  109.         :: Retorno
  110.         goto menu
  111.     )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement