DAP-16M2

* O100-01-H101 (DPM2UP) DRAWING NO. 41286623-001-02 PAGE 38

1301 * 1302 * DWRD: OUTPUT WORD 1303 * 1304 * 1305 * CALLING SEQUENCE 1306 * JST DWRD 1307 * ......RETURN 1308 * 1309 * THE CONTENTS OF THE FULLOWING LOCATIONS CONTROL 1310 * THE OUTPUT SEQUENCE: 1311 * 1312 * CBT1 - PSEUDU-OP AND PURE DATA INDICATORS 1313 * CBT2 - MACHINE OPCODE CLASSIFICATION FLAGS 1314 * WORD - MACHINE OPCODE 1315 * SUM - PURE DATA OR AUDRESS 1316 * RBIT - RELOCATION MODE UF ADDRESS 1317 * 1318 * 1319 01765 0 000000 DWRD DAC ** 1320 01766 -0 10 00545 JST* CPC INSERT PROGRAM COUNTER IN LIST BUFFER 1321 01767 0 02 00417 LDA RBIT TEST FOR RELOCATION ERROR 1322 01770 0 11 00672 CAS M2 X 1323 01771 0 11 00624 CAS C2 X 1324 01772 101000 NOP YES! 1325 01773 0 10 04006 JST RERR ...... FLAG 'R' 1326 01774 140040 CRA DAP1 1327 01775 0 11 00472 CAS CBT1 CHECK DATA WORD TYPE 1328 01776 0 01 02003 JMP POPB PSEUDO-OP 1329 01777 0 01 02016 JMP POPY PURE DATA 1330 02000 0 02 00423 LDA SUM FETCH ADDRESS 1331 02001 140100 SSP MASK TO 15 BITS 1332 02002 0 04 00423 STA SUM REPLACE ADDRESS WORD 1333 02003 0 02 00474 POPB LDA CBT2 FETCH OPCODE TYPE FLAGS 1334 02004 100400 SPL SKIP IF NOT SHIFT 1335 02005 0 01 02027 JMP SHOP SHIFT - GO FORMAT SHIFT INSTRUCTION 1336 02006 0414 77 LGL 1 A(1)= I/O INSTRUCTION FLAG 1337 02007 100400 SPL SKIP IF NOT I/O INSTRUCTION 1338 02010 0 01 02044 JMP IOOP GO FORMAT I/O INSTRUCTION 1339 02011 0414 77 LGL 1 A(1)= MEMORY REFERENCE FLAG 1340 02012 100400 SPL SKIP IF NOT MEMORY REFERENCE 1341 02013 0 01 02056 JMP MROP GO FORMAT MEMORY REFERENCE INST. 1342 * 1343 * FORMAT GENERIC CLASS INSTRUCTION 1344 * 1345 02014 0 02 00437 LDA WORD FETCH GENERIC OPCODE 1346 02015 0 04 00423 STA SUM PLACE IT IN SUM FOR LISTING 1347 02016 -0 10 00546 POPY JST* CDTA PRINT PURE DATA 1348 02017 0 02 00423 LDA SUM FETCH DATA VALUE 1349 02020 0 04 00437 STA WORD IT LOOKS LIKE A GENERIC INSTRUCTION 1350 02021 140040 GOP CRA