Here's the listing generated for the first program in the Standard Pack for HP-67"
Code:
H01 MOVING AVERAGE
H02 SD-01A
H03 x->'K',AVG
H04 W DATA
H05 ->VALUES
H06 ->AVG
H07
H08 n
H09 P?
H10
H11
H12
001 LBL b
002 CL REG
003 P<>S
004 CL REG
005 1
006 X>Y
007 GTO 2
008 CL X
009 2
010 2
011 X<>Y
012 X>Y
013 GTO 2
014 STO E
015 1
016 %
017 +
018 STO- 0
019 INT
020 RTN
021 LBL 2
022 RDN
023 LBL 5
024 PAUSE
025 GTO 5
026 LBL B
027 F? 0
028 SPACE
029 RCL E
030 1
031 +
032 F? 0
033 PRINT X
034 X<>Y
035 F? 0
036 PRINT X
037 RCL (i)
038 STO- 1
039 X<>Y
040 STO (i)
041 STO+ 1
042 RDN
043 X<>Y
044 STO I
045 RCL D
046 X<=Y
047 GSB 1
048 DSZ I
049 GTO 6
050 RCL I
051 1
052 0
053 1
054 X
055 STO- 0
056 LBL 6
057 RDN
058 RTN
059 LBL 1
060 X<>Y
061 F? 0
062 GTO 1
063 PAUSE
064 LBL 1
065 RCL 0
066 RCL D
067 /
068 ENTER
069 F? 0
070 PRINT X
071 RTN
072 LBL C
073 W/DATA
074 RTN
075 LBL c
076 F? 0
077 GTO 1
078 1
079 SF 0
080 RTN
081 LBL 1
082 0
083 CF 0
084 RTN
085 LBL D
086 SPACE
087 0
088 LBL 4
089 RCL D
090 X=Y
091 RTN
092 1
093 %
094 +
095 RCL I
096 X=Y
097 FRAC
098 STO- 0
099 ISZ I
100 RCL (i)
101 PRINT X
102 R^
103 1
104 +
105 GTO 4
106 LBL E
107 RCL 0
108 RCL E
109 RCL D
110 X<=Y
111 X<>Y
112 RDN
113 /
114 RTN
115 R/S
116 R/S
117 R/S
118 R/S
119 R/S
120 R/S
121 R/S
122 R/S
123 R/S
124 R/S
125 R/S
126 R/S
127 R/S
128 R/S
129 R/S
130 R/S
131 R/S
132 R/S
133 R/S
134 R/S
135 R/S
136 R/S
137 R/S
138 R/S
139 R/S
140 R/S
141 R/S
142 R/S
143 R/S
144 R/S
145 R/S
146 R/S
147 R/S
148 R/S
149 R/S
150 R/S
151 R/S
152 R/S
153 R/S
154 R/S
155 R/S
156 R/S
157 R/S
158 R/S
159 R/S
160 R/S
161 R/S
162 R/S
163 R/S
164 R/S
165 R/S
166 R/S
167 R/S
168 R/S
169 R/S
170 R/S
171 R/S
172 R/S
173 R/S
174 R/S
175 R/S
176 R/S
177 R/S
178 R/S
179 R/S
180 R/S
181 R/S
182 R/S
183 R/S
184 R/S
185 R/S
186 R/S
187 R/S
188 R/S
189 R/S
190 R/S
191 R/S
192 R/S
193 R/S
194 R/S
195 R/S
196 R/S
197 R/S
198 R/S
199 R/S
200 R/S
201 R/S
202 R/S
203 R/S
204 R/S
205 R/S
206 R/S
207 R/S
208 R/S
209 R/S
210 R/S
211 R/S
212 R/S
213 R/S
214 R/S
215 R/S
216 R/S
217 R/S
218 R/S
219 R/S
220 R/S
221 R/S
222 R/S
223 R/S
224 R/S
Attached is the translate table I am using. The first column is the hex code. The second would be used for searching for a hex code from a program step. I have removed the spaces and put everything in upper case with exception of lower case labels. The third column is how the code is printed when looked up from the hex code.
I can add variations of program codes to this table to allow for multiple variations for some steps.
I would appreciate any comments or suggestions.
Thanks,
Bill
Smithville, NJ