|
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: 13596 (0x351c)
Notes: pts_type(SC)
Names: »LOGCON.SC«
└─⟦fce1dcf99⟧ Bits:30009704 Philips computer tape "KMD15"
└─⟦this⟧ »LINSPY/LOGCON.SC«
IDENT LOGCON REL 1.1 78-04-21 870150140110 ********************************************************** * * LINE LOG TOOL * LOG CONTROL FUNCTIONS * * OESTEN HANSSON 1976-01-21 * ********************************************************** * * THIS MODULE HANDLES OPERATOR COMMUNICATION * * BY INITIALIZATION , LINE CODE MUST BE SPECIFIED * * A : ASCII-CODE WANTED * * E : EBCDIC-CODE WANTED * * THEN FOLLOWING KEYS ARE ALLOWED: * * O : OPEN RECEIVER 1 AND 2 * * C : CLOSE RECEIVER 1 AND 2 * * R : RESET RECEIVE BUFFER * * P : DEFINE IDLE-POLL PATTERN * *********************************************************** EJECT * * * ENTRY ASTART ENTRY EBASC * * EXTRN PRPOOL OCCUPIE PRINTER BUFFER POOL EXTRN LOGINP EXTRN TEXT1 EXTRN TEXT2 EXTRN TEXT3 EXTRN TEXT4 EXTRN TEXT5 EXTRN TEXT6 EXTRN PATT1 PATTERN AREA 1 EXTRN PATT2 PATTERN AREA 2 * * * EQUATES * * ECBBA EQU 2 ECBRC EQU 8 ECBCW EQU 10 * * RES 20 STACK FOR A14 STB EQU *-2 PROCCB DATA 0 ADDRESS TO PRINTER OCCUPIED BUFFFER EBASC DATA 0 0=EBCDIC , 1=ASCII EJECT * * * START LOG TEST TOOL * * ASTART EQU * CM PROCCB RELEASE PRINTER BUFFER LDKL A7,'OP' LKM DATA -4,OPCTRL ACTIVATE OPERATOR CONTROL TASK LDKL A7,'IN' LKM DATA -4,LOGINP ACTIVATE LOG TASK LKM DATA 3 EJECT * * * OPERATOR CONTROL TASK * * OPCTRL EQU * LDKL A14,STB LDK A7,' ' CF A14,OCCPR OCCUPIE PRINTER OPCT10 EQU * CF A14,CRLF LDKL A2,TEXT1 CF A14,PRTXT PRINT TEXT FOR CODE CHOICE CF A14,READ READ E OR A DATA KT100,FT100 LDK A7,'?' INVALID KEY CF A14,PRCH RB OPCT10 TRY AGAIN * * KT100 DATA /0241,'E' FT100 DATA OPCT20,OPCT30 * * EJECT OPCT20 EQU * IM EBASC ASCII-CODE WANTED RF OPCT40 OPCT30 EQU * CM EBASC EBCDIC-CODE WANTED OPCT40 EQU * STR A7,A14 SUKL A14,2 CF A14,CRLF ADKL A14,2 LDR* A7,A14 CF A14,PRCH CF A14,CRLF LDKL A2,TEXT6 CF A14,PRTXT CF A14,READE DATA KT110,FT110 LDK A7,'?' CF A14,PRCH RB OPCT40 * * KT110 DATA /0242,'O' FT110 DATA OPCT45,OPCT46 * * EJECT OPCT45 EQU * LDK A5,0 B AS IN BSC RF OPCT47 OPCT46 EQU * LDKL A5,/100 O AS IN OTHER OPCT47 EQU * CF A14,CRLF LDKL A8,CTECB LOAD ECB ADDRESS LDK A7,/85 LOAD ORDER 5 LDK A3,/32 LD A2,EBASC RF(Z) OPCT50 EBCDIC LDK A3,/16 OPCT50 EQU * ADR A3,A5 ST A3,ECBCW,A8 STORE SYNC-PATTERN LKM DATA 1 TRANSFER SYNC-PATTERN RF OPCOM EJECT * * * SUBROUTINE FOR TEXT PRINTING * * PRTXT EQU * LDR* A3,A2 GET LENGTH ST A2,PRXECB+2 STORE ADDRESS ADK A3,2 ST A3,PRXECB+4 STORE LENGTH LDK A7,/86 LDKL A8,PRXECB LKM DATA 1 STANDARD WRITE CF A14,CRLF RTN A14 * * PRXECB DATA /31,0,0,0,0,0 * * EJECT * * * OPCOM , OPERATOR COMMAND MODULE * * OPCOM EQU * LD A8,PROCCB RF(Z) OPCOM1 BUFFER NOT OCCUPIED LKM DATA -8,PRPOOL RELEASE BUFFER CM PROCCB OPCOM1 EQU * CF A14,READ READ COMMAND DATA KT200,FT200 ABL ERRORA INVALID KEY * * KT200 DATA /044F,'CRP' FT200 DATA OPEN,CLOSE,RESET,IDPOLL EJECT * * * LOG CONTROL * * OPEN EQU * LDK A7,' ' CF A14,OCCPR CF A14,CRLF LDKL A2,TEXT5 CF A14,PRTXT LDK A2,1 RF CLOSET RESET EQU * LDK A2,3 RESET RECEIVE BUFFER RF CLOSET CLOSE EQU * LDK A7,' ' CLOSE RECEIVER CF A14,OCCPR OCCUPIE PRINTER CF A14,CRLF LDKL A2,TEXT2 CF A14,PRTXT PRINT TEXT LDK A2,2 EJECT CLOSET EQU * LDKL A8,CTECB LDR A7,A2 LKM DATA 1 PERFORM ORDER FOR LOGG DRIVER SUK A7,2 ABL(Z) OPCT10 CLOSE ORDER CF A14,CRLF ABL OPCOM EJECT IDPOLL EQU * LDK A7,' ' DEFINE POLL PATTERN CF A14,OCCPR OCCUPIE PRINTER IDP10 EQU * CF A14,CRLF LDKL A2,TEXT3 CF A14,PRTXT PRINT TEXT CF A14,CRLF LDKL A4,PATT1 LOAD ADDRESS TO PATTERN AREA 1 ADK A4,2 LDK A3,/B CM PATT1 IDP20 EQU * CF A14,READE READ AND ECHO DATA KT300,FT300 CF A14,RDH100 LDR A6,A7 SAVE FIRST DIGIT SLL A6,4 CF A14,RDHEX READ ADR A7,A6 SAVE SECOND DIGIT SCR A7,A4 STORE IN PATTERN AREA ADK A4,1 IM PATT1 SUK A3,1 RF(Z) ERROR AREA OVERFLOW CF A14,PRSPAC RB IDP20 EJECT * * KT300 DATA /012A FT300 DATA IDP30 * * IDP30 EQU * IDP40 EQU * CF A14,CRLF LDKL A2,TEXT4 CF A14,PRTXT PRINT TEXT CF A14,CRLF LDKL A4,PATT2 LOAD ADDERSS TO PATTERN AREA 2 ADK A4,2 LDK A3,/B CM PATT2 EJECT IDP50 EQU * CF A14,READE READ AND ECHO DATA KT400,FT400 CF A14,RDH100 LDR A6,A7 SAVE FIRST DIGIT SLL A6,4 CF A14,RDHEX READ ADR A7,A6 SAVE SECOND DIGIT SCR A7,A4 STORE IN PATTERN AREA ADK A4,1 IM PATT2 SUK A3,1 RF(Z) ERROR AREA OVERFLOW CF A14,PRSPAC RB IDP50 EJECT * * KT400 DATA /012A FT400 DATA IDP60 * * IDP60 EQU * CF A14,CRLF LDKL A2,PATT1 ST A2,CTECB+2 STORE PATTERN ADDRESS LDK A2,4 LOAD ORDER 4 ABL CLOSET EJECT * * * TYPE: ? * ERRORA EQU * CF A14,OCCPR OCCUPIE PRINTER ERROR EQU * LDKL A14,STB LOAD STACK BASE LDK A7,'?' INVALID KEY CF A14,PRCH PRINT '?' CF A14,CRLF ABL OPCOM EJECT * * * CHECK HEXADEC. INPUT AND TRANSLATE * * CR=0 OK * CR=1,2 ILLEGAL CHAR * * HEXCH EQU * ADKL A14,4 SKIP STACK LDR A1,A7 SUK A1,'0' RF(N) HEXC90 SUK A1,9 RF(NP) HEXC10 NUMBER SUK A1,8 RF(N) HEXC90 SUK A1,5 RF(P) HEXC90 ADK A1,15 TRANSLATE HEX LETTER LDR A7,A1 RF HEX20 HEXC10 EQU * ADK A1,9 LDR A7,A1 HEX20 EQU * SUR A1,A1 RF HEX99 HEXC90 EQU * LDK A1,1 HEX99 EQU * ABR* A14 EJECT * * CTECB DATA /62,0,0,0,0,0 EJECT * * * PRINT ONE CHARACTER FROM A7 * * PRCH LDKL A8,PRECB SC* A7,ECBBA,A8 LDK A7,/85 LKM DATA 1 ADKL A11,1 COUNT CHARACTERS LDK A7,0 ST A7,XSPACE RESET SPACE INDICATOR LC* A7,ECBBA,A8 RESTORE A7 RTN A14 * * TYECB DATA /20,TYBUF,1,0,0,0 TYBUF RES 1 PRECB DATA /31,PRBUF,1,0,0,0 PRBUF DATA 0 EJECT * * * GENERATE CRLF * * CRLF EQU * LDK A7,/0D CF A14,PRCH LDK A7,/0A CF A14,PRCH IM XSPACE SET SPACE INDICATOR SUR A11,A11 CRLF90 EQU * RTN A14 EJECT * * * READ ONE CHARACTER FROM KEYBOARD TO A7 * * TWO WORDS FOLLOWING CALL GIVE KEYTABLE AND FUNCTION TABLE ADDRESSES * * ON ERROR GO TO NEXT INSTRUCTION ELSE TO FUNCTION * * A1 IS DESTROYED * * READ LD A7,4,A14 LD A1,2,A7 GET FUNCTION TABLE ADDRESS LDR* A7,A7 GET KEYTABLE ADDRESS LDKL A8,TYECB ST A7,ECBCW,A8 STORE KEYTABLE ADDRESS LDK A7,/82 STANDARD READ LKM DATA 1 READ05 EQU * ADKL A11,1 COUNT CHARS LDK A7,1 ST A7,XSPACE SET SPACE INDICATOR LC* A7,ECBBA,A8 GET CHARACTER TO A7 ANK A7,/7F LD A2,ECBRC,A8 RF(Z) READ10 READING OK LDK A1,4 ADS A1,4,A14 INCR RETURN ADDRESS RTN A14 READ10 AD A1,ECBCW,A8 ADD INDEX ADKL A14,4 ABR* A1 RETURN TO FUNCTION * * * READ AND ECHO * * READE EQU * LD A7,4,A14 * LD A1,2,A7 GET FUNCTION TABLE ADDRESS LDR* A7,A7 GET KEYTABLE ADDRESS LDKL A8,TYECB ST A7,ECBCW,A8 STORE KEYTABLE ADDRESS LDK A7,/82 STANDARD READ LKM DATA 1 LC* A7,ECBBA,A8 CF A14,PRCH ECHO LDKL A8,TYECB RB READ05 EJECT * * * READ HEXADECIMAL CHARACTER * * RDHEX CF A14,READE DATA KTRDH KTRDH DATA 0 NO KEYTABLE RDH100 SUK A7,/30 ABL(N) ERROR CWK A7,9 RF(NG) RDH110 SUK A7,7 ABL(N) ERROR CWK A7,/F ABL(G) ERROR RDH110 RTN A14 EJECT * * * EDIT CHAR FROM A7 IN HEXADECIMAL FORM * * EDHEX LDR A6,A7 SAVE A7 CF A14,SPACE LDK A7,'/' CF A14,PRCH LDR A7,A6 SRL A7,4 LC A7,HEXTAB,A7 CF A14,PRCH 1ST CHAR LDR A7,A6 ANK A7,/F LC A7,HEXTAB,A7 CF A14,PRCH 2ND CHAR CF A14,SPACE SPACE RTN A14 HEXTAB DATA '0123456789ABCDEF' * EJECT * * * PUT SPACE IN BUFFER * * SPACE LD A1,XSPACE RF(NZ) SPA100 PRSPAC LDK A7,' ' CF A14,PRCH IM XSPACE SPA100 RTN A14 XSPACE DATA 0 SPACE INDICATOR * * * * OCCUPIE PRINTER AND ECHO CHARACHTER IN A7 * * OCCPR EQU * LDR A1,A7 SAVE CHAR LDK A7,1 LKM DATA -7,PRPOOL GET BUFFER ST A8,PROCCB SAVE BUFFER ADDRESS CF A14,CRLF LDR A7,A1 RESTORE CHAR CF A14,PRCH ECHO RTN A14 * * * END ASTART
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT LOGCON REL 1.1 78-04-21 870150140110 «, t00=0x0000, t01=0x0004}
0x0034…0076 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0000, t01=0x0038}
0x0076…0080 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x007a}
0x0080…0098 Head {h00=0x0014, h01=0x0050, text=»* LINE LOG TOOL «, t00=0x0000, t01=0x0084}
0x0098…00b8 Head {h00=0x001c, h01=0x0050, text=»* LOG CONTROL FUNCTIONS «, t00=0x0000, t01=0x009c}
0x00b8…00c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00bc}
0x00c2…00e8 Head {h00=0x0022, h01=0x0050, text=»* OESTEN HANSSON 1976-01-21 «, t00=0x0000, t01=0x00c6}
0x00e8…00f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ec}
0x00f2…0134 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0000, t01=0x00f6}
0x0134…013e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0138}
0x013e…0172 Head {h00=0x0030, h01=0x0050, text=»* THIS MODULE HANDLES OPERATOR COMMUNICATION«, t00=0x0000, t01=0x0142}
0x0172…017c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0176}
0x017c…01b6 Head {h00=0x0036, h01=0x0050, text=»* BY INITIALIZATION , LINE CODE MUST BE SPECIFIED «, t00=0x0000, t01=0x0180}
0x01b6…01c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x002a}
0x01c0…01e0 Head {h00=0x001c, h01=0x0050, text=»* A : ASCII-CODE WANTED «, t00=0x0001, t01=0x0034}
0x01e0…01ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0054}
0x01ea…020a Head {h00=0x001c, h01=0x0050, text=»* E : EBCDIC-CODE WANTED«, t00=0x0001, t01=0x005e}
0x020a…0214 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007e}
0x0214…023e Head {h00=0x0026, h01=0x0050, text=»* THEN FOLLOWING KEYS ARE ALLOWED:«, t00=0x0001, t01=0x0088}
0x023e…0248 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b2}
0x0248…026c Head {h00=0x0020, h01=0x0050, text=»* O : OPEN RECEIVER 1 AND 2 «, t00=0x0001, t01=0x00bc}
0x026c…0276 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e0}
0x0276…029a Head {h00=0x0020, h01=0x0050, text=»* C : CLOSE RECEIVER 1 AND 2«, t00=0x0001, t01=0x00ea}
0x029a…02a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x010e}
0x02a4…02c6 Head {h00=0x001e, h01=0x0050, text=»* R : RESET RECEIVE BUFFER«, t00=0x0001, t01=0x0118}
0x02c6…02d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x013a}
0x02d0…02f6 Head {h00=0x0022, h01=0x0050, text=»* P : DEFINE IDLE-POLL PATTERN«, t00=0x0001, t01=0x0144}
0x02f6…0300 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x016a}
0x0300…0344 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0001, t01=0x0174}
0x0344…0352 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0028}
0x0352…035c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0036}
0x035c…0366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0040}
0x0366…0370 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x004a}
0x0370…0386 Head {h00=0x0012, h01=0x0050, text=» ENTRY ASTART «, t00=0x0002, t01=0x0054}
0x0386…039a Head {h00=0x0010, h01=0x0050, text=» ENTRY EBASC«, t00=0x0002, t01=0x006a}
0x039a…03a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x007e}
0x03a4…03ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0088}
0x03ae…03e0 Head {h00=0x002e, h01=0x0050, text=» EXTRN PRPOOL OCCUPIE PRINTER BUFFER POOL «, t00=0x0002, t01=0x0092}
0x03e0…03f6 Head {h00=0x0012, h01=0x0050, text=» EXTRN LOGINP «, t00=0x0002, t01=0x00c4}
0x03f6…040a Head {h00=0x0010, h01=0x0050, text=» EXTRN TEXT1«, t00=0x0002, t01=0x00da}
0x040a…041e Head {h00=0x0010, h01=0x0050, text=» EXTRN TEXT2«, t00=0x0002, t01=0x00ee}
0x041e…0432 Head {h00=0x0010, h01=0x0050, text=» EXTRN TEXT3«, t00=0x0002, t01=0x0102}
0x0432…0446 Head {h00=0x0010, h01=0x0050, text=» EXTRN TEXT4«, t00=0x0002, t01=0x0116}
0x0446…045a Head {h00=0x0010, h01=0x0050, text=» EXTRN TEXT5«, t00=0x0002, t01=0x012a}
0x045a…046e Head {h00=0x0010, h01=0x0050, text=» EXTRN TEXT6«, t00=0x0002, t01=0x013e}
0x046e…0492 Head {h00=0x0020, h01=0x0050, text=» EXTRN PATT1 PATTERN AREA 1 «, t00=0x0002, t01=0x0152}
0x0492…04b6 Head {h00=0x0020, h01=0x0050, text=» EXTRN PATT2 PATTERN AREA 2 «, t00=0x0002, t01=0x0176}
0x04b6…04c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x000a}
0x04c0…04ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0014}
0x04ca…04dc Head {h00=0x000e, h01=0x0050, text=»* EQUATES «, t00=0x0003, t01=0x001e}
0x04dc…04e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0030}
0x04e6…04f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x003a}
0x04f0…0504 Head {h00=0x0010, h01=0x0050, text=»ECBBA EQU 2 «, t00=0x0003, t01=0x0044}
0x0504…0518 Head {h00=0x0010, h01=0x0050, text=»ECBRC EQU 8 «, t00=0x0003, t01=0x0058}
0x0518…052c Head {h00=0x0010, h01=0x0050, text=»ECBCW EQU 10«, t00=0x0003, t01=0x006c}
0x052c…0536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0080}
0x0536…0540 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x008a}
0x0540…055e Head {h00=0x001a, h01=0x0050, text=» RES 20 STACK FOR A14 «, t00=0x0003, t01=0x0094}
0x055e…0572 Head {h00=0x0010, h01=0x0050, text=»STB EQU *-2 «, t00=0x0003, t01=0x00b2}
0x0572…05ac Head {h00=0x0036, h01=0x0050, text=»PROCCB DATA 0 ADDRESS TO PRINTER OCCUPIED BUFFFER «, t00=0x0003, t01=0x00c6}
0x05ac…05d4 Head {h00=0x0024, h01=0x0050, text=»EBASC DATA 0 0=EBCDIC , 1=ASCII «, t00=0x0003, t01=0x0100}
0x05d4…05e2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0128}
0x05e2…05ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0136}
0x05ec…05f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0140}
0x05f6…0614 Head {h00=0x001a, h01=0x0050, text=»* START LOG TEST TOOL «, t00=0x0003, t01=0x014a}
0x0614…061e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0168}
0x061e…0628 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0172}
0x0628…063c Head {h00=0x0010, h01=0x0050, text=»ASTART EQU *«, t00=0x0003, t01=0x017c}
0x063c…0666 Head {h00=0x0026, h01=0x0050, text=» CM PROCCB RELEASE PRINTER BUFFER «, t00=0x0003, t01=0x0190}
0x0666…067c Head {h00=0x0012, h01=0x0050, text=» LDKL A7,'OP' «, t00=0x0004, t01=0x002a}
0x067c…0688 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0004, t01=0x0040}
0x0688…06be Head {h00=0x0032, h01=0x0050, text=» DATA -4,OPCTRL ACTIVATE OPERATOR CONTROL TASK«, t00=0x0004, t01=0x004c}
0x06be…06d4 Head {h00=0x0012, h01=0x0050, text=» LDKL A7,'IN' «, t00=0x0004, t01=0x0082}
0x06d4…06e0 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0004, t01=0x0098}
0x06e0…070a Head {h00=0x0026, h01=0x0050, text=» DATA -4,LOGINP ACTIVATE LOG TASK «, t00=0x0004, t01=0x00a4}
0x070a…0716 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0004, t01=0x00ce}
0x0716…0726 Head {h00=0x000c, h01=0x0050, text=» DATA 3 «, t00=0x0004, t01=0x00da}
0x0726…0734 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x00ea}
0x0734…073e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00f8}
0x073e…0748 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0102}
0x0748…0768 Head {h00=0x001c, h01=0x0050, text=»* OPERATOR CONTROL TASK «, t00=0x0004, t01=0x010c}
0x0768…0772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x012c}
0x0772…077c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0136}
0x077c…0790 Head {h00=0x0010, h01=0x0050, text=»OPCTRL EQU *«, t00=0x0004, t01=0x0140}
0x0790…07a6 Head {h00=0x0012, h01=0x0050, text=» LDKL A14,STB «, t00=0x0004, t01=0x0154}
0x07a6…07ba Head {h00=0x0010, h01=0x0050, text=» LDK A7,' ' «, t00=0x0004, t01=0x016a}
0x07ba…07e0 Head {h00=0x0022, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER «, t00=0x0004, t01=0x017e}
0x07e0…07f4 Head {h00=0x0010, h01=0x0050, text=»OPCT10 EQU *«, t00=0x0005, t01=0x0014}
0x07f4…0808 Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0005, t01=0x0028}
0x0808…081e Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TEXT1«, t00=0x0005, t01=0x003c}
0x081e…084e Head {h00=0x002c, h01=0x0050, text=» CF A14,PRTXT PRINT TEXT FOR CODE CHOICE«, t00=0x0005, t01=0x0052}
0x084e…086e Head {h00=0x001c, h01=0x0050, text=» CF A14,READ READ E OR A«, t00=0x0005, t01=0x0082}
0x086e…0888 Head {h00=0x0016, h01=0x0050, text=» DATA KT100,FT100 «, t00=0x0005, t01=0x00a2}
0x0888…08a8 Head {h00=0x001c, h01=0x0050, text=» LDK A7,'?' INVALID KEY «, t00=0x0005, t01=0x00bc}
0x08a8…08bc Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x0005, t01=0x00dc}
0x08bc…08d8 Head {h00=0x0018, h01=0x0050, text=» RB OPCT10 TRY AGAIN«, t00=0x0005, t01=0x00f0}
0x08d8…08e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x010c}
0x08e2…08ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0116}
0x08ec…0908 Head {h00=0x0018, h01=0x0050, text=»KT100 DATA /0241,'E'«, t00=0x0005, t01=0x0120}
0x0908…0928 Head {h00=0x001c, h01=0x0050, text=»FT100 DATA OPCT20,OPCT30«, t00=0x0005, t01=0x013c}
0x0928…0932 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x015c}
0x0932…093c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0166}
0x093c…094a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0170}
0x094a…095e Head {h00=0x0010, h01=0x0050, text=»OPCT20 EQU *«, t00=0x0005, t01=0x017e}
0x095e…0982 (6, 0, 398) Head {h00=0x0020, h01=0x0050, text=» IM EBASC ASCII-CODE WANTED «, t00=0x0006, t01=0x0004}
0x0982…0994 Head {h00=0x000e, h01=0x0050, text=» RF OPCT40«, t00=0x0006, t01=0x0028}
0x0994…09a8 Head {h00=0x0010, h01=0x0050, text=»OPCT30 EQU *«, t00=0x0006, t01=0x003a}
0x09a8…09cc Head {h00=0x0020, h01=0x0050, text=» CM EBASC EBCDIC-CODE WANTED«, t00=0x0006, t01=0x004e}
0x09cc…09e0 Head {h00=0x0010, h01=0x0050, text=»OPCT40 EQU *«, t00=0x0006, t01=0x0072}
0x09e0…09f4 Head {h00=0x0010, h01=0x0050, text=» STR A7,A14 «, t00=0x0006, t01=0x0086}
0x09f4…0a08 Head {h00=0x0010, h01=0x0050, text=» SUKL A14,2 «, t00=0x0006, t01=0x009a}
0x0a08…0a1c Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0006, t01=0x00ae}
0x0a1c…0a30 Head {h00=0x0010, h01=0x0050, text=» ADKL A14,2 «, t00=0x0006, t01=0x00c2}
0x0a30…0a44 Head {h00=0x0010, h01=0x0050, text=» LDR* A7,A14«, t00=0x0006, t01=0x00d6}
0x0a44…0a58 Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x0006, t01=0x00ea}
0x0a58…0a6c Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0006, t01=0x00fe}
0x0a6c…0a82 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TEXT6«, t00=0x0006, t01=0x0112}
0x0a82…0a98 Head {h00=0x0012, h01=0x0050, text=» CF A14,PRTXT «, t00=0x0006, t01=0x0128}
0x0a98…0aae Head {h00=0x0012, h01=0x0050, text=» CF A14,READE «, t00=0x0006, t01=0x013e}
0x0aae…0ac8 Head {h00=0x0016, h01=0x0050, text=» DATA KT110,FT110 «, t00=0x0006, t01=0x0154}
0x0ac8…0adc Head {h00=0x0010, h01=0x0050, text=» LDK A7,'?' «, t00=0x0006, t01=0x016e}
0x0adc…0af0 Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x0006, t01=0x0182}
0x0af0…0b02 Head {h00=0x000e, h01=0x0050, text=» RB OPCT40«, t00=0x0007, t01=0x0008}
0x0b02…0b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001a}
0x0b0c…0b16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0024}
0x0b16…0b32 Head {h00=0x0018, h01=0x0050, text=»KT110 DATA /0242,'O'«, t00=0x0007, t01=0x002e}
0x0b32…0b52 Head {h00=0x001c, h01=0x0050, text=»FT110 DATA OPCT45,OPCT46«, t00=0x0007, t01=0x004a}
0x0b52…0b5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x006a}
0x0b5c…0b66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0074}
0x0b66…0b74 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x007e}
0x0b74…0b88 Head {h00=0x0010, h01=0x0050, text=»OPCT45 EQU *«, t00=0x0007, t01=0x008c}
0x0b88…0ba6 Head {h00=0x001a, h01=0x0050, text=» LDK A5,0 B AS IN BSC «, t00=0x0007, t01=0x00a0}
0x0ba6…0bb8 Head {h00=0x000e, h01=0x0050, text=» RF OPCT47«, t00=0x0007, t01=0x00be}
0x0bb8…0bcc Head {h00=0x0010, h01=0x0050, text=»OPCT46 EQU *«, t00=0x0007, t01=0x00d0}
0x0bcc…0bf0 Head {h00=0x0020, h01=0x0050, text=» LDKL A5,/100 O AS IN OTHER «, t00=0x0007, t01=0x00e4}
0x0bf0…0c04 Head {h00=0x0010, h01=0x0050, text=»OPCT47 EQU *«, t00=0x0007, t01=0x0108}
0x0c04…0c18 Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0007, t01=0x011c}
0x0c18…0c40 Head {h00=0x0024, h01=0x0050, text=» LDKL A8,CTECB LOAD ECB ADDRESS «, t00=0x0007, t01=0x0130}
0x0c40…0c60 Head {h00=0x001c, h01=0x0050, text=» LDK A7,/85 LOAD ORDER 5«, t00=0x0007, t01=0x0158}
0x0c60…0c74 Head {h00=0x0010, h01=0x0050, text=» LDK A3,/32 «, t00=0x0007, t01=0x0178}
0x0c74…0c88 Head {h00=0x0010, h01=0x0050, text=» LD A2,EBASC«, t00=0x0007, t01=0x018c}
0x0c88…0ca4 Head {h00=0x0018, h01=0x0050, text=» RF(Z) OPCT50 EBCDIC«, t00=0x0008, t01=0x0010}
0x0ca4…0cb8 Head {h00=0x0010, h01=0x0050, text=» LDK A3,/16 «, t00=0x0008, t01=0x002c}
0x0cb8…0ccc Head {h00=0x0010, h01=0x0050, text=»OPCT50 EQU *«, t00=0x0008, t01=0x0040}
0x0ccc…0cde Head {h00=0x000e, h01=0x0050, text=» ADR A3,A5«, t00=0x0008, t01=0x0054}
0x0cde…0d08 Head {h00=0x0026, h01=0x0050, text=» ST A3,ECBCW,A8 STORE SYNC-PATTERN«, t00=0x0008, t01=0x0066}
0x0d08…0d14 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0008, t01=0x0090}
0x0d14…0d3a Head {h00=0x0022, h01=0x0050, text=» DATA 1 TRANSFER SYNC-PATTERN «, t00=0x0008, t01=0x009c}
0x0d3a…0d4c Head {h00=0x000e, h01=0x0050, text=» RF OPCOM «, t00=0x0008, t01=0x00c2}
0x0d4c…0d5a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x00d4}
0x0d5a…0d64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e2}
0x0d64…0d6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ec}
0x0d6e…0d94 Head {h00=0x0022, h01=0x0050, text=»* SUBROUTINE FOR TEXT PRINTING«, t00=0x0008, t01=0x00f6}
0x0d94…0d9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x011c}
0x0d9e…0da8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0126}
0x0da8…0dbc Head {h00=0x0010, h01=0x0050, text=»PRTXT EQU * «, t00=0x0008, t01=0x0130}
0x0dbc…0dda Head {h00=0x001a, h01=0x0050, text=» LDR* A3,A2 GET LENGTH«, t00=0x0008, t01=0x0144}
0x0dda…0e00 Head {h00=0x0022, h01=0x0050, text=» ST A2,PRXECB+2 STORE ADDRESS «, t00=0x0008, t01=0x0162}
0x0e00…0e12 Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x0008, t01=0x0188}
0x0e12…0e36 Head {h00=0x0020, h01=0x0050, text=» ST A3,PRXECB+4 STORE LENGTH«, t00=0x0009, t01=0x000a}
0x0e36…0e4a Head {h00=0x0010, h01=0x0050, text=» LDK A7,/86 «, t00=0x0009, t01=0x002e}
0x0e4a…0e62 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,PRXECB «, t00=0x0009, t01=0x0042}
0x0e62…0e6e Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0009, t01=0x005a}
0x0e6e…0e8c Head {h00=0x001a, h01=0x0050, text=» DATA 1 STANDARD WRITE«, t00=0x0009, t01=0x0066}
0x0e8c…0ea0 Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0009, t01=0x0084}
0x0ea0…0eb0 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0009, t01=0x0098}
0x0eb0…0eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00a8}
0x0eba…0ec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00b2}
0x0ec4…0ee6 Head {h00=0x001e, h01=0x0050, text=»PRXECB DATA /31,0,0,0,0,0 «, t00=0x0009, t01=0x00bc}
0x0ee6…0ef0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00de}
0x0ef0…0efa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e8}
0x0efa…0f08 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00f2}
0x0f08…0f12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0100}
0x0f12…0f1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x010a}
0x0f1c…0f46 Head {h00=0x0026, h01=0x0050, text=»* OPCOM , OPERATOR COMMAND MODULE «, t00=0x0009, t01=0x0114}
0x0f46…0f50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x013e}
0x0f50…0f5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0148}
0x0f5a…0f6e Head {h00=0x0010, h01=0x0050, text=»OPCOM EQU * «, t00=0x0009, t01=0x0152}
0x0f6e…0f84 Head {h00=0x0012, h01=0x0050, text=» LD A8,PROCCB «, t00=0x0009, t01=0x0166}
0x0f84…0fae Head {h00=0x0026, h01=0x0050, text=» RF(Z) OPCOM1 BUFFER NOT OCCUPIED «, t00=0x0009, t01=0x017c}
0x0fae…0fba Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x000a, t01=0x0016}
0x0fba…0fe0 Head {h00=0x0022, h01=0x0050, text=» DATA -8,PRPOOL RELEASE BUFFER«, t00=0x000a, t01=0x0022}
0x0fe0…0ff2 Head {h00=0x000e, h01=0x0050, text=» CM PROCCB«, t00=0x000a, t01=0x0048}
0x0ff2…1006 Head {h00=0x0010, h01=0x0050, text=»OPCOM1 EQU *«, t00=0x000a, t01=0x005a}
0x1006…1028 Head {h00=0x001e, h01=0x0050, text=» CF A14,READ READ COMMAND «, t00=0x000a, t01=0x006e}
0x1028…1042 Head {h00=0x0016, h01=0x0050, text=» DATA KT200,FT200 «, t00=0x000a, t01=0x0090}
0x1042…1062 Head {h00=0x001c, h01=0x0050, text=» ABL ERRORA INVALID KEY «, t00=0x000a, t01=0x00aa}
0x1062…106c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00ca}
0x106c…1076 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d4}
0x1076…1094 Head {h00=0x001a, h01=0x0050, text=»KT200 DATA /044F,'CRP'«, t00=0x000a, t01=0x00de}
0x1094…10be Head {h00=0x0026, h01=0x0050, text=»FT200 DATA OPEN,CLOSE,RESET,IDPOLL«, t00=0x000a, t01=0x00fc}
0x10be…10cc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0126}
0x10cc…10d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0134}
0x10d6…10e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x013e}
0x10e0…10f6 Head {h00=0x0012, h01=0x0050, text=»* LOG CONTROL «, t00=0x000a, t01=0x0148}
0x10f6…1100 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x015e}
0x1100…110a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0168}
0x110a…111c Head {h00=0x000e, h01=0x0050, text=»OPEN EQU *«, t00=0x000a, t01=0x0172}
0x111c…1130 Head {h00=0x0010, h01=0x0050, text=» LDK A7,' ' «, t00=0x000a, t01=0x0184}
0x1130…1146 Head {h00=0x0012, h01=0x0050, text=» CF A14,OCCPR «, t00=0x000b, t01=0x0008}
0x1146…115a Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x000b, t01=0x001e}
0x115a…1170 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TEXT5«, t00=0x000b, t01=0x0032}
0x1170…1186 Head {h00=0x0012, h01=0x0050, text=» CF A14,PRTXT «, t00=0x000b, t01=0x0048}
0x1186…1198 Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x000b, t01=0x005e}
0x1198…11aa Head {h00=0x000e, h01=0x0050, text=» RF CLOSET«, t00=0x000b, t01=0x0070}
0x11aa…11be Head {h00=0x0010, h01=0x0050, text=»RESET EQU * «, t00=0x000b, t01=0x0082}
0x11be…11e4 Head {h00=0x0022, h01=0x0050, text=» LDK A2,3 RESET RECEIVE BUFFER«, t00=0x000b, t01=0x0096}
0x11e4…11f6 Head {h00=0x000e, h01=0x0050, text=» RF CLOSET«, t00=0x000b, t01=0x00bc}
0x11f6…120a Head {h00=0x0010, h01=0x0050, text=»CLOSE EQU * «, t00=0x000b, t01=0x00ce}
0x120a…122c Head {h00=0x001e, h01=0x0050, text=» LDK A7,' ' CLOSE RECEIVER«, t00=0x000b, t01=0x00e2}
0x122c…1252 Head {h00=0x0022, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER «, t00=0x000b, t01=0x0104}
0x1252…1266 Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x000b, t01=0x012a}
0x1266…127c Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TEXT2«, t00=0x000b, t01=0x013e}
0x127c…129c Head {h00=0x001c, h01=0x0050, text=» CF A14,PRTXT PRINT TEXT«, t00=0x000b, t01=0x0154}
0x129c…12ae Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x000b, t01=0x0174}
0x12ae…12bc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0186}
0x12bc…12d0 (12, 0, 400) Head {h00=0x0010, h01=0x0050, text=»CLOSET EQU *«, t00=0x000c, t01=0x0004}
0x12d0…12e6 Head {h00=0x0012, h01=0x0050, text=» LDKL A8,CTECB«, t00=0x000c, t01=0x0018}
0x12e6…12f8 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A2«, t00=0x000c, t01=0x002e}
0x12f8…1304 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x000c, t01=0x0040}
0x1304…1332 Head {h00=0x002a, h01=0x0050, text=» DATA 1 PERFORM ORDER FOR LOGG DRIVER «, t00=0x000c, t01=0x004c}
0x1332…1344 Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x000c, t01=0x007a}
0x1344…1366 Head {h00=0x001e, h01=0x0050, text=» ABL(Z) OPCT10 CLOSE ORDER«, t00=0x000c, t01=0x008c}
0x1366…137a Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x000c, t01=0x00ae}
0x137a…138c Head {h00=0x000e, h01=0x0050, text=» ABL OPCOM«, t00=0x000c, t01=0x00c2}
0x138c…139a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x00d4}
0x139a…13ae Head {h00=0x0010, h01=0x0050, text=»IDPOLL EQU *«, t00=0x000c, t01=0x00e2}
0x13ae…13d6 Head {h00=0x0024, h01=0x0050, text=» LDK A7,' ' DEFINE POLL PATTERN «, t00=0x000c, t01=0x00f6}
0x13d6…13fc Head {h00=0x0022, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER «, t00=0x000c, t01=0x011e}
0x13fc…1410 Head {h00=0x0010, h01=0x0050, text=»IDP10 EQU * «, t00=0x000c, t01=0x0144}
0x1410…1424 Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x000c, t01=0x0158}
0x1424…143a Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TEXT3«, t00=0x000c, t01=0x016c}
0x143a…145a Head {h00=0x001c, h01=0x0050, text=» CF A14,PRTXT PRINT TEXT«, t00=0x000c, t01=0x0182}
0x145a…146e Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x000d, t01=0x0012}
0x146e…14a4 Head {h00=0x0032, h01=0x0050, text=» LDKL A4,PATT1 LOAD ADDRESS TO PATTERN AREA 1 «, t00=0x000d, t01=0x0026}
0x14a4…14b6 Head {h00=0x000e, h01=0x0050, text=» ADK A4,2 «, t00=0x000d, t01=0x005c}
0x14b6…14c8 Head {h00=0x000e, h01=0x0050, text=» LDK A3,/B«, t00=0x000d, t01=0x006e}
0x14c8…14da Head {h00=0x000e, h01=0x0050, text=» CM PATT1 «, t00=0x000d, t01=0x0080}
0x14da…14ee Head {h00=0x0010, h01=0x0050, text=»IDP20 EQU * «, t00=0x000d, t01=0x0092}
0x14ee…1512 Head {h00=0x0020, h01=0x0050, text=» CF A14,READE READ AND ECHO «, t00=0x000d, t01=0x00a6}
0x1512…152c Head {h00=0x0016, h01=0x0050, text=» DATA KT300,FT300 «, t00=0x000d, t01=0x00ca}
0x152c…1542 Head {h00=0x0012, h01=0x0050, text=» CF A14,RDH100«, t00=0x000d, t01=0x00e4}
0x1542…1566 Head {h00=0x0020, h01=0x0050, text=» LDR A6,A7 SAVE FIRST DIGIT «, t00=0x000d, t01=0x00fa}
0x1566…1578 Head {h00=0x000e, h01=0x0050, text=» SLL A6,4 «, t00=0x000d, t01=0x011e}
0x1578…1592 Head {h00=0x0016, h01=0x0050, text=» CF A14,RDHEX READ«, t00=0x000d, t01=0x0130}
0x1592…15b6 Head {h00=0x0020, h01=0x0050, text=» ADR A7,A6 SAVE SECOND DIGIT«, t00=0x000d, t01=0x014a}
0x15b6…15de Head {h00=0x0024, h01=0x0050, text=» SCR A7,A4 STORE IN PATTERN AREA«, t00=0x000d, t01=0x016e}
0x15de…15f0 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x000e, t01=0x0008}
0x15f0…1602 Head {h00=0x000e, h01=0x0050, text=» IM PATT1 «, t00=0x000e, t01=0x001a}
0x1602…1614 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x000e, t01=0x002c}
0x1614…1636 Head {h00=0x001e, h01=0x0050, text=» RF(Z) ERROR AREA OVERFLOW«, t00=0x000e, t01=0x003e}
0x1636…164c Head {h00=0x0012, h01=0x0050, text=» CF A14,PRSPAC«, t00=0x000e, t01=0x0060}
0x164c…165e Head {h00=0x000e, h01=0x0050, text=» RB IDP20 «, t00=0x000e, t01=0x0076}
0x165e…166c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0088}
0x166c…1676 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0096}
0x1676…1680 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a0}
0x1680…1698 Head {h00=0x0014, h01=0x0050, text=»KT300 DATA /012A«, t00=0x000e, t01=0x00aa}
0x1698…16b0 Head {h00=0x0014, h01=0x0050, text=»FT300 DATA IDP30«, t00=0x000e, t01=0x00c2}
0x16b0…16ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00da}
0x16ba…16c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00e4}
0x16c4…16d8 Head {h00=0x0010, h01=0x0050, text=»IDP30 EQU * «, t00=0x000e, t01=0x00ee}
0x16d8…16ec Head {h00=0x0010, h01=0x0050, text=»IDP40 EQU * «, t00=0x000e, t01=0x0102}
0x16ec…1700 Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x000e, t01=0x0116}
0x1700…1716 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TEXT4«, t00=0x000e, t01=0x012a}
0x1716…1736 Head {h00=0x001c, h01=0x0050, text=» CF A14,PRTXT PRINT TEXT«, t00=0x000e, t01=0x0140}
0x1736…174a Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x000e, t01=0x0160}
0x174a…1780 Head {h00=0x0032, h01=0x0050, text=» LDKL A4,PATT2 LOAD ADDERSS TO PATTERN AREA 2 «, t00=0x000e, t01=0x0174}
0x1780…1792 Head {h00=0x000e, h01=0x0050, text=» ADK A4,2 «, t00=0x000f, t01=0x001a}
0x1792…17a4 Head {h00=0x000e, h01=0x0050, text=» LDK A3,/B«, t00=0x000f, t01=0x002c}
0x17a4…17b6 Head {h00=0x000e, h01=0x0050, text=» CM PATT2 «, t00=0x000f, t01=0x003e}
0x17b6…17c4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0050}
0x17c4…17d8 Head {h00=0x0010, h01=0x0050, text=»IDP50 EQU * «, t00=0x000f, t01=0x005e}
0x17d8…17fc Head {h00=0x0020, h01=0x0050, text=» CF A14,READE READ AND ECHO «, t00=0x000f, t01=0x0072}
0x17fc…1816 Head {h00=0x0016, h01=0x0050, text=» DATA KT400,FT400 «, t00=0x000f, t01=0x0096}
0x1816…182c Head {h00=0x0012, h01=0x0050, text=» CF A14,RDH100«, t00=0x000f, t01=0x00b0}
0x182c…1850 Head {h00=0x0020, h01=0x0050, text=» LDR A6,A7 SAVE FIRST DIGIT «, t00=0x000f, t01=0x00c6}
0x1850…1862 Head {h00=0x000e, h01=0x0050, text=» SLL A6,4 «, t00=0x000f, t01=0x00ea}
0x1862…187c Head {h00=0x0016, h01=0x0050, text=» CF A14,RDHEX READ«, t00=0x000f, t01=0x00fc}
0x187c…18a0 Head {h00=0x0020, h01=0x0050, text=» ADR A7,A6 SAVE SECOND DIGIT«, t00=0x000f, t01=0x0116}
0x18a0…18c8 Head {h00=0x0024, h01=0x0050, text=» SCR A7,A4 STORE IN PATTERN AREA«, t00=0x000f, t01=0x013a}
0x18c8…18da Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x000f, t01=0x0162}
0x18da…18ec Head {h00=0x000e, h01=0x0050, text=» IM PATT2 «, t00=0x000f, t01=0x0174}
0x18ec…18fe Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x000f, t01=0x0186}
0x18fe…1920 Head {h00=0x001e, h01=0x0050, text=» RF(Z) ERROR AREA OVERFLOW«, t00=0x0010, t01=0x0008}
0x1920…1936 Head {h00=0x0012, h01=0x0050, text=» CF A14,PRSPAC«, t00=0x0010, t01=0x002a}
0x1936…1948 Head {h00=0x000e, h01=0x0050, text=» RB IDP50 «, t00=0x0010, t01=0x0040}
0x1948…1956 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0052}
0x1956…1960 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0060}
0x1960…196a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006a}
0x196a…1982 Head {h00=0x0014, h01=0x0050, text=»KT400 DATA /012A«, t00=0x0010, t01=0x0074}
0x1982…199a Head {h00=0x0014, h01=0x0050, text=»FT400 DATA IDP60«, t00=0x0010, t01=0x008c}
0x199a…19a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a4}
0x19a4…19ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ae}
0x19ae…19c2 Head {h00=0x0010, h01=0x0050, text=»IDP60 EQU * «, t00=0x0010, t01=0x00b8}
0x19c2…19d6 Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0010, t01=0x00cc}
0x19d6…19ec Head {h00=0x0012, h01=0x0050, text=» LDKL A2,PATT1«, t00=0x0010, t01=0x00e0}
0x19ec…1a18 Head {h00=0x0028, h01=0x0050, text=» ST A2,CTECB+2 STORE PATTERN ADDRESS«, t00=0x0010, t01=0x00f6}
0x1a18…1a36 Head {h00=0x001a, h01=0x0050, text=» LDK A2,4 LOAD ORDER 4«, t00=0x0010, t01=0x0122}
0x1a36…1a4a Head {h00=0x0010, h01=0x0050, text=» ABL CLOSET «, t00=0x0010, t01=0x0140}
0x1a4a…1a58 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0154}
0x1a58…1a62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0162}
0x1a62…1a6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x016c}
0x1a6c…1a80 Head {h00=0x0010, h01=0x0050, text=»* TYPE: ? «, t00=0x0010, t01=0x0176}
0x1a80…1a8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x018a}
0x1a8a…1a9e (17, 0, 400) Head {h00=0x0010, h01=0x0050, text=»ERRORA EQU *«, t00=0x0011, t01=0x0004}
0x1a9e…1ac4 Head {h00=0x0022, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER «, t00=0x0011, t01=0x0018}
0x1ac4…1ad8 Head {h00=0x0010, h01=0x0050, text=»ERROR EQU * «, t00=0x0011, t01=0x003e}
0x1ad8…1afe Head {h00=0x0022, h01=0x0050, text=» LDKL A14,STB LOAD STACK BASE «, t00=0x0011, t01=0x0052}
0x1afe…1b1e Head {h00=0x001c, h01=0x0050, text=» LDK A7,'?' INVALID KEY «, t00=0x0011, t01=0x0078}
0x1b1e…1b3c Head {h00=0x001a, h01=0x0050, text=» CF A14,PRCH PRINT '?'«, t00=0x0011, t01=0x0098}
0x1b3c…1b50 Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0011, t01=0x00b6}
0x1b50…1b62 Head {h00=0x000e, h01=0x0050, text=» ABL OPCOM«, t00=0x0011, t01=0x00ca}
0x1b62…1b70 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00dc}
0x1b70…1b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ea}
0x1b7a…1b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f4}
0x1b84…1bb0 Head {h00=0x0028, h01=0x0050, text=»* CHECK HEXADEC. INPUT AND TRANSLATE«, t00=0x0011, t01=0x00fe}
0x1bb0…1bba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x012a}
0x1bba…1bce Head {h00=0x0010, h01=0x0050, text=»* CR=0 OK «, t00=0x0011, t01=0x0134}
0x1bce…1bec Head {h00=0x001a, h01=0x0050, text=»* CR=1,2 ILLEGAL CHAR«, t00=0x0011, t01=0x0148}
0x1bec…1bf6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0166}
0x1bf6…1c00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0170}
0x1c00…1c14 Head {h00=0x0010, h01=0x0050, text=»HEXCH EQU * «, t00=0x0011, t01=0x017a}
0x1c14…1c32 Head {h00=0x001a, h01=0x0050, text=» ADKL A14,4 SKIP STACK«, t00=0x0011, t01=0x018e}
0x1c32…1c44 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0012, t01=0x001c}
0x1c44…1c58 Head {h00=0x0010, h01=0x0050, text=» SUK A1,'0' «, t00=0x0012, t01=0x002e}
0x1c58…1c6e Head {h00=0x0012, h01=0x0050, text=» RF(N) HEXC90 «, t00=0x0012, t01=0x0042}
0x1c6e…1c80 Head {h00=0x000e, h01=0x0050, text=» SUK A1,9 «, t00=0x0012, t01=0x0058}
0x1c80…1c9e Head {h00=0x001a, h01=0x0050, text=» RF(NP) HEXC10 NUMBER «, t00=0x0012, t01=0x006a}
0x1c9e…1cb0 Head {h00=0x000e, h01=0x0050, text=» SUK A1,8 «, t00=0x0012, t01=0x0088}
0x1cb0…1cc6 Head {h00=0x0012, h01=0x0050, text=» RF(N) HEXC90 «, t00=0x0012, t01=0x009a}
0x1cc6…1cd8 Head {h00=0x000e, h01=0x0050, text=» SUK A1,5 «, t00=0x0012, t01=0x00b0}
0x1cd8…1cee Head {h00=0x0012, h01=0x0050, text=» RF(P) HEXC90 «, t00=0x0012, t01=0x00c2}
0x1cee…1d16 Head {h00=0x0024, h01=0x0050, text=» ADK A1,15 TRANSLATE HEX LETTER «, t00=0x0012, t01=0x00d8}
0x1d16…1d28 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A1«, t00=0x0012, t01=0x0100}
0x1d28…1d3a Head {h00=0x000e, h01=0x0050, text=» RF HEX20 «, t00=0x0012, t01=0x0112}
0x1d3a…1d4e Head {h00=0x0010, h01=0x0050, text=»HEXC10 EQU *«, t00=0x0012, t01=0x0124}
0x1d4e…1d60 Head {h00=0x000e, h01=0x0050, text=» ADK A1,9 «, t00=0x0012, t01=0x0138}
0x1d60…1d72 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A1«, t00=0x0012, t01=0x014a}
0x1d72…1d86 Head {h00=0x0010, h01=0x0050, text=»HEX20 EQU * «, t00=0x0012, t01=0x015c}
0x1d86…1d98 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A1«, t00=0x0012, t01=0x0170}
0x1d98…1daa Head {h00=0x000e, h01=0x0050, text=» RF HEX99 «, t00=0x0012, t01=0x0182}
0x1daa…1dbe (19, 0, 400) Head {h00=0x0010, h01=0x0050, text=»HEXC90 EQU *«, t00=0x0013, t01=0x0004}
0x1dbe…1dd0 Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0013, t01=0x0018}
0x1dd0…1de4 Head {h00=0x0010, h01=0x0050, text=»HEX99 EQU * «, t00=0x0013, t01=0x002a}
0x1de4…1df6 Head {h00=0x000e, h01=0x0050, text=» ABR* A14 «, t00=0x0013, t01=0x003e}
0x1df6…1e04 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0050}
0x1e04…1e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x005e}
0x1e0e…1e18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0068}
0x1e18…1e38 Head {h00=0x001c, h01=0x0050, text=»CTECB DATA /62,0,0,0,0,0«, t00=0x0013, t01=0x0072}
0x1e38…1e46 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0092}
0x1e46…1e50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a0}
0x1e50…1e5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00aa}
0x1e5a…1e80 Head {h00=0x0022, h01=0x0050, text=»* PRINT ONE CHARACTER FROM A7 «, t00=0x0013, t01=0x00b4}
0x1e80…1e8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00da}
0x1e8a…1e94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00e4}
0x1e94…1eae Head {h00=0x0016, h01=0x0050, text=»PRCH LDKL A8,PRECB«, t00=0x0013, t01=0x00ee}
0x1eae…1ec6 Head {h00=0x0014, h01=0x0050, text=» SC* A7,ECBBA,A8«, t00=0x0013, t01=0x0108}
0x1ec6…1eda Head {h00=0x0010, h01=0x0050, text=» LDK A7,/85 «, t00=0x0013, t01=0x0120}
0x1eda…1ee6 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0013, t01=0x0134}
0x1ee6…1ef6 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0013, t01=0x0140}
0x1ef6…1f1a Head {h00=0x0020, h01=0x0050, text=» ADKL A11,1 COUNT CHARACTERS«, t00=0x0013, t01=0x0150}
0x1f1a…1f2c Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0013, t01=0x0174}
0x1f2c…1f58 Head {h00=0x0028, h01=0x0050, text=» ST A7,XSPACE RESET SPACE INDICATOR «, t00=0x0013, t01=0x0186}
0x1f58…1f7c Head {h00=0x0020, h01=0x0050, text=» LC* A7,ECBBA,A8 RESTORE A7 «, t00=0x0014, t01=0x0022}
0x1f7c…1f8c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0014, t01=0x0046}
0x1f8c…1f96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0056}
0x1f96…1fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0060}
0x1fa0…1fc4 Head {h00=0x0020, h01=0x0050, text=»TYECB DATA /20,TYBUF,1,0,0,0«, t00=0x0014, t01=0x006a}
0x1fc4…1fd8 Head {h00=0x0010, h01=0x0050, text=»TYBUF RES 1 «, t00=0x0014, t01=0x008e}
0x1fd8…1ffc Head {h00=0x0020, h01=0x0050, text=»PRECB DATA /31,PRBUF,1,0,0,0«, t00=0x0014, t01=0x00a2}
0x1ffc…2010 Head {h00=0x0010, h01=0x0050, text=»PRBUF DATA 0«, t00=0x0014, t01=0x00c6}
0x2010…201e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x00da}
0x201e…2028 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00e8}
0x2028…2032 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00f2}
0x2032…204a Head {h00=0x0014, h01=0x0050, text=»* GENERATE CRLF «, t00=0x0014, t01=0x00fc}
0x204a…2054 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0114}
0x2054…205e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x011e}
0x205e…2070 Head {h00=0x000e, h01=0x0050, text=»CRLF EQU *«, t00=0x0014, t01=0x0128}
0x2070…2084 Head {h00=0x0010, h01=0x0050, text=» LDK A7,/0D «, t00=0x0014, t01=0x013a}
0x2084…2098 Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x0014, t01=0x014e}
0x2098…20ac Head {h00=0x0010, h01=0x0050, text=» LDK A7,/0A «, t00=0x0014, t01=0x0162}
0x20ac…20c0 Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x0014, t01=0x0176}
0x20c0…20e6 Head {h00=0x0022, h01=0x0050, text=» IM XSPACE SET SPACE INDICATOR«, t00=0x0014, t01=0x018a}
0x20e6…20fa Head {h00=0x0010, h01=0x0050, text=» SUR A11,A11«, t00=0x0015, t01=0x0020}
0x20fa…210e Head {h00=0x0010, h01=0x0050, text=»CRLF90 EQU *«, t00=0x0015, t01=0x0034}
0x210e…211e Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0015, t01=0x0048}
0x211e…212c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0058}
0x212c…2136 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0066}
0x2136…2140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0070}
0x2140…2170 Head {h00=0x002c, h01=0x0050, text=»* READ ONE CHARACTER FROM KEYBOARD TO A7«, t00=0x0015, t01=0x007a}
0x2170…217a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00aa}
0x217a…21c8 Head {h00=0x004a, h01=0x0050, text=»* TWO WORDS FOLLOWING CALL GIVE KEYTABLE AND FUNCTION TABLE ADDRESSES «, t00=0x0015, t01=0x00b4}
0x21c8…21d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0102}
0x21d2…220c Head {h00=0x0036, h01=0x0050, text=»* ON ERROR GO TO NEXT INSTRUCTION ELSE TO FUNCTION«, t00=0x0015, t01=0x010c}
0x220c…2216 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0146}
0x2216…2230 Head {h00=0x0016, h01=0x0050, text=»* A1 IS DESTROYED «, t00=0x0015, t01=0x0150}
0x2230…223a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x016a}
0x223a…2244 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0174}
0x2244…225c Head {h00=0x0014, h01=0x0050, text=»READ LD A7,4,A14«, t00=0x0015, t01=0x017e}
0x225c…228a Head {h00=0x002a, h01=0x0050, text=» LD A1,2,A7 GET FUNCTION TABLE ADDRESS«, t00=0x0016, t01=0x0008}
0x228a…22b2 Head {h00=0x0024, h01=0x0050, text=» LDR* A7,A7 GET KEYTABLE ADDRESS«, t00=0x0016, t01=0x0036}
0x22b2…22c8 Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TYECB«, t00=0x0016, t01=0x005e}
0x22c8…22f6 Head {h00=0x002a, h01=0x0050, text=» ST A7,ECBCW,A8 STORE KEYTABLE ADDRESS«, t00=0x0016, t01=0x0074}
0x22f6…2318 Head {h00=0x001e, h01=0x0050, text=» LDK A7,/82 STANDARD READ «, t00=0x0016, t01=0x00a2}
0x2318…2324 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0016, t01=0x00c4}
0x2324…2334 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0016, t01=0x00d0}
0x2334…2348 Head {h00=0x0010, h01=0x0050, text=»READ05 EQU *«, t00=0x0016, t01=0x00e0}
0x2348…2368 Head {h00=0x001c, h01=0x0050, text=» ADKL A11,1 COUNT CHARS «, t00=0x0016, t01=0x00f4}
0x2368…237a Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x0016, t01=0x0114}
0x237a…23a4 Head {h00=0x0026, h01=0x0050, text=» ST A7,XSPACE SET SPACE INDICATOR «, t00=0x0016, t01=0x0126}
0x23a4…23d0 Head {h00=0x0028, h01=0x0050, text=» LC* A7,ECBBA,A8 GET CHARACTER TO A7«, t00=0x0016, t01=0x0150}
0x23d0…23e4 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x0016, t01=0x017c}
0x23e4…23fc Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRC,A8 «, t00=0x0016, t01=0x0190}
0x23fc…241c Head {h00=0x001c, h01=0x0050, text=» RF(Z) READ10 READING OK«, t00=0x0017, t01=0x0018}
0x241c…242e Head {h00=0x000e, h01=0x0050, text=» LDK A1,4 «, t00=0x0017, t01=0x0038}
0x242e…2458 Head {h00=0x0026, h01=0x0050, text=» ADS A1,4,A14 INCR RETURN ADDRESS «, t00=0x0017, t01=0x004a}
0x2458…2468 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0017, t01=0x0074}
0x2468…2490 Head {h00=0x0024, h01=0x0050, text=»READ10 AD A1,ECBCW,A8 ADD INDEX «, t00=0x0017, t01=0x0084}
0x2490…24a4 Head {h00=0x0010, h01=0x0050, text=» ADKL A14,4 «, t00=0x0017, t01=0x00ac}
0x24a4…24c8 Head {h00=0x0020, h01=0x0050, text=» ABR* A1 RETURN TO FUNCTION «, t00=0x0017, t01=0x00c0}
0x24c8…24d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00e4}
0x24d2…24dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ee}
0x24dc…24f4 Head {h00=0x0014, h01=0x0050, text=»* READ AND ECHO «, t00=0x0017, t01=0x00f8}
0x24f4…24fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0110}
0x24fe…2508 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x011a}
0x2508…251c Head {h00=0x0010, h01=0x0050, text=»READE EQU * «, t00=0x0017, t01=0x0124}
0x251c…2530 Head {h00=0x0010, h01=0x0050, text=» LD A7,4,A14«, t00=0x0017, t01=0x0138}
0x2530…253a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x014c}
0x253a…2568 Head {h00=0x002a, h01=0x0050, text=» LD A1,2,A7 GET FUNCTION TABLE ADDRESS«, t00=0x0017, t01=0x0156}
0x2568…2590 Head {h00=0x0024, h01=0x0050, text=» LDR* A7,A7 GET KEYTABLE ADDRESS«, t00=0x0017, t01=0x0184}
0x2590…25a6 Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TYECB«, t00=0x0018, t01=0x001c}
0x25a6…25d4 Head {h00=0x002a, h01=0x0050, text=» ST A7,ECBCW,A8 STORE KEYTABLE ADDRESS«, t00=0x0018, t01=0x0032}
0x25d4…25f6 Head {h00=0x001e, h01=0x0050, text=» LDK A7,/82 STANDARD READ «, t00=0x0018, t01=0x0060}
0x25f6…2602 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0018, t01=0x0082}
0x2602…2612 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0018, t01=0x008e}
0x2612…262a Head {h00=0x0014, h01=0x0050, text=» LC* A7,ECBBA,A8«, t00=0x0018, t01=0x009e}
0x262a…2644 Head {h00=0x0016, h01=0x0050, text=» CF A14,PRCH ECHO «, t00=0x0018, t01=0x00b6}
0x2644…265a Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TYECB«, t00=0x0018, t01=0x00d0}
0x265a…266c Head {h00=0x000e, h01=0x0050, text=» RB READ05«, t00=0x0018, t01=0x00e6}
0x266c…267a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x00f8}
0x267a…2684 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0106}
0x2684…268e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0110}
0x268e…26b2 Head {h00=0x0020, h01=0x0050, text=»* READ HEXADECIMAL CHARACTER«, t00=0x0018, t01=0x011a}
0x26b2…26bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x013e}
0x26bc…26c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0148}
0x26c6…26e0 Head {h00=0x0016, h01=0x0050, text=»RDHEX CF A14,READE«, t00=0x0018, t01=0x0152}
0x26e0…26f4 Head {h00=0x0010, h01=0x0050, text=» DATA KTRDH «, t00=0x0018, t01=0x016c}
0x26f4…2714 Head {h00=0x001c, h01=0x0050, text=»KTRDH DATA 0 NO KEYTABLE«, t00=0x0018, t01=0x0180}
0x2714…272e Head {h00=0x0016, h01=0x0050, text=»RDH100 SUK A7,/30 «, t00=0x0019, t01=0x0010}
0x272e…2744 Head {h00=0x0012, h01=0x0050, text=» ABL(N) ERROR «, t00=0x0019, t01=0x002a}
0x2744…2756 Head {h00=0x000e, h01=0x0050, text=» CWK A7,9 «, t00=0x0019, t01=0x0040}
0x2756…276c Head {h00=0x0012, h01=0x0050, text=» RF(NG) RDH110«, t00=0x0019, t01=0x0052}
0x276c…277e Head {h00=0x000e, h01=0x0050, text=» SUK A7,7 «, t00=0x0019, t01=0x0068}
0x277e…2794 Head {h00=0x0012, h01=0x0050, text=» ABL(N) ERROR «, t00=0x0019, t01=0x007a}
0x2794…27a6 Head {h00=0x000e, h01=0x0050, text=» CWK A7,/F«, t00=0x0019, t01=0x0090}
0x27a6…27bc Head {h00=0x0012, h01=0x0050, text=» ABL(G) ERROR «, t00=0x0019, t01=0x00a2}
0x27bc…27d2 Head {h00=0x0012, h01=0x0050, text=»RDH110 RTN A14«, t00=0x0019, t01=0x00b8}
0x27d2…27e0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x00ce}
0x27e0…27ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00dc}
0x27ea…27f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e6}
0x27f4…2824 Head {h00=0x002c, h01=0x0050, text=»* EDIT CHAR FROM A7 IN HEXADECIMAL FORM «, t00=0x0019, t01=0x00f0}
0x2824…282e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0120}
0x282e…2838 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x012a}
0x2838…2858 Head {h00=0x001c, h01=0x0050, text=»EDHEX LDR A6,A7 SAVE A7 «, t00=0x0019, t01=0x0134}
0x2858…286e Head {h00=0x0012, h01=0x0050, text=» CF A14,SPACE «, t00=0x0019, t01=0x0154}
0x286e…2882 Head {h00=0x0010, h01=0x0050, text=» LDK A7,'/' «, t00=0x0019, t01=0x016a}
0x2882…2896 Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x0019, t01=0x017e}
0x2896…28a8 (26, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A7,A6«, t00=0x001a, t01=0x0004}
0x28a8…28ba Head {h00=0x000e, h01=0x0050, text=» SRL A7,4 «, t00=0x001a, t01=0x0016}
0x28ba…28d2 Head {h00=0x0014, h01=0x0050, text=» LC A7,HEXTAB,A7«, t00=0x001a, t01=0x0028}
0x28d2…28f0 Head {h00=0x001a, h01=0x0050, text=» CF A14,PRCH 1ST CHAR «, t00=0x001a, t01=0x0040}
0x28f0…2902 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A6«, t00=0x001a, t01=0x005e}
0x2902…2914 Head {h00=0x000e, h01=0x0050, text=» ANK A7,/F«, t00=0x001a, t01=0x0070}
0x2914…292c Head {h00=0x0014, h01=0x0050, text=» LC A7,HEXTAB,A7«, t00=0x001a, t01=0x0082}
0x292c…294a Head {h00=0x001a, h01=0x0050, text=» CF A14,PRCH 2ND CHAR «, t00=0x001a, t01=0x009a}
0x294a…2966 Head {h00=0x0018, h01=0x0050, text=» CF A14,SPACE SPACE «, t00=0x001a, t01=0x00b8}
0x2966…2976 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001a, t01=0x00d4}
0x2976…299c Head {h00=0x0022, h01=0x0050, text=»HEXTAB DATA '0123456789ABCDEF'«, t00=0x001a, t01=0x00e4}
0x299c…29a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x010a}
0x29a6…29b4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0114}
0x29b4…29be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0122}
0x29be…29c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x012c}
0x29c8…29e6 Head {h00=0x001a, h01=0x0050, text=»* PUT SPACE IN BUFFER «, t00=0x001a, t01=0x0136}
0x29e6…29f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0154}
0x29f0…29fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x015e}
0x29fa…2a14 Head {h00=0x0016, h01=0x0050, text=»SPACE LD A1,XSPACE«, t00=0x001a, t01=0x0168}
0x2a14…2a2a Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SPA100«, t00=0x001a, t01=0x0182}
0x2a2a…2a44 Head {h00=0x0016, h01=0x0050, text=»PRSPAC LDK A7,' ' «, t00=0x001b, t01=0x0008}
0x2a44…2a58 Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x001b, t01=0x0022}
0x2a58…2a6a Head {h00=0x000e, h01=0x0050, text=» IM XSPACE«, t00=0x001b, t01=0x0036}
0x2a6a…2a80 Head {h00=0x0012, h01=0x0050, text=»SPA100 RTN A14«, t00=0x001b, t01=0x0048}
0x2a80…2aa6 Head {h00=0x0022, h01=0x0050, text=»XSPACE DATA 0 SPACE INDICATOR «, t00=0x001b, t01=0x005e}
0x2aa6…2ab0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0084}
0x2ab0…2aba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x008e}
0x2aba…2ac4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0098}
0x2ac4…2af8 Head {h00=0x0030, h01=0x0050, text=»* OCCUPIE PRINTER AND ECHO CHARACHTER IN A7 «, t00=0x001b, t01=0x00a2}
0x2af8…2b02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00d6}
0x2b02…2b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00e0}
0x2b0c…2b20 Head {h00=0x0010, h01=0x0050, text=»OCCPR EQU * «, t00=0x001b, t01=0x00ea}
0x2b20…2b3c Head {h00=0x0018, h01=0x0050, text=» LDR A1,A7 SAVE CHAR«, t00=0x001b, t01=0x00fe}
0x2b3c…2b4e Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x001b, t01=0x011a}
0x2b4e…2b5c Head {h00=0x000a, h01=0x0050, text=» LKM «, t00=0x001b, t01=0x012c}
0x2b5c…2b7e Head {h00=0x001e, h01=0x0050, text=» DATA -7,PRPOOL GET BUFFER«, t00=0x001b, t01=0x013a}
0x2b7e…2ba8 Head {h00=0x0026, h01=0x0050, text=» ST A8,PROCCB SAVE BUFFER ADDRESS «, t00=0x001b, t01=0x015c}
0x2ba8…2bbc Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x001b, t01=0x0186}
0x2bbc…2bdc Head {h00=0x001c, h01=0x0050, text=» LDR A7,A1 RESTORE CHAR «, t00=0x001c, t01=0x000a}
0x2bdc…2bf6 Head {h00=0x0016, h01=0x0050, text=» CF A14,PRCH ECHO «, t00=0x001c, t01=0x002a}
0x2bf6…2c06 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001c, t01=0x0044}
0x2c06…2c10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0054}
0x2c10…2c1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x005e}
0x2c1a…2c24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0068}
0x2c24…2c38 Head {h00=0x0010, h01=0x0050, text=» END ASTART «, t00=0x001c, t01=0x0072}
0x2c38…2c3c Head {h00=0x4004, h01=0x0000}
0x2c3c…2c40 00 1c 00 86 ┆ ┆
0x2c40…2c48 (29, 1, 8) 20 04 00 00 00 1d 00 04 ┆ ┆
0x2c48…2c98 (30, 0, 400) 53 45 43 54 4f 52 3a 3b 45 58 50 49 00 0f 01 74 00 2c 00 28 03 13 00 00 0b 5d 00 00 52 41 54 49 4f 4e 20 44 41 54 45 3a 3b 20 56 4f 4c 55 4d 45 20 49 4e 49 54 49 41 4c 49 5a 41 54 00 10 00 14 00 2c 00 28 03 13 00 00 0b 7d 00 00 49 4f 4e 3a ┆SECTOR:;EXPI t , ( ] RATION DATE:; VOLUME INITIALIZAT , ( } ION:┆
0x2c98…2ce8 3b 20 53 45 43 54 4f 52 20 4f 46 20 44 41 54 41 20 53 45 54 20 4c 41 42 45 4c 3a 3b 00 10 00 44 00 2c 00 28 03 13 00 00 0b 9d 00 00 4e 55 4d 42 45 52 20 4f 46 20 49 4e 44 45 58 20 46 49 4c 45 53 3a 3b 20 4b 45 59 20 41 44 44 52 00 10 00 74 ┆; SECTOR OF DATA SET LABEL:; D , ( NUMBER OF INDEX FILES:; KEY ADDR t┆
0x2ce8…2d38 00 2c 00 28 03 13 00 00 0b bd 00 00 45 53 53 20 57 49 54 48 49 4e 20 44 41 54 41 20 52 45 43 4f 52 44 3a 3b 4b 45 59 20 4c 45 4e 47 00 10 00 a4 00 2c 00 28 03 13 00 00 0b dd 00 00 54 48 20 49 4e 20 44 41 54 41 20 52 45 43 4f 52 44 3a 3b 20 ┆ , ( ESS WITHIN DATA RECORD:;KEY LENG , ( TH IN DATA RECORD:; ┆
0x2d38…2d88 52 45 43 4f 52 44 20 4c 45 4e 47 54 00 10 00 d4 00 2c 00 28 03 13 00 00 0b fd 00 00 48 20 49 4e 50 55 54 20 54 41 50 45 3a 3b 4c 4f 41 44 20 46 41 43 54 4f 52 3a 3b 20 49 4e 44 45 00 10 01 04 00 2c 00 28 03 13 00 00 0c 1d 00 00 58 20 46 49 ┆RECORD LENGT , ( H INPUT TAPE:;LOAD FACTOR:; INDE , ( X FI┆
0x2d88…2dd8 4c 45 20 4e 41 4d 45 3a 3b 20 4d 41 53 54 45 52 20 49 4e 44 45 58 20 46 49 4c 45 20 00 10 01 34 00 2c 00 28 03 13 00 00 0c 3d 00 00 4e 41 4d 45 3a 3b 44 45 56 49 43 45 3a 3b 50 54 53 20 36 38 37 36 20 44 49 53 43 3a 3b 20 4d 41 00 10 01 64 ┆LE NAME:; MASTER INDEX FILE 4 , ( = NAME:;DEVICE:;PTS 6876 DISC:; MA d┆
0x2dd8…2ddc (31, 0, 4) 03 78 03 80 ┆ x ┆
0x2ddc…2e2c (32, 0, 398) 00 12 00 50 20 20 49 44 45 4e 54 20 57 52 49 54 45 20 00 00 00 04 00 1e 00 50 5c 5c 5c 55 50 44 41 54 45 20 23 30 20 37 37 2e 30 31 2e 32 30 20 4a 45 53 20 00 00 00 1a 00 06 00 50 2a 20 00 00 00 3c 00 06 00 50 2a 20 00 00 00 46 00 22 00 50 ┆ P IDENT WRITE P UPDATE #0 77.01.20 JES P* < P* F " P┆
0x2e2c…2e7c 2a 5c 43 45 4e 54 52 41 4c 20 43 4f 4d 50 55 54 45 52 20 53 49 4d 55 4c 41 54 49 4f 4e 20 00 00 00 50 00 06 00 50 2a 20 00 00 00 76 00 10 00 50 2a 5c 57 52 49 54 45 20 54 41 53 4b 00 00 00 80 00 06 00 50 2a 20 00 00 00 94 00 06 00 50 2a 20 ┆* CENTRAL COMPUTER SIMULATION P P* v P* WRITE TASK P* P* ┆
0x2e7c…2ecc 00 00 00 9e 00 20 00 50 5c 45 4e 54 52 59 5c 57 52 49 54 45 5c 54 41 53 4b 20 41 43 54 49 56 41 54 49 4f 4e 00 00 00 a8 00 22 00 50 5c 45 4e 54 52 59 5c 57 52 45 43 42 5c 57 52 49 54 45 20 45 43 42 20 41 44 44 52 45 53 53 00 00 00 cc 00 06 ┆ P ENTRY WRITE TASK ACTIVATION " P ENTRY WRECB WRITE ECB ADDRESS ┆
0x2ecc…2f1c 00 50 2a 20 00 00 00 f2 00 06 00 50 2a 20 00 00 00 fc 00 1e 00 50 5c 45 58 54 52 4e 5c 54 52 51 5c 54 52 41 4e 53 4d 49 54 20 51 55 45 55 45 20 00 00 01 06 00 24 00 50 5c 45 58 54 52 4e 5c 41 52 45 41 5c 54 52 41 4e 53 4d 49 54 20 42 55 46 ┆ P* P* P EXTRN TRQ TRANSMIT QUEUE $ P EXTRN AREA TRANSMIT BUF┆
0x2f1c…2f6a 46 45 52 20 41 52 45 41 00 00 01 28 00 2a 00 50 5c 45 58 54 52 4e 5c 4c 45 4e 47 54 48 5c 4c 45 4e 47 54 48 20 4f 46 20 54 52 41 4e 53 4d 49 54 20 41 52 45 41 53 00 00 01 50 00 06 00 50 2a 20 00 00 01 7e 00 06 00 50 2a 20 00 00 01 88 ┆FER AREA ( * P EXTRN LENGTH LENGTH OF TRANSMIT AREAS P P* ~ P* ┆
0x2f6a…2fba (33, 0, 400) 00 06 00 50 2a 20 00 01 00 04 00 1a 00 50 2a 5c 52 45 4c 41 54 49 56 45 20 45 43 42 20 45 51 55 41 54 45 53 00 01 00 0e 00 06 00 50 2a 20 00 01 00 2c 00 06 00 50 2a 20 00 01 00 36 00 10 00 50 45 43 42 42 41 5c 45 51 55 5c 32 20 00 01 00 40 ┆ P* P* RELATIVE ECB EQUATES P* , P* 6 PECBBA EQU 2 @┆
0x2fba…300a 00 10 00 50 45 43 42 52 4c 5c 45 51 55 5c 34 20 00 01 00 54 00 10 00 50 45 43 42 45 4c 5c 45 51 55 5c 36 20 00 01 00 68 00 10 00 50 45 43 42 52 43 5c 45 51 55 5c 38 20 00 01 00 7c 00 10 00 50 45 43 42 43 57 5c 45 51 55 5c 2f 41 00 01 00 90 ┆ PECBRL EQU 4 T PECBEL EQU 6 h PECBRC EQU 8 | PECBCW EQU /A ┆
0x300a…305a 00 06 00 50 2a 20 00 01 00 a4 00 1c 00 50 57 52 45 43 42 5c 44 41 54 41 5c 2f 36 32 2c 30 2c 30 2c 30 2c 30 2c 30 00 01 00 ae 00 0a 00 50 5c 45 4a 45 43 54 00 01 00 ce 00 06 00 50 2a 20 00 01 00 dc 00 06 00 50 2a 20 00 01 00 e6 00 10 00 50 ┆ P* PWRECB DATA /62,0,0,0,0,0 P EJECT P* P* P┆
0x305a…30aa 2a 5c 57 52 49 54 45 20 54 41 53 4b 00 01 00 f0 00 06 00 50 2a 20 00 01 01 04 00 06 00 50 2a 20 00 01 01 0e 00 28 00 50 57 52 49 54 45 5c 4c 44 4b 4c 5c 41 38 2c 57 52 45 43 42 5c 4c 4f 41 44 20 45 43 42 20 41 44 44 52 45 53 53 00 01 01 18 ┆* WRITE TASK P* P* ( PWRITE LDKL A8,WRECB LOAD ECB ADDRESS ┆
0x30aa…30fa 00 1e 00 50 5c 4c 44 4b 4c 5c 41 39 2c 54 52 51 5c 51 55 45 55 45 20 50 4f 49 4e 54 45 52 00 01 01 44 00 16 00 50 5c 4c 44 4b 5c 41 37 2c 2f 38 36 5c 4f 52 44 45 52 20 00 01 01 66 00 24 00 50 57 52 31 30 30 5c 4c 44 52 2a 5c 41 31 2c 41 39 ┆ P LDKL A9,TRQ QUEUE POINTER D P LDK A7,/86 ORDER f $ PWR100 LDR* A1,A9┆
0x30fa…314a (34, 0, 400) 5c 54 41 4b 45 20 46 52 4f 4d 20 51 55 45 55 45 00 01 01 80 00 12 00 50 5c 43 57 4b 5c 41 31 2c 2f 46 46 46 46 20 00 02 00 18 00 1c 00 50 5c 52 46 28 5a 29 5c 45 58 49 54 5c 45 4e 44 20 4f 46 20 51 55 45 55 45 00 02 00 2e 00 22 00 50 5c 41 ┆ TAKE FROM QUEUE P CWK A1,/FFFF P RF(Z) EXIT END OF QUEUE . " P A┆
0x314a…319a 44 4b 4c 5c 41 39 2c 32 5c 49 4e 43 52 20 51 55 45 55 45 20 50 4f 49 4e 54 45 52 20 00 02 00 4e 00 0e 00 50 5c 4c 44 52 5c 41 31 2c 41 31 00 02 00 74 00 20 00 50 5c 52 46 28 4e 29 5c 57 52 32 30 30 5c 44 45 4c 41 59 20 49 53 20 57 41 4e 54 ┆DKL A9,2 INCR QUEUE POINTER N P LDR A1,A1 t P RF(N) WR200 DELAY IS WANT┆
0x319a…31ea 45 44 00 02 00 86 00 1e 00 50 5c 4c 44 52 5c 41 32 2c 41 31 5c 47 45 54 20 41 52 45 41 20 4e 55 4d 42 45 52 00 02 00 aa 00 0e 00 50 5c 41 4e 4b 5c 41 32 2c 2f 46 00 02 00 cc 00 1c 00 50 5c 4c 44 4b 4c 5c 41 33 2c 41 52 45 41 5c 41 52 45 41 ┆ED P LDR A2,A1 GET AREA NUMBER P ANK A2,/F P LDKL A3,AREA AREA┆
0x31ea…323a 20 42 41 53 45 20 00 02 00 de 00 28 00 50 57 52 31 31 30 5c 53 55 4b 5c 41 32 2c 31 5c 43 4f 4d 50 55 54 45 20 41 52 45 41 20 41 44 44 52 45 53 53 20 00 02 00 fe 00 10 00 50 5c 52 46 28 4e 29 5c 57 52 31 32 30 00 02 01 2a 00 14 00 50 5c 41 ┆ BASE ( PWR110 SUK A2,1 COMPUTE AREA ADDRESS P RF(N) WR120 * P A┆
0x323a…328a 44 4b 4c 5c 41 33 2c 4c 45 4e 47 54 48 20 00 02 01 3e 00 0e 00 50 5c 52 42 5c 57 52 31 31 30 20 00 02 01 56 00 28 00 50 57 52 31 32 30 5c 4c 44 52 2a 5c 41 34 2c 41 33 5c 47 45 54 20 4c 45 4e 47 54 48 20 4f 46 20 41 52 45 41 20 00 02 01 68 ┆DKL A3,LENGTH > P RB WR110 V ( PWR120 LDR* A4,A3 GET LENGTH OF AREA h┆
0x328a…32da (35, 0, 398) 00 1c 00 50 5c 52 46 28 5a 29 5c 57 52 33 30 30 5c 4c 45 4e 47 54 48 20 5a 45 52 4f 00 03 00 04 00 10 00 50 5c 52 46 28 4e 29 5c 57 52 33 30 30 00 03 00 24 00 10 00 50 5c 43 57 4b 5c 41 34 2c 35 30 30 20 00 03 00 38 00 10 00 50 5c 52 46 28 ┆ P RF(Z) WR300 LENGTH ZERO P RF(N) WR300 $ P CWK A4,500 8 P RF(┆
0x32da…332a 47 29 5c 57 52 33 30 30 00 03 00 4c 00 20 00 50 5c 53 54 5c 41 34 2c 45 43 42 52 4c 2c 41 38 5c 53 54 4f 52 45 20 49 4e 20 45 43 42 00 03 00 60 00 0e 00 50 5c 41 44 4b 5c 41 33 2c 32 20 00 03 00 84 00 10 00 50 5c 4c 44 52 2a 5c 41 31 2c 41 ┆G) WR300 L P ST A4,ECBRL,A8 STORE IN ECB ` P ADK A3,2 P LDR* A1,A┆
0x332a…337a 39 20 00 03 00 96 00 0e 00 50 5c 41 44 4b 4c 5c 41 39 2c 32 00 03 00 aa 00 1c 00 50 5c 53 54 5c 41 31 2c 45 43 42 43 57 2c 41 38 5c 54 49 4d 45 20 4f 55 54 00 03 00 bc 00 22 00 50 5c 53 54 5c 41 33 2c 45 43 42 42 41 2c 41 38 5c 42 55 46 46 ┆9 P ADKL A9,2 P ST A1,ECBCW,A8 TIME OUT " P ST A3,ECBBA,A8 BUFF┆
0x337a…33ca 45 52 20 41 44 44 52 45 53 53 00 03 00 dc 00 08 00 50 5c 4c 4b 4d 00 03 01 02 00 12 00 50 5c 44 41 54 41 5c 31 5c 57 52 49 54 45 20 00 03 01 0e 00 24 00 50 5c 4c 44 5c 41 31 2c 45 43 42 52 43 2c 41 38 5c 47 45 54 20 52 45 54 55 52 4e 20 43 ┆ER ADDRESS P LKM P DATA 1 WRITE $ P LD A1,ECBRC,A8 GET RETURN C┆
0x33ca…3418 4f 44 45 20 00 03 01 24 00 20 00 50 5c 41 4e 4b 4c 5c 41 31 2c 2f 46 45 46 46 5c 4d 41 53 4b 20 54 49 4d 45 20 4f 55 54 00 03 01 4c 00 22 00 50 5c 52 42 28 5a 29 5c 57 52 31 30 30 5c 4f 4b 3a 20 4e 45 58 54 20 50 41 54 54 45 52 4e 20 ┆ODE $ P ANKL A1,/FEFF MASK TIME OUT L " P RB(Z) WR100 OK: NEXT PATTERN ┆
0x3418…3468 (36, 2, 260) 00 03 01 70 00 0c 00 50 45 58 49 54 5c 4c 4b 4d 00 04 00 08 00 0c 00 50 5c 44 41 54 41 5c 33 20 00 04 00 18 00 10 00 50 57 52 32 30 30 5c 45 51 55 5c 2a 20 00 04 00 28 00 20 00 50 5c 41 4e 4b 5c 41 31 2c 2f 46 46 5c 4d 41 53 4b 20 44 45 4c ┆ p PEXIT LKM P DATA 3 PWR200 EQU * ( P ANK A1,/FF MASK DEL┆
0x3468…34b8 41 59 2d 56 41 4c 55 45 00 04 00 3c 00 0e 00 50 5c 4c 44 52 5c 41 38 2c 41 31 00 04 00 60 00 08 00 50 5c 4c 4b 4d 00 04 00 72 00 12 00 50 5c 44 41 54 41 5c 36 5c 44 45 4c 41 59 20 00 04 00 7e 00 12 00 50 5c 4c 44 4b 4c 5c 41 38 2c 57 52 45 ┆AY-VALUE < P LDR A8,A1 ` P LKM r P DATA 6 DELAY ~ P LDKL A8,WRE┆
0x34b8…3508 43 42 00 04 00 94 00 0e 00 50 5c 52 42 5c 57 52 31 30 30 20 00 04 00 aa 00 10 00 50 57 52 33 30 30 5c 45 51 55 5c 2a 20 00 04 00 bc 00 0e 00 50 5c 41 44 4b 4c 5c 41 39 2c 32 00 04 00 d0 00 0e 00 50 5c 52 42 5c 57 52 31 30 30 20 00 04 00 e2 ┆CB P RB WR100 PWR300 EQU * P ADKL A9,2 P RB WR100 ┆
0x3508…351c 00 08 00 50 5c 45 4e 44 00 04 00 f4 40 04 00 00 00 04 01 00 ┆ P END @ ┆