Движение точки по линии |
Движение точки по линии |
pashist |
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 44 Пол: Мужской Репутация: 0 |
Привет=) Есть линия, начало которой привязано к центру координат(х1, у1=320, 240), направленная под произвольным углом α. Нужно, чтобы черная точка прошла по всей белой линии, не выходя за её пределы толщины. Толщина точки равна толщине линии. Как это реализовать?
|
klem4 |
Сообщение
#2
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Из заданных 2-х точек прямой (центр и (x1, y1)) получаешь уравнения прямой - F(x).
Ну а далее все просто, в цикле по Х от Х(центра) до X1 выводи точку с координатами (x, F(x)); -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Текстовая версия | 20.04.2024 15:23 |