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.
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
LINE KEYS 01 LBL "BOWL67" 02 LBL 15 03 LBL a 04 7CLREG 05 7P<>S 06 9 07 STO 25 08 E4- 09 LBL 09 10 STO IND 25 11 7DSZ 12 GTO 09 13 STO IND 25 14 CLX 15 RTN 16 LBL 10 17 LBL A 18 INT 19 LASTX 20 FRC 21 ENTER 22 ENTER 23 10 24 * 25 FRC 26 X#0? 27 GTO 08 28 RDN 29 10 30 / 31 + 32 STO 25 33 7DSZ 34 CF 00 35 FRC 36 E2 37 * 38 7P<>S 39 RCL IND 25 40 7P<>S 41 ENTER 42 INT 43 ENTER 44 R^ 45 + 46 11 47 X>Y? 48 GTO 00 49 LBL 08 50 7ISZ 51 RCL 25 52 XEQ 13 53 GTO 16 54 LBL 11 55 LBL B 56 LBL 12 57 LBL C 58 INT 59 .1 60 + 61 STO 25 62 7DSZ 63 CF 00 64 7P<>S 65 RCL IND 25 66 7P<>S 67 ENTER 68 INT 69 10 70 ENTER 71 LBL 00 72 RDN 73 STO 20 74 RDN 75 XEQ 01 76 STO 21 77 XEQ 01 78 STO 22 79 XEQ 01 80 STO 23 81 RCL IND 25 82 CF 01 83 X<0? 84 SF 01 85 ABS 86 E2 87 * 88 INT 89 E2 90 / 91 STO 24 92 RCL 22 93 X#0? 94 XEQ 02 95 RCL 21 96 STO 22 97 0 98 STO 21 99 FS? 01 100 GTO 03 101 RCL 23 102 X#0? 103 XEQ 02 104 0 105 STO 23 106 RCL 20 107 10 108 X#Y? 109 GTO 04 110 STO 21 111 GTO 05 112 LBL 04 113 SF 01 114 GTO 06 115 LBL 03 116 CF 01 117 RCL 20 118 10 119 X#Y? 120 GTO 07 121 STO 23 122 GTO 05 123 LBL 07 124 XEQ 02 125 LBL 05 126 0 127 STO 20 128 RCL IND 25 129 ABS 130 E4- 131 + 132 STO IND 25 133 LBL 06 134 RCL 23 135 E2 136 / 137 RCL 22 138 + 139 E2 140 / 141 RCL 21 142 + 143 E2 144 / 145 RCL 20 146 + 147 7P<>S 148 STO IND 25 149 7P<>S 150 RCL IND 25 151 ABS 152 E2 153 * 154 FRC 155 E2 156 * 157 INT 158 RCL 25 159 FRC 160 + 161 E4 162 / 163 RCL 24 164 + 165 FS? 01 166 CHS 167 STO IND 25 168 7PRTX 169 RTN 170 LBL 01 171 - 172 E2 173 * 174 ENTER 175 INT 176 RTN 177 LBL 02 178 RCL 21 179 RCL 22 180 + 181 RCL 23 182 + 183 RCL 20 184 + 185 RCL 24 186 ABS 187 + 188 E2- 189 + 190 STO 24 191 FRC 192 .1 193 X>Y? 194 RTN 195 RCL 24 196 ABS 197 STO IND 25 198 7PRTX 199 STOP 200 LBL 13 201 LBL D 202 1 203 - 204 STO 25 205 RCL IND 25 206 RTN 207 GTO 67 208 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall