(35) Locating the Moon

[Thomas Klemm]

This program is for the HP-42S:

Code:

00 { 32-Byte Prgm }
01▸LBL "MOON"
02 R↓
03 -
04 X<>Y
05 R↑
06 1
07 →REC
08 R↑
09 X<>Y
10 →REC
11 X<>Y
12 R↓
13 →POL
14 R↓
15 X<>Y
16 -
17 R↑
18 →REC
19 R↓
20 →POL
21 R↑
22 X<>Y
23 →POL
24 R↓
25 END

Example:




37.33 ENTER
122.13 ENTER
80.85 ENTER
23.36 XEQ "MOON"

y: 99.6580
x: 52.0939

It works also for most other HP calculator models that provide polar-rectangular coordinate transformations.
Of course it's not restricted to locate the moon but any celestial body.

I wasn't aware of moonbounce.
Does anyone here has experience with it?

Cheers
Thomas