-----------------------------------
Mr. T
Thu Jul 19, 2007 7:19 pm
2d Tile Based Gaming -- Collision Detection Help
-----------------------------------
I decided to remake my BreakOut game using the new knowledge I had gained from CodeMonkey's 2d Tile tutorial. My collision detecton is a bit off. Help would be appreciated.
-----------------------------------
CodeMonkey2000
Thu Jul 19, 2007 11:06 pm
Re: 2d Tile Based Gaming -- Collision Detection Help
-----------------------------------
The method I showed works best with top-down games. there is a more flexible method for collision. Basically imagine that the ball is enclosed in an imaginary box. You need to know the midpoint of the box/circle and the distance from the mid-point to the sides of the box. Using this, check where what tiles the corners of the box will be in if the ball continues to move. If any of the corners are not in tile 0, then a collision has occurred.
http://img389.imageshack.us/img389/9372/untitledjm6.png
Here's a function that you may find useful. Just pass in where the ball will be, and its radius.
fcn collide (x, y, r : int) : boolean
% coner#1
if tiles ((x - r) div 20, (y + r) div 20) not= 0 then
result true
%corner #2
elsif tiles ((x + r) div 20, (y + r) div 20) not= 0 then
result true
%corner#3
elsif tiles ((x - r) div 20, (y - r) div 20) not= 0 then
result true
%corner#4
elsif tiles ((x + r) div 20, (y - r) div 20) not= 0 then
result true
end if
result false
end collide
-----------------------------------
Mr. T
Thu Jul 19, 2007 11:32 pm
Re: 2d Tile Based Gaming -- Collision Detection Help
-----------------------------------
I implemented the function, but the ball nonetheless gets caught when it hits the corner of a brick.
-----------------------------------
CodeMonkey2000
Fri Jul 20, 2007 3:04 pm
Re: 2d Tile Based Gaming -- Collision Detection Help
-----------------------------------
That's because you aren't checking for a diagonal collision. Try this code, it isn't efficient but you should be able to simplify it. Also remember that the maximum size of the radius should be 10. If it's bigger you'll need to break the circle down to smaller squares.
if collideX (x (i) + dx (i), y (i) + dy (i), RADIUS) and not collideX (x (i) + dx (i), y (i), RADIUS) and not collideY (x (i), y (i) + dy (i), RADIUS) then
dx (i) := -dx (i)
dy (i) := -dy (i)
else
if collideX (x (i) + dx (i), y (i), RADIUS) then
dx (i) := -dx (i)
end if
if collideY (x (i), y (i) + dy (i), RADIUS) then
dy (i) := -dy (i)
end if
end if