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