Показать сообщение отдельно
Старый 16.11.2007, 17:37   #6
IGR
Blitz's Shame !!
 
Регистрация: 31.03.2007
Сообщений: 3,639
Написано 832 полезных сообщений
(для 2,013 пользователей)
Re: Обнаружение столкновений

Сообщение от mr.DIMAS
Если полигональное не нужно то можно и таким образом:
[blitz]
Function Collide(Entity1,Entity2)
If EntityX(Entity1)<EntityX(Entity2)+MeshWidth(Entity 2) and EntityX(Entity1)>EntityX(Entity2)+MeshWidth(Entity 2) and EntityY(Entity1)<EntityY(Entity2)+MeshHeight(Entit y2) and EntityY(Entity1)>EntityY(Entity2)+MeshHeight(Entit y2) and Entityz(Entity1)<Entityz(Entity2)+MeshDepth(Entity 2) and Entityz(Entity1)>Entityz(Entity2)+MeshDepth(Entity 2) then
PositionEntity entity1,EntityX(Entity2),Entityy(Entity2),Entityz( Entity2)
end if
End Function
[/blitz]
Данная ф-ция останавливает объект Entity1 когда он сталкнулся с Entity2
вот это колизии !!
вот этого отжог !!
(Offline)
 
Ответить с цитированием