Вращение луны вокруг Земли

[[LOL]]

Помогите создать программу демонстрирующую вращение Луны вокруг Земли!!!
Заранее спасибо!!

[zetrix]

Уравнение окружности знаем? (параметрическое)

X:=R*cos(t);
Y:=R*sin(t);
//R - радиус
//t - параметр, меняется от 0 до 6.28 (0..2*PI), можно и просто в цикле увеличивать на 0.01 - чтоб плавно вращение было.

Если не понятно, то используй поиск по форуму, я где-то писал маятник - сделай по аналогии...

[Сильванович Михаил]

Не понял... Круговую или эллипсообразную траекторию надо изобразить?
Да и в чем вопрос?
З.ы. Если это круг, то траекторию Луны при неподвижности Земли можно описать так:

x:=x0+r*cos(w*t);
y:=y0+r*sin(w*t);

x,y - координата Луны в любой момент времени t;
x0,y0 - координата Земли,
w - угловая скорость,
t - время движения.

[[LOL]]

Я хотел сделать через Shape и Таймер!!! Можете написать полный код?
P.S. Нужно заставить Shape1 вращаться вокруг Shape2. Вращение по кругу

[[LOL]]

Огромное Спасибо За Помощь Модератору AVER'у!!!!