leia (n1)
limpa()
se(n1 ==1)
{escreva("Eu sou Bartô Tranca-Caminho o Guardião, para deixa-lo passar terá que desvendar o
Enigma!\n")
escreva("Deseja Desvendar, caso nao consiga ficará preso para resto de sua vida!\n")
escreva("Se responder corretamente ao enigma, você ganhará o baú contendo uma gema
preciosa 100 pontos\n")
escreva("Digite 1 = Sim ou 2 = Não..: ")
leia (n2)
limpa()
se(n2 ==1)
{escreva("Quem sou eu? Tenho olhos, mas nao vejo. Tenho boca, mas não falo.\n")
escreva("Quem Sou?..:\n")
escreva(" 1 - Mula\n")
escreva(" 2 - Avião\n")
escreva(" 3 - Onça\n")
escreva(" 4 - Caveira\n")
escreva(" Digite Numero...: ")
leia(n3)
limpa()
se(n3 ==4)
{escreva ("Você e o Vencedor, Ganhou 1 Gema Preciosa que vale 100 Pontos!!!!")}
senao
{se (n3<4)
{escreva ("Você Estará Preso Para o Resto de Sua Vida.... hahahaha!!!!!!")}
senao se (n2 ==2)
{escreva ("fim.........")}
senao{escreva("Escolha Inválida") }
senao se (n1 ==2)
{escreva("Fim.........")}
senao{escreva("Escolha Inválida") }
// Fim.....
// O caminho da Luz.....
//Inicio......
senao se(opcao ==2){
escreva("O Caminho da Luz!\n")
escreva("Este caminho é iluminado por raios de sol que filtran entre as copas das árvores.
Parece ser o caminho mais seguro e reconfortante da floresta!\n")
escreva("Deseja Continuar?\n")
escreva("Digite 1 = Sim ou 2 = Não..: ")
leia (o1)
limpa()
se(o1 ==1)
{escreva("Sou o Curupira, protetor da fonte magica no final do rio. tem dois caminho para
chegar ate lá!\n")
escreva("1 - Caminho do Ponte!\n")
escreva("2 - Caminho Seguro!\n")
escreva("Digite 1 ou 2 ..: ")
leia (o2)
limpa()
se(o2 ==1)
{escreva("Devido a uma Forte tempestade a ponte sobre o rio caiu, ainda posso te levar pelo
caminho seguro, ou pode ir a nado\n")
escreva(" 1 - Ir a Nado.\n")
escreva(" 2 - Caminho Seguro.\n")
escreva(" 3 - Voltar.\n")
escreva(" Digite Numero...: ")
leia(o3)
limpa()
se(o3 ==1)
{escreva ("Você e o Vencedor, Conseguir encontrar a fonte magica, você restaurou sua saúde e
adicionou 50 pontos no seu jogo!!!!")}
senao
{se (o3>1)
{escreva ("Você Estará Preso na Floreta para o Resto de Sua Vida.... hahahaha!!!!!!\n")
escreva ("Fim...!!!!")}
}
senao se (o2 ==2)
{escreva ("Escolheu o caminho errado!!! ficara perdido na floreta!!!!\n")
escreva ("Fim....!!!!")}
senao{escreva("Escolha Inválida") }
senao se (o1 ==2)
{escreva("Escolheu o caminho errado!!! ficara perdido na floreta!!!!\n")
escreva("Fim....!!!!")}
senao{escreva("Escolha Inválida") }
// Fim....
// Os Caminho da Criatura
// Incio....
senao se(opcao ==3){
escreva("Os caminhos da Criatura\n")
escreva("Este caminho repleto de sons estranhos e pegadas misteriosas no chão. Parece ser o
caminho mais imprevisivel e enigmatico da floresta.\n")
escreva("Deseja Continuar?\n")
escreva("Digite 1 = Sim ou 2 = Não..: ")
leia (p1)
limpa()
se(p1 ==1)
{escreva("Esta a sua frente o Pé grande, ele e muito feroz e truculento, esta adormecido e
bloqueando o caminho!\n")
escreva("1 - Acorda-lo para Passar!\n")
escreva("2 - Desviar com Cuidado!\n")
escreva("Digite 1 ou 2 ..: ")
leia (p2)
limpa()
se(p2 ==2)
{escreva(" Você esbarrou no Pé Grande, ele esta acordando, agora tem uma escolha!\n")
escreva(" 1 - Atacar o Pé grande.\n")
escreva(" 2 - Encontrar a arvore encatanda.\n")
escreva(" 3 - Voltar.\n")
escreva(" Digite Numero...: ")
leia(p3)
limpa()
se(p3 ==2)
{escreva ("Você e o Vencedor, Conseguir encontrar a árvore encantada, ganhou a habilidade
especial de camuflagem e adicionou 75 pontos no seu jogo!!!!")}
senao
{se (p3>=1)
{escreva ("Você será devorado.... hahahaha!!!!!!\n")
escreva ("Fim...!!!!")}
}
senao se (p2 ==1)
{escreva ("Escolheu o caminho errado!!! será jantar Pé grande!!!!\n")
escreva ("Fim....!!!!")}
senao{escreva("Escolha Inválida") }
senao se (p1 ==1)
{escreva("Escolheu o caminho errado!!! será jantar Pé grande!!!!\n")
escreva("Fim....!!!!")}
senao{escreva("Escolha Inválida") }
// Fim....
senao{escreva("Escolha Inválida") }