The Museum of HP Calculators

Toric Contact Lens Parameters 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 "PARA"
 02 "SPH^ CYL^ AX"
 03 PROMPT
 04 STO 02
 05 RDN
 06 STO 01
 07 RDN
 08 STO 00
 09 "KFR ?"
 10 PROMPT
 11 STO 03
 12 "KSR ?"
 13 PROMPT
 14 STO 04
 15 "KFCL ?"
 16 PROMPT
 17 STO 05
 18 "KSCL ?"
 19 PROMPT
 20 STO 06
 21 RCL 03
 22 RCL 05
 23 -
 24 RCL 04
 25 RCL 06
 26 -
 27 STO 07
 28 RDN
 29 RCL 00
 30 +
 31 "P="
 32 ARCL X
 33 AVIEW
 34 STOP
 35 337.5
 36 RCL 05
 37 /
 38 "R="
 39 ARCL X
 40 AVIEW
 41 STOP
 42 "AX="
 43 ARCL 02
 44 AVIEW
 45 STOP
 46 RCL 00
 47 RCL 01
 48 +
 49 RCL 07
 50 +
 51 "P="
 52 ARCL X
 53 AVIEW
 54 STOP
 55 337.5
 56 RCL 06
 57 /
 58 "R="
 59 ARCL X
 60 AVIEW
 61 STOP
 62 RCL 02
 63 90
 64 X<Y?
 65 CHS
 66 +
 67 "AX="
 68 ARCL X
 69 AVIEW
 70 RTN
 71 END

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