DAP-16M2

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

3395 * 3396 * TRUN: TERMINATE OBJECT TEXT BUFFER 3397 * 3398 * 3399 * CALLING SEQUENCE: 3400 * JST TRUN 3401 * ......RETURN 3402 * 3403 * 3404 * RESULTS: 3405 * 3406 * <SKP,=,NOP>:EXIT 3407 * OUTB(POUT)=LHW 3408 * BLKS=BLKS+1 3409 * 3410 * 3411 04452 0 000000 TRUN DAC ** TERMINATE OBJECT TEXT BUFFER 3412 04453 0 02 04164 LDA SKP FETCH SWITCH INSTRUCTION 3413 04454 0 04 04455 STA *+1 PLACE IT IN BRANCH 3414 04455 0 00 00000 *** ** SKP OR NOP 3415 04456 -0 01 04452 JMP* TRUN EXIT IF IT WAS A NOP 3416 04457 0 02 00516 LDA LHW FETCH LAST 8 BITS OF OBJECT TEXT ENTRY 3417 04460 0 10 04473 JST FIL PLACE IT IN OBJECT TEXT BUFFER 3418 04461 0 12 00512 IRS BLKS INCREMENT THE WORD COUNT 3419 04462 101000 NOP NOP OVERFLOW IS POSSIBLE 3420 04463 -0 01 04452 JMP* TRUN EXIT 3421 * 3422 * 3423 EJCT *************************************************************