PICO-8 Collision Function

collision.p8

--collision function

function collide(player)
  local x1=player.x/8
  local y1=player.y/8
  local x2=(player.x+7)/8
  local y2=(player.y+7)/8
 
  local a=fget(mget(x1,y1),0)
  local b=fget(mget(x1,y2),0)
  local c=fget(mget(x2,y2),0)
  local d=fget(mget(x2,y1),0)
 
  if a or b or c or d then
    return true
  else
    return false
  end
end