This program is Copyright © HP and is used here by permission. It was originally printed in the Civil Engineering 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
LINE KEYS 01 LBL "BOLT" 02 FIX 02 03 "a?" 04 PROMPT 05 TAN 06 STO 03 07 "?" ;"\0D?" 08 PROMPT 09 COS 10 STO 02 11 "FT?" 12 PROMPT 13 STO 01 14 RCL 02 15 / 16 RCL 03 17 + 18 1 19 RCL 01 20 RCL 03 21 * 22 RCL 02 23 / 24 - 25 / 26 STO 01 27 "DM?" 28 PROMPT 29 2 30 / 31 STO 06 32 "DC?" 33 PROMPT 34 2 35 / 36 STO 05 37 "FC?" 38 PROMPT 39 STO 04 40 "W?" 41 PROMPT 42 STO 07 43 CLX 44 "T?" 45 PROMPT 46 X=0? 47 GTO B 48 STO 08 49 LBL A 50 RCL 08 51 RCL 01 52 RCL 06 53 * 54 RCL 04 55 RCL 05 56 * 57 + 58 / 59 STO 07 60 "W=" 61 GTO 05 62 LBL B 63 RCL 01 64 RCL 06 65 * 66 RCL 04 67 RCL 05 68 * 69 + 70 RCL 07 71 * 72 STO 08 73 "T=" 74 GTO 05 75 LBL "SHEAR" 76 "DR?" 77 PROMPT 78 2 79 PI 80 / 81 X<>Y 82 / 83 LASTX 84 / 85 8 86 LASTX 87 / 88 RCL 01 89 RCL 06 90 * 91 RCL 07 92 * 93 * 94 RCL 07 95 R-P 96 X<>Y 97 RDN 98 * 99 "TMAX=" 100 LBL 05 101 ARCL X 102 AVIEW 103 STOP 104 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall