Joga Batalha Naval
Publicado por Lame Duck 15/05/2008
[ Hits: 9.312 ]
Homepage: www.patinho.net
Um jogo bem simples de batalha naval.
Com a intenção do usuário ler o código e entender um pouco mais sobre Shell Script
# Jogo de Batalha Naval # Escrito para servir de exemplo para a apostila que estou escrevendo no site # Esse jogo ainda está uma bagunça, com códigos mal feito. # Mesmo assim serve para um curioso ler o código e ver como funciona. # Versão 0.01 # Criado Por LameDuck ataque_b1=0 # Forma do Barquinho "==" barquinho1="$((RANDOM % 5)) $((RANDOM % 4))" linha[0]="# # # # #" linha[1]="# # # # #" linha[2]="# # # # #" linha[3]="# # # # #" linha[4]="# # # # #" for ((x=1;x<=20;x++)); do echo " 0 1 2 3 4" echo "A ${linha[0]}" echo "B ${linha[1]}" echo "C ${linha[2]}" echo "D ${linha[3]}" echo "E ${linha[4]}" if [[ $ataque_b1 -eq 2 ]] then echo -e "KABRUM\nVocê matou o barco!" exit 0 fi read -p "Onde quer que eu ataque? Ex: A 3. " lin coluna case "$lin" in [Aa]) lin=0;; [Bb]) lin=1;; [Cc]) lin=2;; [Dd]) lin=3;; [Ee]) lin=4;; esac if [[ "${lin} ${coluna}" = "$barquinho1" || "${lin} $(($coluna-1))" = "$barquinho1" ]] then let ataque_b1++ echo $ataque_b1 mudar='=' else mudar=' ' fi echo "${linha[$lin]} $letra" linha[$lin]=${linha[$lin]:0:$(($coluna*2))}${mudar}${linha[$lin]:$(((coluna*2)+1))} clear done
Criando pdf para impressão de livros
CkDeps - Análise de Dependências e Busca por Pacotes Instalados
Backup Simples de tabela MYSQL
Script para instalação do java no kurumin 4
Instalar e Configurar o Slackware Linux em 2025
Como configurar os repositórios do apt no Debian 12 em 2025
Passkeys: A Evolução da Autenticação Digital
Instalação de distro Linux em computadores, netbooks, etc, em rede com o Clonezilla
Configurando o Conky para iniciar corretamente no sistema
3 configurações básicas que podem melhorar muito a sua edição pelo editor nano
Como colorir os logs do terminal com ccze
Instalação Microsoft Edge no Linux Mint 22
Como configurar posicionamento e movimento de janelas no Lubuntu (Openbox) com atalhos de teclado
driver do repositorio debian nao atende o requisito minimo (3)
Novo problema! Erro durante a arualização! (1)
Tenho um problama de quebra de pacote e não descobri como resolver [RE... (1)