The Museum of HP Calculators


Word Game Subroutine (HP67 Version) 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 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

Program Listing

LINE  KEYS
 01 LBL "WRDSUB"
 02 LBL 03
 03 RCL 20
 04 X#0?
 05 GTO 05
 06 9
 07 STO 25
 08 STO 09
 09 7P<>S
 10 CF 22
 11 7DSP0
 12 CLX
 13 STO 22
 14 LBL 04
 15 MRG
 16 PSE
 17 FS?C 22
 18 FS?C 22
 19 GTO 04
 20 7P<>S
 21 XEQ 07
 22 STO 20
 23 LBL 05
 24 1
 25 -
 26 STO 20
 27 XEQ 07
 28 STO 21
 29 RCL 08
 30 STO 25
 31 CLX
 32 STO IND 25
 33 7ISZ
 34 STO IND 25
 35 7DSZ
 36 CLX
 37 STO 08
 38 LBL 06
 39 XEQ 07
 40 RCL IND 25
 41  E2
 42 *
 43 +
 44 STO IND 25
 45 1
 46 ST+ 08
 47 5
 48 RCL 08
 49 X=Y?
 50 XEQ 09
 51 RCL 21
 52 RCL 08
 53 X#Y?
 54 GTO 06
 55 5
 56 -
 57 X<0?
 58 RCL 08
 59 X>0?
 60 XEQ 09
 61 RTN
 62 LBL 07
 63 RCL 22
 64 X#0?
 65 GTO 08
 66 RCL 09
 67 X<> 25
 68 7ISZ
 69 RCL IND 25
 70 STO 22
 71 X<>Y
 72 X<> 25
 73 STO 09
 74 RCL 22
 75 LBL 08
 76  E2
 77 *
 78 FRC
 79 STO 22
 80 LASTX
 81 INT
 82 RTN
 83 LBL 09
 84 2
 85 *
 86 10^X
 87 ST/ IND 25
 88 7ISZ
 89 RTN
 90 STOP
 91 END

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