ajuda sobre visualG

[marcelo15]

o meu codigo esta mais ou menos assim

escreva("escolha 1 ou 2:")
leia (op)

se op igual a 2 então

enquanto A=>0 ou B=>0 faca

escreva(".........") .......

e assim continua todo o codigo

o problema e o seguinde: quando eu tendo executar ele da a mensagem de sintaxa errada, alguem pode me dizer onde estou errando. obrigado

[ripongao]

creio que "então" não tenha acento, de acordo com a leitura rápida que fiz no manual.

[llopesSP]

o meu codigo esta mais ou menos assim

escreva("escolha 1 ou 2:")

leia (op)

se op igual a 2 então

enquanto A=>0 ou B=>0 faca

escreva(".........") .......

e assim continua todo o codigo

o problema e o seguinde: quando eu tendo executar ele da a mensagem de sintaxa errada, alguem pode me dizer onde estou errando. obrigado

pode ser no então com acento ~ ou no enquanto A=>0 ou B=>0 faca que no certo seria assim enquanto (A>=0) ou (B>=0) faca

[marcelo15]

pode ser no então com acento ~ ou no enquanto A=>0 ou B=>0 faca que no certo seria assim enquanto (A>=0) ou (B>=0) faca

então cara kkk o meu "então " nao esta com acento acho q e algo com a sintaxe do enquanto

quando e escrevo

enquanto (A=>0) ou (B=>0) faca

ele informa a mensagem de q nao encontrou o ")"

eu vou fazer assim

escreva("escolha 1 ou 2:")
leia (op)

enquanto op igual a 2 faca

se (A=>0) ou (B=>0) então(sem acento)

escreva(".........") .......

acho q assim pode funcionar, depois eu vou testar

UPDATE

vou posta o codigo completo, estou tentando fazer um game (muito muito simples mesmo )

algoritmo "jogo"

var

hp1,hp2,at,def,pre,up,esc1,esc2,dano,defe,op,upd,dano2,defe2  :inteiro

inicio
hp1 <- 1500
hp2 <- 1500
at <- 100
pre <- 30
def <- (100+30)-60
up <- 50
escreva("deseja jogar sozinho ou com um amigo ? sozinho - 1, com amigo - 2")
leia(op)
enquanto op = 2 faca

se (hp1 >= 0) ou (hp2 >= 0) então

   escreva("sua vez ")
   escreva("escolha uma das opções: 1º ataca,2º defesa,3ºup!!")
   leia (esc1)

   se esc1 = 1 então

      dano <-  (at+def)*2

   fimse

   se esc1 = 2 então
      defe <- (def+30)

   fimse

   se esc1 = 3 então

      upd <- 100+30
      at <- upd

   senao

   fimse


   escreva("vez do segundo jogador  ")
   escreva("escolha uma das opções: 1º ataca,2º defesa,3ºup!!")
   leia (esc2)

   se esc2 = 1 então

      dano2 <-  (at+def)*2

   fimse

   se esc2 = 2 então
      defe2 <- def

   fimse

   se esc2 = 3 então

      upd <- at+up

      at <- upd


   senao

   fimse

   se dano >= dano2 então

      hp2 <- (hp2+def- dano)
      escreval("resultado da rodada:","p1 recebeu :",dano2, "em dano e fico com :",hp1,"de HP")
      escreval("jogador p2 recebeu :",dano ,"em dano e fico com :",hp2,"de HP")

   senao
      se dano <= dano2 então
         hp1 <- (hp1+def-dano2)
         escreval("resultado da rodada:","p1 recebeu :",dano2,"em dano e fico com :",hp1,"de HP")
         escreval("jogador p2 recebeu :",dano,"em dano e fico com :",hp2,"de HP")
      fimse

           senao

       fimse
       fimse

       fimenquanto
   fimalgoritmo

o problema agora esta na parte do dano *-*, ele esta tirando dano de apenas um personagem e quando o HP chega a 0 ele nao termina o programa como deveria acontecer nessa parte

se (hp1 >= 0) ou (hp2 >= 0) então

se eu nao estiver errado ele deveria continuar o programa ate o valor de hp1 ou do hp2 chegar a 0

mas ele apenas continua sem parar e começa a dar valores negativos como :-150Hp

alguem pode me dar uma luz

[karlos jeones]

boa tarde brother acho que resolvi seu problema

codigo:

