Вниз
Скачать: CL | DM;

ArcTan   Найти похожие ветки 

 
n0p   (2005-07-12 12:13) [0]

Делаю игру. Хочу, чтобы игрок смотрел в сторону курсора, но угол определяется не так. Если курсор поднять высоко то голова поворацивается вообще на другую сторону :).

 if (iX + 4) = MouseX then
   Angle := 0
 else
   Angle := ArcTan((MouseY - (iY + 3))/(MouseX - (iX + 4)));

 if MouseX < (iX + 4) then Angle := Angle + PI;
...
 Find("head").DrawRotate(DXDraw.Surface, iX + 10, iY + 9, 15, 11, 0, 0.5, 0.9, Trunc(Angle/PI*255));


 
Kobik ©   (2005-07-12 12:35) [1]

Используй ArcTan2 и никаких проверок делать не придется


 
n0p   (2005-07-12 13:31) [2]


uses ..., Math
...
Angle := ArcTan2((MouseY - (iY + 3)),(MouseX - (iX + 4)));


Ну ничего нового.


 
A22 ©   (2005-07-12 14:44) [3]

atan2 вернет угол от -pi до +pi. переведи в свой отрезок (тебе нужно 0-255?)


 
n0p   (2005-07-12 18:37) [4]

Понял. Угу. Пасиб. Работает.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.032 c
14-1131517574
Pazitron_Brain
2005-11-09 09:26
2005.11.27
кабинет информатики, ip, net


1-1130868953
Alexander Dakis
2005-11-01 21:15
2005.11.27
Как создать динамическое выделение текста, как в редакторе Delphi


1-1130837427
kyn66
2005-11-01 12:30
2005.11.27
Анимация виснет во время процесса.


2-1131373422
Makxi
2005-11-07 17:23
2005.11.27
Service Application &amp; Delphi 6,7


4-1127742827
Cosinus
2005-09-26 17:53
2005.11.27
Обращение к системному сервису




   Наверх