DAP-16M2

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

2537 * 2538 * BSS : BSS PSEUDO-OP PROCESSOR 2539 * 2540 * 2541 03416 -0 10 00547 BSS JST* DLC DEFINE SYMBOL IN LOCATION FIELD 2542 03417 -0 10 00545 JST* CPC PRINT LOCATION OF FIRST WORD OF BLOCK 2543 03420 0 10 02224 JST VAR EVALUATE EXPRESSION IN ADDRESS FIELD 2544 03421 0 06 00405 ADD CLOC ADD CURRENT LOCATION T0 BLOCK SIZE 2545 03422 0 04 00405 STA CLOC REPLACE LOCATION COUNTER 2546 03423 0 01 03243 JMP OR2 GO SET NEW ORIGIN IN OBJECT TEXT 2547 * 2548 * 2549 * BES : BES PSEUDO-OP PROCESSOR 2550 * 2551 * 2552 03424 0 10 02224 BES JST VAR EVALUATE EXPRESSION IN ADDRESS FIELD 2553 03425 0 06 00405 ADD CLOC ADD LOCATION COUNTER TO BLOCK SIZE 2554 03426 0 04 00405 STA CLOC REPLACE LOCATION COUNTER 2555 03427 -0 10 00547 JST* DLC DEFINE SYMBOL IN LOCATION FIELD 2556 03430 -0 10 00545 JST* CPC PRINT END OF BLOCK ADDRESS 2557 03431 0 01 03243 JMP OR2 GO SET NEW ORIGIN IN OBJECT TEXT 2558 * 2559 * 2560 EJCT *************************************************************