Previous Page Single Page Next Page  

* 0500-001-6612 (016-11T1) CCD NO. 70180294000 REV. D PAGE 6

0251 01112 000000 HLT 0252 01113 000201 IAB 0253 01114 0 05 02667 ERA ='63640 B='063640 0254 01115 100040 SZE 0255 01116 000000 HLT 0256 * 0257 01117 0 10 01553 DIV1 JST JSTL * TESTING ILLEGAL DIVISION 0258 01120 0 10 01121 JST *+1 0259 01121 0 00 00002 JLO7 PZE 2 0260 01122 140040 CRA 0261 01123 000201 IAB B=0 0262 01124 140040 CRA A=0 0263 01125 0 17 02705 DIV =0 DIV BY 0 0264 01126 100040 SZE A=0 0265 01127 000000 HLT 0266 01130 000201 IAB 0267 01131 100040 SZE B=0 0268 01132 000000 HLT 0269 01133 101001 SSC C BIT IS SET 0270 01134 000000 HLT 0271 * 0272 01135 0 10 01553 DIV2 JST JSTL * TESTING ILLEGAL DIVISION 0273 01136 0 10 01137 JST *+1 0274 01137 0 00 00002 JL08 PZE 2 0275 01140 140040 CRA 0276 01141 000201 IAB B=0 0277 01142 0 02 02666 LDA =-32768 A='100000 0278 01143 0 17 02666 DIV =-32768 DIV BY '100000 0279 01144 0 05 02666 ERA ='100000 A='100000 0280 01145 100040 SZE 0281 01146 000000 HLT 0282 01147 000201 IAB 0283 01150 100040 SZE 0284 01151 000000 HLT 0285 01152 101001 SSC C BIT IS SET 0286 01153 000000 HLT 0287 * 0288 01154 0 10 01553 DIV3 JST JSTL * TESTING DIV (+) / (+) 0289 01155 0 10 01156 JST *+1 0290 01156 0 00 00002 JL09 PZE 2 0291 01157 0 02 02665 LDA =27 0292 01160 000201 IAB B='000033 0293 01161 140040 CRA A=0 0294 01162 0 17 02664 DIV =5 DIV BY '000005 0295 01163 0 05 02664 ERA =5 A(QUOTIENT)='000005 0296 01164 100040 SZE 0297 01165 000000 HLT 0298 01166 000201 IAB 0299 01167 0 05 02663 ERA =2 B(REMAINDER)='000002 0300 01170 100040 SZE
  Previous Page Single Page Next Page