Гравитация в X Y Z

[TEHb08]

Сообщение от NitE

ты имеешь ввиду то что HolyDel написал ? если нет то делись ))

угу только только появились еще проблемки +)

[NitE]

^ это знак возведения в степень или умножения ?

NitE
степень

[Максим]

Graphics3D 1024,768,32,0
SetBuffer BackBuffer ()

camera=CreateCamera()
PositionEntity camera,0,50,-50
RotateEntity camera,50,0,0

pivot=CreatePivot()
sphere1=CreateSphere(8,pivot)
ScaleEntity sphere1,3,3,3
PositionEntity sphere1,30,0,0
EntityColor sphere1,255,120,0

pivot2=CreatePivot(sphere1)
sphere2=CreateSphere(8,pivot2)
PositionEntity sphere2,4,0,0

While Not KeyHit(1)
TurnEntity pivot,0,1,0
If KeyDown(17) TurnEntity pivot2,0,4,4
If KeyDown(31) TurnEntity pivot2,0,-4,-4
RenderWorld()
UpdateWorld()
Flip
Wend
End

Управление W и S .

[Morganolla]

Коорд. объекта x,y,z. сферы cx,cy,cz. Массы Мо,Мс. Гравитац. константа - g. Скорость объекта vx,vy,vz.

mx = cx - x
my = cy - y
mz = cz - z

Расстояние между телами:

ml = sqrt(mx^2 + my^2 + mz^2)

Общее ускорение а:

а= g*Mc/ml^2

Ускорение по осям:
аx = а*mx / ml
аy = а*my / ml
аz = а*my / ml

Приращение скоростей:

vx = vx + ax*dt
vy = vy + ay*dt
vz = vz + az*dt

где dt - шаг интегрирования (время отрисовки кадра)

Новые координаты тела:

x=x+vx*dt
y=y+vy*dt
z=z+vz*dt
И все! Очень просто!

[TEHb08]

еще придумал фишку

Создаем точку, направляем на сферу и даем скорость точка смещяется к земле в то же время меняем координаты объекта на те что у точки и делаем обычное управление для корабля

[TEHb08]

Сообщение от Morganolla

а= g*Mc/ml^2

Ускорение по осям:
аx = а*mx / ml
аy = а*my / ml
аz = а*my / ml

Приращение скоростей:

vx = vx + ax*dt
vy = vy + ay*dt
vz = vz + az*dt

Возвращает нуль

[TEHb08]

не понятно

[Morganolla]

Формулы и алгоритм правильные, у меня прекрасно работают. Надо разобраться, почему у тебя не получается. Включи отладку.
А что не понятно?

[TEHb08]

Сообщение от Morganolla

Формулы и алгоритм правильные, у меня прекрасно работают. Надо разобраться, почему у тебя не получается. Включи отладку.
А что не понятно?

Дело в том что все запускается но не чего не происходит +((((

Дай свой пример посмотреть, то я что то значит в формулах не то написал

[impersonalis]

тип перменной должен быть float

[TEHb08]

не чего не происходит можно попробывать функцией TranslateEntity зделать гравитацию

[HolyDel]

Импер все сказал.
октоторп забыли после объявления переменной.
надо: ax#,ay#,... и т.д.

[TEHb08]

щя бум тестить +)

[TEHb08]

че то я не догнал
ax#=Float(а*mx / ml)
так что ли ?