The Museum of HP Calculators

External Involute Spur Gears 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 M.E. 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 "SPUR67"
 02 LBL 10
 03 LBL A
 04 STO 01
 05 X<>Y
 06 STO 02
 07 /
 08 STO 05
 09 ADV
 10 7PRTX
 11 PI
 12 2
 13 /
 14 RCL 02
 15 /
 16 STO 08
 17 7PRTX
 18 RTN
 19 LBL 11
 20 LBL B
 21 STO 03
 22 X<>Y
 23 STO 04
 24 RTN
 25 LBL 12
 26 LBL C
 27 RCL 08
 28 RCL 05
 29 /
 30 RCL 04
 31 TAN
 32 +
 33 RCL 04
 34 PI
 35 *
 36 180
 37 /
 38 -
 39 RCL 03
 40 RCL 05
 41 /
 42 RCL 04
 43 COS
 44 /
 45 +
 46 PI
 47 RCL 01
 48 /
 49 -
 50 STO 06
 51 R-D
 52 GTO 09
 53 LBL 13
 54 LBL D
 55 RAD
 56 RCL 06
 57 3
 58 *
 59 .3
 60 Y^X
 61 STO 07
 62 LBL 01
 63 RCL 06
 64 RCL 07
 65 +
 66 RCL 07
 67 TAN
 68 -
 69 LASTX
 70 ENTER
 71 *
 72 /
 73 ST+ 07
 74 RCL 07
 75 /
 76 ABS
 77  E-6
 78 X<=Y?
 79 GTO 01
 80 RCL 07
 81 SIN
 82 DEG
 83 ASIN
 84 STO 07
 85 GTO 09
 86 LBL 14
 87 LBL E
 88 RCL 05
 89 2
 90 /
 91 RCL 04
 92 COS
 93 *
 94 RCL 07
 95 COS
 96 /
 97 STO 24
 98 2
 99 *
100 RCL 03
101 RCL 01
102 2
103 /
104 FRC
105 X=0?
106 GTO 03
107 RDN
108 X<>Y
109 90
110 RCL 01
111 /
112 COS
113 *
114 +
115 GTO 02
116 LBL 03
117 RDN
118 +
119 LBL 02
120 STO 23
121 GTO 09
122 LBL 15
123 LBL a
124 RCL 04
125 COS
126 *
127 RCL 07
128 SIN
129 /
130 CHS
131 RCL 23
132 +
133 GTO 09
134 LBL 16
135 LBL b
136 RCL 24
137 GTO 09
138 LBL 17
139 LBL c
140 RCL 03
141 2
142 /
143 RCL 24
144 +
145 GTO 09
146 RTN
147 LBL 09
148 ADV
149 7PRTX
150 RTN
151 STOP
152 END

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