This program is Copyright © HP and is used here by permission. It was originally printed in the Games II Solution Book. 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 "MM" 02 FIX 00 03 CF 29 04 SF 21 05 "NO. DIGITS?" 06 PROMPT 07 STO 12 08 "NO. IN CODE?" 09 PROMPT 10 STO 11 11 "SEED?" 12 PROMPT 13 STO 10 14 LBL C 15 CF 27 16 9 17 ENTER 18 0 19 STO 14 20 LBL 00 21 STO IND Y 22 DSE Y 23 GTO 00 24 XEQ 06 25 LBL 01 26 RCL 10 27 997 28 * 29 FRC 30 STO 10 31 RCL 11 32 * 33 INT 34 1 35 + 36 STO IND 13 37 1 38 ST+ IND Y 39 DSE 13 40 GTO 01 41 "GUESS" 42 ARCL 12 43 AVIEW 44 LBL 14 45 CF 05 46 STO 00 47 1 48 ST+ 14 49 0 50 STO 22 51 STO 23 52 LBL 10 53 RCL 00 54 STO 15 55 XEQ 06 56 LBL 02 57 RCL 15 58 10 59 / 60 FRC 61 LASTX 62 INT 63 STO 15 64 RDN 65 10 66 * 67 1 68 FC? 05 69 ST- IND Y 70 FS? 05 71 ST+ IND Y 72 FS? 05 73 GTO 11 74 RDN 75 RCL IND 13 76 X=Y? 77 XEQ 03 78 LBL 11 79 DSE 13 80 GTO 02 81 FS? 05 82 GTO 12 83 RCL 12 84 RCL 22 85 X=Y? 86 GTO 04 87 9 88 STO 13 89 LBL 05 90 RCL IND 13 91 X>0? 92 ST+ 23 93 DSE 13 94 GTO 05 95 RCL 12 96 RCL 23 97 - 98 RCL 22 99 - 100 STO 23 101 SF 05 102 GTO 10 103 LBL 03 104 1 105 ST+ 22 106 RTN 107 LBL 06 108 RCL 12 109 15.01501 110 + 111 STO 13 112 RTN 113 LBL 04 114 SF 27 115 "OK, " 116 ARCL 14 117 " TRIES" 118 AVIEW 119 RTN 120 LBL 12 121 CLA 122 ARCL 00 123 " " 124 RCL 22 125 X=0? 126 GTO 07 127 LBL 08 128 "*" 129 DSE X 130 GTO 08 131 LBL 07 132 RCL 23 133 X=0? 134 GTO 13 135 LBL 09 136 "+" 137 DSE X 138 GTO 09 139 LBL 13 140 AVIEW 141 GTO 14 142 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall