The Museum of HP Calculators

Optimal Scale for a Graph, Plotting for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 Math Pac 1. This program was ported to the HP-41C by reading with the HP-41C card reader and the card reader may be required for operation of this program. 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 "OPTS67"
 02 LBL 10
 03 LBL A
 04 STO 24
 05 RTN
 06 LBL 11
 07 LBL B
 08 STO 23
 09 RTN
 10 LBL 12
 11 LBL C
 12 STO 22
 13 1
 14 STO 25
 15 RCL 23
 16 RCL 24
 17 -
 18 STO 21
 19 RCL 22
 20 /
 21 LOG
 22 XEQ 13
 23 10^X
 24 STO 20
 25 LBL 09
 26 7ISZ
 27 RCL 24
 28 RCL 20
 29 /
 30 XEQ 13
 31 RCL 20
 32 *
 33 STO 09
 34 RCL 20
 35 RCL 22
 36 *
 37 +
 38 STO 08
 39 RCL 23
 40 X<=Y?
 41 GTO 07
 42 RCL 25
 43 4
 44 /
 45 FRC
 46 X=0?
 47 GTO 00
 48 2
 49 GTO 06
 50 LBL 00
 51 1.25
 52 LBL 06
 53 RCL 20
 54 *
 55 STO 20
 56 GTO 09
 57 LBL 07
 58 RCL 21
 59 RCL 08
 60 RCL 09
 61 -
 62 /
 63  E2
 64 *
 65 RCL 08
 66 RCL 09
 67 RCL 20
 68 R^
 69 7PRSTK
 70 RTN
 71 LBL 13
 72 LBL D
 73 X<0?
 74 GTO 00
 75 INT
 76 RTN
 77 LBL 00
 78 ENTER
 79 INT
 80 X=Y?
 81 RTN
 82 1
 83 -
 84 RTN
 85 LBL 15
 86 LBL a
 87 STO 24
 88 RTN
 89 LBL 16
 90 LBL b
 91 STO 23
 92 RTN
 93 LBL 17
 94 LBL c
 95 STO 22
 96 RTN
 97 LBL 18
 98 LBL d
 99 RCL 24
100 STO 21
101 LBL 08
102 XEQ 07
103 7GSBI
104 XEQ 07
105 FS? 00
106 ADV
107 RCL 23
108 RCL 21
109 RCL 22
110 +
111 X>Y?
112 GTO 00
113 STO 21
114 GTO 08
115 LBL 00
116 CLX
117 RTN
118 LBL 07
119 FS? 00
120 7PRTX
121 FS? 00
122 RTN
123 STOP
124 RTN
125 LBL 19
126 LBL e
127 STO 25
128 RTN
129 LBL 14
130 LBL E
131 FS? 00
132 GTO 00
133 SF 00
134 1
135 RTN
136 LBL 00
137 CF 00
138 0
139 RTN
140 STOP
141 END

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