Рисуем спираль

[PakMan]

Очень нужен алгоритм вывода спирали. Может у кого завалялись примеры построения ентой штуковины. Желательно в Delphi. Вобщем помогите кто чем может.

[/7y3uK]

а тебе какая нужна? Архимеда пойдет? самая простая... на вот, почитай... суть простая, вертится прямая по которой с определенной скоростью бежит точка...

[Willow]

Ну самый простой способ вывести график ro=phi в полярных координатах

[Nerey_ser]

Willow
Осталсь бы впихнуть преобразование координат всё ОК. Вдруг человек не знает...

x=r*cos(u)+x0
y=r*sin(u)+y0

Т. е. спираль имеет вид:
x=t*cos(t)+x0
y=t*sin(t)+y0

[PakMan]

Усложним поставленную задачу. Необходмио не просто вывести сприаль. Это несложно. Нужно чтобы спираль еще и вращалась, и постепенно сходилась в одну точку. Вот.

[/7y3uK]

хоспади, тут все зависит от того на чем ты пишешь и как рисуешь... вообще при самых плохих исходных, предполагая, что ты рисуешь точками, то нужно взять массив опорных точек, который надо прогонять через матрицу поворота, после чего по опорным точкам восстанавливать спираль... вобщем поищи литературу по компьютерной графике...

[Nerey_ser]

PakMan
Вращение - просто:
x=t*cos(t+t0)+x0
y=t*sin(t+t0)+y0

Обрати внимание, вложенный цикл: сначала цикл вращения (по t0), потом рисования (по t)

Схождение в точку - не очень понял...
Кажется, это сжатие?
Тогда:
x=t0*t*cos(t+t0)+x0
y=t0*t*sin(t+t0)+y0

Внимание: t0 изменяется от числа к нулю (если надо сжатие)
Ну помнжить на что-нибудь, чтоб красиво было