balas={{},{},{},{},{},{},{},{},{},{},{},{},{},{},{}}
nave={x=240-(naveimg:width()/2),y=272-naveimg:height()}
balapulsada=0

function disparoautomatico()
if controls.cross() then
   laser:play()
     if balapulsada==0 then
         balapulsada=balapulsada+1
         balas[balapulsada].y=nave.y
         balas[balapulsada].x=nave.x
     elseif balapulsada >0 and balapulsada<=balasenpantalla then
         if balas[balapulsada].x>= nave.x+bala:width() then
             balapulsada=balapulsada+1
             balas[balapulsada].y=nave.y
             balas[balapulsada].x=nave.x
        end
     end
end
if balapulsada>0 then
     for n=1,balapulsada do
         if balas[1].x + bala:width() >=480 then
            for d=1,14 do
             balas[d].y=balas[d+1].y
             balas[d].x=balas[d+1].x
            end
            balapulsada=balapulsada-1
         end
     end
end
if balapulsada>0 then
     for i=1,balapulsada do
         if balas[i].x~= nil then
             balas[i].x=balas[i].x+15
             bala:blit(balas[i].x,balas[i].y)
         end
     end
end
end
------------FUNCTION DISPARO SEMI-AUTOMATICO
function disparosemiautomatico()
if controls.press("cross") then
   laser:play()
     if balapulsada==0 then
         balapulsada=balapulsada+1
         balas[balapulsada].y=nave.y
         balas[balapulsada].x=nave.x
     elseif balapulsada >0 and balapulsada<=balasenpantalla then
         if balas[balapulsada].x>= nave.x+bala:width() then
             balapulsada=balapulsada+1
             balas[balapulsada].y=nave.y
             balas[balapulsada].x=nave.x
        end
     end
end
if balapulsada>0 then
     for n=1,balapulsada do
         if balas[1].x + bala:width() >=480 then
            for d=1,14 do
             balas[d].y=balas[d+1].y
             balas[d].x=balas[d+1].x
            end
            balapulsada=balapulsada-1
         end
     end
end
if balapulsada>0 then
     for i=1,balapulsada do
         if balas[i].x~= nil then
             balas[i].x=balas[i].x+15
             bala:blit(balas[i].x,balas[i].y)
         end
     end
end
end