хочу повернуть бочку

← →
Alexseve (2006-10-29 10:37) [0]

Помогите пожалусто
мне нужно повернуть бочку у которой произвольные координаты в центер координат. Тойсть она должна всегда смотреть {0,0,0}.
насколько я понимаю надо крутить по двум углам.

AB:=Form1.xi;//x êîîðäèíàòû îáúåêòà BC:=Form1.yi;//y êîîðäèíàòû îáúåêòà AC:=Sqrt(AB*AB+BC*BC); sinalpha:=BC/AC; betha:=ArcSin(sinalpha); betha:=(180/pi)*betha; betha:=-betha; glRotatef(betha, 1.0, 0.0, 0.0); //ïîâîðîò âî êðóã îñè x íà óãîë betha Form1.Edit1.Text:=FloatToStr(betha); AB:=Form1.xi;//x êîîðäèíàòû îáúåêòà BC:=Form1.zi;//z êîîðäèíàòû îáúåêòà AC:=Sqrt(AB*AB+BC*BC); sinalpha:=BC/AC; alpha:=ArcSin(sinalpha); alpha:=(180/pi)*alpha; alpha:=-alpha; glRotatef(alpha, 0.0, 1.0, 0.0); //ïîâîðîò âî êðóã îñè y íà óãîë alpha Form1.Edit2.Text:=FloatToStr(alpha);
но не чего не получаеться. Бочка не смотрет в центер

← →
Ketmar © (2006-10-29 11:34) [1]

представил бочку с глазами. стало страшно.

← →
VolanD666 (2006-10-29 14:31) [2]

А че ее крутить, если лна всегда смотрит {0,0,0}?

> Alexseve (29.10.06 10:37)

Не русский?

Если я правильно понимаю, что написано, значит нужно сделать Translate в центр координат, повращать, а потом переместить обратно.

хочу повернуть бочку Найти похожие ветки