The Museum of HP Calculators

Energy Equivalents - Fuels & Prices 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 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 "ENERGY"
 02 SF 27
 03 1
 04 STO 02
 05 LBL A
 06 AON
 07 CF 23
 08 "UNITS 1?"
 09 PROMPT
 10 FS?C 23
 11 ASTO 01
 12 RCL 03
 13 "$ ?"
 14 AOFF
 15 PROMPT
 16 STO 03
 17 "UNITS 2?"
 18 AON
 19 PROMPT
 20 FS?C 23
 21 ASTO 00
 22 AOFF
 23 "$ ?"
 24 RCL 04
 25 PROMPT
 26 STO 04
 27 "% FOR 1 TO 2"
 28 CF 22
 29 PROMPT
 30 100
 31 /
 32 FS?C 22
 33 STO 02
 34 "READY"
 35 PROMPT
 36 LBL B
 37 XEQ 01
 38 CLA
 39 LBL 03
 40 ARCL X
 41 " "
 42 ARCL 00
 43 PROMPT
 44 LBL C
 45 XEQ 02
 46 CLA
 47 LBL 04
 48 ARCL X
 49 " "
 50 ARCL 01
 51 PROMPT
 52 LBL D
 53 RCL 03
 54 /
 55 XEQ 01
 56 RCL 04
 57 *
 58 "$"
 59 GTO 03
 60 LBL E
 61 RCL 04
 62 /
 63 XEQ 02
 64 RCL 03
 65 *
 66 "$"
 67 GTO 04
 68 LBL 01
 69 CF 00
 70 XEQ IND 01
 71 SF 00
 72 XEQ IND 00
 73 RCL 02
 74 *
 75 RTN
 76 LBL 02
 77 CF 00
 78 XEQ IND 00
 79 SF 00
 80 XEQ IND 01
 81 RCL 02
 82 /
 83 RTN
 84 LBL "BBL"
 85 5.8
 86 GTO 05
 87 LBL "TCF"
 88 1.03
 89 GTO 05
 90 LBL "GJ"
 91 1.055
 92 GTO 05
 93 LBL "STE"
 94 26
 95 GTO 05
 96 LBL "STW"
 97 18
 98 GTO 05
 99 LBL "MWH"
100 3.412
101 GTO 05
102 LBL "U3O8"
103 220
104 GTO 05
105 LBL "MBTU"
106 1
107 LBL 05
108 FS? 00
109 1/X
110 *
111 RTN
112 END

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