--Dofile a la libreria
	dofile("weaponlib.lua")
--Cargamos la imagen de la bala (podemos hacer un image.create) NOTA: LA IMAGEN DEBE DE ESTAR EN HORIZONTAL
	bala =  image.load("bala.png") --image.create(20,5,color.new(255,0,0))
--Esa función devuelve un color sin alpha aleatorio
	function random_color()
		return color.new(math.random(0,255),math.random(0,255),math.random(0,255))
	end
--Array de los enemigos
	object = {}	 
--Creamos 10 enemigos
	for i = 1, 10 do
		table.insert(object,{x=math.random(20,460), y=math.random(20,252),w=math.random(15,90),h=math.random(15,90),color=random_color()})
	end
--Variables del "personaje"
	x=240
	y=136
	ang =0 
---CREAMOS UNA NUEVA "ARMA"
	disparo =  weapon.create(bala,100)
--LA INICIAMOS JUSTO ANTES DEL BUCLE
	weapon.action(disparo,"start")
 
while true do
--Limpiamos buffer de color blanco
	screen.clear(color.new(255,255,255))
--Leemos controles
	controls.read()
--Movemos el personaje con el joystick
	if math.abs(controls.analogx())>50 then x=x+controls.analogx()/50 end
	if math.abs(controls.analogy())>50 then y=y+controls.analogy()/50 end
--Dibuja un cuadrado verde donde está nuestro "personaje" y el cañón
	draw.fillrect(x-5,y-5,10,10,color.new(0,255,0))	
	draw.line(x,y,x+math.cos(math.rad(ang))*40,y+math.sin(math.rad(ang))*40,color.new(0,0,255))
--DISPARA CON LA ARMA PREVIAMENTE CREADA
	if controls.cross() then weapon.shoot(disparo,x,y,7,ang) end
--Rotamos el "cañón" del personaje
	if controls.r() then ang = ang+2 end
	if controls.l() then ang = ang-2 end
--Dibuja los enemigos y cambia su color si hay colision con las balas
	for i =1, 10 do	
		--Dibuja enemigos
			draw.fillrect(object[i].x,object[i].y,object[i].w,object[i].h,object[i].color)
		--COMPRUEBA LA COLISIÓN
			if weapon.collision(disparo,object[i].x,object[i].y,object[i].w,object[i].h,true) then
				object[i].color = random_color()	
			end
	end
--BLITEAMOS LAS BALAS	
	weapon.blit(disparo)
---------------------------------------------------------------------
screen.print(5,5,"JoyStick: Move - R/L: Change angle - X: Shoot",color.new(255,0,0))
screen.print(5,25,"WeaponLib sample by xerpi",color.new(0,255,0))
screen.print(5,45,"Bullets in the screen: "..#disparo.bullets,color.new(255,0,255))
screen.print(430,5,"@"..screen.fps(),color.new(0,0,255))
 
if controls.select() then make_an_error() end
screen.flip()
end