Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.11.07;
Скачать: CL | DM;

Вниз

Геометрия на плоскости   Найти похожие ветки 

 
ПсихЪ_копия   (2004-07-11 16:48) [0]

Что я не правильно делаю:

     dX := abs( Cos( 2*Angel )*step );
     if X > eX then
       X := X-dX
     else
       X := X+dX;

     dY := abs( Sin( Angel )*step );
     if Y > eY then
       Y := Y-dY
     else
       Y := Y+dY;
// Angel - угол в градусах
// X, Y - положение объекта
// eX, eY - конечные положения объекта
// step - шаг "по гипотенузе" до (eX;eY)
// dX, dY - смещение по X и Y соответственно за каждый проход


Вроде бы все тригонометрические правила соблюдены. Может нужно в радинанах угол писать, но тоже не помогает. Объект движется с непонятными мне dX и dY но в нужную сторону. Обычно вместо того, чтобы плавно идти прямо до точки (eX;eY) он движется быстрее к одной из координат, а затем в несколько раз медленнее движется по прямой к конечной точке.

Может я чего-то не учёл?


 
ПсихЪ_копия   (2004-07-11 16:50) [1]

Простите, код немного не тот - эксперименты мои... (: Вот:

    dX := abs( Cos( Angel )*step );
    if X > eX then
      X := X-dX
    else
      X := X+dX;

    dY := abs( Sin( Angel )*step );
    if Y > eY then
      Y := Y-dY
    else
      Y := Y+dY;



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

Текущий архив: 2004.11.07;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.046 c
8-1088581377
clampo
2004-06-30 11:42
2004.11.07
grahic analyzer


14-1097865611
Knight
2004-10-15 22:40
2004.11.07
Рожать или не рожать... вот в чём сабж


3-1097143003
Sid
2004-10-07 13:56
2004.11.07
Снова BDE + локалка


1-1098696921
hyper_omsk
2004-10-25 13:35
2004.11.07
delphi 8 (pocketPC)


1-1098434349
onix
2004-10-22 12:39
2004.11.07
Горизонтальный скроллинг в ТМемо