programa {
funcao inicio()
{//Introdução da Aventura
escreva("Bem-vindo à Floresta Sussurrante! Você é um explorador em
busca de tesouros lendários.\n")
escreva("Escolha um caminho para seguir:\n")
escreva("1 - Caminho das Sombras.\n")
escreva("2 - Caminho da Luz.\n")
escreva("3 - Caminho das Criaturas.\n")
//Leitura da Escolha do Jogador
inteiro opcao
escreva("Digite o número do caminho que deseja seguir:")
leia(opcao)
//Estrutura de decisão para cada caminho.
escolha (opcao)
{
caso 1:
CaminhodasSombras()
pare
caso 2:
CaminhodaLuz()
pare
caso 3:
Caminhodascriaturas()
pare
caso contrario:
escreva("Opção inválida. Por favor, escolha 1, 2 ou 3 \n")
}
}
funcao CaminhodasSombras()
{
escreva("Você escolheu o caminho das Sombras...\n")
escreva("Este caminho é cercado por árvores antigas e sombrias. um
guardião aparece com um enigma para você.\n")
escreva("Enigma:'Tenho olhos, mas não vejo. Tenho boca, mas não falo.
O que sou?'\n")
//Pergunta ao jogador
cadeia resposta
escreva("Digite sua resposta:")
leia(resposta)
//Verificação da resposta
se(resposta == "caveira")
{
escreva("Resposta correta! Você encontra um baú com uma gema
preciosa! +100 pontos.\n")
}
senao
{
escreva("Resposta incorreta! O guardião não permite a sua
passagem.\n")
}
}
funcao CaminhodaLuz()
{
escreva("\nVocê escolheu o Caminho da luz...\n")
escreva("Você encontra uma ponte quebrada sobre um rio. Deseja tentar
atravessá-la?\n")
escreva("1 - sim.\n")
escreva("2 - Não, procurar um desvio.\n")
//Leitura da escolha do jogador
inteiro Escolha
escreva("Escolha: ")
leia(Escolha)
//Decisão sobre a travessia
se (Escolha == 1)
{
escreva("Você atravessa a ponte com sucesso e encontra uma pedra
mágica! +50 pontos.\n")
}
senao
{
escreva("Você encontra um caminho alternativo seguro, mas sem
recompensa.\n")
}
}
funcao Caminhodascriaturas()
{
escreva("\nVocê escolheu o Caminho das Criaturas...\n")
escreva("Você vê uma criatura mágica adormecida bloqueando o caminho.
O que desja fazer?\n")
escreva("1 - Contornar cuidadosamente\n")
escreva("2 - acordar a criatura\n")
//Leitura da escolha do jogador
inteiro Escolha
escreva("Escolha: ")
leia(Escolha)
//Decisão sobre contornar ou acordar
se (Escolha == 1)
{
escreva("Você contorna a criatura e encontra uma árvore encantada
que lhe concede camuflagem! +75 pontos.\n")
}
senao
{
escreva("A criatura acorda e impede a sua passagem.\n")
}
}
}
