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