4K HP 67 Games rom attached for testing

[Gene]

Urgent:

Does the AOS program have a problem? I did a XEQ AOS to initialize. Then I did 1 + 2 = and it shows 0.

?

Code:

 01 LBL "AOS" 
 02 SF 27 
 03 LBL a 
 04 CF 01 
 05 CF 02 
 06 22 
 07 CF 22 
 08 0 
 09 LBL 09 
 10 STO IND Y 
 11 DSE Y 
 12 GTO 09 
 13 STO 00 
 14 12 
 15 STO 23 
 16 -1 
 17 STO 24 
 18 CLST 
 19 RTN 
 20 LBL "+" 
 21 LBL A 
 22 61 
 23 GTO 00 
 24 LBL "-" 
 25 LBL B 
 26 51 
 27 GTO 00 
 28 LBL "*" 
 29 LBL C 
 30 42 
 31 GTO 00 
 32 LBL "/" 
 33 LBL D 
 34 32 
 35 GTO 00 
 36 LBL "YX" 
 37 LBL b 
 38 14 
 39 GTO 00 
 40 LBL "NEG" 
 41 LBL c 
 42 23 
 43 GTO 00 
 44 LBL "<" 
 45 LBL d 
 46 5 
 47 LBL 00 
 48 10 
 49 / 
 50 STO 22 
 51 INT 
 52 X!=0? 
 53 GTO 00 
 54 FS? 01 
 55 XEQ 03 
 56 LBL 00 
 57 RDN 
 58 FS?C 22 
 59 XEQ 02 
 60 RCL 22 
 61 INT 
 62 X=0? 
 63 GTO 00 
 64 LBL 07 
 65 RCL 24 
 66 X<0? 
 67 GTO 00 
 68 RCL IND 24 
 69 FRC 
 70 RCL 22 
 71 FRC 
 72 X>Y? 
 73 GTO 00 
 74 RCL IND 24 
 75 INT 
 76 X=0? 
 77 GTO 00 
 78 XEQ 01 
 79 GTO 07 
 80 LBL 00 
 81 ISG 24 
 82 ENTER 
 83 RCL 24 
 84 13 
 85 X<=Y? 
 86 ASIN 
 87 RCL 22 
 88 STO IND 24 
 89 RCL IND 23 
 90 CF 01 
 91 GTO 99 
 92 LBL ">" 
 93 LBL e 
 94 1 
 95 STO 22 
 96 X<>Y 
 97 FS?C 22 
 98 XEQ 02 
 99 RCL 24 
100 X<0? 
101 SQRT 
102 RCL IND 24 
103 INT 
104 X=0? 
105 GTO 08 
106 XEQ 01 
107 GTO e 
108 LBL 08 
109 DSE 24 
110 ENTER 
111 RCL IND 23 
112 SF 01 
113 GTO 99 
114 LBL E 
115 LBL "=" 
116 1 
117 STO 22 
118 X<>Y 
119 FS?C 22 
120 XEQ 02 
121 RCL 24 
122 X<0? 
123 GTO 00 
124 RCL IND 24 
125 XEQ 01 
126 GTO E 
127 LBL 00 
128 RCL IND 23 
129 XEQ a 
130 RDN 
131 RDN 
132 SF 22 
133 GTO 99 
134 LBL 02 
135 ISG 23 
136 ENTER 
137 21 
138 RCL 23 
139 - 
140 X<0? 
141 SQRT 
142 RDN 
143 STO IND 23 
144 RCL 22 
145 INT 
146 X!=0? 
147 RTN 
148 LBL 03 
149 ISG 24 
150 ENTER 
151 4.2 
152 STO IND 24 
153 RDN 
154 RTN 
155 LBL 01 
156 RCL IND 23 
157 DSE 23 
158 RCL IND 23 
159 X<>Y 
160 XEQ IND Z 
161 FS?C 02 
162 ISG 23 
163 ENTER 
164 RCL 23 
165 13 
166 - 
167 X<0? 
168 SQRT 
169 X<>Y 
170 STO IND 23 
171 DSE 24 
172 RTN 
173 RTN 
174 LBL 01 
175 Y^X 
176 RTN 
177 LBL 02 
178 CHS 
179 LBL 00 
180 SF 02 
181 RTN 
182 LBL 03 
183 / 
184 RTN 
185 LBL 04 
186 * 
187 RTN 
188 LBL 05 
189 CHS 
190 LBL 06 
191 + 
192 LBL 99 
193 RTN 
194 SF 22 
195 END

Link to AOS raw file: AOS raw file

The code should have the fix for this NOP: NOP

Original write-up from PPC Journal: AOS PPC Journal article

Gene: I think it has a problem. :-(