--T.W.O.S Coming On 2011
-- Movimiento
--Created By -Deinous-
--Colors
--System.memclean()

black = color.new(0,0,0)

miImagen1 = image.load("./Images/pausa1.png")
miImagen2 = image.load("./Images/pausa2.png")

options = 2

mActual = 1

--Loading images

--Imagenes: Fondo

Fondo = image.load("./Images/Fondo.png")

--Imagenes: Personaje

pd1 = image.load("./Images/pd1.png")
pd2 = image.load("./Images/pd2.png")
pd3 = image.load("./Images/pd3.png")
pd4 = image.load("./Images/pd4.png")

pi1 = image.load("./Images/pi1.png")
pi2 = image.load("./Images/pi2.png")
pi3 = image.load("./Images/pi3.png")
pi4 = image.load("./Images/pi4.png")
life = image.load("./Images/life.png")
bala = image.load("./Images/bala.png")

battery1 = image.load("./Images/battery1.png")
battery2 = image.load("./Images/battery2.png")
battery3 = image.load("./Images/battery3.png")
battery4 = image.load("./Images/battery4.png")

--sonidos
shoot = sound.load("shoot.wav")
thememenu = sound.load("thememenu.ogg")

--COlores
negro = color.new(0,0,0)

rojo = color.new(255,0,0)
blanco = color.new(255,255,255)




Personaje = {}

Personaje[1] = { x = 60, y = 210 }

Personaje.gravedad = 210
Personaje.velocidadSalto = 10
Personaje.estadoSalto = "suelo"

sprite = pd1
pasosd = 0
pasosi = 0

balaActual = 0
direccion = "derecha"

barraSalud = {}
barraSalud.y = 10

personaje = {}
personaje.salud = 100

infoBala = {}
for a = 1,5 do
   infoBala[a] = { imagen = bala , disparando = false, direccion = "derecha", x = Personaje[1].x + 32, y = Personaje[1].y + 16 }
end

--Funciones.

function configBala()
--Incrementamos la balaActual en 1 or la reiniciamos a 1.
if balaActual < 5 then
   balaActual = balaActual + 1
else
   balaActual = 1
end
if direccion == "izquierda" then
   infoBala[balaActual].x = Personaje[1].x
   infoBala[balaActual].y = Personaje[1].y + 16
end
if direccion == "derecha" then
   infoBala[balaActual].x = Personaje[1].x + 32
   infoBala[balaActual].y = Personaje[1].y + 16
end
if direccion == "arriba" then
   infoBala[balaActual].x = Personaje[1].x + 16
   infoBala[balaActual].y = Personaje[1].y
end
if direccion == "abajo" then
   infoBala[balaActual].x = Personaje[1].x + 16
   infoBala[balaActual].y = Personaje[1].y + 32
end
infoBala[balaActual].direccion = direccion
infoBala[balaActual].disparando = true
end

function disparoBala()
for i = 1,5 do
   if infoBala[i].disparando == true then
      if infoBala[i].direccion == "derecha" then infoBala[i].x = infoBala[i].x + 10 end
      if infoBala[i].direccion == "izquierda" then infoBala[i].x = infoBala[i].x - 10 end
      if infoBala[i].direccion == "arriba" then infoBala[i].y = infoBala[i].y - 10 end
      if infoBala[i].direccion == "abajo" then infoBala[i].y = infoBala[i].y + 10 end
      image.blit(infoBala[i].x,infoBala[i].y,infoBala[i].imagen)
   end
   if infoBala[i].x < 0 or infoBala[i].x > 480 or infoBala[i].y < 0 or infoBala[i].y > 272 then
      infoBala[i].disparando = false
   end
end
end

function mov()
if controls.right() then
direccion = "derecha"
Personaje[1].x = Personaje[1].x +2
pasosd = pasosd + 1
end

if controls.left() then
direccion = "izquierda"
Personaje[1].x = Personaje[1].x -2
pasosi = pasosi + 1
end
end

function sprd()
if pasosd >= 0 and pasosd < 10 and controls.right() then
sprite=pd1
end
if pasosd >= 10 and pasosd < 20  and controls.right() then
sprite=pd2
end
if pasosd >= 20 and pasosd < 30 and controls.right() then
sprite=pd3
end
if pasosd >= 30 and pasosd < 40 and controls.right() then
sprite=pd4
end
if pasosd >= 40 then
pasosd=0
end
end

function spri()
if pasosi >= 0 and pasosi < 10 and controls.left() then
sprite=pi1
end
if pasosi >= 10 and pasosi < 20 and controls.left() then
sprite=pi2
end
if pasosi >= 20 and pasosi < 30 and controls.left() then
sprite=pi3
end
if pasosi >= 30 and pasosi < 40 and controls.left() then
sprite=pi4
end
if pasosi >= 40 then
pasosi=0
end
end


--Fin Función--


while true do
controls.read()


--play sound
sound.play(thememenu)


    if controls.cross() and Personaje.estadoSalto == "suelo" then
        Personaje.estadoSalto = "saltando"
    end

    if Personaje.estadoSalto == "saltando" then
        Personaje.velocidadSalto = Personaje.velocidadSalto - 0.5
        Personaje.gravedad = Personaje.gravedad - Personaje.velocidadSalto
    end

    if Personaje.velocidadSalto < 0 then
        Personaje.estadoSalto = "cayendo"
    end

    if Personaje.gravedad < 210 and Personaje.estadoSalto == "cayendo" then
        Personaje.velocidadSalto = Personaje.velocidadSalto + 0.5
        Personaje.gravedad = Personaje.gravedad + Personaje.velocidadSalto
    end

    if Personaje.gravedad == 210 then
        Personaje.velocidadSalto = 10
        Personaje.estadoSalto = "suelo"
    end

    if Personaje.gravedad > 210 then Personaje.gravedad = 210 end

    Personaje[1].y = Personaje.gravedad

    image.blit(0,0,Fondo)
--miscare
    image.blit(Personaje[1].x,Personaje[1].y,sprite)

--shoot
if controls.press("circle") then
     configBala()
sound.play(shoot)
end

--saritura
    if controls.press("cross") then

    end

    --limita ecran
    if Personaje[1].x <= 0  then Personaje[1].x = 0 -- pentru in partea cealanta este >
    -- solo ponle que si el personaje es menor a 0 entonces se quede en 0
    -- fin


end

    if controls.up() then
    dofile("lala.lua")
    end



    --viata
    draw.fillrect(10,10,personaje.salud,barraSalud.y,rojo)
    screen.print(41,40,personaje.salud,0.6,blanco,0x0)
    draw.fillrect(15,23,life)
    screen.print(70,40,"%",0.6,blanco,0x0)


    if controls.up() and personaje.salud < 100 then
        personaje.salud = personaje.salud + 0.5

    end

    if controls.down() and personaje.salud > 0 then
        personaje.salud = personaje.salud - 0.5
    image.blit(0,0,life)
    end


if controls.start() then

dofile("./pausa.lua")

end


--baterie
  if batt.percent() >= 0 then batteryL = battery1 end
  if batt.percent() > 25 then batteryL = battery2 end
  if batt.percent() > 50 then batteryL = battery3 end
  if batt.percent() > 75 then batteryL = battery4 end

image.blit(425,7,batteryL)
--
mov()
sprd()
spri()
disparoBala()
screen.flip
end