|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 10890 (0x2a8a)
Notes: pts_type(SC)
Names: »SIMHIN.SC«
└─⟦fce1dcf99⟧ Bits:30009704 Philips computer tape "KMD15"
└─⟦this⟧ »DLCSIM/SIMHIN.SC«
IDENT SIMHIN REL 1.1 78-04-21 870150240110 * * * LOG DC TASK * * ENTRY SIMHIN * * * EXTERNAL REFERENCES * * EXTRN MOL OWN LINE MESSAGES EXTRN MBL BEGIN OF LINE MESSAGES EXTRN MIL IN LINE MESSAGE EXTRN TAB1 CHAR TABLE 1 EXTRN PRPOOL PRINTER OCCUPIED BUFFER ADDRESSS EXTRN PROTYP PROCEDURE 0=HDLC,1=SDLC * * * EQUATES * * * * * * RELATIVE ECB EQUATES * * ECBBA EQU 2 ECBRL EQU 4 ECBEL EQU 6 ECBRC EQU 8 ECBCW EQU /A * RES 20 A14 STACK STB EQU *-2 PROCCA DATA 0 ADDRESS TO PRINTER OCCUPIED BUFFER EJECT * * * INITIALIZE SYSTEM * * A9=BUFFER POINTER * A10=CHARACTER COUNTER * * SIMHIN LDKL A14,STB LOAD STACK BASE SUR A10,A10 RESET CHARACTER COUNTER LDK A1,2 ST A1,PRECBL EMPTY PRINTER BUFFER LDK A1,1 ST A1,XSPACE SET SPACE INDICATOR EJECT * * * EDIT CHARACTERS FROM LINE * * EDIT CF A14,GETCH GET CHARACTER ED000 EQU * RF(P) ED300 COMMENT ANK A7,/FF CWK A7,/FF RF(E) ED110 MARK HOLD: PRINT THIS BUFFER CF A14,STAB1 SEARCH IN TABLE 1 RF(Z) ED100 FOUND ED050 EQU * CF A14,EDHEX NOT FOUND: EDIT IT HEXADECIMAL ED100 LDK A1,100 CW A1,PRECBL RB(G) EDIT LINE NOT FULL ED110 CF A14,PRLINE PRINT LINE RB EDIT * * * COMMENT CHARACTER * * ED300 EQU * CF A14,CRLF LDK A5,0 CF A14,PRTEXT LDR A5,A5 RB(Z) EDIT EJECT CM XSPACE CF A14,SPACE CF A14,GETCH GET ADDRESS FIELD RB(P) ED300 COMMENT LDR A5,A7 SAVE ADDRESS FIELD CF A14,GETCH GET CONTROL FIELD RB(P) ED300 COMMENT LDK A6,0 LDR A1,A7 ANK A1,/10 RF(Z) ED310 ADK A6,4 POLL/FINAL PRESENT ED310 LDR A1,A7 ANK A1,/01 RF(NZ) ED320 ADK A6,3 I-FRAME PRESENT (NR AND NS) LDK A4,16 LOAD 'I' RF ED400 ED320 LDR A1,A7 ANK A1,/02 RF(NZ) ED330 ADK A6,2 SUP-FRAME , NR PRESENT LDR A1,A7 ANK A1,/0C SRL A1,1 LDR A4,A1 LOAD TEXT NUMBER RF ED400 ED330 LDR A1,A7 ANK A1,/EC LDR A2,A1 XRK A1,/80 RF(NZ) ED340 LDK A4,8 LOAD 'SNRM' RF ED400 ED340 LDR A1,A2 XRK A1,/40 RF(NZ) ED350 LDK A4,10 LOAD 'DISC' RF ED400 ED350 LDR A1,A2 XRK A1,/60 RF(NZ) ED360 LDK A4,12 LOAD 'UA' RF ED400 ED360 LDR A1,A2 XRK A1,/84 ABL(NZ) ED470 UNKNOWN COMMAND LDK A4,14 LOAD 'CMDR' ED400 CF A14,EDTEX LDR A1,A6 ANK A1,1 RF(NZ) ED410 NS PRESENT CF A14,EDSPAC RF ED420 ED410 LDK A4,18 LOAD NS-TEXT CF A14,EDTEX LDR A1,A7 ANK A1,/0E MASK NS SRL A1,1 LC A1,HEXTAB,A1 CF A14,STORE LDK A1,',' CF A14,STORE ED420 LDR A1,A6 ANK A1,2 RF(NZ) ED430 NR PRESENT CF A14,EDSPAC RF ED440 ED430 LDK A4,20 LOAD NR TEXT CF A14,EDTEX LDR A1,A7 ANK A1,/E0 MASK NR SRL A1,5 LC A1,HEXTAB,A1 CF A14,STORE LDK A1,',' CF A14,STORE ED440 LDK A4,22 LOAD P/F TEXT CF A14,EDTEX LDR A2,A6 LDK A1,'0' ANK A2,4 RF(Z) ED450 NO POLL/FINAL LDK A1,'1' ED450 CF A14,STORE LDK A1,',' CF A14,STORE LDK A4,24 LOAD ADR TEXT CF A14,EDTEX LDR A4,A7 LDR A7,A5 CF A14,EDHEX LDK A1,',' CF A14,STORE ED460 CF A14,EDHEX LDR A7,A4 LD A1,PROTYP RF(NZ) ED467 SDLC LDK A3,0 SLL A7,8 LDK A4,8 ED465 LDR A2,A7 ANKL A2,/8000 ORR A3,A2 SUK A4,1 RF(Z) ED466 SRL A3,1 SLL A7,1 RB ED465 ED466 EQU * SRL A3,8 LDR A7,A3 ED467 EQU * CF A14,EDHEX ABL ED110 ED470 LDR A4,A7 UNKNOWN COMMAND LDR A7,A5 RB ED460 EJECT * * * MOVE TEXT TO PRINT BUFFER * * EDTEX LD A3,MIL,A4 GET TEXT ADDRESS LDKL A8,6 EDT10 SUKL A8,1 RF(N) EDT20 ALL MOVED LCR A1,A3 ADK A3,1 CF A14,STORE RB EDT10 EDT20 RTN A14 * * * MOVE 8 SPACE TO PRINT BUFFER * * EDSPAC LDKL A8,8 EDSP10 SUKL A8,1 RF(N) EDSP20 READY CM XSPACE CF A14,SPACE RB EDSP10 EDSP20 RTN A14 EJECT * * * PRINT TEXT ON PRINTER * * A7 CONTAINS CONTROL CHARACTER * * PRTEXT LDR A6,A7 SAVE CHARACTER CF A14,PRLINE RELEASE PRINT BUFFER ADR A6,A6 DOUBLE FOR INDEXING ANK A6,/FF LDR A2,A6 ANK A2,/7F LD A3,MOL,A2 GET TEXT ADDRESS CWR A2,A6 RF(NE) PRT100 OWN LINE TEXT LDR A2,A2 RF(Z) PRT090 CWK A2,2 RF(NE) PRT095 PRT090 LDK A5,1 PRT095 EQU * LD A3,MBL,A2 BEGINNING OF LINE PRT100 LDR* A4,A3 GET TEXT LENGTH CWK A1,100 RF(G) PRT130 INVALID LENGTH: SKIP TEXT ADK A3,2 SKIP LENGTH PRT110 SUK A4,1 RF(N) PRT120 ALL MOVED LCR A1,A3 ADK A3,1 CF A14,STORE RB PRT110 PRT120 ANK A6,/80 RF(Z) PRT130 BEGINNING OF LINE CF A14,PRLINE PRINT OWN LINE PRT130 RTN A14 EJECT * * * PRINT ONE LINE ON PRINTER * * PRLINE LDK A1,2 CW A1,PRECBL RF(E) PRLI10 NOTHING IN BUFFER LDK A7,1 LKM DATA -7,PRPOOL OCCUPIE PRINTER ST A8,PROCCA SAVE BUFFER ADDRESS LDK A7,/86 STD WRITE AND WAIT LDKL A8,PRECB LKM DATA 1 LD A8,PROCCA RESTORE BUFFER ADDRESS RF(Z) PRLI05 NO BUFFER LKM DATA -8,PRPOOL RELEASE PRINTER CM PROCCA PRLI05 EQU * ST A1,PRECBL RESET LENGTH LDK A1,1 ST A1,XSPACE SET SPACE INDICATOR PRLI10 RTN A14 PRECB DATA /31,PRBUF,2,0,0,0 PRECBL EQU PRECB+4 REQUESTED LENGTH PRBUF DATA 0 CONTROL WORD RES 60 EJECT * * * GET ONE CHARACTER FROM LINE TO A7 * CR=0 IF NORMAL CHARACTER * CR=1 IF COMMENT CHARACTER * * GETCH SUKL A10,1 RF(NN) GETCH1 FETCH FROM BUFFER LDK A7,/81 READ NEW BUFFER LDKL A8,LGECB LKM DATA 1 LD A10,ECBEL,A8 GET EFFECTIVE LENGTH SUKL A10,1 LD A9,ECBBA,A8 GET BUFFER ADDRESS GETCH1 LCR A7,A9 LOAD CHARACTER ADKL A9,1 INCREMENT POINTER LC A1,ECBRC,A8 ADKL A14,4 SKIP STACK FOR RETURN ANK A1,/20 RF(NZ) GETCH3 COMMENT OR POLL COUNTER ABR* A14 RETURN WITH NORMAL CHARACTER EJECT GETCH3 SUK A1,1 SET CR ABR* A14 RETURN * LGECB DATA /60,LGBUF,20,0,0,0 LGBUF RES 20 EJECT * * * EDIT CHAR FROM A7 IN HEXADECIMAL FORM * * EDHEX CF A14,SPACE LDK A1,'/' CF A14,STORE LDR A1,A7 SRL A1,4 LC A1,HEXTAB,A1 CF A14,STORE 1ST CHAR LDR A1,A7 ANK A1,/F LC A1,HEXTAB,A1 CF A14,STORE 2ND CHAR CF A14,SPACE SPACE RTN A14 HEXTAB DATA '0123456789ABCDEF' EJECT * * * STORE CHAR FROM A1 IN PRINT BUFFER * * STORE LD A2,PRECBL SC A1,PRBUF,A2 IM PRECBL LDK A1,0 ST A1,XSPACE RTN A14 EJECT * * * EDIT CHARACTER DECIMAL FROM A7 * * EDDEC LDK A4,0 RESET INDEX EDD100 LDK A1,'0' ASCII ZERO AT START EDD110 CW A7,DECADE,A4 RF(L) EDD200 NO MORE SUBTRACTIONS SU A7,DECADE,A4 SUBTRACT AND INCREMENT ADK A1,1 RB EDD110 EDD200 CF A14,STORE STORE DIGIT ADK A4,2 CWK A4,10 RB(NE) EDD100 NEXT DIGIT RTN A14 CONVERSION DONE DECADE DATA 10000,1000,100,10,1 EJECT * * * SEARCH FOR A7 CHAR IN TABLE 1 * * * CR=1 IF NOT FOUND ELSE * CR=0 AND CORRESPONDING CODE IS STORED * * STAB1 LDK A2,3 SET INDEX LDK A1,1 CR IF NOT FOUND STAB10 CW A2,TAB1 RF(G) STAB30 END OF TABLE CC A7,TAB1,A2 RF(E) STAB20 FOUND ADK A2,2 RB STAB10 TRY NEXT STAB20 LC A1,TAB1-1,A2 GET CORRESPONDING CODE CF A14,STORE AND STORE IT LDK A1,0 STAB30 LC A2,2,A14 SET CR FOR RETURN ANK A2,/FC ANK A1,3 ADR A1,A2 SC A1,2,A14 RTN A14 EJECT * * * PUT SPACE IN BUFFER * * SPACE LD A1,XSPACE RF(NZ) SPA100 LDK A1,/20 CF A14,STORE IM XSPACE SPA100 RTN A14 XSPACE DATA 0 SPACE INDICATOR * * * CRLF IN BUFFER * * CRLF EQU * CF A14,SPACE LDK A1,/0D CF A14,STORE LDK A1,/0A CF A14,SPACE RTN A14 ** * END
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT SIMHIN REL 1.1 78-04-21 870150240110«, t00=0x0000, t01=0x0004}
0x0034…003e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0038}
0x003e…0048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…005e Head {h00=0x0012, h01=0x0050, text=»* LOG DC TASK «, t00=0x0000, t01=0x004c}
0x005e…0068 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0062}
0x0068…0072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x006c}
0x0072…0088 Head {h00=0x0012, h01=0x0050, text=» ENTRY SIMHIN «, t00=0x0000, t01=0x0076}
0x0088…0092 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008c}
0x0092…009c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0096}
0x009c…00ba Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0000, t01=0x00a0}
0x00ba…00c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00be}
0x00c4…00ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c8}
0x00ce…00f2 Head {h00=0x0020, h01=0x0050, text=» EXTRN MOL OWN LINE MESSAGES«, t00=0x0000, t01=0x00d2}
0x00f2…011c Head {h00=0x0026, h01=0x0050, text=» EXTRN MBL BEGIN OF LINE MESSAGES «, t00=0x0000, t01=0x00f6}
0x011c…013e Head {h00=0x001e, h01=0x0050, text=» EXTRN MIL IN LINE MESSAGE«, t00=0x0000, t01=0x0120}
0x013e…015e Head {h00=0x001c, h01=0x0050, text=» EXTRN TAB1 CHAR TABLE 1«, t00=0x0000, t01=0x0142}
0x015e…0194 Head {h00=0x0032, h01=0x0050, text=» EXTRN PRPOOL PRINTER OCCUPIED BUFFER ADDRESSS«, t00=0x0000, t01=0x0162}
0x0194…01c2 Head {h00=0x002a, h01=0x0050, text=» EXTRN PROTYP PROCEDURE 0=HDLC,1=SDLC «, t00=0x0001, t01=0x0008}
0x01c2…01cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0036}
0x01cc…01d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0040}
0x01d6…01e8 Head {h00=0x000e, h01=0x0050, text=»* EQUATES «, t00=0x0001, t01=0x004a}
0x01e8…01f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x005c}
0x01f2…01fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0066}
0x01fc…0206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0070}
0x0206…0210 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007a}
0x0210…021a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0084}
0x021a…0238 Head {h00=0x001a, h01=0x0050, text=»* RELATIVE ECB EQUATES«, t00=0x0001, t01=0x008e}
0x0238…0242 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ac}
0x0242…024c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b6}
0x024c…0260 Head {h00=0x0010, h01=0x0050, text=»ECBBA EQU 2 «, t00=0x0001, t01=0x00c0}
0x0260…0274 Head {h00=0x0010, h01=0x0050, text=»ECBRL EQU 4 «, t00=0x0001, t01=0x00d4}
0x0274…0288 Head {h00=0x0010, h01=0x0050, text=»ECBEL EQU 6 «, t00=0x0001, t01=0x00e8}
0x0288…029c Head {h00=0x0010, h01=0x0050, text=»ECBRC EQU 8 «, t00=0x0001, t01=0x00fc}
0x029c…02b0 Head {h00=0x0010, h01=0x0050, text=»ECBCW EQU /A«, t00=0x0001, t01=0x0110}
0x02b0…02ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0124}
0x02ba…02d4 Head {h00=0x0016, h01=0x0050, text=» RES 20 A14 STACK «, t00=0x0001, t01=0x012e}
0x02d4…02e8 Head {h00=0x0010, h01=0x0050, text=»STB EQU *-2 «, t00=0x0001, t01=0x0148}
0x02e8…0320 Head {h00=0x0034, h01=0x0050, text=»PROCCA DATA 0 ADDRESS TO PRINTER OCCUPIED BUFFER«, t00=0x0001, t01=0x015c}
0x0320…032e (2, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0004}
0x032e…0338 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0012}
0x0338…0342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001c}
0x0342…035e Head {h00=0x0018, h01=0x0050, text=»* INITIALIZE SYSTEM «, t00=0x0002, t01=0x0026}
0x035e…0368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0042}
0x0368…0384 Head {h00=0x0018, h01=0x0050, text=»* A9=BUFFER POINTER «, t00=0x0002, t01=0x004c}
0x0384…03a4 Head {h00=0x001c, h01=0x0050, text=»* A10=CHARACTER COUNTER «, t00=0x0002, t01=0x0068}
0x03a4…03ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0088}
0x03ae…03b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0092}
0x03b8…03e4 Head {h00=0x0028, h01=0x0050, text=»SIMHIN LDKL A14,STB LOAD STACK BASE «, t00=0x0002, t01=0x009c}
0x03e4…0410 Head {h00=0x0028, h01=0x0050, text=» SUR A10,A10 RESET CHARACTER COUNTER«, t00=0x0002, t01=0x00c8}
0x0410…0422 Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0002, t01=0x00f4}
0x0422…044c Head {h00=0x0026, h01=0x0050, text=» ST A1,PRECBL EMPTY PRINTER BUFFER«, t00=0x0002, t01=0x0106}
0x044c…045e Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0002, t01=0x0130}
0x045e…0488 Head {h00=0x0026, h01=0x0050, text=» ST A1,XSPACE SET SPACE INDICATOR «, t00=0x0002, t01=0x0142}
0x0488…0496 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x016c}
0x0496…04a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x017a}
0x04a0…04aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0184}
0x04aa…04ce Head {h00=0x0020, h01=0x0050, text=»* EDIT CHARACTERS FROM LINE «, t00=0x0002, t01=0x018e}
0x04ce…04d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0022}
0x04d8…04e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002c}
0x04e2…050a Head {h00=0x0024, h01=0x0050, text=»EDIT CF A14,GETCH GET CHARACTER «, t00=0x0003, t01=0x0036}
0x050a…051e Head {h00=0x0010, h01=0x0050, text=»ED000 EQU * «, t00=0x0003, t01=0x005e}
0x051e…053a Head {h00=0x0018, h01=0x0050, text=» RF(P) ED300 COMMENT«, t00=0x0003, t01=0x0072}
0x053a…054e Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0003, t01=0x008e}
0x054e…0562 Head {h00=0x0010, h01=0x0050, text=» CWK A7,/FF «, t00=0x0003, t01=0x00a2}
0x0562…0594 Head {h00=0x002e, h01=0x0050, text=» RF(E) ED110 MARK HOLD: PRINT THIS BUFFER «, t00=0x0003, t01=0x00b6}
0x0594…05bc Head {h00=0x0024, h01=0x0050, text=» CF A14,STAB1 SEARCH IN TABLE 1 «, t00=0x0003, t01=0x00e8}
0x05bc…05d6 Head {h00=0x0016, h01=0x0050, text=» RF(Z) ED100 FOUND«, t00=0x0003, t01=0x0110}
0x05d6…05ea Head {h00=0x0010, h01=0x0050, text=»ED050 EQU * «, t00=0x0003, t01=0x012a}
0x05ea…061e Head {h00=0x0030, h01=0x0050, text=» CF A14,EDHEX NOT FOUND: EDIT IT HEXADECIMAL«, t00=0x0003, t01=0x013e}
0x061e…0636 Head {h00=0x0014, h01=0x0050, text=»ED100 LDK A1,100«, t00=0x0003, t01=0x0172}
0x0636…064c Head {h00=0x0012, h01=0x0050, text=» CW A1,PRECBL «, t00=0x0003, t01=0x018a}
0x064c…066e Head {h00=0x001e, h01=0x0050, text=» RB(G) EDIT LINE NOT FULL «, t00=0x0004, t01=0x0010}
0x066e…0694 Head {h00=0x0022, h01=0x0050, text=»ED110 CF A14,PRLINE PRINT LINE«, t00=0x0004, t01=0x0032}
0x0694…06a4 Head {h00=0x000c, h01=0x0050, text=» RB EDIT«, t00=0x0004, t01=0x0058}
0x06a4…06ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0068}
0x06ae…06b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0072}
0x06b8…06d4 Head {h00=0x0018, h01=0x0050, text=»* COMMENT CHARACTER «, t00=0x0004, t01=0x007c}
0x06d4…06de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0098}
0x06de…06e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a2}
0x06e8…06fc Head {h00=0x0010, h01=0x0050, text=»ED300 EQU * «, t00=0x0004, t01=0x00ac}
0x06fc…0710 Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0004, t01=0x00c0}
0x0710…0722 Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x0004, t01=0x00d4}
0x0722…0738 Head {h00=0x0012, h01=0x0050, text=» CF A14,PRTEXT«, t00=0x0004, t01=0x00e6}
0x0738…074a Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x0004, t01=0x00fc}
0x074a…075e Head {h00=0x0010, h01=0x0050, text=» RB(Z) EDIT «, t00=0x0004, t01=0x010e}
0x075e…076c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0122}
0x076c…077e Head {h00=0x000e, h01=0x0050, text=» CM XSPACE«, t00=0x0004, t01=0x0130}
0x077e…0794 Head {h00=0x0012, h01=0x0050, text=» CF A14,SPACE «, t00=0x0004, t01=0x0142}
0x0794…07bc Head {h00=0x0024, h01=0x0050, text=» CF A14,GETCH GET ADDRESS FIELD «, t00=0x0004, t01=0x0158}
0x07bc…07d8 Head {h00=0x0018, h01=0x0050, text=» RB(P) ED300 COMMENT«, t00=0x0004, t01=0x0180}
0x07d8…07fe Head {h00=0x0022, h01=0x0050, text=» LDR A5,A7 SAVE ADDRESS FIELD «, t00=0x0005, t01=0x000c}
0x07fe…0826 Head {h00=0x0024, h01=0x0050, text=» CF A14,GETCH GET CONTROL FIELD «, t00=0x0005, t01=0x0032}
0x0826…0842 Head {h00=0x0018, h01=0x0050, text=» RB(P) ED300 COMMENT«, t00=0x0005, t01=0x005a}
0x0842…0854 Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x0005, t01=0x0076}
0x0854…0866 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0005, t01=0x0088}
0x0866…087a Head {h00=0x0010, h01=0x0050, text=» ANK A1,/10 «, t00=0x0005, t01=0x009a}
0x087a…088e Head {h00=0x0010, h01=0x0050, text=» RF(Z) ED310«, t00=0x0005, t01=0x00ae}
0x088e…08b2 Head {h00=0x0020, h01=0x0050, text=» ADK A6,4 POLL/FINAL PRESENT«, t00=0x0005, t01=0x00c2}
0x08b2…08ca Head {h00=0x0014, h01=0x0050, text=»ED310 LDR A1,A7 «, t00=0x0005, t01=0x00e6}
0x08ca…08de Head {h00=0x0010, h01=0x0050, text=» ANK A1,/01 «, t00=0x0005, t01=0x00fe}
0x08de…08f4 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) ED320 «, t00=0x0005, t01=0x0112}
0x08f4…0922 Head {h00=0x002a, h01=0x0050, text=» ADK A6,3 I-FRAME PRESENT (NR AND NS) «, t00=0x0005, t01=0x0128}
0x0922…093e Head {h00=0x0018, h01=0x0050, text=» LDK A4,16 LOAD 'I' «, t00=0x0005, t01=0x0156}
0x093e…0950 Head {h00=0x000e, h01=0x0050, text=» RF ED400 «, t00=0x0005, t01=0x0172}
0x0950…0968 Head {h00=0x0014, h01=0x0050, text=»ED320 LDR A1,A7 «, t00=0x0005, t01=0x0184}
0x0968…097c Head {h00=0x0010, h01=0x0050, text=» ANK A1,/02 «, t00=0x0006, t01=0x000c}
0x097c…0992 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) ED330 «, t00=0x0006, t01=0x0020}
0x0992…09ba Head {h00=0x0024, h01=0x0050, text=» ADK A6,2 SUP-FRAME , NR PRESENT«, t00=0x0006, t01=0x0036}
0x09ba…09cc Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0006, t01=0x005e}
0x09cc…09e0 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/0C «, t00=0x0006, t01=0x0070}
0x09e0…09f2 Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0006, t01=0x0084}
0x09f2…0a16 Head {h00=0x0020, h01=0x0050, text=» LDR A4,A1 LOAD TEXT NUMBER «, t00=0x0006, t01=0x0096}
0x0a16…0a28 Head {h00=0x000e, h01=0x0050, text=» RF ED400 «, t00=0x0006, t01=0x00ba}
0x0a28…0a40 Head {h00=0x0014, h01=0x0050, text=»ED330 LDR A1,A7 «, t00=0x0006, t01=0x00cc}
0x0a40…0a54 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/EC «, t00=0x0006, t01=0x00e4}
0x0a54…0a66 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0006, t01=0x00f8}
0x0a66…0a7a Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x0006, t01=0x010a}
0x0a7a…0a90 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) ED340 «, t00=0x0006, t01=0x011e}
0x0a90…0aae Head {h00=0x001a, h01=0x0050, text=» LDK A4,8 LOAD 'SNRM' «, t00=0x0006, t01=0x0134}
0x0aae…0ac0 Head {h00=0x000e, h01=0x0050, text=» RF ED400 «, t00=0x0006, t01=0x0152}
0x0ac0…0ad8 Head {h00=0x0014, h01=0x0050, text=»ED340 LDR A1,A2 «, t00=0x0006, t01=0x0164}
0x0ad8…0aec Head {h00=0x0010, h01=0x0050, text=» XRK A1,/40 «, t00=0x0006, t01=0x017c}
0x0aec…0b02 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) ED350 «, t00=0x0006, t01=0x0190}
0x0b02…0b20 Head {h00=0x001a, h01=0x0050, text=» LDK A4,10 LOAD 'DISC'«, t00=0x0007, t01=0x0016}
0x0b20…0b32 Head {h00=0x000e, h01=0x0050, text=» RF ED400 «, t00=0x0007, t01=0x0034}
0x0b32…0b4a Head {h00=0x0014, h01=0x0050, text=»ED350 LDR A1,A2 «, t00=0x0007, t01=0x0046}
0x0b4a…0b5e Head {h00=0x0010, h01=0x0050, text=» XRK A1,/60 «, t00=0x0007, t01=0x005e}
0x0b5e…0b74 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) ED360 «, t00=0x0007, t01=0x0072}
0x0b74…0b90 Head {h00=0x0018, h01=0x0050, text=» LDK A4,12 LOAD 'UA'«, t00=0x0007, t01=0x0088}
0x0b90…0ba2 Head {h00=0x000e, h01=0x0050, text=» RF ED400 «, t00=0x0007, t01=0x00a4}
0x0ba2…0bba Head {h00=0x0014, h01=0x0050, text=»ED360 LDR A1,A2 «, t00=0x0007, t01=0x00b6}
0x0bba…0bce Head {h00=0x0010, h01=0x0050, text=» XRK A1,/84 «, t00=0x0007, t01=0x00ce}
0x0bce…0bf4 Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) ED470 UNKNOWN COMMAND«, t00=0x0007, t01=0x00e2}
0x0bf4…0c12 Head {h00=0x001a, h01=0x0050, text=» LDK A4,14 LOAD 'CMDR'«, t00=0x0007, t01=0x0108}
0x0c12…0c2c Head {h00=0x0016, h01=0x0050, text=»ED400 CF A14,EDTEX«, t00=0x0007, t01=0x0126}
0x0c2c…0c3e Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0007, t01=0x0140}
0x0c3e…0c50 Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0007, t01=0x0152}
0x0c50…0c70 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) ED410 NS PRESENT«, t00=0x0007, t01=0x0164}
0x0c70…0c86 Head {h00=0x0012, h01=0x0050, text=» CF A14,EDSPAC«, t00=0x0007, t01=0x0184}
0x0c86…0c98 Head {h00=0x000e, h01=0x0050, text=» RF ED420 «, t00=0x0008, t01=0x000a}
0x0c98…0cbc Head {h00=0x0020, h01=0x0050, text=»ED410 LDK A4,18 LOAD NS-TEXT«, t00=0x0008, t01=0x001c}
0x0cbc…0cd2 Head {h00=0x0012, h01=0x0050, text=» CF A14,EDTEX «, t00=0x0008, t01=0x0040}
0x0cd2…0ce4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0008, t01=0x0056}
0x0ce4…0d00 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/0E MASK NS «, t00=0x0008, t01=0x0068}
0x0d00…0d12 Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0008, t01=0x0084}
0x0d12…0d2a Head {h00=0x0014, h01=0x0050, text=» LC A1,HEXTAB,A1«, t00=0x0008, t01=0x0096}
0x0d2a…0d40 Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x0008, t01=0x00ae}
0x0d40…0d54 Head {h00=0x0010, h01=0x0050, text=» LDK A1,',' «, t00=0x0008, t01=0x00c4}
0x0d54…0d6a Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x0008, t01=0x00d8}
0x0d6a…0d82 Head {h00=0x0014, h01=0x0050, text=»ED420 LDR A1,A6 «, t00=0x0008, t01=0x00ee}
0x0d82…0d94 Head {h00=0x000e, h01=0x0050, text=» ANK A1,2 «, t00=0x0008, t01=0x0106}
0x0d94…0db4 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) ED430 NR PRESENT«, t00=0x0008, t01=0x0118}
0x0db4…0dca Head {h00=0x0012, h01=0x0050, text=» CF A14,EDSPAC«, t00=0x0008, t01=0x0138}
0x0dca…0ddc Head {h00=0x000e, h01=0x0050, text=» RF ED440 «, t00=0x0008, t01=0x014e}
0x0ddc…0e00 Head {h00=0x0020, h01=0x0050, text=»ED430 LDK A4,20 LOAD NR TEXT«, t00=0x0008, t01=0x0160}
0x0e00…0e16 Head {h00=0x0012, h01=0x0050, text=» CF A14,EDTEX «, t00=0x0008, t01=0x0184}
0x0e16…0e28 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0009, t01=0x000a}
0x0e28…0e44 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/E0 MASK NR «, t00=0x0009, t01=0x001c}
0x0e44…0e56 Head {h00=0x000e, h01=0x0050, text=» SRL A1,5 «, t00=0x0009, t01=0x0038}
0x0e56…0e6e Head {h00=0x0014, h01=0x0050, text=» LC A1,HEXTAB,A1«, t00=0x0009, t01=0x004a}
0x0e6e…0e84 Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x0009, t01=0x0062}
0x0e84…0e98 Head {h00=0x0010, h01=0x0050, text=» LDK A1,',' «, t00=0x0009, t01=0x0078}
0x0e98…0eae Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x0009, t01=0x008c}
0x0eae…0ed4 Head {h00=0x0022, h01=0x0050, text=»ED440 LDK A4,22 LOAD P/F TEXT «, t00=0x0009, t01=0x00a2}
0x0ed4…0eea Head {h00=0x0012, h01=0x0050, text=» CF A14,EDTEX «, t00=0x0009, t01=0x00c8}
0x0eea…0efc Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x0009, t01=0x00de}
0x0efc…0f10 Head {h00=0x0010, h01=0x0050, text=» LDK A1,'0' «, t00=0x0009, t01=0x00f0}
0x0f10…0f22 Head {h00=0x000e, h01=0x0050, text=» ANK A2,4 «, t00=0x0009, t01=0x0104}
0x0f22…0f44 Head {h00=0x001e, h01=0x0050, text=» RF(Z) ED450 NO POLL/FINAL«, t00=0x0009, t01=0x0116}
0x0f44…0f58 Head {h00=0x0010, h01=0x0050, text=» LDK A1,'1' «, t00=0x0009, t01=0x0138}
0x0f58…0f72 Head {h00=0x0016, h01=0x0050, text=»ED450 CF A14,STORE«, t00=0x0009, t01=0x014c}
0x0f72…0f86 Head {h00=0x0010, h01=0x0050, text=» LDK A1,',' «, t00=0x0009, t01=0x0166}
0x0f86…0f9c Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x0009, t01=0x017a}
0x0f9c…0fbc Head {h00=0x001c, h01=0x0050, text=» LDK A4,24 LOAD ADR TEXT«, t00=0x0009, t01=0x0190}
0x0fbc…0fd2 Head {h00=0x0012, h01=0x0050, text=» CF A14,EDTEX «, t00=0x000a, t01=0x0020}
0x0fd2…0fe4 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x000a, t01=0x0036}
0x0fe4…0ff6 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x000a, t01=0x0048}
0x0ff6…100c Head {h00=0x0012, h01=0x0050, text=» CF A14,EDHEX «, t00=0x000a, t01=0x005a}
0x100c…1020 Head {h00=0x0010, h01=0x0050, text=» LDK A1,',' «, t00=0x000a, t01=0x0070}
0x1020…1036 Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x000a, t01=0x0084}
0x1036…1050 Head {h00=0x0016, h01=0x0050, text=»ED460 CF A14,EDHEX«, t00=0x000a, t01=0x009a}
0x1050…1062 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A4«, t00=0x000a, t01=0x00b4}
0x1062…1078 Head {h00=0x0012, h01=0x0050, text=» LD A1,PROTYP «, t00=0x000a, t01=0x00c6}
0x1078…1092 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ED467 SDLC«, t00=0x000a, t01=0x00dc}
0x1092…10a4 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x000a, t01=0x00f6}
0x10a4…10b6 Head {h00=0x000e, h01=0x0050, text=» SLL A7,8 «, t00=0x000a, t01=0x0108}
0x10b6…10c8 Head {h00=0x000e, h01=0x0050, text=» LDK A4,8 «, t00=0x000a, t01=0x011a}
0x10c8…10e0 Head {h00=0x0014, h01=0x0050, text=»ED465 LDR A2,A7 «, t00=0x000a, t01=0x012c}
0x10e0…10f6 Head {h00=0x0012, h01=0x0050, text=» ANKL A2,/8000«, t00=0x000a, t01=0x0144}
0x10f6…1108 Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x000a, t01=0x015a}
0x1108…111a Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x000a, t01=0x016c}
0x111a…112e Head {h00=0x0010, h01=0x0050, text=» RF(Z) ED466«, t00=0x000a, t01=0x017e}
0x112e…1140 (11, 0, 398) Head {h00=0x000e, h01=0x0050, text=» SRL A3,1 «, t00=0x000b, t01=0x0004}
0x1140…1152 Head {h00=0x000e, h01=0x0050, text=» SLL A7,1 «, t00=0x000b, t01=0x0016}
0x1152…1164 Head {h00=0x000e, h01=0x0050, text=» RB ED465 «, t00=0x000b, t01=0x0028}
0x1164…1178 Head {h00=0x0010, h01=0x0050, text=»ED466 EQU * «, t00=0x000b, t01=0x003a}
0x1178…118a Head {h00=0x000e, h01=0x0050, text=» SRL A3,8 «, t00=0x000b, t01=0x004e}
0x118a…119c Head {h00=0x000e, h01=0x0050, text=» LDR A7,A3«, t00=0x000b, t01=0x0060}
0x119c…11b0 Head {h00=0x0010, h01=0x0050, text=»ED467 EQU * «, t00=0x000b, t01=0x0072}
0x11b0…11c6 Head {h00=0x0012, h01=0x0050, text=» CF A14,EDHEX «, t00=0x000b, t01=0x0086}
0x11c6…11d8 Head {h00=0x000e, h01=0x0050, text=» ABL ED110«, t00=0x000b, t01=0x009c}
0x11d8…1200 Head {h00=0x0024, h01=0x0050, text=»ED470 LDR A4,A7 UNKNOWN COMMAND «, t00=0x000b, t01=0x00ae}
0x1200…1212 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x000b, t01=0x00d6}
0x1212…1224 Head {h00=0x000e, h01=0x0050, text=» RB ED460 «, t00=0x000b, t01=0x00e8}
0x1224…1232 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x00fa}
0x1232…123c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0108}
0x123c…1246 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0112}
0x1246…126a Head {h00=0x0020, h01=0x0050, text=»* MOVE TEXT TO PRINT BUFFER «, t00=0x000b, t01=0x011c}
0x126a…1274 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0140}
0x1274…127e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x014a}
0x127e…12aa Head {h00=0x0028, h01=0x0050, text=»EDTEX LD A3,MIL,A4 GET TEXT ADDRESS «, t00=0x000b, t01=0x0154}
0x12aa…12bc Head {h00=0x000e, h01=0x0050, text=» LDKL A8,6«, t00=0x000b, t01=0x0180}
0x12bc…12d4 (12, 0, 400) Head {h00=0x0014, h01=0x0050, text=»EDT10 SUKL A8,1 «, t00=0x000c, t01=0x0004}
0x12d4…12f2 Head {h00=0x001a, h01=0x0050, text=» RF(N) EDT20 ALL MOVED«, t00=0x000c, t01=0x001c}
0x12f2…1304 Head {h00=0x000e, h01=0x0050, text=» LCR A1,A3«, t00=0x000c, t01=0x003a}
0x1304…1316 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x000c, t01=0x004c}
0x1316…132c Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x000c, t01=0x005e}
0x132c…133e Head {h00=0x000e, h01=0x0050, text=» RB EDT10 «, t00=0x000c, t01=0x0074}
0x133e…1354 Head {h00=0x0012, h01=0x0050, text=»EDT20 RTN A14 «, t00=0x000c, t01=0x0086}
0x1354…135e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x009c}
0x135e…1368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00a6}
0x1368…138e Head {h00=0x0022, h01=0x0050, text=»* MOVE 8 SPACE TO PRINT BUFFER«, t00=0x000c, t01=0x00b0}
0x138e…1398 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00d6}
0x1398…13a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e0}
0x13a2…13ba Head {h00=0x0014, h01=0x0050, text=»EDSPAC LDKL A8,8«, t00=0x000c, t01=0x00ea}
0x13ba…13d2 Head {h00=0x0014, h01=0x0050, text=»EDSP10 SUKL A8,1«, t00=0x000c, t01=0x0102}
0x13d2…13ee Head {h00=0x0018, h01=0x0050, text=» RF(N) EDSP20 READY «, t00=0x000c, t01=0x011a}
0x13ee…1400 Head {h00=0x000e, h01=0x0050, text=» CM XSPACE«, t00=0x000c, t01=0x0136}
0x1400…1416 Head {h00=0x0012, h01=0x0050, text=» CF A14,SPACE «, t00=0x000c, t01=0x0148}
0x1416…1428 Head {h00=0x000e, h01=0x0050, text=» RB EDSP10«, t00=0x000c, t01=0x015e}
0x1428…143e Head {h00=0x0012, h01=0x0050, text=»EDSP20 RTN A14«, t00=0x000c, t01=0x0170}
0x143e…144c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0186}
0x144c…1456 (13, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0004}
0x1456…1460 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x000e}
0x1460…1480 Head {h00=0x001c, h01=0x0050, text=»* PRINT TEXT ON PRINTER «, t00=0x000d, t01=0x0018}
0x1480…148a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0038}
0x148a…14b2 Head {h00=0x0024, h01=0x0050, text=»* A7 CONTAINS CONTROL CHARACTER «, t00=0x000d, t01=0x0042}
0x14b2…14bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x006a}
0x14bc…14c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0074}
0x14c6…14ee Head {h00=0x0024, h01=0x0050, text=»PRTEXT LDR A6,A7 SAVE CHARACTER «, t00=0x000d, t01=0x007e}
0x14ee…151a Head {h00=0x0028, h01=0x0050, text=» CF A14,PRLINE RELEASE PRINT BUFFER «, t00=0x000d, t01=0x00a6}
0x151a…1540 Head {h00=0x0022, h01=0x0050, text=» ADR A6,A6 DOUBLE FOR INDEXING«, t00=0x000d, t01=0x00d2}
0x1540…1554 Head {h00=0x0010, h01=0x0050, text=» ANK A6,/FF «, t00=0x000d, t01=0x00f8}
0x1554…1566 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x000d, t01=0x010c}
0x1566…157a Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x000d, t01=0x011e}
0x157a…15a0 Head {h00=0x0022, h01=0x0050, text=» LD A3,MOL,A2 GET TEXT ADDRESS«, t00=0x000d, t01=0x0132}
0x15a0…15b2 Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x000d, t01=0x0158}
0x15b2…15d6 Head {h00=0x0020, h01=0x0050, text=» RF(NE) PRT100 OWN LINE TEXT«, t00=0x000d, t01=0x016a}
0x15d6…15e8 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x000d, t01=0x018e}
0x15e8…15fe Head {h00=0x0012, h01=0x0050, text=» RF(Z) PRT090 «, t00=0x000e, t01=0x0010}
0x15fe…1610 Head {h00=0x000e, h01=0x0050, text=» CWK A2,2 «, t00=0x000e, t01=0x0026}
0x1610…1626 Head {h00=0x0012, h01=0x0050, text=» RF(NE) PRT095«, t00=0x000e, t01=0x0038}
0x1626…163e Head {h00=0x0014, h01=0x0050, text=»PRT090 LDK A5,1 «, t00=0x000e, t01=0x004e}
0x163e…1652 Head {h00=0x0010, h01=0x0050, text=»PRT095 EQU *«, t00=0x000e, t01=0x0066}
0x1652…167a Head {h00=0x0024, h01=0x0050, text=» LD A3,MBL,A2 BEGINNING OF LINE «, t00=0x000e, t01=0x007a}
0x167a…16a4 Head {h00=0x0026, h01=0x0050, text=»PRT100 LDR* A4,A3 GET TEXT LENGTH «, t00=0x000e, t01=0x00a2}
0x16a4…16b8 Head {h00=0x0010, h01=0x0050, text=» CWK A1,100 «, t00=0x000e, t01=0x00cc}
0x16b8…16e8 Head {h00=0x002c, h01=0x0050, text=» RF(G) PRT130 INVALID LENGTH: SKIP TEXT «, t00=0x000e, t01=0x00e0}
0x16e8…1706 Head {h00=0x001a, h01=0x0050, text=» ADK A3,2 SKIP LENGTH «, t00=0x000e, t01=0x0110}
0x1706…171e Head {h00=0x0014, h01=0x0050, text=»PRT110 SUK A4,1 «, t00=0x000e, t01=0x012e}
0x171e…173e Head {h00=0x001c, h01=0x0050, text=» RF(N) PRT120 ALL MOVED «, t00=0x000e, t01=0x0146}
0x173e…1750 Head {h00=0x000e, h01=0x0050, text=» LCR A1,A3«, t00=0x000e, t01=0x0166}
0x1750…1762 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x000e, t01=0x0178}
0x1762…1778 Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x000e, t01=0x018a}
0x1778…178a Head {h00=0x000e, h01=0x0050, text=» RB PRT110«, t00=0x000f, t01=0x0010}
0x178a…17a4 Head {h00=0x0016, h01=0x0050, text=»PRT120 ANK A6,/80 «, t00=0x000f, t01=0x0022}
0x17a4…17cc Head {h00=0x0024, h01=0x0050, text=» RF(Z) PRT130 BEGINNING OF LINE «, t00=0x000f, t01=0x003c}
0x17cc…17f2 Head {h00=0x0022, h01=0x0050, text=» CF A14,PRLINE PRINT OWN LINE «, t00=0x000f, t01=0x0064}
0x17f2…1808 Head {h00=0x0012, h01=0x0050, text=»PRT130 RTN A14«, t00=0x000f, t01=0x008a}
0x1808…1816 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x00a0}
0x1816…1820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ae}
0x1820…182a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b8}
0x182a…184e Head {h00=0x0020, h01=0x0050, text=»* PRINT ONE LINE ON PRINTER «, t00=0x000f, t01=0x00c2}
0x184e…1858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e6}
0x1858…1862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f0}
0x1862…187a Head {h00=0x0014, h01=0x0050, text=»PRLINE LDK A1,2 «, t00=0x000f, t01=0x00fa}
0x187a…1890 Head {h00=0x0012, h01=0x0050, text=» CW A1,PRECBL «, t00=0x000f, t01=0x0112}
0x1890…18b8 Head {h00=0x0024, h01=0x0050, text=» RF(E) PRLI10 NOTHING IN BUFFER «, t00=0x000f, t01=0x0128}
0x18b8…18ca Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x000f, t01=0x0150}
0x18ca…18d6 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x000f, t01=0x0162}
0x18d6…18fe Head {h00=0x0024, h01=0x0050, text=» DATA -7,PRPOOL OCCUPIE PRINTER «, t00=0x000f, t01=0x016e}
0x18fe…1928 Head {h00=0x0026, h01=0x0050, text=» ST A8,PROCCA SAVE BUFFER ADDRESS «, t00=0x0010, t01=0x0008}
0x1928…194e Head {h00=0x0022, h01=0x0050, text=» LDK A7,/86 STD WRITE AND WAIT«, t00=0x0010, t01=0x0032}
0x194e…1964 Head {h00=0x0012, h01=0x0050, text=» LDKL A8,PRECB«, t00=0x0010, t01=0x0058}
0x1964…1970 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0010, t01=0x006e}
0x1970…1980 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0010, t01=0x007a}
0x1980…19ac Head {h00=0x0028, h01=0x0050, text=» LD A8,PROCCA RESTORE BUFFER ADDRESS«, t00=0x0010, t01=0x008a}
0x19ac…19cc Head {h00=0x001c, h01=0x0050, text=» RF(Z) PRLI05 NO BUFFER «, t00=0x0010, t01=0x00b6}
0x19cc…19da Head {h00=0x000a, h01=0x0050, text=» LKM «, t00=0x0010, t01=0x00d6}
0x19da…1a02 Head {h00=0x0024, h01=0x0050, text=» DATA -8,PRPOOL RELEASE PRINTER «, t00=0x0010, t01=0x00e4}
0x1a02…1a14 Head {h00=0x000e, h01=0x0050, text=» CM PROCCA«, t00=0x0010, t01=0x010c}
0x1a14…1a28 Head {h00=0x0010, h01=0x0050, text=»PRLI05 EQU *«, t00=0x0010, t01=0x011e}
0x1a28…1a4a Head {h00=0x001e, h01=0x0050, text=» ST A1,PRECBL RESET LENGTH«, t00=0x0010, t01=0x0132}
0x1a4a…1a5c Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0010, t01=0x0154}
0x1a5c…1a86 Head {h00=0x0026, h01=0x0050, text=» ST A1,XSPACE SET SPACE INDICATOR «, t00=0x0010, t01=0x0166}
0x1a86…1a9c Head {h00=0x0012, h01=0x0050, text=»PRLI10 RTN A14«, t00=0x0010, t01=0x0190}
0x1a9c…1ac0 Head {h00=0x0020, h01=0x0050, text=»PRECB DATA /31,PRBUF,2,0,0,0«, t00=0x0011, t01=0x0016}
0x1ac0…1aec Head {h00=0x0028, h01=0x0050, text=»PRECBL EQU PRECB+4 REQUESTED LENGTH «, t00=0x0011, t01=0x003a}
0x1aec…1b0e Head {h00=0x001e, h01=0x0050, text=»PRBUF DATA 0 CONTROL WORD «, t00=0x0011, t01=0x0066}
0x1b0e…1b1e Head {h00=0x000c, h01=0x0050, text=» RES 60 «, t00=0x0011, t01=0x0088}
0x1b1e…1b2c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0098}
0x1b2c…1b36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00a6}
0x1b36…1b40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b0}
0x1b40…1b6c Head {h00=0x0028, h01=0x0050, text=»* GET ONE CHARACTER FROM LINE TO A7 «, t00=0x0011, t01=0x00ba}
0x1b6c…1b8e Head {h00=0x001e, h01=0x0050, text=»* CR=0 IF NORMAL CHARACTER«, t00=0x0011, t01=0x00e6}
0x1b8e…1bb2 Head {h00=0x0020, h01=0x0050, text=»* CR=1 IF COMMENT CHARACTER «, t00=0x0011, t01=0x0108}
0x1bb2…1bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x012c}
0x1bbc…1bc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0136}
0x1bc6…1bde Head {h00=0x0014, h01=0x0050, text=»GETCH SUKL A10,1«, t00=0x0011, t01=0x0140}
0x1bde…1c06 Head {h00=0x0024, h01=0x0050, text=» RF(NN) GETCH1 FETCH FROM BUFFER«, t00=0x0011, t01=0x0158}
0x1c06…1c2a Head {h00=0x0020, h01=0x0050, text=» LDK A7,/81 READ NEW BUFFER «, t00=0x0011, t01=0x0180}
0x1c2a…1c40 Head {h00=0x0012, h01=0x0050, text=» LDKL A8,LGECB«, t00=0x0012, t01=0x0014}
0x1c40…1c4c Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0012, t01=0x002a}
0x1c4c…1c5c Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0012, t01=0x0036}
0x1c5c…1c8a Head {h00=0x002a, h01=0x0050, text=» LD A10,ECBEL,A8 GET EFFECTIVE LENGTH «, t00=0x0012, t01=0x0046}
0x1c8a…1c9e Head {h00=0x0010, h01=0x0050, text=» SUKL A10,1 «, t00=0x0012, t01=0x0074}
0x1c9e…1cc8 Head {h00=0x0026, h01=0x0050, text=» LD A9,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0012, t01=0x0088}
0x1cc8…1cf0 Head {h00=0x0024, h01=0x0050, text=»GETCH1 LCR A7,A9 LOAD CHARACTER «, t00=0x0012, t01=0x00b2}
0x1cf0…1d14 Head {h00=0x0020, h01=0x0050, text=» ADKL A9,1 INCREMENT POINTER«, t00=0x0012, t01=0x00da}
0x1d14…1d2c Head {h00=0x0014, h01=0x0050, text=» LC A1,ECBRC,A8 «, t00=0x0012, t01=0x00fe}
0x1d2c…1d56 Head {h00=0x0026, h01=0x0050, text=» ADKL A14,4 SKIP STACK FOR RETURN «, t00=0x0012, t01=0x0116}
0x1d56…1d6a Head {h00=0x0010, h01=0x0050, text=» ANK A1,/20 «, t00=0x0012, t01=0x0140}
0x1d6a…1d98 Head {h00=0x002a, h01=0x0050, text=» RF(NZ) GETCH3 COMMENT OR POLL COUNTER«, t00=0x0012, t01=0x0154}
0x1d98…1dc6 Head {h00=0x002a, h01=0x0050, text=» ABR* A14 RETURN WITH NORMAL CHARACTER«, t00=0x0012, t01=0x0182}
0x1dc6…1dd4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0020}
0x1dd4…1df2 Head {h00=0x001a, h01=0x0050, text=»GETCH3 SUK A1,1 SET CR«, t00=0x0013, t01=0x002e}
0x1df2…1e0a Head {h00=0x0014, h01=0x0050, text=» ABR* A14 RETURN«, t00=0x0013, t01=0x004c}
0x1e0a…1e14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0064}
0x1e14…1e3a Head {h00=0x0022, h01=0x0050, text=»LGECB DATA /60,LGBUF,20,0,0,0 «, t00=0x0013, t01=0x006e}
0x1e3a…1e4e Head {h00=0x0010, h01=0x0050, text=»LGBUF RES 20«, t00=0x0013, t01=0x0094}
0x1e4e…1e5c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x00a8}
0x1e5c…1e66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00b6}
0x1e66…1e70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00c0}
0x1e70…1ea0 Head {h00=0x002c, h01=0x0050, text=»* EDIT CHAR FROM A7 IN HEXADECIMAL FORM «, t00=0x0013, t01=0x00ca}
0x1ea0…1eaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00fa}
0x1eaa…1eb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0104}
0x1eb4…1ece Head {h00=0x0016, h01=0x0050, text=»EDHEX CF A14,SPACE«, t00=0x0013, t01=0x010e}
0x1ece…1ee2 Head {h00=0x0010, h01=0x0050, text=» LDK A1,'/' «, t00=0x0013, t01=0x0128}
0x1ee2…1ef8 Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x0013, t01=0x013c}
0x1ef8…1f0a Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0013, t01=0x0152}
0x1f0a…1f1c Head {h00=0x000e, h01=0x0050, text=» SRL A1,4 «, t00=0x0013, t01=0x0164}
0x1f1c…1f34 Head {h00=0x0014, h01=0x0050, text=» LC A1,HEXTAB,A1«, t00=0x0013, t01=0x0176}
0x1f34…1f52 Head {h00=0x001a, h01=0x0050, text=» CF A14,STORE 1ST CHAR«, t00=0x0013, t01=0x018e}
0x1f52…1f64 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0014, t01=0x001c}
0x1f64…1f76 Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0014, t01=0x002e}
0x1f76…1f8e Head {h00=0x0014, h01=0x0050, text=» LC A1,HEXTAB,A1«, t00=0x0014, t01=0x0040}
0x1f8e…1fac Head {h00=0x001a, h01=0x0050, text=» CF A14,STORE 2ND CHAR«, t00=0x0014, t01=0x0058}
0x1fac…1fc8 Head {h00=0x0018, h01=0x0050, text=» CF A14,SPACE SPACE «, t00=0x0014, t01=0x0076}
0x1fc8…1fd8 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0014, t01=0x0092}
0x1fd8…1ffe Head {h00=0x0022, h01=0x0050, text=»HEXTAB DATA '0123456789ABCDEF'«, t00=0x0014, t01=0x00a2}
0x1ffe…200c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x00c8}
0x200c…2016 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00d6}
0x2016…2020 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00e0}
0x2020…204c Head {h00=0x0028, h01=0x0050, text=»* STORE CHAR FROM A1 IN PRINT BUFFER«, t00=0x0014, t01=0x00ea}
0x204c…2056 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0116}
0x2056…2060 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0120}
0x2060…207a Head {h00=0x0016, h01=0x0050, text=»STORE LD A2,PRECBL«, t00=0x0014, t01=0x012a}
0x207a…2092 Head {h00=0x0014, h01=0x0050, text=» SC A1,PRBUF,A2 «, t00=0x0014, t01=0x0144}
0x2092…20a4 Head {h00=0x000e, h01=0x0050, text=» IM PRECBL«, t00=0x0014, t01=0x015c}
0x20a4…20b6 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0014, t01=0x016e}
0x20b6…20cc Head {h00=0x0012, h01=0x0050, text=» ST A1,XSPACE «, t00=0x0014, t01=0x0180}
0x20cc…20dc Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0015, t01=0x0008}
0x20dc…20ea Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0018}
0x20ea…20f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0026}
0x20f4…20fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0030}
0x20fe…2126 Head {h00=0x0024, h01=0x0050, text=»* EDIT CHARACTER DECIMAL FROM A7«, t00=0x0015, t01=0x003a}
0x2126…2130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0062}
0x2130…213a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x006c}
0x213a…215c Head {h00=0x001e, h01=0x0050, text=»EDDEC LDK A4,0 RESET INDEX«, t00=0x0015, t01=0x0076}
0x215c…218a Head {h00=0x002a, h01=0x0050, text=»EDD100 LDK A1,'0' ASCII ZERO AT START «, t00=0x0015, t01=0x0098}
0x218a…21a8 Head {h00=0x001a, h01=0x0050, text=»EDD110 CW A7,DECADE,A4«, t00=0x0015, t01=0x00c6}
0x21a8…21d2 Head {h00=0x0026, h01=0x0050, text=» RF(L) EDD200 NO MORE SUBTRACTIONS«, t00=0x0015, t01=0x00e4}
0x21d2…2202 Head {h00=0x002c, h01=0x0050, text=» SU A7,DECADE,A4 SUBTRACT AND INCREMENT «, t00=0x0015, t01=0x010e}
0x2202…2214 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0015, t01=0x013e}
0x2214…2226 Head {h00=0x000e, h01=0x0050, text=» RB EDD110«, t00=0x0015, t01=0x0150}
0x2226…224e Head {h00=0x0024, h01=0x0050, text=»EDD200 CF A14,STORE STORE DIGIT «, t00=0x0015, t01=0x0162}
0x224e…2260 Head {h00=0x000e, h01=0x0050, text=» ADK A4,2 «, t00=0x0015, t01=0x018a}
0x2260…2272 Head {h00=0x000e, h01=0x0050, text=» CWK A4,10«, t00=0x0016, t01=0x000c}
0x2272…2294 Head {h00=0x001e, h01=0x0050, text=» RB(NE) EDD100 NEXT DIGIT «, t00=0x0016, t01=0x001e}
0x2294…22b4 Head {h00=0x001c, h01=0x0050, text=» RTN A14 CONVERSION DONE«, t00=0x0016, t01=0x0040}
0x22b4…22dc Head {h00=0x0024, h01=0x0050, text=»DECADE DATA 10000,1000,100,10,1 «, t00=0x0016, t01=0x0060}
0x22dc…22ea Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0088}
0x22ea…22f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0096}
0x22f4…22fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00a0}
0x22fe…2326 Head {h00=0x0024, h01=0x0050, text=»* SEARCH FOR A7 CHAR IN TABLE 1 «, t00=0x0016, t01=0x00aa}
0x2326…2330 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00d2}
0x2330…233a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00dc}
0x233a…235a Head {h00=0x001c, h01=0x0050, text=»* CR=1 IF NOT FOUND ELSE«, t00=0x0016, t01=0x00e6}
0x235a…238a Head {h00=0x002c, h01=0x0050, text=»* CR=0 AND CORRESPONDING CODE IS STORED «, t00=0x0016, t01=0x0106}
0x238a…2394 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0136}
0x2394…239e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0140}
0x239e…23be Head {h00=0x001c, h01=0x0050, text=»STAB1 LDK A2,3 SET INDEX«, t00=0x0016, t01=0x014a}
0x23be…23e0 Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 CR IF NOT FOUND «, t00=0x0016, t01=0x016a}
0x23e0…23fa Head {h00=0x0016, h01=0x0050, text=»STAB10 CW A2,TAB1 «, t00=0x0016, t01=0x018c}
0x23fa…241c Head {h00=0x001e, h01=0x0050, text=» RF(G) STAB30 END OF TABLE«, t00=0x0017, t01=0x0016}
0x241c…2432 Head {h00=0x0012, h01=0x0050, text=» CC A7,TAB1,A2«, t00=0x0017, t01=0x0038}
0x2432…244e Head {h00=0x0018, h01=0x0050, text=» RF(E) STAB20 FOUND «, t00=0x0017, t01=0x004e}
0x244e…2460 Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x0017, t01=0x006a}
0x2460…247c Head {h00=0x0018, h01=0x0050, text=» RB STAB10 TRY NEXT «, t00=0x0017, t01=0x007c}
0x247c…24b2 Head {h00=0x0032, h01=0x0050, text=»STAB20 LC A1,TAB1-1,A2 GET CORRESPONDING CODE «, t00=0x0017, t01=0x0098}
0x24b2…24d4 Head {h00=0x001e, h01=0x0050, text=» CF A14,STORE AND STORE IT«, t00=0x0017, t01=0x00ce}
0x24d4…24e6 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0017, t01=0x00f0}
0x24e6…2512 Head {h00=0x0028, h01=0x0050, text=»STAB30 LC A2,2,A14 SET CR FOR RETURN«, t00=0x0017, t01=0x0102}
0x2512…2526 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FC «, t00=0x0017, t01=0x012e}
0x2526…2538 Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x0017, t01=0x0142}
0x2538…254a Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x0017, t01=0x0154}
0x254a…255e Head {h00=0x0010, h01=0x0050, text=» SC A1,2,A14«, t00=0x0017, t01=0x0166}
0x255e…256e Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0017, t01=0x017a}
0x256e…257c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x018a}
0x257c…2586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0008}
0x2586…2590 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0012}
0x2590…25ae Head {h00=0x001a, h01=0x0050, text=»* PUT SPACE IN BUFFER «, t00=0x0018, t01=0x001c}
0x25ae…25b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x003a}
0x25b8…25c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0044}
0x25c2…25dc Head {h00=0x0016, h01=0x0050, text=»SPACE LD A1,XSPACE«, t00=0x0018, t01=0x004e}
0x25dc…25f2 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SPA100«, t00=0x0018, t01=0x0068}
0x25f2…2606 Head {h00=0x0010, h01=0x0050, text=» LDK A1,/20 «, t00=0x0018, t01=0x007e}
0x2606…261c Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x0018, t01=0x0092}
0x261c…262e Head {h00=0x000e, h01=0x0050, text=» IM XSPACE«, t00=0x0018, t01=0x00a8}
0x262e…2644 Head {h00=0x0012, h01=0x0050, text=»SPA100 RTN A14«, t00=0x0018, t01=0x00ba}
0x2644…266a Head {h00=0x0022, h01=0x0050, text=»XSPACE DATA 0 SPACE INDICATOR «, t00=0x0018, t01=0x00d0}
0x266a…2674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f6}
0x2674…267e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0100}
0x267e…269a Head {h00=0x0018, h01=0x0050, text=»* CRLF IN BUFFER «, t00=0x0018, t01=0x010a}
0x269a…26a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0126}
0x26a4…26ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0130}
0x26ae…26c0 Head {h00=0x000e, h01=0x0050, text=»CRLF EQU *«, t00=0x0018, t01=0x013a}
0x26c0…26d6 Head {h00=0x0012, h01=0x0050, text=» CF A14,SPACE «, t00=0x0018, t01=0x014c}
0x26d6…26ea Head {h00=0x0010, h01=0x0050, text=» LDK A1,/0D «, t00=0x0018, t01=0x0162}
0x26ea…2700 Head {h00=0x0012, h01=0x0050, text=» CF A14,STORE «, t00=0x0018, t01=0x0176}
0x2700…2714 Head {h00=0x0010, h01=0x0050, text=» LDK A1,/0A «, t00=0x0018, t01=0x018c}
0x2714…272a Head {h00=0x0012, h01=0x0050, text=» CF A14,SPACE «, t00=0x0019, t01=0x0010}
0x272a…273a Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0019, t01=0x0026}
0x273a…2744 Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0019, t01=0x0036}
0x2744…274e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0040}
0x274e…275a Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0019, t01=0x004a}
0x275a…275e Head {h00=0x4004, h01=0x0000}
0x275e…2760 00 19 ┆ ┆
0x2760…2762 00 56 ┆ V┆
0x2762…276a (26, 1, 8) 20 04 00 00 00 1a 00 04 ┆ ┆
0x276a…27ba (27, 0, 400) 4e 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 00 1a 01 84 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 43 43 48 20 00 1b 00 1c 00 12 00 50 5c 49 46 46 5c 4f 4e 4c 49 4e 45 3d 30 20 00 1b 00 38 00 48 00 50 2a 2a ┆N LINE CONCENTRATOR P EJECT IDENT C:CCH P IFF ONLINE=0 8 H P**┆
0x27ba…280a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 4b 20 3a 20 43 20 43 20 57 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 1b 00 4e 00 06 00 50 2a 20 00 1b 00 9a ┆***************** K : C C W ************************************* N P* ┆
0x280a…285a 00 06 00 50 2a 20 00 1b 00 a4 00 06 00 50 2a 20 00 1b 00 ae 00 1c 00 50 2a 53 55 42 52 4f 55 54 49 4e 45 20 20 20 4b 20 3a 20 43 20 43 20 57 20 00 1b 00 b8 00 24 00 50 2a 57 52 49 54 45 53 20 41 20 4d 45 53 53 41 47 45 20 4f 4e 20 54 52 55 ┆ P* P* P*SUBROUTINE K : C C W $ P*WRITES A MESSAGE ON TRU┆
0x285a…28aa 4e 4b 20 4c 49 4e 45 20 00 1b 00 d8 00 06 00 50 2a 20 00 1b 01 00 00 06 00 50 2a 20 00 1b 01 0a 00 06 00 50 2a 20 00 1b 01 14 00 22 00 50 2a 20 43 41 4c 4c 20 53 45 51 55 45 4e 43 45 3a 5c 43 46 20 41 31 34 2c 4b 3a 43 43 57 20 00 1b 01 1e ┆NK LINE P* P* P* " P* CALL SEQUENCE: CF A14,K:CCW ┆
0x28aa…28fa 00 06 00 50 2a 20 00 1b 01 44 00 36 00 50 2a 20 20 20 45 4e 54 52 59 20 50 41 52 41 4d 3a 5c 41 33 20 3d 20 41 44 44 52 45 53 53 20 54 4f 20 42 55 46 46 45 52 20 54 4f 20 42 45 20 53 45 4e 54 00 1b 01 4e 00 20 00 50 2a 5c 5c 41 33 2b 49 44 ┆ P* D 6 P* ENTRY PARAM: A3 = ADDRESS TO BUFFER TO BE SENT N P* A3+ID┆
0x28fa…294a (28, 0, 400) 58 42 4c 20 3d 20 42 55 46 46 45 52 20 4c 45 4e 47 54 48 20 00 1b 01 88 00 06 00 50 2a 20 00 1c 00 1c 00 30 00 50 2a 20 20 20 53 55 42 52 4f 55 54 49 4e 45 53 3a 20 20 4b 3a 53 54 38 2c 4b 3a 4c 44 38 2c 4b 3a 43 4e 54 20 49 4e 20 43 3a 53 ┆XBL = BUFFER LENGTH P* 0 P* SUBROUTINES: K:ST8,K:LD8,K:CNT IN C:S┆
0x294a…299a 55 42 00 1c 00 26 00 06 00 50 2a 20 00 1c 00 5a 00 26 00 50 2a 20 20 52 45 54 55 52 4e 20 50 41 52 41 4d 3a 5c 41 34 20 3d 20 52 45 54 55 52 4e 20 43 4f 44 45 20 00 1c 00 64 00 1a 00 50 2a 5c 5c 20 20 20 2f 30 30 30 30 20 20 54 52 41 4e 53 ┆UB & P* Z & P* RETURN PARAM: A4 = RETURN CODE d P* /0000 TRANS┆
0x299a…29ea 4d 20 4f 4b 00 1c 00 8e 00 1c 00 50 2a 5c 5c 20 20 20 2f 30 30 30 31 20 20 43 43 20 4f 46 46 20 4c 49 4e 45 00 1c 00 ac 00 1e 00 50 2a 5c 5c 20 20 20 2f 30 30 30 32 20 20 54 52 41 4e 53 4d 20 45 52 52 4f 52 20 00 1c 00 cc 00 1c 00 50 2a 5c ┆M OK P* /0001 CC OFF LINE P* /0002 TRANSM ERROR P* ┆
0x29ea…2a3a 5c 43 4f 4e 44 49 54 49 4f 4e 20 52 45 47 20 49 53 20 53 45 54 20 00 1c 00 ee 00 06 00 50 2a 20 00 1c 01 0e 00 1c 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 44 49 52 45 43 54 20 00 1c 01 18 00 06 00 50 2a 20 00 1c 01 38 00 18 ┆ CONDITION REG IS SET P* P* RETURN METOD: DIRECT P* 8 ┆
0x2a3a…2a8a 00 50 2a 20 20 43 48 41 4e 47 45 44 20 52 45 47 53 3a 5c 41 34 20 00 1c 01 42 00 06 00 50 2a 20 00 1c 01 5e 00 16 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 20 00 1c 01 68 00 06 00 50 2a 20 00 1c 01 82 00 16 00 50 2a 20 20 20 ┆ P* CHANGED REGS: A4 B P* ^ P* STACKER NEED: h P* P* ┆