The Museum of HP Calculators


Tabluator for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the Small Business 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 "TAB"
 02 CLRG
 03 "NO. COLUMNS ?"
 04 PROMPT
 05 5
 06 +
 07 STO 01
 08 STO 00
 09 "NO. ROWS ?"
 10 PROMPT
 11 +
 12 STO 02
 13 1
 14 ST+ 00
 15 +
 16 1 E3
 17 ST/ 01
 18 ST/ 02
 19 CLX
 20 6
 21 ST+ 01
 22 RCL 00
 23 ST+ 02
 24 RCL 02
 25 STO 00
 26 "SIZE="
 27 ARCL T
 28 PROMPT
 29 LBL 02
 30 "VALUE ?"
 31 PROMPT
 32 ST+ IND 01
 33 ST+ IND 02
 34 ISG 02
 35 GTO 02
 36 RCL 00
 37 STO 02
 38 ISG 01
 39 GTO 02
 40 0
 41 LBL 03
 42 RCL IND 02
 43 +
 44 ISG 02
 45 GTO 03
 46 STO 03
 47 "G. TOT.="
 48 ARCL X
 49 PROMPT
 50 LBL A
 51 CF 01
 52 CF 02
 53 CF 03
 54 XEQ 00
 55 100
 56 STO 04
 57 GTO 04
 58 LBL B
 59 SF 01
 60 GTO 01
 61 LBL D
 62 CF 01
 63 LBL 01
 64 CF 02
 65 CF 03
 66 100
 67 STO 04
 68 LBL 10
 69 1.1
 70 STO 05
 71 RCL 00
 72 STO 02
 73 LBL 04
 74 RCL IND 02
 75 FS? 01
 76 GTO 05
 77 RCL 03
 78 /
 79 RCL 04
 80 *
 81 "%,"
 82 LBL 05
 83 FS? 01
 84 "ROW,"
 85 FS? 02
 86 "COL,"
 87 FS? 03
 88 "PROP,"
 89 XEQ 09
 90 ISG 02
 91 GTO 04
 92 STOP
 93 LBL C
 94 XEQ 00
 95 SF 01
 96 SF 02
 97 CF 03
 98 GTO 04
 99 LBL 00
100 1.1
101 STO 05
102 RCL 01
103 FRC
104 6
105 +
106 STO 02
107 RTN
108 LBL E
109 STO 04
110 CF 01
111 CF 02
112 SF 03
113 GTO 10
114 LBL 09
115 FIX 00
116 ARCL 05
117 "|-="
118 FIX 02
119 ARCL X
120 PROMPT
121 ISG 05
122 RTN
123 END

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