Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Игры";
Текущий архив: 2004.11.07;
Скачать: [xml.tar.bz2];

Вниз

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

 
ПсихЪ_копия   (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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.037 c
14-1097765421
Шишкин Илья
2004-10-14 18:50
2004.11.07
Петля Нестерова


4-1096392758
Dunk
2004-09-28 21:32
2004.11.07
Обработчик сообщений необрабатывает события.


4-1096465847
noname
2004-09-29 17:50
2004.11.07
Native API


3-1097044033
Bless
2004-10-06 10:27
2004.11.07
Доступ к xls-файлу через ADO


1-1098433018
AntonSh
2004-10-22 12:16
2004.11.07
Сжатие информации





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский