Jump to content

Search the Community

Showing results for tags 'batch'.

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Comunidade
    • Sugestões, Críticas ou Dúvidas relativas ao P@P
    • Acerca do P@P
  • Comunidade a Trabalhar
    • Apresentação de Projectos de Programação
    • Downloads
    • Revista PROGRAMAR
  • Desenvolvimento Geral
    • C
    • C++
    • Java
    • Pascal
    • Python
    • Bases de Dados
    • Dispositivos Móveis
    • Outras Linguagens
  • Desenvolvimento Orientado para Web
    • PHP
    • HTML
    • CSS
    • Javascript
    • Outras Linguagens de WebDevelopment
    • Desenvolvimento Web
  • Desenvolvimento .NET
    • C#
    • Visual Basic .NET
    • ASP.NET
    • WPF & SilverLight
  • Software e Sistemas Operativos
    • Software de Produtividade
    • Sistemas Operativos
    • Apresentação de Software
  • Informática
    • Interfaces Visuais
    • Computação Gráfica
    • Algoritmia e Lógica
    • Segurança e Redes
    • Hardware
    • Electrónica e Automação Industrial
    • Matemática
    • Software de Contabilidade e Finanças
    • Dúvidas e Discussão de Programação
  • Outras Áreas
    • Notícias de Tecnologia
    • Dúvidas Gerais
    • Discussão Geral
    • Eventos
    • Anúncios de Emprego
    • Tutoriais
    • Snippets / Armazém de Código
  • Arquivo Morto
    • Projectos Descontinuados
    • System Empires

Blogs

  • Blog dos Moderadores
  • Eventos
  • Notícias de Tecnologia
  • Blog do Staff
  • Revista PROGRAMAR
  • Projectos
  • Wiki

Categories

  • Revista PROGRAMAR
  • Tutoriais
  • Textos Académicos
  • Exercícios Académicos
    • Exercícios c/ Solução
    • Exercícios s/ Solução
  • Bibliotecas e Aplicações
  • Outros

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Website


GitHub


LinkedIn


Twitter


Facebook

