Delphi - Rutinas Fase Lunar y Mareas

Si, si, habéis leido bien. Estoy buscando alguna rutina que me permita calcular la fase lunar y la marea para una fecha. También me sirve si alguien me da unas pautas de cómo se podrían determinar estos datos.

Gracias.

¿A que es una consulta bien rara?