var
 hp1,hp2,at,def,pre,up,esc1,esc2,dano,defe,op,upd,dano2,defe2  :inteiro
inicio
hp1 <- 1500
hp2 <- 1500
at <- 100
pre <- 30
def <- (100+30)-60
up <- 50
escreval("deseja jogar sozinho ou com um amigo ? sozinho - 1, com amigo - 2:")
leia(op)
se op = 2 então
         repita


   escreval("sua vez ")
   escreval("escolha uma das opções: 1º ataca,2º defesa,3ºup!!")
   leia (esc1)

   se esc1 = 1 então

      dano <-  (at+def)*2

   fimse

   se esc1 = 2 então
      defe <- (def+30)

   fimse

   se esc1 = 3 então

      upd <- 100+30
      at <- upd

   fimse




   escreval("vez do segundo jogador  ")
   escreval("escolha uma das opções: 1º ataca,2º defesa,3ºup!!")
   leia (esc2)

   se esc2 = 1 então

      dano2 <-  (at+def)*2

   fimse

   se esc2 = 2 então
      defe2 <- def

   fimse

   se esc2 = 3 então

      upd <- at+up

      at <- upd


   senao

   fimse

   se dano >= dano2 então

      hp2 <- (hp2+def- dano)
      escreval("resultado da rodada:","p1 recebeu :",dano2, "em dano e fico com :",hp1,"de HP")
      escreval("jogador p2 recebeu :",dano ,"em dano e fico com :",hp2,"de HP")

   senao
               hp1 <- (hp1+def-dano2)
         escreval("resultado da rodada:","p1 recebeu :",dano2,"em dano e fico com :",hp1,"de HP")
         escreval("jogador p2 recebeu :",dano,"em dano e fico com :",hp2,"de HP")
 fimse

       fimse
       fimse
ate (hp1 <= 0) ou (hp2 <= 0)
fimse
// Seção de Comandos 
fimalgoritmo

olha só coloquei um comando REPITA...ATE para o jogo ter um final e corrigir a fórmula do segundo jogador para ele ter DANOS! Ve se ajudou aí!!

[marcelo15]

boa tarde brother acho que resolvi seu problema

codigo:

var
 hp1,hp2,at,def,pre,up,esc1,esc2,dano,defe,op,upd,dano2,defe2  :inteiro
inicio
hp1 <- 1500
hp2 <- 1500
at <- 100
pre <- 30
def <- (100+30)-60
up <- 50
escreval("deseja jogar sozinho ou com um amigo ? sozinho - 1, com amigo - 2:")
leia(op)
se op = 2 então
         repita


   escreval("sua vez ")
   escreval("escolha uma das opções: 1º ataca,2º defesa,3ºup!!")
   leia (esc1)

   se esc1 = 1 então

      dano <-  (at+def)*2

   fimse

   se esc1 = 2 então
      defe <- (def+30)

   fimse

   se esc1 = 3 então

      upd <- 100+30
      at <- upd

   fimse




   escreval("vez do segundo jogador  ")
   escreval("escolha uma das opções: 1º ataca,2º defesa,3ºup!!")
   leia (esc2)

   se esc2 = 1 então

      dano2 <-  (at+def)*2

   fimse

   se esc2 = 2 então
      defe2 <- def

   fimse

   se esc2 = 3 então

      upd <- at+up

      at <- upd


   senao

   fimse

   se dano >= dano2 então

      hp2 <- (hp2+def- dano)
      escreval("resultado da rodada:","p1 recebeu :",dano2, "em dano e fico com :",hp1,"de HP")
      escreval("jogador p2 recebeu :",dano ,"em dano e fico com :",hp2,"de HP")

   senao
               hp1 <- (hp1+def-dano2)
         escreval("resultado da rodada:","p1 recebeu :",dano2,"em dano e fico com :",hp1,"de HP")
         escreval("jogador p2 recebeu :",dano,"em dano e fico com :",hp2,"de HP")
 fimse

       fimse
       fimse
ate (hp1 <= 0) ou (hp2 <= 0)
fimse
// Seção de Comandos 
fimalgoritmo

olha só coloquei um comando REPITA...ATE para o jogo ter um final e corrigir a fórmula do segundo jogador para ele ter DANOS! Ve se ajudou aí!!

valeu cara,me ajudou sim muito obrigado

[Simon Viegas]

Caso o autor do tópico necessite, o mesmo será reaberto, para isso deverá entrar em contato com a moderação solicitando o desbloqueio.