Found 4 results

  1. Este é um programa antigo que finha feito em Batch, o jogo é para dois jogadores O programa agora vê quem ganha e perde @echo off :inic ::Posição na tela set p1=1 set p2=2 set p3=3 set p4=4 set p5=5 set p6=6 set p7=7 set p8=8 set p9=9 ::Vares da posição livre set a1=1 set a2=1 set a3=1 set a4=1 set a5=1 set a6=1 set a7=1 set a8=1 set a9=1 set c1=1 set c2=1 set c3=1 set c4=1 set c5=1 set c6=1 set c7=1 set c8=1 set c9=1 :topo cls echo [%p1%-%p2%-%p3%] echo [%p4%-%p5%-%p6%] echo [%p7%-%p8%-%p9%] set /p x= if "%x%" EQU "repete" goto inic ::Coloca x na posição se for 1. if %a1% EQU 1 ( if %x% EQU 1 ( set p1=X set a1=0 goto testax ) ) if %a2% EQU 1 ( if %x% EQU 2 ( set p2=X set a2=0 goto testax ) ) if %a3% EQU 1 ( if %x% EQU 3 ( set p3=X set a3=0 goto testax ) ) if %a4% EQU 1 ( if %x% EQU 4 ( set p4=X set a4=0 goto testax ) ) if %a5% EQU 1 ( if %x% EQU 5 ( set p5=X set a5=0 goto testax ) ) if %a6% EQU 1 ( if %x% EQU 6 ( set p6=X set a6=0 goto testax ) ) if %a7% EQU 1 ( if %x% EQU 7 ( set p7=X set a7=0 goto testax ) ) if %a8% EQU 1 ( if %x% EQU 8 ( set p8=X set a8=0 goto testax ) ) if %a9% EQU 1 ( if %x% EQU 9 ( set p9=X set a9=0 goto testax ) ) goto topo :testax ::Linhas horizontal if "%p1%" == "X" if "%p2%" == "X" if "%p3%" == "X" GOTO final1 if "%p4%" == "X" if "%p5%" == "X" if "%p6%" == "X" GOTO final1 if "%p7%" == "X" if "%p8%" == "X" if "%p9%" == "X" GOTO final1 ::Linha obliqua if "%p1%" == "X" if "%p5%" == "X" if "%p9%" == "X" GOTO final1 if "%p7%" == "X" if "%p5%" == "X" if "%p3%" == "X" GOTO final1 ::linha vetical if "%p1%" == "X" if "%p4%" == "X" if "%p7%" == "X" GOTO final1 if "%p2%" == "X" if "%p5%" == "X" if "%p8%" == "X" GOTO final1 if "%p3%" == "X" if "%p6%" == "X" if "%p9%" == "X" GOTO final1 goto jogabola goto topo :jogabola cls echo [%p1%-%p2%-%p3%] echo [%p4%-%p5%-%p6%] echo [%p7%-%p8%-%p9%] set /p x= if %c1% EQU 1 ( if %a1% EQU 1 ( if %x% EQU 1 ( set p1=O set c1=0 goto testabola ) ) ) if %c2% EQU 1 ( if %a2% EQU 1 ( if %x% EQU 2 ( set p2=O set c2=0 goto testabola ) ) ) if %c3% EQU 1 ( if %a3% EQU 1 ( if %x% EQU 3 ( set p3=O set c3=0 goto testabola ) ) ) if %c4% EQU 1 ( if %a4% EQU 1 ( if %x% EQU 4 ( set p4=O set c4=0 goto testabola ) ) ) if %c5% EQU 1 ( if %a5% EQU 1 ( if %x% EQU 5 ( set p5=O set c5=0 goto testabola ) ) ) if %c6% EQU 1 ( if %a6% EQU 1 ( if %x% EQU 6 ( set p6=O set c6=0 goto testabola ) ) ) if %c7% EQU 1 ( if %a7% EQU 1 ( if %x% EQU 7 ( set p7=O set c7=0 goto testabola ) ) ) if %c8% EQU 1 ( if %a8% EQU 1 ( if %x% EQU 8 ( set p8=O set c8=0 goto testabola ) ) ) if %c9% EQU 1 ( if %a9% EQU 1 ( if %x% EQU 9 ( set p9=O set c9=0 goto testabola ) ) ) if "%x%" EQU "repete" goto inic goto jogabola :testabola ::Linhas horizontal if "%p1%" == "O" if "%p2%" == "O" if "%p3%" == "O" GOTO final2 if "%p4%" == "O" if "%p5%" == "O" if "%p6%" == "O" GOTO final2 if "%p7%" == "O" if "%p8%" == "O" if "%p9%" == "O" GOTO final2 ::Linha obliqua if "%p1%" == "O" if "%p5%" == "O" if "%p9%" == "O" GOTO final2 if "%p7%" == "O" if "%p5%" == "O" if "%p3%" == "O" GOTO final2 ::linha vetical if "%p1%" == "O" if "%p4%" == "O" if "%p7%" == "O" GOTO final2 if "%p2%" == "O" if "%p5%" == "O" if "%p8%" == "O" GOTO final2 if "%p3%" == "O" if "%p6%" == "O" if "%p9%" == "O" GOTO final2 goto topo :final2 cls echo O Ganha! pause goto inic :final1 cls echo X Ganha! pause goto inic
  2. Este é um código velho que fiz algum tempo. Faz com que o que você escreve seja falado pelo computador, é um programa de "texto para voz". Usa VB Script mas executa num ficheiro .Bat @echo off echo Insira uma frase: set /p x= echo texto="%x%" > fala.vbs echo set voz=CreateObject("SAPI.SpVoice") >> fala.vbs echo voz.Speak texto>>fala.vbs start fala.vbs
  3. Este é um jogo de pedra papele tesoura que fiz em Batch por diversão. As imagens falam por si. @echo off ::Criado por Bruno Silva title Pedra - Papel - Tesoura mode con lines=15 cols=30 :topo ::AI escolhe de 1 a 3 set /a ai=%RANDOM% * 3 / 32768 + 1 cls echo --Pedra - Papel - Tesoura-- echo Esolhe um: echo [1] Pedra echo [2] Papel echo [3] Tesoura set /p humano= if %humano%==1 ( set x=1 goto baixo ) if %humano%==2 ( set x=2 goto baixo ) if %humano%==3 ( set x=3 goto baixo ) goto topo :baixo if %x%==1 ( if %ai%==1 ( echo Pedra vs Pedra echo Empate pause>nul goto topo ) ) if %x%==2 ( if %ai%==2 ( echo Papel vs Papel echo Empate pause>nul goto topo ) ) if %x%==3 ( if %ai%==3 ( echo Tesoura vs Tesoura echo Empate pause>nul goto topo ) ) if %x%==1 ( if %ai%==2 ( echo Pedra vs Papel echo Perdeu pause>nul goto topo ) ) if %x%==1 ( if %ai%==3 ( echo Pedra vs Tesoura echo Ganhou pause>nul goto topo ) ) if %x%==2 ( if %ai%==1 ( echo Papel vs Pedra echo Ganhou pause>nul goto topo ) ) if %x%==2 ( if %ai%==3 ( echo Papel vs Tesoura echo Perdeu pause>nul goto topo ) ) if %x%==3 ( if %ai%==1 ( echo Tesoura vs Pedra echo Perdeu pause>nul goto topo ) ) if %x%==3 ( if %ai%==2 ( echo Tesoura vs Papel echo Ganhou! pause>nul goto topo ) ) pause>nul
  4. Este foi um programa que fiz na altura que andava a aprender Batch Script no Windows. Funciona simples e é funcional, é possivel salvar um ficheiro e voltar a carregar o ficheiro. O ficheiro vai ser salvo em .bat e só pode carregar ficheiro .bat. @echo off :topo title Bloco de Notas cls echo ±±±±±±±±±±±±±±±±±± echo ± Bloco de Notas ± echo ±±±±±±±±±±±±±±±±±± echo Por Bruno Silva color 71 echo. echo. echo Carregar [1] Å Novo [2] echo. set com=3 set /p com= if "%com%"=="1" goto carregar if "%com%"=="2" goto novo goto topo :novo cls echo Nome do Ficheiro set /p nome= title %nome% cls set /p txt= echo. cls echo Ficheiro salvo set b=%txt% ( echo set b=%txt% )>%nome%.bat :voltar echo Ir para Menu [1] Sim \ [2] Sair set com=3 set /p com= if "%com%"=="1" goto topo if "%com%"=="2" exit goto voltar :carregar cls echo Nome do ficheiro set /p titulo= cls call %titulo%.bat title %titulo% set /p txt=%b% echo. cls echo Ficheiro salvo ( echo set b=%b%%txt% )>%titulo%.bat :voltar2 echo Ir para Menu [1] Sim \ [2] Sair set com=3 set /p com= if "%com%"=="1" goto topo if "%com%"=="2" exit goto voltar2
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.