The Museum of HP Calculators


Solar Panel Array for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the Solar 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

Program Listing

LINE  KEYS
 01 LBL "PANEL"
 02 SF 27
 03 LBL A
 04 CF 22
 05 "MM.DDYYYY?"
 06 PROMPT
 07 FC?C 22
 08 GTO 04
 09 STO 00
 10 ENTER
 11 INT
 12 STO 07
 13 -
 14 1 E2
 15 *
 16 ENTER
 17 INT
 18 STO 08
 19 -
 20 1 E4
 21 *
 22 STO 09
 23 CF 02
 24 LBL 01
 25 2
 26 RCL 07
 27 X>Y?
 28 GTO 00
 29 RCL 09
 30 1
 31 -
 32 STO 09
 33 RCL 07
 34 13
 35 +
 36 STO 07
 37 GTO 03
 38 LBL 00
 39 RCL 07
 40 1
 41 +
 42 STO 07
 43 LBL 03
 44 365.25
 45 RCL 09
 46 *
 47 INT
 48 30.6001
 49 RCL 07
 50 *
 51 INT
 52 +
 53 RCL 08
 54 +
 55 1720982
 56 +
 57 FS? 02
 58 GTO 02
 59 STO 01
 60 1
 61 STO 07
 62 STO 08
 63 SF 02
 64 GTO 01
 65 LBL 02
 66 RCL 01
 67 1
 68 +
 69 X<>Y
 70 -
 71 STO 09
 72 RCL 00
 73 CF 02
 74 360
 75 ENTER
 76 284
 77 RCL 09
 78 +
 79 365
 80 /
 81 *
 82 SIN
 83 23.45
 84 *
 85 STO 08
 86 LBL 04
 87 "LAT ?"
 88 PROMPT
 89 HR
 90 FS?C 22
 91 STO 05
 92 "LONG ?"
 93 PROMPT
 94 HR
 95 FS?C 22
 96 STO 02
 97 "TIME ?"
 98 PROMPT
 99 HR
100 FS?C 22
101 STO 03
102 "TIME MER ?"
103 PROMPT
104 HR
105 FS?C 22
106 STO 11
107 RCL 11
108 RCL 02
109 X<>Y
110 -
111 .0667
112 *
113 RCL 03
114 X<>Y
115 -
116 12
117 X<>Y
118 -
119 15
120 *
121 STO 06
122 "TILT[angle] ?"  ;"TILT\0D ?"
123 PROMPT
124 HR
125 FS?C 22
126 STO 04
127 LBL B
128 "LENGTH ?"
129 CF 22
130 PROMPT
131 FS?C 22
132 STO 10
133 RCL 08
134 SIN
135 RCL 05
136 SIN
137 *
138 RCL 08
139 COS
140 RCL 05
141 COS
142 *
143 RCL 06
144 COS
145 *
146 +
147 RCL 08
148 COS
149 RCL 05
150 SIN
151 *
152 RCL 06
153 COS
154 *
155 RCL 08
156 SIN
157 RCL 05
158 COS
159 *
160 -
161 /
162 ATAN
163 STO 00
164 RCL 10
165 RCL 04
166 SIN
167 *
168 STO 07
169 "V="
170 ARCL X
171 PROMPT
172 RCL 00
173 TAN
174 /
175 RCL 10
176 RCL 04
177 COS
178 *
179 +
180 "D1="
181 ARCL X
182 PROMPT
183 RCL 07
184 RCL 00
185 TAN
186 /
187 "D2="
188 ARCL X
189 PROMPT
190 END

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