Расчет восх. и зах. Луны

[Long]

Может кто видел в сети или у кого есть код (желательно на VB) для расчета восхода и захода Луны. У меня есть то же но для Солнца. Может его надо немножко модернизировать

[Pietro]

По этим алгоритмам написадь код труда не составит

http://hotel04.ausys.se/pausch/comp/ppcomp.html

[BNO]

Доброго времени суток! 
Вот и мне понадобился расчёт восхода/захода Луны. Жаль, вопрос обсуждался давно, и ссылка "мёртвая".
Да и восход/заход Солнца на форуме обсуждался очень подробно. Из этой темы я понял, что возни с Луной больше. Вот только не сказали, где.
Собственно, по вопросу Луны прочитал много, да не смог найти более или менее подробного алгоритма.
Сам расчёт произвожу следующим образом:
1. нахожу момент верхней кульминации;
2. считаю координаты (по Меёсу), из которых нахожу приближённые моменты восхода/захода;
3. далее уточняю путём итераций.
Подобный метод даёт погрешность от 1 мин до 20 мин (меня же интересует восход/заход с точностью до мин). Рефракцию и параллакс(его я тоже нахожу по Меёсу) учитываю. Ещё не знаю критерия отсутствия восхода/захода.
Из литературы располагаю только Меёсом, Ленгом, Бакулиным и "Астрономическим календарём" (постоянная часть).
Буду очень признателен за любую помощь по этому вопросу.

[xd]

http://www.google.com/search?hl=ru&q=%22%D0%90%D1%81%D1%82%D1%80%D0%BE%D0%BD%D0%BE%D0%BC%D0%B8%D1%8F+%D0%BD%D0%B0+%D0%BF%D0%B5%D1%80%D1%81%D0%BE%D0%BD%D0%B0%D0%BB%D1%8C%D0%BD%D0%BE%D0%BC+%D0%BA%D0%BE%D0%BC%D0%BF%D1%8C%D1%8E%D1%82%D0%B5%D1%80%D0%B5%22+%D0%9C%D0%BE%D0%BD%D1%82%D0%B5%D0%BD%D0%B1%D1%80%D1%83%D0%BA+%D0%9F%D1%84%D0%BB%D0%B5%D0%B3%D0%B5%D1%80&btnG=%D0%9F%D0%BE%D0%B8%D1%81%D0%BA&lr=

[ZUDA32.EXE]

Собственно, просто формулы вычисления координат Луны намного сложнее, чем Солнца.
А восход/заход вычисляется так же.
Готовая процедура вычисления координат Луны (на Паскале) - здесь:
https://astronomy.ru/forum/index.php?board=9;action=display;threadid=1176
Ссылка живая.

[BNO]

Спасибо, Deimos, за совет купить столь замечательную книгу. Увы, сейчас я на дипломной практике в значительном удалении от приличных населённых пунктов и до конца апреля купить книгу не представляется возможным. К тому же, сроки поджимают. До конца марта нужно считать восход/заход, а я и так вожусь с этим уже  полмесяца.
И Вам, ZUDA32.EXE, спасибо за ссылку. Но, прежде чем писать свое сообщение, я прочитал все темы, связанные с Луной и Солнцем. И видел эту процедуру. Сами координаты у меня считаются правильно (алгоритм взят из того же Меёса).
Возможно, я не правильно делаю пересчёт: местное звёздное время-поясное время и обратно.
Насколько точна формула из Бакулина:
s = S0 - ( (dol(в часах)/24(в часах))*3m56,5554s ) + Tm*K,
 где S0 - гринвичское звёздное время для средней полночи;
      Tm - местное поясное время;
      K=366.24222/365.2422=1.002738.
Может есть что-то другое?
И ещё один вопрос: чтобы получить топоцентрические координаты во II Экваториальной СК надо сначала найти гелиоцентрические в этой СК, затем пересчитать в горизонтальные, где сделать поправку, а потом обратно во II Экваториальную. Верно?

[xd]

BNO, если оставите свой адрес электронной почты в личку, я могу выслать готовые алгоритмы решения этой задачи из AOPC.