The Museum of HP Calculators

The Dealer for the HP-41C/CV/CX

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

Program Listing

LINE  KEYS
 01 LBL "DELR67"
 02 LBL 12
 03 LBL C
 04 ADV
 05 LBL 06
 06 STO 20
 07 XEQ 10
 08 7PRTX
 09 RCL 20
 10 1
 11 -
 12 X>0?
 13 GTO 06
 14 RTN
 15 LBL 10
 16 LBL A
 17 RCL 21
 18 997
 19 *
 20 FRC
 21 STO 21
 22 RCL 22
 23 *
 24 INT
 25 5
 26 /
 27 STO 25
 28 FRC
 29 10
 30 *
 31 10^X
 32 STO 23
 33 RCL IND 25
 34 *
 35 FRC
 36  E2
 37 *
 38 INT
 39 STO 24
 40 RCL 25
 41 RCL 22
 42 5
 43 /
 44 STO 25
 45 FRC
 46 10
 47 *
 48 10^X
 49 1/X
 50 LASTX
 51 RCL IND 25
 52 *
 53 FRC
 54  E2
 55 *
 56 INT
 57 RCL 24
 58 -
 59  E2
 60 /
 61 *
 62 ST- IND 25
 63 R^
 64 STO 25
 65 LASTX
 66 RCL 23
 67 /
 68 ST+ IND 25
 69 RCL 22
 70 1
 71 -
 72 STO 22
 73 X<0?
 74 XEQ 17
 75 RCL 24
 76 LBL 05
 77 FS? 01
 78 GTO 00
 79 13
 80 /
 81 1
 82 +
 83 INT
 84 LASTX
 85 FRC
 86 13
 87 *
 88 1.5
 89 +
 90 INT
 91 10^X
 92 *
 93 7SCI
 94 RTN
 95 LBL 00
 96 1
 97 +
 98 7FIX
 99 RTN
100 LBL 17
101 LBL c
102 74
103 ENTER
104 23
105 FS? 01
106 CLX
107 -
108 STO 22
109 CLX
110 RTN
111 LBL 19
112 LBL e
113 SF 01
114 GTO 00
115 LBL 15
116 LBL a
117 CF 01
118 LBL 00
119 18
120 STO 25
121 .0505050505-
122 ENTER
123 ENTER
124 ENTER
125 .9596979899
126 STO 09
127 7P<>S
128 LBL 07
129 +
130 STO IND 25
131 7DSZ
132 GTO 07
133 +
134 STO 00
135 .5284163
136 STO 21
137 XEQ 17
138 RTN
139 STO 21
140 RTN
141 LBL 14
142 LBL E
143 ADV
144 RCL 22
145 XEQ 17
146 RDN
147 RCL 22
148 STO 23
149 X<>Y
150 STO 22
151 LBL 04
152 RCL 23
153 5
154 /
155 STO 25
156 FRC
157 10
158 *
159 10^X
160 RCL IND 25
161 *
162 FRC
163  E2
164 *
165 INT
166 XEQ 05
167 7PRTX
168 RCL 22
169 RCL 23
170 1
171 -
172 STO 23
173 X#Y?
174 GTO 04
175 RDN
176 RDN
177 RTN
178 STOP
179 END

Go back to the HP-41 software library
Go back to the general software library
Go back to the main exhibit hall