The Museum of HP Calculators

Pro Football Simulation for the HP-41C/CV/CX

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 Data Set (.d41) See Note under Data Sets (below.)
Download Binary (.raw) program for disk or PC HP-IL Card download
Download Hexadecimal (.dat) program for Serial Port download

Data Sets

Currently, we know how to transfer the .d41 files to an HP-4C1 with Tony Duell's LIF Utilities for linux. Other users can enter the register listings below by hand. If you determine how DOS users can transfer these files, please let me know.

You start the program by loading the data set and then XEQ "FTBALL".

Data Set

RR000 = +5.284163000E-1
RR001 = +2.000000000E+0
RR002 = +6.001000000E+0
RR003 = +9.002000000E+0
RR004 = +1.200300000E+1
RR005 = +1.500400000E+1
RR006 = +1.710500000E+1
RR007 = +2.140400000E+1
RR008 = +2.450300000E+1
RR009 = +3.680200000E+1
RR010 = +1.701300000E+1
RR011 = +1.900600000E+1
RR012 = +1.710600000E+1
RR013 = +2.500200000E+1
RR014 = +0.000000000E+0
RR015 = +0.000000000E+0
RR016 = +0.000000000E+0
RR017 = +0.000000000E+0
RR018 = +0.000000000E+0
RR019 = +0.000000000E+0
RR020 = +0.000000000E+0
RR021 = +0.000000000E+0
RR022 = +0.000000000E+0
RR023 = +0.000000000E+0
RR024 = +0.000000000E+0
RR025 = +0.000000000E+0

Program Listing

LINE  KEYS
 01 LBL "FTBALL"
 02 LBL 14
 03 LBL E
 04 STO 25
 05 9
 06 X<>Y
 07 X>Y?
 08 SF 02
 09 RCL IND 25
 10 INT
 11 LASTX
 12 FRC
 13 10
 14 X<>Y
 15 *
 16 INT
 17 LASTX
 18 FRC
 19  E2
 20 *
 21 XEQ 19
 22 RTN
 23 LBL 19
 24 LBL e
 25 SF 01
 26 STO 20
 27 5
 28 X<>Y
 29 X>Y?
 30 CHS
 31 STO 23
 32 RDN
 33 RDN
 34 STO 21
 35 X=0?
 36 CF 01
 37 RDN
 38 STO 22
 39 CLX
 40 FS?C 02
 41 GTO 10
 42 RTN
 43 LBL 11
 44 LBL B
 45 XEQ 18
 46 RCL 23
 47 -
 48 STO 24
 49 GTO 00
 50 LBL 10
 51 LBL A
 52 XEQ 18
 53 2
 54 *
 55 RCL 23
 56 3
 57 *
 58 -
 59 STO 24
 60 GTO 00
 61 LBL 13
 62 LBL D
 63 RCL 21
 64 STO 23
 65 GTO 11
 66 LBL 12
 67 LBL C
 68 RCL 21
 69 STO 23
 70 GTO 10
 71 LBL 18
 72 LBL d
 73 RCL 00
 74 997
 75 *
 76 FRC
 77 STO 00
 78 RCL 22
 79 *
 80 INT
 81 RTN
 82 LBL 00
 83 FS? 01
 84 GTO 01
 85 40
 86 STO 22
 87 XEQ 18
 88 X=0?
 89 /
 90 XEQ 17
 91 RTN
 92 LBL 01
 93 RCL 20
 94 STO 22
 95 XEQ 18
 96 X=0?
 97 RTN
 98 9
 99 STO 22
100 XEQ 18
101 X=0?
102 /
103 XEQ 17
104 RTN
105 LBL 17
106 LBL c
107 7P<>S
108 1
109 ST+ 08
110 RCL 24
111 ENTER
112 ENTER
113 RCL 09
114 +
115 .1
116 +
117 STO 09
118 X<>Y
119 7PRTX
120 RDN
121 7P<>S
122 RTN
123 LBL 15
124 LBL a
125 7P<>S
126 STO 09
127 7P<>S
128 RTN
129 LBL 16
130 LBL b
131 STO 25
132 LBL 02
133 RCL 00
134 997
135 *
136 FRC
137 STO 00
138 7DSZ
139 GTO 02
140 RTN
141 STOP
142 END

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