The Museum of HP Calculators
The Museum of HP Calculators
This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 Games 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. The Barcode for this program was provided by Brian Ward.
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
Display the Program Barcode (.pdf) for printing and scanning
LINE KEYS 01 LBL "SPW67A" 02 LBL 10 03 LBL A 04 7CLREG 05 X=0? 06 PI 07 STO 09 08 10 09 STO 04 10 20 11 STO 25 12 LBL 09 13 XEQ 01 14 XEQ 08 15 FS?C 02 16 GTO 09 17 STO IND 25 18 7ISZ 19 RCL 25 20 25 21 X#Y? 22 GTO 09 23 E3 24 STO 06 25 3 26 STO 07 27 STO 09 28 18 29 STO 08 30 RCL 24 31 RTN 32 LBL 01 33 RCL 09 34 997 35 * 36 FRC 37 STO 09 38 E4 39 * 40 INT 41 XEQ 05 42 XEQ 05 43 RTN 44 LBL 08 45 RCL 20 46 X=Y? 47 SF 02 48 CLX 49 RCL 21 50 X=Y? 51 SF 02 52 CLX 53 RCL 22 54 X=Y? 55 SF 02 56 CLX 57 RCL 23 58 X=Y? 59 SF 02 60 RDN 61 RTN 62 LBL 12 63 LBL C 64 4 65 7FIX 66 999 67 / 68 STO 02 69 7DSP8 70 ADV 71 RCL 24 72 INT 73 STO 00 74 RCL 04 75 + 76 XEQ 03 77 RCL 00 78 XEQ 03 79 RCL 00 80 RCL 04 81 - 82 XEQ 03 83 RTN 84 LBL 03 85 RCL 02 86 STO 01 87 RDN 88 STO 03 89 ST+ 01 90 1 91 - 92 XEQ 00 93 XEQ 05 94 XEQ 05 95 ST+ 01 96 RCL 03 97 XEQ 00 98 E5 99 / 100 ST+ 01 101 RCL 03 102 1 103 + 104 XEQ 00 105 E8 106 / 107 ST+ 01 108 RCL 01 109 7PRTX 110 RTN 111 LBL 00 112 0 113 STO 05 114 RDN 115 RCL 20 116 INT 117 X=Y? 118 XEQ 01 119 CLX 120 RCL 21 121 INT 122 X=Y? 123 XEQ 01 124 CLX 125 RCL 22 126 INT 127 X=Y? 128 XEQ 01 129 CLX 130 RCL 23 131 INT 132 X=Y? 133 XEQ 02 134 RCL 05 135 RTN 136 LBL 01 137 RCL 04 138 ST+ 05 139 RTN 140 LBL 02 141 1 142 ST+ 05 143 RTN 144 LBL 14 145 LBL E 146 P-R 147 7FIX 148 7DSP1 149 RND 150 STO 00 151 X<>Y 152 RND 153 7DSP2 154 RCL 24 155 XEQ 05 156 STO 03 157 INT 158 RCL 24 159 XEQ 04 160 STO 02 161 INT 162 XEQ 05 163 FRC 164 + 165 + 166 FRC 167 LASTX 168 INT 169 XEQ 04 170 + 171 RCL 02 172 FRC 173 RCL 03 174 FRC 175 XEQ 04 176 INT 177 + 178 RCL 00 179 + 180 INT 181 LASTX 182 FRC 183 XEQ 05 184 + 185 LBL 07 186 + 187 XEQ 08 188 FS?C 02 189 GTO 00 190 STO 24 191 1 192 ST- 08 193 RCL 08 194 X<0? 195 GTO 06 196 RCL 24 197 RTN 198 LBL 06 199 CLX 200 PSE 201 GTO 06 202 LBL 04 203 RCL 04 204 * 205 RTN 206 LBL 05 207 RCL 04 208 / 209 RTN 210 LBL 00 211 .1 212 GTO 07 213 LBL 15 214 LBL a 215 RCL 08 216 RTN 217 GTO 67 218 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall