The Museum of HP CalculatorsThis program is Copyright © 1977 by Hewlett-Packard Company and is used here by permission. It was originally printed in the HP-95C Applications book. This program was entered by André Wilhelmus and the curator added comments from the HP manual.
This program is supplied without representation or warranty of any kind. André Wilhelmus, Hewlett-Packard and The Museum of HP Calculators therefore assume no responsibility and shall have no liability, consequential or otherwise, of any kind arising from the use of this program material or any part thereof.
| CODE | KEYS | |
|---|---|---|
| C-000 lbl C | f LBL C | |
| C-001 61 21 4 | f FIX 4 | |
| C-002 62 12 | g CLEAR REG | Store starting coordinates |
| C-003 35 0 | STO 0 | and 180. |
| C-004 11 | x⇔y | |
| C-005 35 1 | STO 1 | |
| C-006 1 | 1 | |
| C-007 8 | 8 | |
| C-008 0 | 0 | |
| C-009 35 2 | STO 2 | |
| C-010 64 | R/S | |
| C-011 61 63 1 | f LBL 1 | - - - - - - - - - - - - - - - |
| C-012 45 6 | RCL 6 | |
| C-013 49 | − | |
| C-014 45 0 | RCL 0 | |
| C-015 49 | − | |
| C-016 35 59 6 | STO + 6 | |
| C-017 35 8 | STO 8 | |
| C-018 11 | x⇔y | |
| C-019 45 5 | RCL 5 | |
| C-020 49 | − | Accumulate Area. |
| C-021 45 1 | RCL 1 | |
| C-022 49 | − | |
| C-023 35 59 5 | STO + 5 | |
| C-024 35 9 | STO 9 | |
| C-025 11 | x⇔y | |
| C-026 2 | 2 | |
| C-027 24 | ÷ | |
| C-028 45 6 | RCL 6 | |
| C-029 49 | − | |
| C-030 39 | × | |
| C-031 35 59 7 | STO + 7 | |
| C-032 45 8 | RCL 8 | |
| C-033 45 9 | RCL 9 | |
| C-034 61 63 2 | f LBL 2 | |
| C-035 62 6 | g →P | |
| C-036 61 14 | f SPACE | |
| C-037 14 | PRINT x | |
| C-038 11 | x⇔y | Compute distance and azimuth. |
| C-039 62 44 | g x>0 | |
| C-040 63 3 | GTO 3 | |
| C-041 3 | 3 | |
| C-042 6 | 6 | |
| C-043 0 | 0 | |
| C-044 59 | + | |
| C-045 61 63 3 | f LBL 3 | |
| C-046 61 24 | f H→H.MS | |
| C-047 14 | PRINT x | - - - - - - - - - - - - - - - |
| d-000 lbl d | f LBL D | |
| d-001 45 7 | RCL 7 | |
| d-002 61 2 | f ABS | |
| d-003 61 14 | f SPACE | Area |
| d-004 14 | PRINT x | - - - - - - - - - - - - - - - |
| d-005 45 6 | RCL 6 | Set-up for closure. |
| d-006 45 5 | RCL 5 | |
| d-007 62 63 C2 | g JUMP C 2 |
Go back to the HP-95C software library
Go back to the general software library
Go back to the main exhibit hall