2
respostas

Meu personagem quando clico para subir volta para de tela de comandos e digita automaticamente o comando run.

-- title: Fuga das sombras 
-- author: mortiProBR
-- desc: RPG de acao 2d
-- script: lua

jogador = {
     sprite = 32,
     x = 120,
     y = 68
}

Contantes = {
  LARGURA_DA_TELA = 240,
  ALTURA_DA_TELA = 68
}

function temColisaoComMapa(ponto)
    blocoId = mget(ponto.x / 8, ponto.y / 8)
        if blocoId >= 128 then 
            return true
        else
            return false
        end
end

function atualiza()

     -- cima
  if btn(0) then
    superioresquerdo = {
      x = jogador.x - 8,
      y = jogador.y - 8 - 1
}
    superiorDireito = {
      x = jogador.x + 8,
      y = jogador.y - 8 - 1
}
  if temColisaoComMapa(superiorEsquerdo) or
     temColisaoComMapa(superiorDireito) then
     -- colisao!!
  else
    jogador.y = jogador.y -1
  end
end

        -- baixo
  if btn(1)then
         jogador.y = jogador.y + 1
        end

     -- esquerda
        if btn(2)then
         jogador.x = jogador.x - 1
        end 

        -- direita
  if btn(3)then
         jogador.x = jogador.x + 1
        end
end

function desenhaMapa()
    map(0, -- posicao x no mapa
           0, -- posicao y no mapa
                 Contantes.LARGURA_DA_TELA, -- quanto desenhar x
                 Contantes.    ALTURA_DA_TELA, -- quanto desenhar y
                    0, -- em qual ponto colocar o x
                    0) -- em qual ponto colocar o y
end

function desenhaJogador()
   spr(jogador.sprite,
   jogador.x - 8,
   jogador.y - 8,
   0, -- cor de fundo
   1, -- escala
   0, -- espelhar
   0, -- rotacionar
   2, -- quantos blocos para direita
   2) -- quantos blocos para baixo
end

function desenha()
  cls()
  desenhaMapa()
  desenhaJogador()

  print(jogador.y) 
end

function TIC()
    atualiza()
    desenha()

end

Meu personagem quando clico para subir volta para de tela de comandos e digita automaticamente o comando run.

2 respostas

Assista a aula novamente

E tente entender melhor

Quer mergulhar em tecnologia e aprendizagem?

Receba a newsletter que o nosso CEO escreve pessoalmente, com insights do mercado de trabalho, ciência e desenvolvimento de software