The Museum of HP Calculators

Grid of Points, Calculate All Points for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the Geometry Solution Book. This program was entered and uploaded by Tony Duell.

This program is supplied without representation or warranty of any kind. Tony Duell, 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.

Documentation Information (CD or source code)
How to get this Program to your Calculator (via HP-IL, disk, wand, and fingers)
Download Binary (.raw) program for disk or PC HP-IL Card download
Download Hexadecimal (.dat) program for Serial Port download

Program Listing

LINE  KEYS
 01 LBL "GRIDALL"
 02 1
 03 STO 09
 04 CF 29
 05 "GRID ALL PTS"
 06 AVIEW
 07 PSE
 08 "N1 ?"
 09 PROMPT
 10 1
 11 -
 12 1 E3
 13 /
 14 STO 06
 15 STO 08
 16 "N2 ?"
 17 PROMPT
 18 1
 19 -
 20 1 E3
 21 /
 22 STO 07
 23 "X1 ?"
 24 PROMPT
 25 STO 00
 26 "Y1 ?"
 27 PROMPT
 28 STO 01
 29 "H1 ?"
 30 PROMPT
 31 +
 32 "H2 ?"
 33 PROMPT
 34 STO 04
 35 "THETA 1 ?"
 36 PROMPT
 37 LASTX
 38 P-R
 39 STO 02
 40 RDN
 41 STO 03
 42 "THETA 2 ?"
 43 PROMPT
 44 RCL 04
 45 P-R
 46 STO 04
 47 RDN
 48 STO 05
 49 GTO d
 50 LBL 01
 51 1
 52 ST+ 09
 53 ISG 06
 54 GTO d
 55 RCL 08
 56 STO 06
 57 ISG 07
 58 GTO d
 59 "END"
 60 AVIEW
 61 STOP
 62 LBL d
 63 RCL 06
 64 INT
 65 RCL 02
 66 *
 67 RCL 04
 68 RCL 07
 69 INT
 70 *
 71 +
 72 RCL 00
 73 +
 74 "X"
 75 XEQ 12
 76 RCL 03
 77 RCL 06
 78 INT
 79 *
 80 RCL 05
 81 RCL 07
 82 INT
 83 *
 84 +
 85 RCL 01
 86 +
 87 "Y"
 88 XEQ 12
 89 GTO 01
 90 LBL 12
 91 FIX 00
 92 ARCL 09
 93 "="
 94 FIX 04
 95 ARCL X
 96 AVIEW
 97 STOP
 98 RTN
 99 END

Go back to the HP-41 software library
Go back to the general software library
Go back to the main exhibit hall