Collisions.....help!
Blitz3D Forums/Blitz3D Programming/Collisions.....help!
| ||
Hi, I can get collisions to work fine but I have never found how to identify which entity was involved in the collision. heres one method: k=0 For p.blue_ship=Each blue_ship k=k+1 For t = 1 To CountCollisions(redbullets(k)) HideEntity CollisionEntity (redbullets(k),t) Next next didnt work another method: For tr= 1 To 100 For jr = 1 To CountCollisions (bluebullets(tr)) hit_ship= CollisionEntity(bluebullets(tr),jr) If hit_ship<>0 HideEntity hit_ship EndIf Next didnt work and last of all: For blue_p.blue_ship=Each blue_ship For z= 1 To 100 If EntityCollided (redbullets(z),2)=blue_p\ship_handle HideEntity blue_p\ship_handle EndIf Next next didnt work I have also tried to get other variations but with no success. The only time I have been able to do something with collisions is if I identify the entity that is colliding and just ask blitz for a yes/no and then do something to that entity. This means I would have to set-up a collision type for each individual entity which slows the game down to 2 FPS. Someone must have some experience with this, please help! |
| ||
Collided = EntityCollided(ent,col_type) If Collided then EntityColor Collided,255,0,0 This will turn them red when collided. |
| ||
For blue_p.blue_ship=Each blue_ship For z= 1 To 100 If EntityCollided (redbullets(z),2)=blue_p\ship_handle HideEntity blue_p\ship_handle EndIf Next next Isnt this the same thing? |
| ||
entitytype redship,1 For blue_p.blue_ship=Each blue_ship collided=EntityCollided (blue_p\bullet_handle,1) If collided HideEntity collided EndIf Tried this, still doesnt work! |