LÖVE

Code: Select all

local p = player
local mx, my, hit = 0, 0, false
local speed = kshift and 0.1 or 0.05	-- kw, ka, ks, kd, and kshift are keyboard buttons
if kw then mx = mx-speed my = my-speed end
if ks then mx = mx+speed my = my+speed end
if ka then my = my-speed mx = mx+speed end
if kd then my = my+speed mx = mx-speed end
if (kw or ks) and (ka or kd) then mx, my = mx/2, my/2 end	-- Diagonal movement isn't faster
p.z, p.x, p.y = trace(p.z,p.z, p.x,p.x+mx, p.y,p.y+my)

function trace(sz,dz, sx,dx, sy,dy)
	local dist = math.dist(sx,dx, sy,dy, sz,dz)
	if dist <= 0 then return sz, sx, sy end
	local ltz, ltx, lty = sz, sx, sy
	for i=math.min(1, dist), dist, math.min(1, dist) do
		local tz = math.round((sz*(dist-i) + dz*i)/dist)
		local tx = math.round((sx*(dist-i) + dx*i)/dist)
		local ty = math.round((sy*(dist-i) + dy*i)/dist)
		if tiles[tz] then if tiles[tz][tx] then if tiles[tz][tx][ty] then
			if dist < 1 then return sz, sx, sy, true end
			return ltz, ltx, lty, true
		end end end
		ltz, ltx, lty = tz, tx, ty
	end
	return dz, dx, dy
end

Code: Select all

function checkCollision(x1,y1,w1,h1,x2,y2,w2,h2)
local x=false
if x2>x1 and x2<x1+w1 or x2+w2>x1 and x2+w2<x1+w1 then --check against x
x=true
end
local y=false
if y2>y1 and y2<y1+h1 or y2+h2>y1 and y2+h2<y1+h1 then --check against y
y=true
end
return x,y
end
----------------------------------
--Somewhere in love.update:
----------------------------------
for _,v in pairs(myObjects) do --generic loop
local x,y=checkCollision(myX,myY,mySizeX,mySizeY,v.x,v.y,v.w,v.h) --for your situation, you'll need to rewrite this
if x then
myVX=0 --stop player on x
--myVX=-myVX --bounce player instead?
end
if y then
myVY=0 --stop player on y
--myVY=-myVY --bounce player instead?
end
end --/loop