The Museum of HP Calculators

Hangman for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the Games Pac. This program was uploaded by Chris Johnson.

This program is supplied without representation or warranty of any kind. Chris Johnson, 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

Program Listing

LINE  KEYS
 01 LBL "HANG"
 02 18
 03 XEQ "SIZE?"
 04 FC?C 25
 05 PROMPT
 06 FIX 00
 07 CF 29
 08 AON
 09 "WORD?"
 10 STOP
 11 ASTO 13
 12 CF 23
 13 ASHF
 14 .005
 15 XEQ 01
 16 ARCL 13
 17 6.011
 18 XEQ 01
 19 7
 20 STO 13
 21 CLX
 22 STO 14
 23 .011
 24 STO 12
 25 CLA
 26 ASTO X
 27 " "
 28 ASTO 17
 29 LBL 12
 30 RCL IND 12
 31 X=Y?
 32 GTO 13
 33 RCL 17
 34 X#Y?
 35 GTO 14
 36 RDN
 37 6
 38 RCL 12
 39 INT
 40 Y^X
 41 ST+ 14
 42 LBL 14
 43 X<> Z
 44 ISG 12
 45 GTO 12
 46 LBL 13
 47 RCL 12
 48 1
 49 -
 50 INT
 51 1 E3
 52 /
 53 STO 12
 54 SF 06
 55 CLA
 56 ASTO 17
 57 LBL 03
 58 CLA
 59 ARCL 13
 60 " LEFT"
 61 AVIEW
 62 CLA
 63 RCL 12
 64 STO 15
 65 RCL 14
 66 CF 06
 67 CF 05
 68 LBL 04
 69 6
 70 /
 71 FRC
 72 X=0?
 73 GTO 05
 74 ARCL IND 15
 75 GTO 06
 76 LBL 05
 77 SF 05
 78 "-"
 79 LBL 06
 80 LASTX
 81 INT
 82 ISG 15
 83 GTO 04
 84 FC?C 05
 85 GTO 09
 86 LBL 07
 87 PROMPT
 88 FC?C 23
 89 GTO 08
 90 ASTO 16
 91 CLA
 92 ARCL 17
 93 AVIEW
 94 RCL 12
 95 STO 15
 96 LBL 10
 97 RCL IND 15
 98 RCL 16
 99 X#Y?
100 GTO 11
101 SF 06
102 6
103 RCL 15
104 INT
105 Y^X
106 ST+ 14
107 TONE 09
108 LBL 11
109 ISG 15
110 GTO 10
111 FS?C 06
112 GTO 03
113 CLA
114 ARCL 17
115 ARCL 16
116 ASTO 17
117 DSE 13
118 GTO 03
119 XEQ "BOOM"
120 6
121 RCL 15
122 INT
123 Y^X
124 1
125 -
126 STO 14
127 GTO 03
128 LBL 09
129 BEEP
130 AOFF
131 SF 29
132 PROMPT
133 GTO "HANG"
134 LBL 01
135 STO 15
136 ASTO 14
137 LBL 02
138 " "
139 ARCL 14
140 ASTO 14
141 ASHF
142 RCL 15
143 12
144 -
145 ASTO IND X
146 ISG 15
147 GTO 02
148 CLA
149 RTN
150 LBL 08
151 VIEW 17
152 STOP
153 GTO 07
154 LBL "SIZE?"
155 FIX 00
156 "SIZE>="
157 ARCL X
158 1
159 -
160 SF 25
161 RCL IND X
162 RTN
163 LBL "BOOM"
164 TONE 05
165 TONE 05
166 TONE 05
167 TONE 04
168 END

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