Previous Page Single Page Next Page  

* NAME: LDR-APM DOC. 70180005000 REV. E PAGE 26

1224 00411 0 02 03667 LDA MODE GET ABSOLUTE OR RELOCATABLE SWITCH. 1225 00412 0 10 03201 JST RELO RELOCATE ADDRESS IF NECESSARY. 1226 00413 0 10 02667 JST MRG2 MERGE BIT 2 OF PBRK IF NORMAL MODE 1227 00414 0 04 03777 STA WORD SET LOCATION COUNTER. 1228 00415 0 10 02613 JST FITS CHECK FOR MEMORY OVERFLOW. 1229 00416 0 02 00434 LDA NSDR =(JMP R24B+1) FIRST TIME, PASS THROUGH. 1230 00417 101000 NSDS NOP OTHER TIMES, RETURN VIA 'R24B. 1231 00420 0 04 00417 STA *-1 1232 * 1233 * HERE TO PROCESS NEXT DATA WORD. 1234 * 1235 00421 0 10 01520 NSDL JST R24B READ NEXT 24-BIT DATA WORD. 1236 00422 0 02 03775 LDA DATA+1 WORD TYPE TO C(A-REG)6-8. 1237 00423 0416 71 ALR 8-1 C(W)24 TO C(A)1, C(W)22,23 TO C(A) 15,16. 1238 00424 100400 SPL CHECK FOR KNOWN NINE-BIT. 1239 00425 0 01 00561 JMP NSD4 YES. GO TO IT. 1240 00426 0 03 00670 ANA ='000003 NO. ISOLATE TYPE CODE. 1241 00427 0 10 03221 JST SWCH SWITCH JUMP, DEPENDS ON A-REG. CONTENTS. 1242 00430 0 000435 DAC NSD0 O.. DATA OR GENERIC. 1243 00431 0 000442 DAC NSD1 1.. 9-BIT SYMBOLIC ADDRESS. 1244 00432 0 000514 DAC NSD2 2.. DAC, ADDRESS KNOWN. 1245 00433 0 000531 DAC NSD3 3.. DAC, SYMBOLIC ADDRESS. 1246 * 1247 00434 0 01 01521 NSDR JMP R24B+1 AFTER FIRST TIME, TAKE EXISTING RETURN. 1248 * 1249 * 1250 * 1251 * NSD0 HERE FOR DATA OR GENERIC. 1252 * 1253 00435 0 02 03774 NSD0 LDA DATA GET WORD. 1254 00436 -0 04 03777 STA* WORD PLACE IT. 1255 00437 0 12 03777 NSDT IRS WORD BUMP THE LOCATION COUNTER. 1256 00440 0 10 02613 JST FITS CHECK FOR MEMORY OVERFLOW. 1257 00441 0 01 00421 JMP NSDL GO TO NEXT DATA WORD. 1258 * 1259 * 1260 * 1261 * HERE FOR FORWARD-REFERENCE NINE-BIT. 1262 * 1263 00442 0 02 03774 NSD1 LDA DATA PLACE FLAG, TAG, AND 1264 00443 0 03 00666 ANA ='176000 OP-CODE INTO STORAGE. 1265 00444 -0 04 03777 STA* WORD 1266 00445 0 10 00645 JST EXT EXTRACT SYMBOL NUMBER. 1267 00446 0 03 00674 ANA ='017777 RETAIN ONLY 13 BITS. 1268 00447 0 04 00661 STA K 1269 00450 0 10 02403 JST CUT FORM KEY FOR CURRENT BASE AND 1270 00451 0 05 00702 ERA ='000001 MEMORY MODE. 1271 00452 0 04 03665 STA KEY 1272 00453 0 02 03774 LDA DATA GET THE 'MORE' BIT. 1273 00454 0 03 00665 ANA ='000400 IF ON, THIS SYMBOL HAS NOT
  Previous Page Single Page Next Page