Вопрос по коллизиям.

[Ilyich]

Приветствую форумчан.
Проблема вот такая. Имеются два шара разного радиуса. В определенный момент они сталкиваются. Надо определить координату их столкновения(например, относительную для одного из шаров). В зависимости от координаты один из шаров летит в определенном направлении. То есть как в бильярде, только один шар остается на месте. Как послать шар- это я знаю. А вот как определить место столкновения? В хэлпе ничего не нашел. Подскажите плз. Буду рад любой помощи.

[impersonalis]

CollisionX, CollisionY, CollisionZ, -координаты
CollisionNX, CollisionNY, CollisionNZ -компоненты нормали коллизии
см. также:
EntityCollided, CollisionTime, CollisionEntity, CollisionSurface, CollisionTriangle.
и может понадобиться: CountCollisions

[Ilyich]

2impersonalis
Благодарствую. Буду рыться. Тему прошу пока не закрывать - быть может, возникнут новые вопросы.

[Stranger]

У меня тоже вопрос по коллизиям. Имеется объект Object1. У него есть два дочерних объекта Child1 и Child2. Проверка на коллизию ведется для Child1 с, например, землей. Но при коллизии Child1 остается на месте, а Child2 падает вниз. Как сделать, чтобы при коллизии ребенка весь объект оставался на месте?

[Stranger]

Ответьте кто-нибудь, а?

[impersonalis]

Поставить коллизию на весь меш.
или
Описать условия.

[Ilyich]

Никак не могу понять, что сделал не так. По замыслу один шар должен отталкиваться (см. первый пост) однако если зайти шаром слева то он летит... вверх! в чем баг?

Graphics3D 640,480,32
SetBuffer BackBuffer()
camera= CreateCamera()
Const balls=1
Collisions balls,balls,2,3
Global wire=False
Global vel#
Global x#,Y#,z#
RotateEntity camera,90,30,0
PositionEntity Camera,10,10,0
plane=CreatePlane()
PositionEntity plane,0,0,0
ball1= CreateSphere()
PositionEntity ball1,10,1,0
EntityType ball1,balls
ball2=CopyEntity (ball1)
MoveEntity ball2,5,0,0

EntityColor ball2,0,255,0
EntityColor ball1,255,0,0
vel=.2
vel1#=.3
vel2#=.3
vel3#=.3
While Not KeyHit(1)
If vel<0.0000001 Then vel=0.0000001 
If x<0.0000001 Then x=0.0000001 
If y<0.0000001 Then y=0.0000001 
If z<0.0000001 Then z=0.0000001 

If KeyDown(30) Then vel=vel/1.05 TranslateEntity ball2,-(vel),0,0 Else vel=.3 
If KeyDown(32) Then vel1=vel1/1.05 TranslateEntity ball2,vel1,0,0 Else vel1=.3
If KeyDown(17) Then vel2=vel2/1.05 TranslateEntity ball2,0,0,vel2 Else vel2=.3
If KeyDown(31) Then vel3=vel3/1.05 TranslateEntity ball2,0,0,-vel3 Else vel3=.3
If EntityCollided(ball2,balls) Then 
x#=CollisionNX(ball2,1)
y#=CollisionNY(ball2,1)
z#=CollisionNZ(ball2,1)
Else x#=x/1.2:y#=y/1.2:z#=z/1.2
EndIf
TranslateEntity ball2,x#,y#,z#

If KeyHit(57) Then wire= Not wire :WireFrame  wire
UpdateWorld
RenderWorld
Color 0,0,0
Text 10,10,x
Flip

Wend

[tormoz]

... вверх! в чем баг?

В расчете направления отталкивания.
Ты не понял сути значений

x#=CollisionNX(ball2,1)
y#=CollisionNY(ball2,1)
z#=CollisionNZ(ball2,1)

[Ilyich]

tormoz как я понял, эти значения - комоненты перпендикуляра к точке касания (нормаль). Но ведь если оба шара находятся на одной высоте, то y-компонента всегда нулевая! Или же нет? Попробую сейчас приравнять к нулю.

[tormoz]

А ты их выведи на экран - сам все поймешь

[Ilyich]

Все-таки непонятно, почему шар отталкивается как-то неестественно. (например, если зайти по касательной сверху, или в лоб слева) :?

[MIXRYTKA]

Доброй ночи всем!!!
Я новичок в блице и в програмирование вообще, но кое что сделал, вот у меня возник вопрос, как сделать коллизии с анимированными моделями (.b3d.....) пока что все.