The Museum of HP Calculators

Weak Acid-Base Titration Curve 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 "A/B"
 02 FIX 03
 03 "ACID Y/N"
 04 AON
 05 PROMPT
 06 AOFF
 07 ASTO X
 08 "Y"
 09 ASTO Y
 10 CF 00
 11 X=Y?
 12 SF 00
 13 CLRG
 14 LBL E
 15 1
 16 ST+ 25
 17 "K?"
 18 PROMPT
 19 STO IND 25
 20 GTO E
 21 LBL A
 22 "V?"
 23 PROMPT
 24 STO 23
 25 "M?"
 26 PROMPT
 27 *
 28 STO 24
 29 "N?"
 30 PROMPT
 31 STO 21
 32 RCL 25
 33 1
 34 +
 35 STO 00
 36 "INIT. GUESS"
 37 PROMPT
 38 LBL B
 39 "VOLUME ADDED"
 40 PROMPT
 41 CF 02
 42 X=0?
 43 SF 02
 44 RCL 21
 45 X<>Y
 46 *
 47 LASTX
 48 RCL 23
 49 +
 50 /
 51 STO 20
 52 RCL 24
 53 LASTX
 54 /
 55 STO 22
 56 R^
 57 STO 08
 58 RCL 00
 59 STO 07
 60 LBL c
 61 RCL 07
 62 .5
 63 +
 64 STO 25
 65 ISG 25
 66 RCL IND 25
 67 RCL 20
 68 +
 69 .5
 70 ST- 25
 71 RDN
 72 DSE 25
 73 RCL 25
 74 RCL 22
 75 *
 76 -
 77 RCL IND 25
 78 *
 79  E-14
 80 -
 81 LBL b
 82 DSE 25
 83 GTO 00
 84 RCL 07
 85 X<> 25
 86 X<>Y
 87 RCL 25
 88 10
 89 +
 90 RDN
 91 STO IND T
 92 DSE 07
 93 GTO c
 94 RCL 00
 95 STO 25
 96 RCL 01
 97 RCL 20
 98 +
 99 STO 10
100 RCL 01
101 RCL 22
102 *
103 SQRT
104 FS?C 02
105 GTO 01
106 GTO B
107 LBL 00
108 RCL IND 25
109 *
110 GTO b
111 LBL a
112 2
113 FS? 00
114 CHS
115 ST+ 08
116 LBL B
117 RCL 08
118 XEQ d
119 CHS
120 10^X
121 LBL 01
122 ENTER
123 ENTER
124 GTO IND 25
125 LBL 05
126 6
127 *
128 RCL 10
129 5
130 XEQ 06
131 RCL 11
132 4
133 XEQ 06
134 RCL 12
135 3
136 XEQ 06
137 RCL 13
138 2
139 XEQ 06
140 RCL 14
141 XEQ 08
142 RCL 13
143 XEQ 07
144 RCL 14
145 XEQ 07
146 RCL 15
147 LBL 09
148 +
149 RCL 16
150 /
151 -
152 X<0?
153 GTO a
154 STO 09
155 %CH
156 ABS
157 1
158 X<=Y?
159 SF 02
160 RCL 09
161 FS?C 02
162 GTO 01
163 LOG
164 CHS
165 XEQ d
166 "PH="
167 ARCL X
168 AVIEW
169 STOP
170 GTO B
171 LBL d
172 FS? 00
173 RTN
174 14
175 X<>Y
176 -
177 RTN
178 LBL 06
179 *
180 LBL 07
181 +
182 *
183 RTN
184 LBL 08
185 +
186 STO 16
187 CLX
188 RCL 10
189 XEQ 07
190 RCL 11
191 XEQ 07
192 RCL 12
193 FS?C 02
194 GTO 09
195 GTO 07
196 LBL 04
197 5
198 *
199 RCL 10
200 4
201 XEQ 06
202 RCL 11
203 3
204 XEQ 06
205 RCL 12
206 2
207 XEQ 06
208 RCL 13
209 XEQ 08
210 RCL 13
211 XEQ 07
212 RCL 14
213 GTO 09
214 LBL 03
215 4
216 *
217 RCL 10
218 3
219 XEQ 06
220 RCL 11
221 2
222 XEQ 06
223 RCL 12
224 XEQ 08
225 RCL 13
226 GTO 09
227 LBL 02
228 3
229 *
230 RCL 10
231 2
232 XEQ 06
233 RCL 11
234 SF 02
235 GTO 08
236 END

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