function _bug(id,x,y,rot)
local b={x = x,y = y,rot = rot,id = id,img = image("gfx/bug.bmp",1,1,3),inmap = 1,speed=0.1}
table.insert(o,b)
imagepos(b.img,x,y,0)
end

addhook("say","_createbug")
function _createbug(id,t)
if t=="!lbug" then
_bug(id,player(id,"x"),player(id,"y"),player(id,"rot"))
end
end

timer(1,"bugopt","",0)

function bugopt()
for k, v in ipairs(o) do
if o[k].inmap == 1 then
o[k].speed = o[k].speed + 0.1/2
local rot = o[k].rot
if rot < -90 then rot = rot + 360 end
local ang = math.abs(math.rad( rot + 90 )) - math.pi
local x = o[k].x + math.cos(ang) * o[k].speed
local y = o[k].y + math.sin(ang) * o[k].speed
imagepos(o[k].img,x,y,o[k].rot)
o[k].x = x
o[k].y = y
if tile(math.floor(x/32),math.floor(y/32),"wall") then
o[k].rot = 180-o[k].rot
end
end
end
end

o[k].rot = 180-o[k].rot --BUG

function bugopt()
	for k, v in ipairs(o) do
		if o[k].inmap == 1 then
			o[k].speed = o[k].speed + 0.1/2
			local rot = o[k].rot
			local ang = math.rad(rot)
			local x = o[k].x + math.sin(ang) * o[k].speed
			local y = o[k].y - math.cos(ang) * o[k].speed
			
			if tile(math.floor(o[k].x/32),math.floor(y/32),"wall") then
				o[k].rot = o[k].rot - 180
			end
			if tile(math.floor(x/32),math.floor(o[k].y/32),"wall") then
				o[k].rot = -o[k].rot
			end
			
			imagepos(o[k].img,x,y,o[k].rot)
			o[k].x = x
			o[k].y = y
		end
	end
end