The Museum of HP Calculators

Clens Pwr Necessary to Correct Ametropia 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 "AMETROP"
 02 "SPH^ CYL^ AX"
 03 PROMPT
 04 STO 03
 05 RDN
 06 STO 02
 07 RDN
 08 STO 01
 09 "FLATTEST K?"
 10 PROMPT
 11 STO 04
 12 "STEEPEST K?"
 13 PROMPT
 14 STO 05
 15 "BACK K?"
 16 PROMPT
 17 STO 06
 18 RCL 04
 19 -
 20 CHS
 21 STO 04
 22 RCL 05
 23 RCL 06
 24 -
 25 STO 05
 26 RCL 01
 27 ST+ 04
 28 RCL 02
 29 +
 30 +
 31 STO 05
 32 RCL 04
 33 -
 34 STO 00
 35 X<0?
 36 GTO 00
 37 2
 38 /
 39 ST+ 04
 40 RCL 00
 41 CHS
 42 STO 00
 43 RCL 03
 44 90
 45 X<Y?
 46 CHS
 47 +
 48 STO 03
 49 LBL 00
 50 "SPH="
 51 ARCL 04
 52 AVIEW
 53 STOP
 54 "CYL="
 55 ARCL 00
 56 AVIEW
 57 STOP
 58 "AX="
 59 ARCL 03
 60 AVIEW
 61 RTN
 62 END

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