--auto = {img=image.load("auto.png"),x=50,y=272}
math.randomseed(os.time())
fondo = image.load("miola.png");
 
velocity = 3;
tiempo={x=0,y=272} 
 
nautilus = {}
nautilus["parado"]={}
nautilus["paseo"]={}
nautilus.parado.down = image.load("sprites/spriteparado.png")
nautilus.parado.left = image.load("sprites/spriteparado.png")
nautilus.parado.right = image.load("sprites/spriteparado.png")
nautilus.parado.up = image.load("sprites/spriteparado.png")
rawset(nautilus["paseo"],"up",image.loadsprite("sprites/sprite.png",75.5,90))
rawset(nautilus["paseo"],"down",image.loadsprite("sprites/spriteabajo.png",75.5,90))
rawset(nautilus["paseo"],"left",image.loadsprite("sprites/spriteleft.png",75.5,90))
rawset(nautilus["paseo"],"right",image.loadsprite("sprites/spriteright.png",75.5,90))
status = "parado" 
direction = "down" 
array = {}
array.x = 50 
array.y = 270 
array.w = 53
array.h = 90
anim = 0
 
function flowmaster()
 
   tiempo.y = tiempo.y - velocity;
 
 
   if ( tiempo.y <= 0 ) then tiempo.y = 272; 
   end
 
 
  image.blit(fondo,0,math.ceil(tiempo.y)); 
 
 
   image.blit(fondo,0,math.ceil(tiempo.y)-272); 
end
 
car = {}
carimg = image.load("sprite enemigo/car1.png")
car_t={x=5,y=5,w=53,h=90}
car = {x=5,y=5,w=carimg:width(),h=carimg:height()}
 
function enemy()
car.y = -50-math.random(50,100)
car.x = math.random(120,355)
end
 
 
while true do
	controls.read()
 
if controls.cross() then
velocity = velocity + 00.1
 
else
velocity = 3
 
end
if controls.cross() or controls.down() or controls.left() or controls.right() then
		anim = anim + 0.1
		status = "paseo"
		if math.floor(anim)>3 then
			anim = 0
		end
	else
		anim = 0
		status = "parado"
	end
 
 if status =="paseo" then
		nautilus[status][direction]:setframe(anim)
	end
 
		array.x = math.min(math.max(0,array.x), 480-75)
	array.y = math.min(math.max(0,array.y), 272-90)
	if controls.cross() then
		array.y=array.y-1
		direction = "up"
 
			elseif controls.down() then
		array.y=array.y+4
		direction = "down"
elseif controls.right() then
	array.x=array.x+4
	direction = "right"
elseif controls.left() then
	array.x=array.x-4
	direction = "left"
end
if array.x + array.w >= car.x and
	array.x <=	car.x+car.w and
	array.y + array.h >= car.y and 
	array.y <= car.y + car.h then
os.message("as")
end
 
 
   flowmaster();
nautilus[status][direction]:blit(array.x,array.y)
if controls.press("l") then
dofile("AS")
end
 
if car.y >272 then 
enemy() 
end
	carimg:blit(car.x,car.y)
 car.y = car.y + 4
 
  screen.flip();
end