|
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: 52208 (0xcbf0)
Notes: pts_type(SC)
Names: »TEMP.SC«
└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
└─⟦this⟧ »DK3270/TEMP.SC«
IDENT START REL 2.1*79-10-20 870150540210 =1, ODD BUFFER ADDRESS REL 2.1 79-05-23 =2, 6234 LAMPS REL 2.1 79-05-23 =3, UNDEFINED LABEL REL 2.1 79-05-23 =4, CURSOR STOPS AT LAST POS. EACH LINE REL 2.1 79-05-23 =5, RESET KEY FOR KB6235 REL 2.1 79-05-23 ************************************************************* * * S T A R T : MODULE HANDLING KEYBOARD INPUT.KEYBOARD INITIATED * MESSAGES ADDRESSED TO THE MAIN FRAME ARE COMPOSED * AND SENT BY USING ROUTINES IN MODULE VDUPRT. * ************************************************************************** * EJECT * * * ENTRY PARAMETERS * * * ENTRY LINHON,LINHOF,ATMASB ENTRY LSAVOF,LSAVON ENTRY EMULA ENTRY LIOLON TURN ON OFFLINE LAMP ENTRY LIOLOF TURN OFF OFFLINE LAMP ENTRY VDUKB KB3270 (CREDIT) ENTRY DCTASK ENTRY DC1INQ ENTRY DC2INQ ENTRY REQTIM SET REQUEST TIMER ENTRY ICWRTE * * * * EXTERNAL REFERENSES * * * EXTRN DCINP EXTRN DCGETM EXTRN ICREAD EXTRN GTRBUF EXTRN RLRBUF EXTRN ERASE VDUPRT EXTRN TRPF EXTRN SETCUR EXTRN WCHAR EXTRN TRPA EXTRN ERASUA EXTRN DISPL EXTRN ERASUP * EXTRN KEYCNV KEY CONVERSION IF NOT PTS 6272 EXTRN TASCII * EXTRN I:EVA0 CREDIT EVALUATION ROUTINE EXTRN I:RT1 RETURN TO CREDIT CODE * EJECT ********************************************************** * * CONDITIONAL ASSEMBLY * ********************************* * KB6272 EQU 0 IF PTS 6272 (6236) IS NOT USED YOU MUST USE 'KEYCNV' USE THE KEY CONVERSION TABLE IN 'TB3270' KEYLST EQU 0 KEY LOCK STATUS SAVED IN 'KEYS' OFLIN EQU 1 DCLIN EQU 1 NUMBER OF MAIN FRAMES (1 OR 2) PFX EQU 1 PAX EQU 1 IN:DL EQU 1 INSERT&DELETE FUNCTIONS COPCMD EQU 1 COPY COMMAND (ONLY TO PRINTER) IF := 1 COPL EQU 1 COPY LOCK IF := 1 * EJECT * * * EQUATES * RSET EQU /B2 RESET KEY * COMMON EQU FOR ECB HANDLING * ECBBA EQU 2 ECBRL EQU 4 ECBEL EQU 6 ECBRC EQU 8 ECBCW EQU 10 * * * CREDIT USED EQU * * * ECB REL. ADDRESSES * * DIS EQU 20 * ECBDC EQU -DIS-14 IFT DCLIN=2 IFT COPCMD=1 ECBDC2 EQU ECBDC-DIS ECBICR EQU ECBDC2-DIS ECBICW EQU ECBICR-DIS XIF IFT DCLIN=2 IFF COPCMD=1 ECBDC2 EQU ECBDC-DIS ECBICW EQU ECBDC2-DIS XIF IFF DCLIN=2 IFT COPCMD=1 ECBICR EQU ECBDC-DIS ECBICW EQU ECBICR-DIS XIF IFF DCLIN=2 IFF COPCMD=1 ECBICW EQU ECBDC-DIS XIF ECBVDU EQU ECBICW-DIS ECBKB EQU ECBVDU-DIS ECBSD EQU ECBKB-DIS * EJECT * * * BASE ADDRESS FOR TCA AND ECB * TCABAS EQU A11 CREBAS EQU A13 ECB * * * TCA REL. ADDRESSES * TCT01 EQU 0 PRINTER EQU TCT01+2 BVDU EQU PRINTER+2 VDU SCREEN BUFFER PCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY ATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR CURATT EQU ATTRIB+2 WCC EQU CURATT+2 WCC/CCC CHARACTER KBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR LINCNT EQU KBINH+2 LINE COUNTER DCLENG EQU LINCNT+2 DC READ EFFECTIVE LENGTH ICWORK EQU DCLENG+2 WORK FIELD INTERTASK COMM INTATT EQU ICWORK+2 INTENSITY ATTRIBUTE OFFFLG EQU INTATT+2 OFFLINE FLAG COPNO EQU OFFFLG+2 HARDCOPY TASK ID CCC EQU COPNO+2 COPY COMMAND CHARACTER MAIN EQU CCC+2 MAIN FRAME MODE EQU MAIN+2 INSERT MODE SWITCH KEYS EQU MODE+2 KEY LOCK STATUS ECBDCC EQU KEYS+2 ECB ADDRESS LAST READ DC ECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE WAIT &C RDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB * EJECT NULL EQU /7F NULL CHARACTER DUPCH EQU /7B FMCH EQU /60 LBVDU EQU 1920 1920 CHAR DISPLAY 6344 LPAGE EQU 48 LINES ON ONE PAGE LLINE EQU 80 80 CHAR PER DISPLAY LINE * * CONFIG DATA 'CB1' REL ADDRESSES * NBRKBV EQU 0 NUMBER OF KB/VDUS NBRGTP EQU NBRKBV+2 NUMBER OF GTPS * MF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 MF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 IFT DCLIN=2 MF2KBV EQU MF1GTP+16 MF2GTP EQU MF2KBV+16 XIF * EJECT * * KEY TABLE FIXED ENTRY FOR EACH FUNCTION * KEYTAB EQU * DATA CHAR SPACE DATA CHAR ! DATA CHAR " DATA CHAR # DATA CHAR $ DATA CHAR % DATA CHAR & DATA CHAR ' DATA CHAR ( DATA CHAR ) DATA CHAR * DATA CHAR + DATA NUM , DK DATA NUM - DATA NUM . DATA CHAR / * DATA NUM DATA NUM 1 DATA NUM 2 DATA NUM 3 DATA NUM 4 DATA NUM 5 DATA NUM 6 DATA NUM 7 DATA NUM 8 DATA NUM 9 DATA CHAR : DATA CHAR ; DATA CHAR < DATA CHAR = DATA CHAR > DATA CHAR ? * DATA CHAR E' DATA CHAR A DATA CHAR B DATA CHAR C DATA CHAR D DATA CHAR E DATA CHAR F DATA CHAR G DATA CHAR H DATA CHAR I DATA CHAR J DATA CHAR K DATA CHAR L DATA CHAR M DATA CHAR N DATA CHAR O * DATA CHAR P DATA CHAR Q DATA CHAR R DATA CHAR S DATA CHAR T DATA CHAR U DATA CHAR V DATA CHAR W DATA CHAR X DATA CHAR Y DATA CHAR Z DATA CHAR [ DATA CHAR BACK SLASH DATA CHAR ] DATA CHAR CIRCOMFLEX DATA CHAR UNDERLINE * DATA RETURN /60 CANNOT BE USED DATA CHAR LOWER CASE DATA CHAR DATA CHAR DATA CHAR DATA CHAR DATA CHAR DATA CHAR DATA CHAR DATA CHAR DATA CHAR DATA CHAR DATA CHAR DATA CHAR DATA CHAR DATA CHAR * IFT KEYLST=1 DATA KEYL KEYLOCK DATA KEYL DATA KEYL DATA KEYL DATA KEYL DATA KEYL DATA KEYL DATA KEYL XIF IFF KEYLST=1 DATA RETURN DATA RETURN DATA RETURN DATA RETURN DATA RETURN DATA RETURN DATA RETURN DATA RETURN XIF DATA CHAR LOWER CASE X DATA CHAR DATA CHAR DATA RETURN /7B-/7F CANNOT BE USED DATA RETURN DATA RETURN DATA RETURN DATA RETURN * IFT PAX=1 DATA PAEX XIF IFF PAX=1 DATA RETURN XIF DATA PA1 DATA PA2 DATA PA3 DATA PA410 PA4 - PA10 (ALFASKOP) DATA PA410 DATA PA410 DATA PA410 DATA PA410 DATA PA410 DATA PA410 DATA CLEAR IFT PFX=1 DATA PFEX XIF IFF PFX=1 DATA RETURN XIF DATA PF 1 DATA PF 2 DATA PF 3 * DATA PF 4 DATA PF 5 DATA PF 6 DATA PF 7 DATA PF 8 DATA PF 9 DATA PF 10 DATA PF 11 DATA PF 12 DATA RETURN /99-/A4 RESERVED FOR PF13-24 DATA RETURN DATA RETURN DATA RETURN DATA RETURN DATA RETURN DATA RETURN * DATA RETURN DATA RETURN DATA RETURN DATA RETURN DATA RETURN DATA ENTER DATA CRUP DATA CRLEFT DATA CRRIGT DATA CRDOWN DATA BAKTAB DATA TAB DATA CRNL DATA RDHOME DATA ERINPT DATA EREOF * IFT IN:DL=1 DATA INSERT DATA DELETE XIF IFF IN:DL=1 DATA RETURN DATA RETURN XIF DATA RESET DATA DUP DATA FLDMRK DATA COPY IFT OFLIN=1 DATA OFLINE XIF IFF OFLIN=1 DATA RETURN XIF IFT DCLIN=2 DATA MFCHGE XIF IFF DCLIN=2 DATA RETURN XIF DATA RETURN DATA RETURN DATA ZERO:2 DATA ZERO:3 DATA NUMCOM DATA RETURN DATA RETURN DATA RETURN * DATA LCASPW LOWER CASE P - W (BECAUSE OF KEYLOCK) DATA LCASPW DATA LCASPW DATA LCASPW DATA LCASPW DATA LCASPW DATA LCASPW DATA LCASPW ************************************************************* * * START ADDRESS FOR DC TASKS ************************************************************* DCTASK EQU * CF A14,I:EVA0 LDR* A1,A9 POLL & SELECT ADDRESS LDKL A8,ECBDC ADR A8,CREBAS ST A1,ECBCW,A8 LDK A7,/B7 TRANSFER PARAMETERS LKM DATA 1 DCT100 EQU * LDK A7,/80 TEST IF ANY MESSAGE WITH WAIT LKM DATA 1 CF A14,GTRBUF GET RECEIVE BUFFER LDKL A8,ECBDC ADR A8,CREBAS CF A14,DCGETM LD A4,ECBBA,A8 CF A14,RLRBUF RELEASE BUFFER RB DCT100 * EJECT * * * SUBROUTINE ACTIVATED BY ALL TASKS * * EMULA EQU * ADR A8,CREBAS GET ECB ADDRESS ST A1,ECBCW,A8 STORE IN ECBDCT LDK A7,/B7 TRANSFER PARAMETERS LKM DATA 1 RTN A14 * EJECT * ***************************************************** * * VDUKB * * MAIN MODULE FOR KEYBOARD VDU * ******************************************************** VDUKB EQU * CF A14,I:EVA0 LDR TCABAS,A9 LOAD ASSEM TCA BASE IFT OFLIN=1 STR A12,A14 SAVE REGISTERS A12-A13 ON A14 STACK ST A13,-2,A14 SUKL A14,4 UPDATE STACK POINTER CM OFFFLG,TCABAS CF A14,LIOLOF TURN OFF OFF LINE LAMP XIF * EJECT ************************************************************** * * TRANSFER PARAMETER FOR MAIN FRAME #1 * ************************************************************* LDR* A4,TCABAS REL TASK NO AD A4,6,CREBAS 'CB1' ADDRESS LC A1,MF1KBV-1,A4 GET DV-ADDRESS ANK A1,/FF LDKL A8,ECBDC CF A14,EMULA IFT DCLIN=2 ************************************************************* * * TRANSFER PARAMETER FOR MAIN-FRAME #2 * ************************************************************* LC A1,MF2KBV-1,A4 GET DV ADDRESS ANK A1,/FF LDKL A8,ECBDC2 CF A14,EMULA XIF * EJECT VDU080 EQU * CF A14,ERASE ERASE SCREEN LDK A1,1 LDKL A1,LBVDU+1 ST A1,CURATT,TCABAS INITIATE WITH UNFORM. SCREEN CF A14,LMF1ON CM MAIN,TCABAS INDICATE MAIN-FRAME # 1 * EJECT * * RELATIVE POS IN ECBBLK KB EQU 2 DC1 EQU 4 IFT DCLIN=2 IFT COPCMD=1 DC2 EQU 6 ICR EQU 8 ECBBS EQU 4 XIF IFT DCLIN=2 IFF COPCMD=1 DC2 EQU 6 ECBBS EQU 3 XIF IFF DCLIN=2 IFT COPCMD=1 ICR EQU 6 ECBBS EQU 3 XIF IFF DCLIN=2 IFF COPCMD=1 ECBBS EQU 2 XIF * LDK A1,ECBBS ST A1,ECBBLK,TCABAS VDU100 EQU * LD A1,ECBBLK+DC1,TCABAS RF(NZ) VDU110 PENDING CF A14,DC1INQ TEST IF ANY MESSAGE, NO WAIT VDU110 EQU * IFT DCLIN=2 LD A1,ECBBLK+DC2,TCABAS RF(NZ) VDU120 PENDING CF A14,DC2INQ TEST IF ANY MESSAGE MF # 2, NO WAIT XIF VDU120 EQU * IFT COPCMD=1 LD A1,ECBBLK+ICR,TCABAS RF(NZ) VDU125 PENDING LDKL A3,ICWORK BUFFER ADR A3,TCABAS ADDRESS LDK A6,2 REQ LENGTH CF A14,ICREAD ST A8,ECBBLK+ICR,TCABAS XIF VDU125 EQU * LD A1,ECBBLK+KB,TCABAS RF(NZ) VDU150 PENDING CF A14,RDKBNW READ KEYBOARD NO WAIT VDU150 EQU * LDKL A7,ECBBLK ADR A7,TCABAS LKM DATA 7 MULTIPLE WAIT CW A8,ECBBLK+KB,TCABAS RF(E) KBINP INPUT FROM KEYBOARD IFT COPCMD=1 CW A8,ECBBLK+ICR,TCABAS RF(E) BUFCOP SEND BUFFER TO PRINTER XIF ST A8,ECBDCC,TCABAS SAVE ECB ADDRESS FOR CURRENT READ CF A14,DCINP INPUT FROM DC RB VDU100 * EJECT * * READ KEYBOARD WITH NO WAIT * RDKBNW EQU * LDKL A8,ECBKB ADR A8,CREBAS LDK A7,1 ST A7,ECBRL,A8 REQ LENGTH = 1 ST A7,ECBCW,A8 INDICATE NOT POWER OFF ST A8,ECBBLK+KB,TCABAS RF DC1I30 * * TEST IF ANY MESSAGE DC * DC1INQ EQU * LDKL A8,ECBDC ADR A8,CREBAS ST A8,ECBBLK+DC1,TCABAS DC1I20 EQU * LDK A1,0 CF A14,REQTIM LDK A7,0 DC1I30 EQU * LKM DATA 1 RTN A14 DC2INQ EQU * IFT DCLIN=2 LDKL A8,ECBDC2 ADR A8,CREBAS ST A8,ECBBLK+DC2,TCABAS RB DC1I20 XIF IFT COPCMD=1 * EJECT * * SEND BUFFER TO PRINTER TASK * BUFCOP EQU * CM ECBBLK+ICR,TCABAS LDKL A3,BVDU BUFFER ADR A3,TCABAS ADDRESS IFT COPL=1 * * CHECK IF COPY LOCK * LCR A2,A3 ANK A2,/18 XRK A2,/10 RB(Z) VDU100 DON'T COPY XIF IFT COPCMD=1 LDK A4,/8B ORDER: WRITE ADDRESSED WITH WAIT LD A5,ICWORK,TCABAS TASK ID LDKL A6,LBVDU REQ LENGTH CF A14,ICWRTE LD A1,KBINH,TCABAS ANK A1,/E NOT INHIBITED ANY LONGER ST A1,KBINH,TCABAS RB VDU100 XIF * EJECT ** KEYBOARD INPUT * KBINP EQU * CM ECBBLK+KB,TCABAS LD A2,ECBCW,A8 RF(Z) KBIN05 POWER OFF LD A2,ECBRC,A8 RF(0) KBIN10 KBIN05 EQU * LDK A7,4 RESET KEYBOARD BUFFER LKM DATA 1 RB VDU100 KBIN10 EQU * LD A1,KBINH,TCABAS ANK A1,1 RESETTING BY 'RESET' ALLOWED ? RB(NZ) KBIN05 NO LC* A2,ECBBA,A8 GET INPUT CHARACTER IFF KB6272=1 =5 CF A14,KEYCNV CONVERT KEY CODE =5 XIF =5 LD A1,KBINH,TCABAS ANK A1,6 MUST BE RESET KEY ? RF(Z) KBIN20 NO CWK A2,RSET RESET KEY ? RB(NE) KBIN05 NO KBIN20 EQU * LDR A5,A2 COPY INPUT CHARACTER SUK A5,/20 INDEX RB(N) VDU100 ILLEGAL CHAR CWK A5,/A7 RB(G) VDU100 ILLEGAL CHAR CF A14,DCABOR ABORT DC-READ TO ENABLE DC-WRITE LDR A7,A7 ABL(NZ) VDU100 DC COMPLETED, TAKE CARE OF MESSAGE ADR A5,A5 TO KEY TABLE * LDKL A8,ECBVDU ADR A8,CREBAS LD A1,RDMORE,TCABAS RF(Z) KBIN30 * CFR A14,A1 ABL VDU100 * KBIN30 EQU * CFI A14,KEYTAB,A5 BRANCH TO RESPECTIVE INPUT HANDLER ABL VDU100 * EJECT * * ABORT DC-REQUEST TO ENABLE WRITE * DCABOR EQU * LDK A7,0 LDKL A8,ECBDC IFT DCLIN=2 LD A1,MAIN,TCABAS RF(NZ) DCAB05 XIF CM ECBBLK+DC1,TCABAS IFT DCLIN=2 RF DCAB10 DCAB05 EQU * CM ECBBLK+DC2,TCABAS LDKL A8,ECBDC2 DCAB10 EQU * XIF ADR A8,CREBAS LKM DATA 10 RTN A14 * EJECT * * SET REQUEST TIMER * A1 = TIME OUT VALUE * A8 = ECB ADDRESS * REQTIM EQU * ST A1,ECBCW,A8 LDK A7,/B9 LKM DATA 1 RTN A14 * EJECT * * ********************************************************** * * RETURN * ************************************************************** * RETURN RTN A14 * EJECT * ******************************************************* * * CRLEFT * * THIS MODULE MOVES THE CURSOR ONE POS TO LEFT * ******************************************************* * CRLEFT EQU * LD A2,PCURS,TCABAS GET CURSOR BINARY SUK A2,1 RF(NN) CRL050 NOT LEFTMOST POS LDKL A2,LBVDU-1 CRL050 RF CRH100 * ******************************************************** * * CRRIGT * * THIS MODULE MOVES THE CURSOR ONE POS. TO THE RIGHT * ******************************************************** * * A3=CHARACTER * CRRIGT EQU * LD A2,PCURS,TCABAS GET CURSOR BINARY ADK A2,1 CWK A2,LBVDU END OF BUFFER? RF(L) CRR050 NO LDK A2,0 CRR050 RF CRH100 * EJECT * *********************************************************** * * CRDOWN * * THE MODULE MOVES THE CURSOR TO NEXT ROW. SAME COLUMN. * ************************************************************ * CRDOWN EQU * LD A2,PCURS,TCABAS GET CURSOR POS ADKL A2,LLINE CWK A2,LBVDU LAST LINE? RF(L) CRD050 NO SUKL A2,LBVDU CRD050 RF CRH100 * ************************************************************** * * CRUP * * MOVE CURSOR ONE LINE UP. SAME COL. * ************************************************************** * CRUP EQU * LD A2,PCURS,TCABAS GET CURSOR BINARY SUKL A2,LLINE RF(NN) CRU050 UPMOST LINE ADKL A2,LBVDU CRU050 RF CRH100 * EJECT * ****************************************************** * * CRHOME * * HOME POSITIONING OF CURSOR * ****************************************************** * CRHOME EQU * LDK A2,0 CRH100 EQU * ST A2,PCURS,TCABAS GET CURSOR BINARY CF A14,ATMASB UPDATE ATTRIB CF A14,SETCUR DISPLAY CURSOR RTN A14 * EJECT * ***************************************************** * * CRNL * * CURSOR IN FIRST UNPROTECTED POS ON NEW LINE * ***************************************************** * CRNL EQU * LD A2,PCURS,TCABAS GET CURSOR POS ADKL A2,LLINE NEXT LINE CWK A2,LBVDU RF(L) CRN050 LDK A2,0 WRAP AROUND * * COMPUTE LEFTMOST POS * CRN050 LDK A1,0 CRN100 SUKL A2,LLINE RF(N) CRN120 ADKL A1,LLINE RB CRN100 CRN120 ST A1,PCURS,TCABAS STORE CURSOR ADDRESS * EJECT ****************************************************************** LDR A2,A1 CF A14,ATMASB SEARCH ATTRIBUTE BACKWARDS SUK A1,1 RF(Z) CRN130 NO ATTRIBUTE FOUND ANK A3,/10 RF(NZ) TAB PROTECTED FIELD CW A2,PCURS,TCABAS CURSOR ON ATTRIBUTE ?? RF(NE) CRN150 NO!! CWK A2,1919 LAST SCREEN POSITION?? RF(NE) CRN140 NO!! CRN130 LDKL A2,-1 CRN140 ADK A2,1 ST A2,PCURS,TCABAS CRN150 CF A14,SETCUR POSITION CURSOR RTN A14 ******************************************************************* * EJECT * **************************************************** * * TAB * * MOVE THE CURSOR TO THE FIRST CHAR. LOCATION * OF THE NEXT UNPROTECTED DATA FIELD * **************************************************** * * A1=END OF BUFFER PAREM. 0=EOB NOT REACHED * 2=EOB * 3=ATTRIB. IN EOB POS * A2=CURSOR BINARY ADDRESS * A3=CHARACTGR * TAB EQU * LDK A5,1 LD A2,PCURS,TCABAS GET CURSOR POS TAB100 CF A14,ATMASF SEARCH ATTRIBUTE CWK A1,0 END OF BUFFER? RF(G) TAB300 YES ADK A2,1 TAB150 ANK A3,/10 UNPROTECTED? RF(E) TAB200 YES RB TAB100 NEXT ATTRIB. TAB200 ST A2,PCURS,TCABAS CF A14,SETCUR DISPLAY NEW CURSOR RTN A14 TAB300 LDK A2,0 CWK A1,3 ATTRIBUTE IN LAST POSITION ?? * EJECT ******************************************************** RF(NE) TAB350 NO!! ANK A5,1 WHOLE BUFFER CONTROLLED ?? RB(Z) TAB200 YES!! SUR A5,A5 RB TAB150 CHECK ATTRIBUTE TAB350 EQU * ******************************************************** ANK A5,1 WHOLE BUFF. CONTROLED? RF(G) TAB400 NO RB TAB200 ALL PROT. OR NON-FORMATTED BUFF. TAB400 LDK A5,0 RB TAB100 * EJECT * *********************************************************** * * DUP * * DUPLICATE KEY * OPERATION OF THIS KEY CAUSES A UNIQUE CHARACTER CODE * TO BE ENTERED INTO THE DISPLAY BUFFER AND A STANDARD * TAB KEY OPERATION TO BE PERFORMED * ************************************************************ * DUP EQU * LD A1,MODE,TCABAS INSERT MODE ?? ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INSERT MODE LDK A2,DUPCH LD A3,ECBKB+ECBBA,CREBAS GET KB BUFF. ADDR. SCR A2,A3 CF A14,NUM CF A14,TAB RTN A14 * EJECT * *********************************************************** * * FIELD MARK * * OPERATION OF THIS KEY CAUSES A UNIQUE CHARACTER CODE * TO BE ENTERED IN THE DISPLAY BUFFER IN ADDITION * TO THE DC CHARACTER TRANSMITTED * ********************************************************** * FLDMRK EQU * LD A1,MODE,TCABAS INSERT MODE?? ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INSERT MODE LDK A2,FMCH LD A3,ECBKB+ECBBA,CREBAS GET KB BUFFER ADDR. SCR A2,A3 CF A14,NUM RTN A14 * EJECT * ********************************************************** * * RDHOME * * READY HOME KEY * OPERATION OF THIS KEY CAUSES THE CURSOR TOBE * POSITIONED AT THE FIRST UNPROTECTED CHARACTER * ON THE SCREEN * ******************************************************** * RDHOME LDKL A4,BVDU ADR A4,TCABAS VDU BUFFER ADDRESS LC A2,1919,A4 GET LAST SCREEN CHARACTER ANK A2,/7F CWK A2,/20 RF(NL) RDH10 ANK A2,/10 ABL(Z) CRHOME UNPROTECTED FIELD RDH10 CM PCURS,TCABAS CF A14,TAB SEARCH 1ST UNPROTECTED FIELD RTN A14 * EJECT * ***************************************************** * * BAKTAB * * MOVE THE CURSOR TO THE FIRST CHARACTER LOCATION * OF THE NEXT PRECIDING UNPROTECTED DATA FIELD * **************************************************** * * A2=CURSOR BINARY ADDRESS * A3=CHARACTER BAKTAB EQU * LDK A5,1 LD A2,PCURS,TCABAS GET CURSOR POS CF A14,GBUFFC GET BUFF CHAR. CWK A3,/1F ATTRIB. CHAR? RF(NG) BAK100 YES CWK A2,0 UPPER LEFTMOST POS? RF(E) BAK400 YES SUK A2,1 BAK100 CWK A2,0 UPPER LEFTMOST POS? RF(E) BAK400 YES BAK200 SUK A2,1 CF A14,ATMASB SEARCH ATTRIBUTE ************************************************************ SUK A1,1 RF(Z) BAK400 NO ATTRIBUTE RF(N) BAK250 ATTRIBUTE FOUND. NOT IN LAST POS. SUR A2,A2 ATTRIBUTE FOUND IN LAST POSITION RF BAK300 BAK250 EQU * ********************************************************* ANK A3,/10 PROTECTED? RB(NE) BAK100 YES ADK A2,1 BAK300 ST A2,PCURS,TCABAS CF A14,SETCUR SET CURSOR RTN A14 BAK400 SUK A5,1 WHOLE BUFF CONTROLLED? RB(NZ) BAK300 YES LDKL A2,LBVDU-1 END BUFFER ADDRESS CF A14,GBUFFC GET BUFF CHAR. CWK A3,/1F ATTRIBUTE CHAR? RB(G) BAK200 NO ANK A3,/10 PROTECTED? RB(NE) BAK200 YES ST A3,ATTRIB,TCABAS UPDATE NEW ATTRIBUTE ST A2,CURATT,TCABAS *************************************************************** RB BAK200 **************************************************************** * EJECT * ********************************************************* * * CHAR * * ALPHABETIC AND SPECIAL CHAR UPDATING AND DISPLAYING * ********************************************************* * LCASPW EQU * SUK A2,/50 CONVERT TO LOWER CASE P - W SC* A2,ECBKB+ECBBA,CREBAS * CHAR EQU * LD A2,PCURS,TCABAS GET CURSOR POS LD A3,CURATT,TCABAS GET ATTRIBUTE ADDRESS CWR A2,A3 CURSOR ON ATTRIB? RF(E) CHA300 YES CHA100 LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR LDR A4,A3 ANK A4,/10 PROTECTRED FIELD? RF(NE) CHA300 YES CHA200 LDR A4,A3 ANK A4,/8 NUMERIC FIELD? RF(E) ANCOMM NO CHA300 ABL ERROR NOT ALLOWED DISPLAY POS * EJECT *************************************************************** * * Z E R O : 3 TRIPLE ZERO KEY * Z E R O : 2 DOUBLE ZERO KEY * ************************************************* ZERO:3 EQU * LDK A1,X'30' CHARACTER ZERO SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER CF A14,NUM DISPLAY CHARACTER ZERO:2 EQU * LDK A1,X'30' CHARACTER ZERO SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER CF A14,NUM DISPLAY CHARACTER CF A14,NUM DISPLAY CHARACTER RTN A14 RETURN * ********************************************************** * * NUM * * DISPLAY AND UPDATE NUMERICS * ********************************************************** * NUMCOM EQU * LDK A2,/2C SC* A2,ECBKB+ECBBA,CREBAS * NUM EQU * LD A2,PCURS,TCABAS GET CURSOR POS LD A3,CURATT,TCABAS GET ATTRIBUTE ADDRESS CWR A2,A3 CURSOR ON ATTRIBUTE? RF(E) NUM200 YES NUM100 LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR LDR A4,A3 ANK A4,/10 PROTECTED FIELD? RF(E) ANCOMM NO NUM200 ABL ERROR NOT ALLOWED DISPLAY POS * EJECT * ********************************************************** * * ANCOMM * * COMMON SUBMODULE FOR ALPHANUMERIC CHAR. DISPLAYING AND * UPDATING * ********************************************************** * ANCOMM EQU * LC* A4,ECBKB+ECBBA,CREBAS =1 ANC005 EQU * LDKL A6,BVDU ADR A6,TCABAS ADR A6,A2 LD A1,MODE,TCABAS INSERT MODE ?? RF(NZ) ANC010 YES!! SCR A4,A6 UPDATE VDU BUFF ANC010 LDR A7,A6 SAVE CURSOR POSITION LD A5,CURATT,TCABAS CWK A5,LBVDU+1 UNFORMATTED SCREEN? RF(E) ANC100 YES SUR A6,A2 BVDU START ADDR. ADR A6,A5 ATTRIB. POS LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR ORK A3,1 MDT-BIT ON SCR A3,A6 ANC100 EQU * IFT IN:DL=1 =3 LD A1,MODE,TCABAS INSERT MODE ?? RF(Z) ANC120 NO!! LCR A1,A7 GET CHARACTER AT CURSOR POSITION ANK A1,/7F CWK A1,NULL NULL?? RF(NE) INS:10 NO!! SCR A4,A7 STORE INPUT CHARACTER XIF =3 ANC120 EQU * LDK A5,/2B CURSOR NOT MOVED BEFORE DISPLAYING LD A1,ECBVDU+ECBBA,CREBAS SC A5,1,A1 =1 LDK A5,/1E ADK A1,2 NEXT POS SCR A5,A1 LOW INT, STORE IN BUFFER LDR A6,A3 ANK A3,/4 STANDARD DISPLAYING? RF(Z) ANC200 YES ANK A6,/2 INTENSIFIED DISPLAYING? RF(Z) ANC150 YES LDK A2,/20 LOAD SPACE RF ANC250 NON DISPLAYING ANC150 LDK A5,/1F SET HIGH INTENSITY SCR A5,A1 STORE IN BUFFER ANC200 LDR A2,A4 UPDATE A2 WITH CHAR ANC250 CF A14,WCHAR DISPLAY CHAR AND CURSOR LD A2,PCURS,TCABAS GET CURSOR POS ADK A2,1 ANC252 EQU * CWK A2,LBVDU RF(NE) ANC255 LDKL A2,0 ANC255 EQU * ST A2,PCURS,TCABAS CF A14,GBUFFC GET BUFFER CHAR CWK A3,/1F ATTRIBUTE CHAR? RF(G) ANC300 NO CF A14,TAB SKIP TO NEXT UNPROTECTED ANC300 EQU * LD A1,ECBCW,A8 CONTROL WORD ANK A1,X'FF' LINE POSITION SUK A1,80 LAST POSITION ON LINE ?? RF(NZ) ANC350 NO!!! CF A14,SETCUR POSITION CURSOR TO 1:ST POS. NEXT LINE ANC350 EQU * RTN A14 IFT IN:DL=1 * EJECT *************************************************** * * DELETE CHARACTER AT CURSOR POSITION. SHIFT CARACTERS * AT SAME LINE ONE POSITION TO THE LEFT * ************************************************************ DELETE EQU * LDKL A6,-1 LD A2,PCURS,TCABAS CURSOR ADDRESS DEL:10 ADK A6,80 END OF LINE POINTER CWR A6,A2 LAST POSITION ON CURRENT LINE?? RB(L) DEL:10 NO!! TRY NEXT LINE CF A14,S:ATT SEARCH ATTRIBUTE FORWARD SUK A1,2 ATTRIBUTE FOUND ?? RF(Z) DEL:20 NO!! CWR A2,A6 ATTRIBUTE AFTER END OF LINE ?? RF(G) DEL:20 YES!! SUK A2,1 SKIP ATTRIBUTE LDR A6,A2 DEL:20 LDR A2,A6 LDK A1,BVDU ADR A1,TCABAS ABSOLUTE BUFFER ADDRESS ADR A2,A1 END OF FIELD/LINE AD A1,PCURS,TCABAS CURSOR POSITION DEL:30 CWR A2,A1 ALL CHARACTERS SHIFTED ?? RF(E) DEL:40 YES!! LC A3,1,A1 GET CHARACTER ORK A3,/80 SET MODIFIED BIT SCR A3,A1 SHIFT CHARACTER 1 POS. LEFT ADK A1,1 RB DEL:30 GET NEXT CHARACTER DEL:40 LDK A3,NULL+/80 NULL CHARACTER SCR A3,A2 STORE AT END OF FIELD/LINE LD A3,ATTRIB,TCABAS ATTRIBUTE ORK A3,1 SET MODIFIED FIELD BIT LD A1,CURATT,TCABAS CURRENT ATTRIBUTE ADDRESS CWK A1,LBVDU+1 UNFORMATTED SCREEN ??? RF(E) INS:60 YES!!! ADKL A1,BVDU ADR A1,TCABAS ABSOLUTE ATTRIBUTE ADDRESS SCR A3,A1 SAVE NEW ATTRIBUTE RF INS:60 DISPLAY MODIFIED FIELD * EJECT ************************************************************** * * INSERT CHARACTER AT CURSOR POSITION. SHIFT CHARACTERS IN * SAME FIELD , EXCEPT NULLS, ONE POSITION TO THE RIGHT * **************************************************** INSERT EQU * IM MODE,TCABAS SET INSERT MODE CF A14,LIOLON TURN ON "INSERT MODE" LAMP RTN A14 INS:10 LDR A6,A7 LDR A9,A4 CWK A5,LBVDU+1 UNFORMATTED SCREEN?? RF(NE) INS:20 NO!! LDKL A2,LBVDU-1 RF INS:30 INS:20 CF A14,S:ATT SEARCH ATTRIBUTE FORWARD SUK A1,2 ATTRIBUTE FOUND ?? RF(Z) INS:30 NO!! SUK A2,1 INS:30 ADR A2,TCABAS ADK A2,BVDU ADD BUFFER DISPLACEMENT IN WORK-BLOCK CF A14,S:NULL SEARCH FIRST NULL CHARACTER INS:40 CWR A2,A6 ALL CHARACTERS SHIFTED ?? RF(E) INS:50 YES!! LC A3,-1,A2 GET CHARACTER ORK A3,/80 SET MODIFIED BIT SCR A3,A2 SHIFT CHAR ONE POS TO RIGHT SUK A2,1 RB INS:40 GET NEXT CHARACTER INS:50 ORKL A9,/80 SET MODIFIED BIT SCR A9,A6 SAVE INPUT CHARACTER IN BUFFER IM PCURS,TCABAS INCREMENT CURSOR POSITION INS:60 EQU * CF A14,DISPL DISPLAY MODIFIED FIELDS LD A2,PCURS,TCABAS CURSOR POSITION RB ANC252 XIF * EJECT ********************************************************** * * SEARCH FIRST NULL CHARACTER AFTER CURSOR POS * ****************************************************** S:NULL EQU * LDR A1,A6 S:NU10 CWR A1,A2 RF(E) S:NU30 LCR A3,A1 GET CHARACTER ANK A3,/7F MASK AWAY MODIFIED BIT CWK A3,NULL NULL CHARACTER RF(E) S:NU20 YES!! ADK A1,1 RB S:NU10 CHECK NEXT BUFFER CHARACTER S:NU20 LDR A2,A1 ADDRESS OF FIRST NULL S:NU30 RTN A14 * EJECT * ********************************************************* * * CANCEL * * PROGRAM ATTENTION KEY WHICH CAUSES AN I/O OPERATION * AND GENERATE AN AID CHARACTER * ********************************************************* * CANCEL EQU * PA2 EQU * LDK A2,/2E CANCEL POS CAN100 EQU * LC A2,TASCII,A2 GET ASCII CODE CAN200 EQU * CF A14,LINHON TURN ON "KEYBOARD INHIBIT" CF A14,TRPA UPDATE AID AND TRANSMIT RTN A14 * IFT PAX=1 * * * PROGRAM ATTENTION KEY IS PRESSED AND NUMBER WILL BE INSERTED TO * DEFINE ONE OF THE FUNCTIONS UNDER PA1.CANCEL OR PA3 * * PAEX EQU * LDKL A1,PAEXA ST A1,RDMORE,TCABAS RTN A14 PAEXA EQU * CM RDMORE,TCABAS SUK A2,/31 CHECK IF NUM.1-3 RF(L) PFERR ILLEGAL CHAR. SUK A2,/2 CHECK IF NUM.1-3 RF(G) PFERR ILLEGAL CHAR. RF(Z) PA3 ADK A2,1 RB(Z) PA2 RF PA1 RTN A14 RETURN TO MAIN READ LOOP XIF * EJECT * * PA1 PROGRAM ATTENTION KEY * * PA1 EQU * LDK A2,/2C PA1 POS RB CAN100 * * * PA3 PROGRAM ATTENTION KEY * * PA3 EQU * LDK A2,/2B PA3 POS RB CAN100 * * PA4 - PA10 (ALFASKOP) * PA410 EQU * SUK A2,/20 RB CAN200 * EJECT * ******************************************************** * * ENTER * * PROGRAM FUNCTION KEY WHICH CAUSES AN I/O OPERATION * AND GENERATE AN AID CHARACTER FOLLOWED BY AN SBA ORDER * ATTRIBUTE ADDRESS AND TEXT FOR EACH MODIFIED FIELD * NULLS ARE SUPRESSED * ********************************************************* * ENTER EQU * LDK A2,/3D ENTER POS ENT100 EQU * LC A2,TASCII,A2 CONVERT TO ASCII CF A14,LINHON TURN ON "KEYBOARD INHIBIT" CF A14,TRPF AID+MODIFIED FIELDS+TRANSMIT ENT200 EQU * RTN A14 * IFT PFX=1 * * * PROGRAM FUNCTION KEY IOS PRESSED AND NUMBER WILL BE INSERTED TO * DEFINE ONE OF THE FUNCTIONS UNDER PF1-PF12 * * PFEX EQU * LDKL A1,PFEXA RF PFNXT PFEXA EQU * CM RDMORE,TCABAS SUK A2,/30 LEGAL CHAR ? RF(L) PFERR ILLEGAL,GO TO ERR.HANDLING RF(Z) PF0 FIRST NUM. 0 GO TO PF0 SUK A2,/1 FIRST NUM. 1 ? RF(G) PFERR ILLEGAL NUM. LDKL A1,PF1A RF PFNXT PF1A EQU * CM RDMORE,TCABAS SUK A2,/30 LEGAL NUM.? RF(L) PFERR ILLEGAL GO TO ERR.HANDLING SUK A2,/2 LEGAL NUM ? RF(G) PFERR ILLEGAL GO TO ERR.HANDLING ADK A2,/3C PF10-12 POS RB ENT100 PF0 EQU * LDKL A1,PF0A PFNXT EQU * ST A1,RDMORE,TCABAS RTN A14 PF0A EQU * CM RDMORE,TCABAS SUK A2,/31 LEGAL NUM ? RF(L) PFERR ILLEGAL GO TO ERR.HANDLING SUK A2,/8 LEGAL NUM ? RF(G) PFERR ILLEGAL GO TO ERR.HANDLING ADK A2,/39 PF1-9 POS RB ENT100 XIF PFERR EQU * CF A14,ERROR GO TO ERR-HANDLING RUTIN RTN A14 GO TO MAIN READ MODULE PF EQU * SUK A2,/5C RB ENT100 IFT OFLIN=1 * EJECT ************************************************************ * * OFLINE * THE OFFLINE SWITCH "OFFFLG" IS SET = 1 AND * A BRANCH IS MADE BACK TO CREDIT PROGRAM * ************************************************************* OFLINE EQU * CF A14,CLEAR OFLI05 EQU * CF A14,RESET IFT DCLIN=2 LD A7,MAIN,TCABAS XRK A7,1 ST A7,MAIN,TCABAS CF A14,DCABOR ABORT REQUEST NOT CURRENT MF XIF IFT OFLIN=1 LDK A1,0 DV ADDRESS ::= 0MESSAGES TO VDU IGNORED LDKL A8,ECBDC MF # 1 CF A14,EMULA TRANSFER PARAMETERS IFT DCLIN=2 LDKL A8,ECBDC2 MF # 2 CF A14,EMULA TRANSFER PARAMETERS XIF IFT OFLIN=1 CF A14,LMF1OF CF A14,LMF2OF CF A14,LSAVOF CF A14,LIOLON TURN ON OFFLINE LAMP IM OFFFLG,TCABAS SET OFFLINE FLAG ADKL A14,4 SKIP ONE STACK LEVEL LD A13,2,A14 RELOAD REGISTERS A12-A13 LD A12,4,A14 ADKL A14,4 UPDATE STACK POINTER ABL I:RT1 RETURN TO "OFFLINE" PROGRAM XIF IFT DCLIN=2 * EJECT *********************************************************** * * MAINFRAME CHANGE * THE SWITCH 'MAIN' IS CHANGED, AND THE APPROPRIATE 'SYSTEM' LAMP * IS TTURNED ON * ********************************************************************* * MFCHGE EQU * CF A14,CLEAR MFCH05 EQU * CF A14,RESET CF A14,LMF1OF CF A14,LMF2OF CF A14,LSAVOF LD A1,MAIN,TCABAS XRK A1,1 RF(NZ) MFCH10 CF A14,LMF1ON RF MFCH90 MFCH10 EQU * CF A14,LMF2ON MFCH90 EQU * ST A1,MAIN,TCABAS RTN A14 XIF * EJECT * ******************************************************** * * CLEAR * * PROGRAM ATTENTION KEY WHICH CAUSES AN I/O OPERATION * AND GENERATE AN AID CHARACTER. THE ENTIRE DISPLAY * BUFFER IS CLEARED TO NULLS AND CURSOR IS LOCATED IN * HOME POS * ******************************************************** * CLEAR EQU * LDK A2,/2D POS FOR 'CLEAR' LC A2,TASCII,A2 CF A14,LINHON TURN ON "KEYBOARD INHIBIT" CF A14,TRPA UPDATE AID AND TRANSMIT CF A14,ERASE ERASE ENTIRE SCREEN RTN A14 * EJECT * ************************************************************ * * EREOF * * ERASE TO END OF FIELD * ************************************************************ * EREOF EQU * LDK A6,1 LD A3,ATTRIB,TCABAS GET ATTRIBUTE ANK A3,/10 UNPROTECTED? RF(E) ERE100 YES ABL ERROR ERE100 LD A2,PCURS,TCABAS ************************ 77.06.01 CW A2,CURATT,TCABAS STANDING ON ATTRIBUTE ?? ABL(E) ERROR YES!! TURN ON ERROR LAMP ************************ 77.06.01 ERE150 CF A14,GBUFFC GET BUFF. CHAR CWK A3,/1F ATTRIBUTE CHAR RF(G) ERE200 NO ERE160 LDR A1,A2 LD A3,PCURS,TCABAS ERE170 EQU * LDKL A4,BVDU ADR A4,TCABAS ADR A4,A3 CF A14,ERASUA ERASE AND REPLASE WITH NULLS CF A14,DISPL DISPLAY ERASED SCREEN * * SET MDT BIT IF FORMATTED SCREEN * LD A2,CURATT,TCABAS CWK A2,LBVDU+1 RF(E) ERE180 UNFORMATTED SCREEN ADK A2,BVDU ADR A2,TCABAS ABSOLUTE ATTRIBUTE ADDRESS LCR A1,A2 GET ATTRIBUTE ORK A1,1 SET MDT BIT SCR A1,A2 ERE180 EQU * RTN A14 ERE200 CWK A2,LBVDU-1 END OF BUFFER? RF(E) ERE300 YES ADK A2,1 RB ERE150 NEXT ERE300 SUK A6,1 WHOLW BUFF CONTROLED? RB(N) ERE160 LDK A2,0 WRAP AROUND. RB ERE150 * EJECT * ******************************************************** * * ERINPT * * CLEARS ALL UNPROTECTED CHARACTER LOCATIONS TO NULLS * AND REPOSITIONS THE CURSOR TO THE FIRST UNPROTECTED * CHAR LOCATION ON THE SCREEN * ******************************************************* * ERINPT EQU * CF A14,ERASUP ERASE ALL UNPROTECTED CF A14,DISPL LD A2,PCURS,TCABAS CF A14,ATMASB ********************************************************* SUK A1,1 RF(Z) ERI:10 NO ATTRIBUTE FOUND RF(N) ERI:5 ATTRIBUTE NOT IN LAST POSITION LDKL A2,-1 ATTRIBUTE IN LAST POSITION ERI:5 EQU * ********************************************************** ADK A2,1 ERI:10 EQU * ST A2,PCURS,TCABAS RTN A14 * EJECT * ************************************************************ * * ERROR * * THE MODULE TAKES CARE OF UNALLOWED KEYS * *********************************************************** * ERROR EQU * CF A14,LERRON TURN ON 'ERROR' LAMP LD A5,KBINH,TCABAS ORK A5,4 BIT 13:=1,ERROR HANDLING.RESET ALLOWED ST A5,KBINH,TCABAS * * TURN ON SOUND ALARM * LDKL A8,ECBVDU ADR A8,CREBAS VDU-ECB ADDRESS LD A2,ECBBA,A8 BUFFER ADDRESS LDK A7,X'2B' CONTROL CHARACTER SC A7,1,A2 LDK A7,X'07' BELL CHARACTER SC A7,2,A2 LDK A7,3 REQUESTED LENGTH ST A7,ECBRL,A8 LDK A7,X'86' SOUND ALARM LKM DATA 1 RTN A14 IFT KEYLST=1 * EJECT ****************************************************************** * * KEY LOCK STATUS IS SET IN 'KEYS' * ON ENTRY A2 = KEY LOCK VALUE /70-/77 * ****************************************************************** * KEYL EQU * SUK A2,/78 GET NEG KEY LOCK VALUE LD A3,KEYS,TCABAS OLD STATUS LDK A4,/10 KEYL10 EQU * SRL A4,1 ADK A2,2 1 = OFF,0 = ON RB(N) KEYL10 ANR A3,A4 CHECK OLD KEY POS RF(NZ) KEYL20 WAS ON LDR A2,A2 WAS OFF RF(NZ) KEYL99 NOW OFF, NO CHANGE RF KEYL30 NOW ON KEYL20 EQU * WAS ON LDR A2,A2 RF(Z) KEYL99 NOW ON, NO CHANGE KEYL30 EQU * CHANGE LD A3,KEYS,TCABAS XRR A3,A4 CHANGE STATUS ST A3,KEYS,TCABAS STORE NEW STATUS * * KEYLOCK STATUS CHANGED * A3 = NEW STATUS, RIGHTMOST BIT = RIGHTMOST LOCK, BIT ON = LOCK ON * A4 = KEYLOCK CHANGED, LAYOUT AS A3 * A2 = 1, IF CHANGED TO OFF ELSE 0 * * INSERT USER ROUTINE BELOW THIS LINE * KEYL99 EQU * RTN A14 XIF * EJECT * ******************************************************** * * LAMPMODULE * * ******************************************************** * LON EQU /B7 LOF EQU /B8 IFT KB6272=1 LMF1 EQU /20 LMF2 EQU /10 LIOL EQU 8 LINH EQU 4 LERR EQU 2 LSAV EQU 1 XIF IFF KB6272=1 LMF1 EQU 0 =2 LMF2 EQU 0 =2 LIOL EQU 1 =2 LINH EQU 2 =2 LERR EQU 4 =2 LSAV EQU 8 =2 XIF LMF1ON LDK A3,LMF1 RF LMPON LMF1OF LDK A3,LMF1 RF LMPOF LMF2ON LDK A3,LMF2 RF LMPON LMF2OF LDK A3,LMF2 RF LMPOF LIOLON LDK A3,LIOL RF LMPON LIOLOF LDK A3,LIOL RF LMPOF LINHON LDK A3,LINH RF LMPON LINHOF LDK A3,LINH RF LMPOF LERRON LDK A3,LERR RF LMPON LERROF LDK A3,LERR RF LMPOF LSAVON LDK A3,LSAV RF LMPON LSAVOF LDK A3,LSAV RF LMPOF * LMPON LDK A7,LON RF SDISP LMPOF LDK A7,LOF RF SDISP * EJECT * ******************************************************** * * SDISP * * SIGNAL DISPLAY MONITOR REQUEST * ******************************************************** * SDISP EQU * LDKL A8,ECBSD ADR A8,CREBAS ST A3,ECBCW,A8 LKM DATA 1 RTN A14 * EJECT * ******************************************************** * * ATMASB * * SEARCH FOR ATTRIBUTE CHAR BACKWARDS AND MASK IT * ******************************************************** * * A2=CURSOR BINARY ADDRESS * A1=BUFFER SCANNING PARAM. * 0=ATTRIB FOUND 1=END OF BUFFER LEFT * 2= ATTRIBUTE IN LAST POSITION * ATMASB EQU * LDK A1,0 ASB05 EQU * CF A14,GBUFFC GET BUFFER CHAR CWK A3,/1F ATTRIB. CHAR. RF(G) ASB10 NO ASB08 ST A3,ATTRIB,TCABAS ST A2,CURATT,TCABAS CURSOR ON ATTRIBUTE RTN A14 ASB10 CWK A2,0 END OF BUFFER RF(E) ASB20 YES SUK A2,1 RB ASB05 NEXT ASB20 EQU * * EJECT ************************************************* LDK A1,2 ATTRIBUTE IN LAST POS. LDKL A2,1919 LAST BUFFER POSITION CF A14,GBUFFC GET CHARACTER CWK A3,/1F ATTRIBUTE ??? RB(NG) ASB08 YES!!! SUR A2,A2 FIRST SCREEN POS. ********************************************* LDK A1,1 END BUFFER LEFT CM ATTRIB,TCABAS LDKL A7,LBVDU+1 ST A7,CURATT,TCABAS POSSIBLY UNFORMATTED SCREEN RTN A14 * EJECT * ******************************************************** * * ATMASF * * SEARCH FOR ATTRIBUTE CHAR. FORWARDS AND MASK IT * ********************************************************* * * A3=CHARACTER * A2=CURSOR BINARY ADDRESS * A1=BUFFER SCANNING PARAM. * 0=ATTRIB FOUND 2=END OF BUFFER RIGHT * A3=ATTRIB IN LAST BUFF POS * S:ATT EQU * LD A7,ATTRIB,TCABAS LD A8,CURATT,TCABAS CF A14,ATMASF SEARCH ATTRIBUTE FORWARD ST A7,ATTRIB,TCABAS ST A8,CURATT,TCABAS RTN A14 ATMASF EQU * LDK A1,0 ASF05 EQU * CF A14,GBUFFC GET BUFFER CHAR CWK A3,/1F ATTRIB CHAR? RF(G) ASF10 NO ************************************************************ CWK A2,LBVDU-1 EOB +ATTRIB IN LAST POS ************************************************************ RF(NE) ASF08 NO LDK A1,3 ASF08 ST A3,ATTRIB,TCABAS ST A2,CURATT,TCABAS CURSOR ON ATTRIBUTE RTN A14 ASF10 CWK A2,LBVDU-1 END OF BUFFER? RF(L) ASF20 NO LDK A1,2 RTN A14 ASF20 ADK A2,1 RB ASF05 * EJECT * ************************************************** * * GBUFFC * * GET VDU BUFFER CHAR WHICH IS INDICATED BY CURSOR * ************************************************** * * A2=CURSOR BINARY ADDR * A3=CHARACTER * * GBUFFC EQU * LDK A3,0 LDKL A4,BVDU ADR A4,TCABAS GET VDU BUFFER ADR A4,A2 LCR A3,A4 GET CHARACTER IN BUFF. RTN A14 * EJECT * ************************************************************ * * RESET * * RESET 'KEYBOARD INHIBIT' IN FOLLOWING SITUATIONS: * 1- A DEVICE WITH AN ATTACHED KEYBOARD IS EXECUTING * A COMMAND. BIT 14=1 IN KBINH * 2- A PA-KEY OPERATION IS IN PROCESS PRIOR TO * INITIATION OF A COMMAND FOR A DEVICE WITH AN ATTACHED * KEYBOARD. BIT 14=1 IN KBINH * 3- ERRORSITUATION. BIT 14=1 IN KBINH * * IF BIT 15=1 IN KBINH => NO RESETTING ALLOWED DURING * UPDATE AND DISPLAY SITUATION. * *********************************************************** * RESET EQU * CM MODE,TCABAS RESET INSERT MODE CF A14,LIOLOF TURN OFF "INSERT" LAMP CM KBINH,TCABAS RESSTORE KEYBOARD CF A14,LERROF TURN OFF 'ERROR' LAMP CF A14,LINHOF TURN OFF 'KEYBOARD INHIBIT' LAMP RTN A14 * EJECT *************************************************************** * * C O P Y : COPY CONTENTS IN VDU BUFFER ON * HARDCOPY DEVICE * ************************************************************ COPY EQU * LD A5,COPNO,TCABAS ABL(Z) ERROR LDKL A3,BVDU BUFFER ADR A3,TCABAS ADDRESSS LDKL A6,LBVDU REQ LENGTH LDK A4,/8B ORDER = WRITE ADDRESSED WAIT * EJECT * * WRITE INTERTASK COMMUNICATION * * A3 = BUFFER ADDRESS * A4 = ORDER * A5 = "TO-TID" * A6 = REQ LENGTH * ICWRTE EQU * LDKL A8,ECBICW ADR A8,CREBAS LDKL A1,-1 CF A14,REQTIM NO TIME OUT SUPERVISION ST A5,ECBCW,A8 TO TASK ID ST A6,ECBRL,A8 REQ LENGTH ST A3,ECBBA,A8 LDR A7,A4 ORDER LKM DATA 1 RTN A14 END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT START REL 2.1*79-10-20 870150540210 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0060 Head {h00=0x001e, h01=0x0050, text=» =1, ODD BUFFER ADDRESS «, t00=0x0000, t01=0x0042}
0x0060…007c Head {h00=0x0018, h01=0x0050, text=» REL 2.1 79-05-23 «, t00=0x0000, t01=0x0064}
0x007c…0096 Head {h00=0x0016, h01=0x0050, text=» =2, 6234 LAMPS «, t00=0x0000, t01=0x0080}
0x0096…00b2 Head {h00=0x0018, h01=0x0050, text=» REL 2.1 79-05-23 «, t00=0x0000, t01=0x009a}
0x00b2…00d0 Head {h00=0x001a, h01=0x0050, text=» =3, UNDEFINED LABEL«, t00=0x0000, t01=0x00b6}
0x00d0…00ec Head {h00=0x0018, h01=0x0050, text=» REL 2.1 79-05-23 «, t00=0x0000, t01=0x00d4}
0x00ec…011e Head {h00=0x002e, h01=0x0050, text=» =4, CURSOR STOPS AT LAST POS. EACH LINE«, t00=0x0000, t01=0x00f0}
0x011e…013a Head {h00=0x0018, h01=0x0050, text=» REL 2.1 79-05-23 «, t00=0x0000, t01=0x0122}
0x013a…015e Head {h00=0x0020, h01=0x0050, text=» =5, RESET KEY FOR KB6235 «, t00=0x0000, t01=0x013e}
0x015e…017a Head {h00=0x0018, h01=0x0050, text=» REL 2.1 79-05-23 «, t00=0x0000, t01=0x0162}
0x017a…01c0 Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0000, t01=0x017e}
0x01c0…01ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0034}
0x01ca…0216 Head {h00=0x0048, h01=0x0050, text=»* S T A R T : MODULE HANDLING KEYBOARD INPUT.KEYBOARD INITIATED «, t00=0x0001, t01=0x003e}
0x0216…0262 Head {h00=0x0048, h01=0x0050, text=»* MESSAGES ADDRESSED TO THE MAIN FRAME ARE COMPOSED «, t00=0x0001, t01=0x008a}
0x0262…02a8 Head {h00=0x0042, h01=0x0050, text=»* AND SENT BY USING ROUTINES IN MODULE VDUPRT.«, t00=0x0001, t01=0x00d6}
0x02a8…02b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x011c}
0x02b2…0304 Head {h00=0x004e, h01=0x0050, text=»**************************************************************************«, t00=0x0001, t01=0x0126}
0x0304…030c Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0178}
0x030c…0314 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0180}
0x0314…031c Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0188}
0x031c…0324 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0190}
0x0324…033c Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0002, t01=0x0008}
0x033c…0346 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0020}
0x0346…0350 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002a}
0x0350…036a Head {h00=0x0016, h01=0x0050, text=»* ENTRY PARAMETERS«, t00=0x0002, t01=0x0034}
0x036a…0374 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x004e}
0x0374…037e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0058}
0x037e…0388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0062}
0x0388…03ac Head {h00=0x0020, h01=0x0050, text=» ENTRY LINHON,LINHOF,ATMASB «, t00=0x0002, t01=0x006c}
0x03ac…03c8 Head {h00=0x0018, h01=0x0050, text=» ENTRY LSAVOF,LSAVON«, t00=0x0002, t01=0x0090}
0x03c8…03dc Head {h00=0x0010, h01=0x0050, text=» ENTRY EMULA«, t00=0x0002, t01=0x00ac}
0x03dc…0406 Head {h00=0x0026, h01=0x0050, text=» ENTRY LIOLON TURN ON OFFLINE LAMP«, t00=0x0002, t01=0x00c0}
0x0406…0432 Head {h00=0x0028, h01=0x0050, text=» ENTRY LIOLOF TURN OFF OFFLINE LAMP «, t00=0x0002, t01=0x00ea}
0x0432…0456 Head {h00=0x0020, h01=0x0050, text=» ENTRY VDUKB KB3270 (CREDIT)«, t00=0x0002, t01=0x0116}
0x0456…046c Head {h00=0x0012, h01=0x0050, text=» ENTRY DCTASK «, t00=0x0002, t01=0x013a}
0x046c…0482 Head {h00=0x0012, h01=0x0050, text=» ENTRY DC1INQ «, t00=0x0002, t01=0x0150}
0x0482…0498 Head {h00=0x0012, h01=0x0050, text=» ENTRY DC2INQ «, t00=0x0002, t01=0x0166}
0x0498…04c0 Head {h00=0x0024, h01=0x0050, text=» ENTRY REQTIM SET REQUEST TIMER «, t00=0x0002, t01=0x017c}
0x04c0…04d6 Head {h00=0x0012, h01=0x0050, text=» ENTRY ICWRTE «, t00=0x0003, t01=0x0014}
0x04d6…04e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002a}
0x04e0…04ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0034}
0x04ea…04f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x003e}
0x04f4…0516 Head {h00=0x001e, h01=0x0050, text=»* EXTERNAL REFERENSES «, t00=0x0003, t01=0x0048}
0x0516…0520 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x006a}
0x0520…052a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0074}
0x052a…0534 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x007e}
0x0534…0548 Head {h00=0x0010, h01=0x0050, text=» EXTRN DCINP«, t00=0x0003, t01=0x0088}
0x0548…055e Head {h00=0x0012, h01=0x0050, text=» EXTRN DCGETM «, t00=0x0003, t01=0x009c}
0x055e…0574 Head {h00=0x0012, h01=0x0050, text=» EXTRN ICREAD «, t00=0x0003, t01=0x00b2}
0x0574…058a Head {h00=0x0012, h01=0x0050, text=» EXTRN GTRBUF «, t00=0x0003, t01=0x00c8}
0x058a…05a0 Head {h00=0x0012, h01=0x0050, text=» EXTRN RLRBUF «, t00=0x0003, t01=0x00de}
0x05a0…05bc Head {h00=0x0018, h01=0x0050, text=» EXTRN ERASE VDUPRT «, t00=0x0003, t01=0x00f4}
0x05bc…05d0 Head {h00=0x0010, h01=0x0050, text=» EXTRN TRPF «, t00=0x0003, t01=0x0110}
0x05d0…05e6 Head {h00=0x0012, h01=0x0050, text=» EXTRN SETCUR «, t00=0x0003, t01=0x0124}
0x05e6…05fa Head {h00=0x0010, h01=0x0050, text=» EXTRN WCHAR«, t00=0x0003, t01=0x013a}
0x05fa…060e Head {h00=0x0010, h01=0x0050, text=» EXTRN TRPA «, t00=0x0003, t01=0x014e}
0x060e…0624 Head {h00=0x0012, h01=0x0050, text=» EXTRN ERASUA «, t00=0x0003, t01=0x0162}
0x0624…0638 Head {h00=0x0010, h01=0x0050, text=» EXTRN DISPL«, t00=0x0003, t01=0x0178}
0x0638…064e Head {h00=0x0012, h01=0x0050, text=» EXTRN ERASUP «, t00=0x0003, t01=0x018c}
0x064e…0658 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0012}
0x0658…068c Head {h00=0x0030, h01=0x0050, text=» EXTRN KEYCNV KEY CONVERSION IF NOT PTS 6272«, t00=0x0004, t01=0x001c}
0x068c…06a2 Head {h00=0x0012, h01=0x0050, text=» EXTRN TASCII «, t00=0x0004, t01=0x0050}
0x06a2…06ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0066}
0x06ac…06dc Head {h00=0x002c, h01=0x0050, text=» EXTRN I:EVA0 CREDIT EVALUATION ROUTINE «, t00=0x0004, t01=0x0070}
0x06dc…0706 Head {h00=0x0026, h01=0x0050, text=» EXTRN I:RT1 RETURN TO CREDIT CODE«, t00=0x0004, t01=0x00a0}
0x0706…071e Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0004, t01=0x00ca}
0x071e…0726 Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x00e2}
0x0726…072e Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x00ea}
0x072e…0770 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0004, t01=0x00f2}
0x0770…077a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0134}
0x077a…079a Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0004, t01=0x013e}
0x079a…07a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x015e}
0x07a4…07ce Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0004, t01=0x0168}
0x07ce…07d6 (5, 0, 400) Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x0004}
0x07d6…07e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x000c}
0x07e0…082a Head {h00=0x0046, h01=0x0050, text=»KB6272 EQU 0 IF PTS 6272 (6236) IS NOT USED YOU MUST USE 'KEYCNV' «, t00=0x0005, t01=0x0016}
0x082a…085e Head {h00=0x0030, h01=0x0050, text=» USE THE KEY CONVERSION TABLE IN 'TB3270' «, t00=0x0005, t01=0x0060}
0x085e…0892 Head {h00=0x0030, h01=0x0050, text=»KEYLST EQU 0 KEY LOCK STATUS SAVED IN 'KEYS'«, t00=0x0005, t01=0x0094}
0x0892…08a6 Head {h00=0x0010, h01=0x0050, text=»OFLIN EQU 1 «, t00=0x0005, t01=0x00c8}
0x08a6…08d8 Head {h00=0x002e, h01=0x0050, text=»DCLIN EQU 1 NUMBER OF MAIN FRAMES (1 OR 2)«, t00=0x0005, t01=0x00dc}
0x08d8…08ea Head {h00=0x000e, h01=0x0050, text=»PFX EQU 1 «, t00=0x0005, t01=0x010e}
0x08ea…08fc Head {h00=0x000e, h01=0x0050, text=»PAX EQU 1 «, t00=0x0005, t01=0x0120}
0x08fc…0928 Head {h00=0x0028, h01=0x0050, text=»IN:DL EQU 1 INSERT&DELETE FUNCTIONS «, t00=0x0005, t01=0x0132}
0x0928…0964 Head {h00=0x0038, h01=0x0050, text=»COPCMD EQU 1 COPY COMMAND (ONLY TO PRINTER) IF := 1 «, t00=0x0005, t01=0x015e}
0x0964…0988 Head {h00=0x0020, h01=0x0050, text=»COPL EQU 1 COPY LOCK IF := 1«, t00=0x0006, t01=0x000a}
0x0988…09a0 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0006, t01=0x002e}
0x09a0…09aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0046}
0x09aa…09b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0050}
0x09b4…09ca Head {h00=0x0012, h01=0x0050, text=»* EQUATES «, t00=0x0006, t01=0x005a}
0x09ca…09d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0070}
0x09d4…09f2 Head {h00=0x001a, h01=0x0050, text=»RSET EQU /B2 RESET KEY«, t00=0x0006, t01=0x007a}
0x09f2…0a18 Head {h00=0x0022, h01=0x0050, text=»* COMMON EQU FOR ECB HANDLING «, t00=0x0006, t01=0x0098}
0x0a18…0a22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00be}
0x0a22…0a2a Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x00c8}
0x0a2a…0a3e Head {h00=0x0010, h01=0x0050, text=»ECBBA EQU 2 «, t00=0x0006, t01=0x00d0}
0x0a3e…0a52 Head {h00=0x0010, h01=0x0050, text=»ECBRL EQU 4 «, t00=0x0006, t01=0x00e4}
0x0a52…0a66 Head {h00=0x0010, h01=0x0050, text=»ECBEL EQU 6 «, t00=0x0006, t01=0x00f8}
0x0a66…0a7a Head {h00=0x0010, h01=0x0050, text=»ECBRC EQU 8 «, t00=0x0006, t01=0x010c}
0x0a7a…0a8e Head {h00=0x0010, h01=0x0050, text=»ECBCW EQU 10«, t00=0x0006, t01=0x0120}
0x0a8e…0a98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0134}
0x0a98…0aa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x013e}
0x0aa2…0abc Head {h00=0x0016, h01=0x0050, text=»* CREDIT USED EQU «, t00=0x0006, t01=0x0148}
0x0abc…0ac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0162}
0x0ac6…0ad0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x016c}
0x0ad0…0aec Head {h00=0x0018, h01=0x0050, text=»* ECB REL. ADDRESSES«, t00=0x0006, t01=0x0176}
0x0aec…0af6 (7, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x0af6…0b00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000e}
0x0b00…0b12 Head {h00=0x000e, h01=0x0050, text=»DIS EQU 20«, t00=0x0007, t01=0x0018}
0x0b12…0b1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x002a}
0x0b1c…0b36 Head {h00=0x0016, h01=0x0050, text=»ECBDC EQU -DIS-14 «, t00=0x0007, t01=0x0034}
0x0b36…0b4a Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x0007, t01=0x004e}
0x0b4a…0b60 Head {h00=0x0012, h01=0x0050, text=» IFT COPCMD=1 «, t00=0x0007, t01=0x0062}
0x0b60…0b7c Head {h00=0x0018, h01=0x0050, text=»ECBDC2 EQU ECBDC-DIS«, t00=0x0007, t01=0x0078}
0x0b7c…0b9a Head {h00=0x001a, h01=0x0050, text=»ECBICR EQU ECBDC2-DIS «, t00=0x0007, t01=0x0094}
0x0b9a…0bb8 Head {h00=0x001a, h01=0x0050, text=»ECBICW EQU ECBICR-DIS «, t00=0x0007, t01=0x00b2}
0x0bb8…0bc4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x00d0}
0x0bc4…0bd8 Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x0007, t01=0x00dc}
0x0bd8…0bee Head {h00=0x0012, h01=0x0050, text=» IFF COPCMD=1 «, t00=0x0007, t01=0x00f0}
0x0bee…0c0a Head {h00=0x0018, h01=0x0050, text=»ECBDC2 EQU ECBDC-DIS«, t00=0x0007, t01=0x0106}
0x0c0a…0c28 Head {h00=0x001a, h01=0x0050, text=»ECBICW EQU ECBDC2-DIS «, t00=0x0007, t01=0x0122}
0x0c28…0c34 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x0140}
0x0c34…0c48 Head {h00=0x0010, h01=0x0050, text=» IFF DCLIN=2«, t00=0x0007, t01=0x014c}
0x0c48…0c5e Head {h00=0x0012, h01=0x0050, text=» IFT COPCMD=1 «, t00=0x0007, t01=0x0160}
0x0c5e…0c7a Head {h00=0x0018, h01=0x0050, text=»ECBICR EQU ECBDC-DIS«, t00=0x0007, t01=0x0176}
0x0c7a…0c98 (8, 0, 398) Head {h00=0x001a, h01=0x0050, text=»ECBICW EQU ECBICR-DIS «, t00=0x0008, t01=0x0004}
0x0c98…0ca4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0008, t01=0x0022}
0x0ca4…0cb8 Head {h00=0x0010, h01=0x0050, text=» IFF DCLIN=2«, t00=0x0008, t01=0x002e}
0x0cb8…0cce Head {h00=0x0012, h01=0x0050, text=» IFF COPCMD=1 «, t00=0x0008, t01=0x0042}
0x0cce…0cea Head {h00=0x0018, h01=0x0050, text=»ECBICW EQU ECBDC-DIS«, t00=0x0008, t01=0x0058}
0x0cea…0cf6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0008, t01=0x0074}
0x0cf6…0d14 Head {h00=0x001a, h01=0x0050, text=»ECBVDU EQU ECBICW-DIS «, t00=0x0008, t01=0x0080}
0x0d14…0d30 Head {h00=0x0018, h01=0x0050, text=»ECBKB EQU ECBVDU-DIS«, t00=0x0008, t01=0x009e}
0x0d30…0d4c Head {h00=0x0018, h01=0x0050, text=»ECBSD EQU ECBKB-DIS «, t00=0x0008, t01=0x00ba}
0x0d4c…0d64 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0008, t01=0x00d6}
0x0d64…0d6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ee}
0x0d6e…0d78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f8}
0x0d78…0d9e Head {h00=0x0022, h01=0x0050, text=»* BASE ADDRESS FOR TCA AND ECB«, t00=0x0008, t01=0x0102}
0x0d9e…0da8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0128}
0x0da8…0dbe Head {h00=0x0012, h01=0x0050, text=»TCABAS EQU A11«, t00=0x0008, t01=0x0132}
0x0dbe…0dd8 Head {h00=0x0016, h01=0x0050, text=»CREBAS EQU A13 ECB«, t00=0x0008, t01=0x0148}
0x0dd8…0de2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0162}
0x0de2…0dec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x016c}
0x0dec…0e08 Head {h00=0x0018, h01=0x0050, text=»* TCA REL. ADDRESSES«, t00=0x0008, t01=0x0176}
0x0e08…0e12 (9, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0004}
0x0e12…0e26 Head {h00=0x0010, h01=0x0050, text=»TCT01 EQU 0 «, t00=0x0009, t01=0x000e}
0x0e26…0e42 Head {h00=0x0018, h01=0x0050, text=»PRINTER EQU TCT01+2 «, t00=0x0009, t01=0x0022}
0x0e42…0e6e Head {h00=0x0028, h01=0x0050, text=»BVDU EQU PRINTER+2 VDU SCREEN BUFFER«, t00=0x0009, t01=0x003e}
0x0e6e…0ea2 Head {h00=0x0030, h01=0x0050, text=»PCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY «, t00=0x0009, t01=0x006a}
0x0ea2…0ed0 Head {h00=0x002a, h01=0x0050, text=»ATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR«, t00=0x0009, t01=0x009e}
0x0ed0…0eec Head {h00=0x0018, h01=0x0050, text=»CURATT EQU ATTRIB+2 «, t00=0x0009, t01=0x00cc}
0x0eec…0f16 Head {h00=0x0026, h01=0x0050, text=»WCC EQU CURATT+2 WCC/CCC CHARACTER«, t00=0x0009, t01=0x00e8}
0x0f16…0f48 Head {h00=0x002e, h01=0x0050, text=»KBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR«, t00=0x0009, t01=0x0112}
0x0f48…0f70 Head {h00=0x0024, h01=0x0050, text=»LINCNT EQU KBINH+2 LINE COUNTER «, t00=0x0009, t01=0x0144}
0x0f70…0fa4 Head {h00=0x0030, h01=0x0050, text=»DCLENG EQU LINCNT+2 DC READ EFFECTIVE LENGTH«, t00=0x0009, t01=0x016c}
0x0fa4…0fda Head {h00=0x0032, h01=0x0050, text=»ICWORK EQU DCLENG+2 WORK FIELD INTERTASK COMM «, t00=0x000a, t01=0x0010}
0x0fda…100a Head {h00=0x002c, h01=0x0050, text=»INTATT EQU ICWORK+2 INTENSITY ATTRIBUTE «, t00=0x000a, t01=0x0046}
0x100a…1032 Head {h00=0x0024, h01=0x0050, text=»OFFFLG EQU INTATT+2 OFFLINE FLAG«, t00=0x000a, t01=0x0076}
0x1032…105e Head {h00=0x0028, h01=0x0050, text=»COPNO EQU OFFFLG+2 HARDCOPY TASK ID «, t00=0x000a, t01=0x009e}
0x105e…108c Head {h00=0x002a, h01=0x0050, text=»CCC EQU COPNO+2 COPY COMMAND CHARACTER«, t00=0x000a, t01=0x00ca}
0x108c…10ae Head {h00=0x001e, h01=0x0050, text=»MAIN EQU CCC+2 MAIN FRAME «, t00=0x000a, t01=0x00f8}
0x10ae…10d8 Head {h00=0x0026, h01=0x0050, text=»MODE EQU MAIN+2 INSERT MODE SWITCH«, t00=0x000a, t01=0x011a}
0x10d8…1100 Head {h00=0x0024, h01=0x0050, text=»KEYS EQU MODE+2 KEY LOCK STATUS «, t00=0x000a, t01=0x0144}
0x1100…1132 Head {h00=0x002e, h01=0x0050, text=»ECBDCC EQU KEYS+2 ECB ADDRESS LAST READ DC«, t00=0x000a, t01=0x016c}
0x1132…1168 Head {h00=0x0032, h01=0x0050, text=»ECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE WAIT &C «, t00=0x000b, t01=0x000e}
0x1168…11a0 Head {h00=0x0034, h01=0x0050, text=»RDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB«, t00=0x000b, t01=0x0044}
0x11a0…11b8 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x000b, t01=0x007c}
0x11b8…11dc Head {h00=0x0020, h01=0x0050, text=»NULL EQU /7F NULL CHARACTER «, t00=0x000b, t01=0x0094}
0x11dc…11f2 Head {h00=0x0012, h01=0x0050, text=»DUPCH EQU /7B «, t00=0x000b, t01=0x00b8}
0x11f2…1206 Head {h00=0x0010, h01=0x0050, text=»FMCH EQU /60«, t00=0x000b, t01=0x00ce}
0x1206…1234 Head {h00=0x002a, h01=0x0050, text=»LBVDU EQU 1920 1920 CHAR DISPLAY 6344 «, t00=0x000b, t01=0x00e2}
0x1234…125a Head {h00=0x0022, h01=0x0050, text=»LPAGE EQU 48 LINES ON ONE PAGE«, t00=0x000b, t01=0x0110}
0x125a…1288 Head {h00=0x002a, h01=0x0050, text=»LLINE EQU 80 80 CHAR PER DISPLAY LINE «, t00=0x000b, t01=0x0136}
0x1288…1292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0164}
0x1292…12bc Head {h00=0x0026, h01=0x0050, text=»* CONFIG DATA 'CB1' REL ADDRESSES «, t00=0x000b, t01=0x016e}
0x12bc…12c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0008}
0x12c6…12ec Head {h00=0x0022, h01=0x0050, text=»NBRKBV EQU 0 NUMBER OF KB/VDUS«, t00=0x000c, t01=0x0012}
0x12ec…1316 Head {h00=0x0026, h01=0x0050, text=»NBRGTP EQU NBRKBV+2 NUMBER OF GTPS«, t00=0x000c, t01=0x0038}
0x1316…1320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0062}
0x1320…1356 Head {h00=0x0032, h01=0x0050, text=»MF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 «, t00=0x000c, t01=0x006c}
0x1356…138c Head {h00=0x0032, h01=0x0050, text=»MF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 «, t00=0x000c, t01=0x00a2}
0x138c…13a0 Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x000c, t01=0x00d8}
0x13a0…13bc Head {h00=0x0018, h01=0x0050, text=»MF2KBV EQU MF1GTP+16«, t00=0x000c, t01=0x00ec}
0x13bc…13d8 Head {h00=0x0018, h01=0x0050, text=»MF2GTP EQU MF2KBV+16«, t00=0x000c, t01=0x0108}
0x13d8…13e4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0124}
0x13e4…13fc Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x000c, t01=0x0130}
0x13fc…1406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0148}
0x1406…1438 Head {h00=0x002e, h01=0x0050, text=»* KEY TABLE FIXED ENTRY FOR EACH FUNCTION «, t00=0x000c, t01=0x0152}
0x1438…1442 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0184}
0x1442…1456 Head {h00=0x0010, h01=0x0050, text=»KEYTAB EQU *«, t00=0x000c, t01=0x018e}
0x1456…146e Head {h00=0x0014, h01=0x0050, text=» DATA CHAR SPACE«, t00=0x000d, t01=0x0012}
0x146e…1482 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR !«, t00=0x000d, t01=0x002a}
0x1482…1496 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR "«, t00=0x000d, t01=0x003e}
0x1496…14aa Head {h00=0x0010, h01=0x0050, text=» DATA CHAR #«, t00=0x000d, t01=0x0052}
0x14aa…14be Head {h00=0x0010, h01=0x0050, text=» DATA CHAR $«, t00=0x000d, t01=0x0066}
0x14be…14d2 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR %«, t00=0x000d, t01=0x007a}
0x14d2…14e6 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR &«, t00=0x000d, t01=0x008e}
0x14e6…14fa Head {h00=0x0010, h01=0x0050, text=» DATA CHAR '«, t00=0x000d, t01=0x00a2}
0x14fa…150e Head {h00=0x0010, h01=0x0050, text=» DATA CHAR («, t00=0x000d, t01=0x00b6}
0x150e…1522 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR )«, t00=0x000d, t01=0x00ca}
0x1522…1536 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR *«, t00=0x000d, t01=0x00de}
0x1536…154a Head {h00=0x0010, h01=0x0050, text=» DATA CHAR +«, t00=0x000d, t01=0x00f2}
0x154a…1560 Head {h00=0x0012, h01=0x0050, text=» DATA NUM , DK«, t00=0x000d, t01=0x0106}
0x1560…1574 Head {h00=0x0010, h01=0x0050, text=» DATA NUM - «, t00=0x000d, t01=0x011c}
0x1574…1588 Head {h00=0x0010, h01=0x0050, text=» DATA NUM . «, t00=0x000d, t01=0x0130}
0x1588…159c Head {h00=0x0010, h01=0x0050, text=» DATA CHAR /«, t00=0x000d, t01=0x0144}
0x159c…15a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0158}
0x15a6…15b8 Head {h00=0x000e, h01=0x0050, text=» DATA NUM «, t00=0x000d, t01=0x0162}
0x15b8…15cc Head {h00=0x0010, h01=0x0050, text=» DATA NUM 1 «, t00=0x000d, t01=0x0174}
0x15cc…15e0 Head {h00=0x0010, h01=0x0050, text=» DATA NUM 2 «, t00=0x000d, t01=0x0188}
0x15e0…15f4 Head {h00=0x0010, h01=0x0050, text=» DATA NUM 3 «, t00=0x000e, t01=0x000c}
0x15f4…1608 Head {h00=0x0010, h01=0x0050, text=» DATA NUM 4 «, t00=0x000e, t01=0x0020}
0x1608…161c Head {h00=0x0010, h01=0x0050, text=» DATA NUM 5 «, t00=0x000e, t01=0x0034}
0x161c…1630 Head {h00=0x0010, h01=0x0050, text=» DATA NUM 6 «, t00=0x000e, t01=0x0048}
0x1630…1644 Head {h00=0x0010, h01=0x0050, text=» DATA NUM 7 «, t00=0x000e, t01=0x005c}
0x1644…1658 Head {h00=0x0010, h01=0x0050, text=» DATA NUM 8 «, t00=0x000e, t01=0x0070}
0x1658…166c Head {h00=0x0010, h01=0x0050, text=» DATA NUM 9 «, t00=0x000e, t01=0x0084}
0x166c…1680 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR :«, t00=0x000e, t01=0x0098}
0x1680…1694 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR ;«, t00=0x000e, t01=0x00ac}
0x1694…16a8 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR <«, t00=0x000e, t01=0x00c0}
0x16a8…16bc Head {h00=0x0010, h01=0x0050, text=» DATA CHAR =«, t00=0x000e, t01=0x00d4}
0x16bc…16d0 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR >«, t00=0x000e, t01=0x00e8}
0x16d0…16e4 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR ?«, t00=0x000e, t01=0x00fc}
0x16e4…16ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0110}
0x16ee…1704 Head {h00=0x0012, h01=0x0050, text=» DATA CHAR E' «, t00=0x000e, t01=0x011a}
0x1704…1718 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR A«, t00=0x000e, t01=0x0130}
0x1718…172c Head {h00=0x0010, h01=0x0050, text=» DATA CHAR B«, t00=0x000e, t01=0x0144}
0x172c…1740 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR C«, t00=0x000e, t01=0x0158}
0x1740…1754 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR D«, t00=0x000e, t01=0x016c}
0x1754…1768 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR E«, t00=0x000e, t01=0x0180}
0x1768…177c (15, 0, 400) Head {h00=0x0010, h01=0x0050, text=» DATA CHAR F«, t00=0x000f, t01=0x0004}
0x177c…1790 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR G«, t00=0x000f, t01=0x0018}
0x1790…17a4 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR H«, t00=0x000f, t01=0x002c}
0x17a4…17b8 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR I«, t00=0x000f, t01=0x0040}
0x17b8…17cc Head {h00=0x0010, h01=0x0050, text=» DATA CHAR J«, t00=0x000f, t01=0x0054}
0x17cc…17e0 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR K«, t00=0x000f, t01=0x0068}
0x17e0…17f4 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR L«, t00=0x000f, t01=0x007c}
0x17f4…1808 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR M«, t00=0x000f, t01=0x0090}
0x1808…181c Head {h00=0x0010, h01=0x0050, text=» DATA CHAR N«, t00=0x000f, t01=0x00a4}
0x181c…1830 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR O«, t00=0x000f, t01=0x00b8}
0x1830…183a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00cc}
0x183a…184e Head {h00=0x0010, h01=0x0050, text=» DATA CHAR P«, t00=0x000f, t01=0x00d6}
0x184e…1862 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR Q«, t00=0x000f, t01=0x00ea}
0x1862…1876 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR R«, t00=0x000f, t01=0x00fe}
0x1876…188a Head {h00=0x0010, h01=0x0050, text=» DATA CHAR S«, t00=0x000f, t01=0x0112}
0x188a…189e Head {h00=0x0010, h01=0x0050, text=» DATA CHAR T«, t00=0x000f, t01=0x0126}
0x189e…18b2 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR U«, t00=0x000f, t01=0x013a}
0x18b2…18c6 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR V«, t00=0x000f, t01=0x014e}
0x18c6…18da Head {h00=0x0010, h01=0x0050, text=» DATA CHAR W«, t00=0x000f, t01=0x0162}
0x18da…18ee Head {h00=0x0010, h01=0x0050, text=» DATA CHAR X«, t00=0x000f, t01=0x0176}
0x18ee…1902 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR Y«, t00=0x000f, t01=0x018a}
0x1902…1916 Head {h00=0x0010, h01=0x0050, text=» DATA CHAR Z«, t00=0x0010, t01=0x000e}
0x1916…192a Head {h00=0x0010, h01=0x0050, text=» DATA CHAR [«, t00=0x0010, t01=0x0022}
0x192a…1948 Head {h00=0x001a, h01=0x0050, text=» DATA CHAR BACK SLASH «, t00=0x0010, t01=0x0036}
0x1948…195c Head {h00=0x0010, h01=0x0050, text=» DATA CHAR ]«, t00=0x0010, t01=0x0054}
0x195c…197a Head {h00=0x001a, h01=0x0050, text=» DATA CHAR CIRCOMFLEX «, t00=0x0010, t01=0x0068}
0x197a…1996 Head {h00=0x0018, h01=0x0050, text=» DATA CHAR UNDERLINE«, t00=0x0010, t01=0x0086}
0x1996…19a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a2}
0x19a0…19c8 Head {h00=0x0024, h01=0x0050, text=» DATA RETURN /60 CANNOT BE USED «, t00=0x0010, t01=0x00ac}
0x19c8…19e6 Head {h00=0x001a, h01=0x0050, text=» DATA CHAR LOWER CASE «, t00=0x0010, t01=0x00d4}
0x19e6…19f8 Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0010, t01=0x00f2}
0x19f8…1a0a Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0010, t01=0x0104}
0x1a0a…1a1c Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0010, t01=0x0116}
0x1a1c…1a2e Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0010, t01=0x0128}
0x1a2e…1a40 Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0010, t01=0x013a}
0x1a40…1a52 Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0010, t01=0x014c}
0x1a52…1a64 Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0010, t01=0x015e}
0x1a64…1a76 Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0010, t01=0x0170}
0x1a76…1a88 Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0010, t01=0x0182}
0x1a88…1a9a (17, 0, 400) Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0011, t01=0x0004}
0x1a9a…1aac Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0011, t01=0x0016}
0x1aac…1abe Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0011, t01=0x0028}
0x1abe…1ad0 Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0011, t01=0x003a}
0x1ad0…1ae2 Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0011, t01=0x004c}
0x1ae2…1aec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x005e}
0x1aec…1b02 Head {h00=0x0012, h01=0x0050, text=» IFT KEYLST=1 «, t00=0x0011, t01=0x0068}
0x1b02…1b1c Head {h00=0x0016, h01=0x0050, text=» DATA KEYL KEYLOCK«, t00=0x0011, t01=0x007e}
0x1b1c…1b2e Head {h00=0x000e, h01=0x0050, text=» DATA KEYL«, t00=0x0011, t01=0x0098}
0x1b2e…1b40 Head {h00=0x000e, h01=0x0050, text=» DATA KEYL«, t00=0x0011, t01=0x00aa}
0x1b40…1b52 Head {h00=0x000e, h01=0x0050, text=» DATA KEYL«, t00=0x0011, t01=0x00bc}
0x1b52…1b64 Head {h00=0x000e, h01=0x0050, text=» DATA KEYL«, t00=0x0011, t01=0x00ce}
0x1b64…1b76 Head {h00=0x000e, h01=0x0050, text=» DATA KEYL«, t00=0x0011, t01=0x00e0}
0x1b76…1b88 Head {h00=0x000e, h01=0x0050, text=» DATA KEYL«, t00=0x0011, t01=0x00f2}
0x1b88…1b9a Head {h00=0x000e, h01=0x0050, text=» DATA KEYL«, t00=0x0011, t01=0x0104}
0x1b9a…1ba6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0116}
0x1ba6…1bbc Head {h00=0x0012, h01=0x0050, text=» IFF KEYLST=1 «, t00=0x0011, t01=0x0122}
0x1bbc…1bd0 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0011, t01=0x0138}
0x1bd0…1be4 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0011, t01=0x014c}
0x1be4…1bf8 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0011, t01=0x0160}
0x1bf8…1c0c Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0011, t01=0x0174}
0x1c0c…1c20 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0011, t01=0x0188}
0x1c20…1c34 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0012, t01=0x000c}
0x1c34…1c48 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0012, t01=0x0020}
0x1c48…1c5c Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0012, t01=0x0034}
0x1c5c…1c68 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0048}
0x1c68…1c88 Head {h00=0x001c, h01=0x0050, text=» DATA CHAR LOWER CASE X «, t00=0x0012, t01=0x0054}
0x1c88…1c9a Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0012, t01=0x0074}
0x1c9a…1cac Head {h00=0x000e, h01=0x0050, text=» DATA CHAR«, t00=0x0012, t01=0x0086}
0x1cac…1cd8 Head {h00=0x0028, h01=0x0050, text=» DATA RETURN /7B-/7F CANNOT BE USED «, t00=0x0012, t01=0x0098}
0x1cd8…1cec Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0012, t01=0x00c4}
0x1cec…1d00 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0012, t01=0x00d8}
0x1d00…1d14 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0012, t01=0x00ec}
0x1d14…1d28 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0012, t01=0x0100}
0x1d28…1d32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0114}
0x1d32…1d44 Head {h00=0x000e, h01=0x0050, text=» IFT PAX=1«, t00=0x0012, t01=0x011e}
0x1d44…1d56 Head {h00=0x000e, h01=0x0050, text=» DATA PAEX«, t00=0x0012, t01=0x0130}
0x1d56…1d62 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0142}
0x1d62…1d74 Head {h00=0x000e, h01=0x0050, text=» IFF PAX=1«, t00=0x0012, t01=0x014e}
0x1d74…1d88 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0012, t01=0x0160}
0x1d88…1d94 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0174}
0x1d94…1da6 Head {h00=0x000e, h01=0x0050, text=» DATA PA1 «, t00=0x0012, t01=0x0180}
0x1da6…1db8 (19, 0, 398) Head {h00=0x000e, h01=0x0050, text=» DATA PA2 «, t00=0x0013, t01=0x0004}
0x1db8…1dca Head {h00=0x000e, h01=0x0050, text=» DATA PA3 «, t00=0x0013, t01=0x0016}
0x1dca…1df4 Head {h00=0x0026, h01=0x0050, text=» DATA PA410 PA4 - PA10 (ALFASKOP) «, t00=0x0013, t01=0x0028}
0x1df4…1e08 Head {h00=0x0010, h01=0x0050, text=» DATA PA410 «, t00=0x0013, t01=0x0052}
0x1e08…1e1c Head {h00=0x0010, h01=0x0050, text=» DATA PA410 «, t00=0x0013, t01=0x0066}
0x1e1c…1e30 Head {h00=0x0010, h01=0x0050, text=» DATA PA410 «, t00=0x0013, t01=0x007a}
0x1e30…1e44 Head {h00=0x0010, h01=0x0050, text=» DATA PA410 «, t00=0x0013, t01=0x008e}
0x1e44…1e58 Head {h00=0x0010, h01=0x0050, text=» DATA PA410 «, t00=0x0013, t01=0x00a2}
0x1e58…1e6c Head {h00=0x0010, h01=0x0050, text=» DATA PA410 «, t00=0x0013, t01=0x00b6}
0x1e6c…1e80 Head {h00=0x0010, h01=0x0050, text=» DATA CLEAR «, t00=0x0013, t01=0x00ca}
0x1e80…1e92 Head {h00=0x000e, h01=0x0050, text=» IFT PFX=1«, t00=0x0013, t01=0x00de}
0x1e92…1ea4 Head {h00=0x000e, h01=0x0050, text=» DATA PFEX«, t00=0x0013, t01=0x00f0}
0x1ea4…1eb0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0102}
0x1eb0…1ec2 Head {h00=0x000e, h01=0x0050, text=» IFF PFX=1«, t00=0x0013, t01=0x010e}
0x1ec2…1ed6 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0013, t01=0x0120}
0x1ed6…1ee2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0134}
0x1ee2…1ef4 Head {h00=0x000e, h01=0x0050, text=» DATA PF 1«, t00=0x0013, t01=0x0140}
0x1ef4…1f06 Head {h00=0x000e, h01=0x0050, text=» DATA PF 2«, t00=0x0013, t01=0x0152}
0x1f06…1f18 Head {h00=0x000e, h01=0x0050, text=» DATA PF 3«, t00=0x0013, t01=0x0164}
0x1f18…1f22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0176}
0x1f22…1f34 Head {h00=0x000e, h01=0x0050, text=» DATA PF 4«, t00=0x0013, t01=0x0180}
0x1f34…1f46 (20, 0, 400) Head {h00=0x000e, h01=0x0050, text=» DATA PF 5«, t00=0x0014, t01=0x0004}
0x1f46…1f58 Head {h00=0x000e, h01=0x0050, text=» DATA PF 6«, t00=0x0014, t01=0x0016}
0x1f58…1f6a Head {h00=0x000e, h01=0x0050, text=» DATA PF 7«, t00=0x0014, t01=0x0028}
0x1f6a…1f7c Head {h00=0x000e, h01=0x0050, text=» DATA PF 8«, t00=0x0014, t01=0x003a}
0x1f7c…1f8e Head {h00=0x000e, h01=0x0050, text=» DATA PF 9«, t00=0x0014, t01=0x004c}
0x1f8e…1fa2 Head {h00=0x0010, h01=0x0050, text=» DATA PF 10 «, t00=0x0014, t01=0x005e}
0x1fa2…1fb6 Head {h00=0x0010, h01=0x0050, text=» DATA PF 11 «, t00=0x0014, t01=0x0072}
0x1fb6…1fca Head {h00=0x0010, h01=0x0050, text=» DATA PF 12 «, t00=0x0014, t01=0x0086}
0x1fca…1ffc Head {h00=0x002e, h01=0x0050, text=» DATA RETURN /99-/A4 RESERVED FOR PF13-24 «, t00=0x0014, t01=0x009a}
0x1ffc…2010 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0014, t01=0x00cc}
0x2010…2024 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0014, t01=0x00e0}
0x2024…2038 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0014, t01=0x00f4}
0x2038…204c Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0014, t01=0x0108}
0x204c…2060 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0014, t01=0x011c}
0x2060…2074 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0014, t01=0x0130}
0x2074…207e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0144}
0x207e…2092 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0014, t01=0x014e}
0x2092…20a6 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0014, t01=0x0162}
0x20a6…20ba Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0014, t01=0x0176}
0x20ba…20ce Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0014, t01=0x018a}
0x20ce…20e2 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0015, t01=0x000e}
0x20e2…20f6 Head {h00=0x0010, h01=0x0050, text=» DATA ENTER «, t00=0x0015, t01=0x0022}
0x20f6…2108 Head {h00=0x000e, h01=0x0050, text=» DATA CRUP«, t00=0x0015, t01=0x0036}
0x2108…211c Head {h00=0x0010, h01=0x0050, text=» DATA CRLEFT«, t00=0x0015, t01=0x0048}
0x211c…2130 Head {h00=0x0010, h01=0x0050, text=» DATA CRRIGT«, t00=0x0015, t01=0x005c}
0x2130…2144 Head {h00=0x0010, h01=0x0050, text=» DATA CRDOWN«, t00=0x0015, t01=0x0070}
0x2144…2158 Head {h00=0x0010, h01=0x0050, text=» DATA BAKTAB«, t00=0x0015, t01=0x0084}
0x2158…216a Head {h00=0x000e, h01=0x0050, text=» DATA TAB «, t00=0x0015, t01=0x0098}
0x216a…217c Head {h00=0x000e, h01=0x0050, text=» DATA CRNL«, t00=0x0015, t01=0x00aa}
0x217c…2190 Head {h00=0x0010, h01=0x0050, text=» DATA RDHOME«, t00=0x0015, t01=0x00bc}
0x2190…21a4 Head {h00=0x0010, h01=0x0050, text=» DATA ERINPT«, t00=0x0015, t01=0x00d0}
0x21a4…21b8 Head {h00=0x0010, h01=0x0050, text=» DATA EREOF «, t00=0x0015, t01=0x00e4}
0x21b8…21c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f8}
0x21c2…21d6 Head {h00=0x0010, h01=0x0050, text=» IFT IN:DL=1«, t00=0x0015, t01=0x0102}
0x21d6…21ea Head {h00=0x0010, h01=0x0050, text=» DATA INSERT«, t00=0x0015, t01=0x0116}
0x21ea…21fe Head {h00=0x0010, h01=0x0050, text=» DATA DELETE«, t00=0x0015, t01=0x012a}
0x21fe…220a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x013e}
0x220a…221e Head {h00=0x0010, h01=0x0050, text=» IFF IN:DL=1«, t00=0x0015, t01=0x014a}
0x221e…2232 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0015, t01=0x015e}
0x2232…2246 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0015, t01=0x0172}
0x2246…2252 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0186}
0x2252…2266 (22, 0, 400) Head {h00=0x0010, h01=0x0050, text=» DATA RESET «, t00=0x0016, t01=0x0004}
0x2266…2278 Head {h00=0x000e, h01=0x0050, text=» DATA DUP «, t00=0x0016, t01=0x0018}
0x2278…228c Head {h00=0x0010, h01=0x0050, text=» DATA FLDMRK«, t00=0x0016, t01=0x002a}
0x228c…229e Head {h00=0x000e, h01=0x0050, text=» DATA COPY«, t00=0x0016, t01=0x003e}
0x229e…22b2 Head {h00=0x0010, h01=0x0050, text=» IFT OFLIN=1«, t00=0x0016, t01=0x0050}
0x22b2…22c6 Head {h00=0x0010, h01=0x0050, text=» DATA OFLINE«, t00=0x0016, t01=0x0064}
0x22c6…22d2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0078}
0x22d2…22e6 Head {h00=0x0010, h01=0x0050, text=» IFF OFLIN=1«, t00=0x0016, t01=0x0084}
0x22e6…22fa Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0016, t01=0x0098}
0x22fa…2306 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x00ac}
0x2306…231a Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x0016, t01=0x00b8}
0x231a…232e Head {h00=0x0010, h01=0x0050, text=» DATA MFCHGE«, t00=0x0016, t01=0x00cc}
0x232e…233a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x00e0}
0x233a…234e Head {h00=0x0010, h01=0x0050, text=» IFF DCLIN=2«, t00=0x0016, t01=0x00ec}
0x234e…2362 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0016, t01=0x0100}
0x2362…236e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0114}
0x236e…2382 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0016, t01=0x0120}
0x2382…2396 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0016, t01=0x0134}
0x2396…23aa Head {h00=0x0010, h01=0x0050, text=» DATA ZERO:2«, t00=0x0016, t01=0x0148}
0x23aa…23be Head {h00=0x0010, h01=0x0050, text=» DATA ZERO:3«, t00=0x0016, t01=0x015c}
0x23be…23d2 Head {h00=0x0010, h01=0x0050, text=» DATA NUMCOM«, t00=0x0016, t01=0x0170}
0x23d2…23e6 Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0016, t01=0x0184}
0x23e6…23fa Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0017, t01=0x0008}
0x23fa…240e Head {h00=0x0010, h01=0x0050, text=» DATA RETURN«, t00=0x0017, t01=0x001c}
0x240e…2418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0030}
0x2418…2452 Head {h00=0x0036, h01=0x0050, text=» DATA LCASPW LOWER CASE P - W (BECAUSE OF KEYLOCK)«, t00=0x0017, t01=0x003a}
0x2452…2466 Head {h00=0x0010, h01=0x0050, text=» DATA LCASPW«, t00=0x0017, t01=0x0074}
0x2466…247a Head {h00=0x0010, h01=0x0050, text=» DATA LCASPW«, t00=0x0017, t01=0x0088}
0x247a…248e Head {h00=0x0010, h01=0x0050, text=» DATA LCASPW«, t00=0x0017, t01=0x009c}
0x248e…24a2 Head {h00=0x0010, h01=0x0050, text=» DATA LCASPW«, t00=0x0017, t01=0x00b0}
0x24a2…24b6 Head {h00=0x0010, h01=0x0050, text=» DATA LCASPW«, t00=0x0017, t01=0x00c4}
0x24b6…24ca Head {h00=0x0010, h01=0x0050, text=» DATA LCASPW«, t00=0x0017, t01=0x00d8}
0x24ca…24de Head {h00=0x0010, h01=0x0050, text=» DATA LCASPW«, t00=0x0017, t01=0x00ec}
0x24de…24e6 Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0100}
0x24e6…252c Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0017, t01=0x0108}
0x252c…2536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x014e}
0x2536…255a Head {h00=0x0020, h01=0x0050, text=»* START ADDRESS FOR DC TASKS«, t00=0x0017, t01=0x0158}
0x255a…25a0 Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0017, t01=0x017c}
0x25a0…25a8 Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0032}
0x25a8…25bc Head {h00=0x0010, h01=0x0050, text=»DCTASK EQU *«, t00=0x0018, t01=0x003a}
0x25bc…25d2 Head {h00=0x0012, h01=0x0050, text=» CF A14,I:EVA0«, t00=0x0018, t01=0x004e}
0x25d2…25fc Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A9 POLL & SELECT ADDRESS «, t00=0x0018, t01=0x0064}
0x25fc…2612 Head {h00=0x0012, h01=0x0050, text=» LDKL A8,ECBDC«, t00=0x0018, t01=0x008e}
0x2612…2628 Head {h00=0x0012, h01=0x0050, text=» ADR A8,CREBAS«, t00=0x0018, t01=0x00a4}
0x2628…2640 Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW,A8 «, t00=0x0018, t01=0x00ba}
0x2640…2668 Head {h00=0x0024, h01=0x0050, text=» LDK A7,/B7 TRANSFER PARAMETERS «, t00=0x0018, t01=0x00d2}
0x2668…2674 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0018, t01=0x00fa}
0x2674…2684 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0018, t01=0x0106}
0x2684…2698 Head {h00=0x0010, h01=0x0050, text=»DCT100 EQU *«, t00=0x0018, t01=0x0116}
0x2698…26ca Head {h00=0x002e, h01=0x0050, text=» LDK A7,/80 TEST IF ANY MESSAGE WITH WAIT «, t00=0x0018, t01=0x012a}
0x26ca…26d6 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0018, t01=0x015c}
0x26d6…26e6 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0018, t01=0x0168}
0x26e6…2710 Head {h00=0x0026, h01=0x0050, text=» CF A14,GTRBUF GET RECEIVE BUFFER «, t00=0x0018, t01=0x0178}
0x2710…2726 Head {h00=0x0012, h01=0x0050, text=» LDKL A8,ECBDC«, t00=0x0019, t01=0x0012}
0x2726…273c Head {h00=0x0012, h01=0x0050, text=» ADR A8,CREBAS«, t00=0x0019, t01=0x0028}
0x273c…2752 Head {h00=0x0012, h01=0x0050, text=» CF A14,DCGETM«, t00=0x0019, t01=0x003e}
0x2752…276a Head {h00=0x0014, h01=0x0050, text=» LD A4,ECBBA,A8 «, t00=0x0019, t01=0x0054}
0x276a…2790 Head {h00=0x0022, h01=0x0050, text=» CF A14,RLRBUF RELEASE BUFFER «, t00=0x0019, t01=0x006c}
0x2790…27a2 Head {h00=0x000e, h01=0x0050, text=» RB DCT100«, t00=0x0019, t01=0x0092}
0x27a2…27ba Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0019, t01=0x00a4}
0x27ba…27c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00bc}
0x27c4…27ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00c6}
0x27ce…27fa Head {h00=0x0028, h01=0x0050, text=»* SUBROUTINE ACTIVATED BY ALL TASKS «, t00=0x0019, t01=0x00d0}
0x27fa…2804 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00fc}
0x2804…280e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0106}
0x280e…2822 Head {h00=0x0010, h01=0x0050, text=»EMULA EQU * «, t00=0x0019, t01=0x0110}
0x2822…2848 Head {h00=0x0022, h01=0x0050, text=» ADR A8,CREBAS GET ECB ADDRESS«, t00=0x0019, t01=0x0124}
0x2848…2870 Head {h00=0x0024, h01=0x0050, text=» ST A1,ECBCW,A8 STORE IN ECBDCT «, t00=0x0019, t01=0x014a}
0x2870…2898 Head {h00=0x0024, h01=0x0050, text=» LDK A7,/B7 TRANSFER PARAMETERS «, t00=0x0019, t01=0x0172}
0x2898…28a4 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x001a, t01=0x000a}
0x28a4…28b4 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x001a, t01=0x0016}
0x28b4…28c4 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001a, t01=0x0026}
0x28c4…28dc Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x001a, t01=0x0036}
0x28dc…28e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x004e}
0x28e6…2924 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x001a, t01=0x0058}
0x2924…292e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0096}
0x292e…2942 Head {h00=0x0010, h01=0x0050, text=»* VDUKB «, t00=0x001a, t01=0x00a0}
0x2942…294c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00b4}
0x294c…2972 Head {h00=0x0022, h01=0x0050, text=»* MAIN MODULE FOR KEYBOARD VDU«, t00=0x001a, t01=0x00be}
0x2972…297c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00e4}
0x297c…29bc Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x001a, t01=0x00ee}
0x29bc…29d0 Head {h00=0x0010, h01=0x0050, text=»VDUKB EQU * «, t00=0x001a, t01=0x012e}
0x29d0…29e6 Head {h00=0x0012, h01=0x0050, text=» CF A14,I:EVA0«, t00=0x001a, t01=0x0142}
0x29e6…2a10 Head {h00=0x0026, h01=0x0050, text=» LDR TCABAS,A9 LOAD ASSEM TCA BASE«, t00=0x001a, t01=0x0158}
0x2a10…2a18 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0182}
0x2a18…2a2c Head {h00=0x0010, h01=0x0050, text=» IFT OFLIN=1«, t00=0x001a, t01=0x018a}
0x2a2c…2a34 Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x000e}
0x2a34…2a3c Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0016}
0x2a3c…2a74 Head {h00=0x0034, h01=0x0050, text=» STR A12,A14 SAVE REGISTERS A12-A13 ON A14 STACK«, t00=0x001b, t01=0x001e}
0x2a74…2a8a Head {h00=0x0012, h01=0x0050, text=» ST A13,-2,A14«, t00=0x001b, t01=0x0056}
0x2a8a…2ab2 Head {h00=0x0024, h01=0x0050, text=» SUKL A14,4 UPDATE STACK POINTER«, t00=0x001b, t01=0x006c}
0x2ab2…2acc Head {h00=0x0016, h01=0x0050, text=» CM OFFFLG,TCABAS «, t00=0x001b, t01=0x0094}
0x2acc…2afa Head {h00=0x002a, h01=0x0050, text=» CF A14,LIOLOF TURN OFF OFF LINE LAMP «, t00=0x001b, t01=0x00ae}
0x2afa…2b06 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00dc}
0x2b06…2b0e Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x00e8}
0x2b0e…2b26 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x001b, t01=0x00f0}
0x2b26…2b6c Head {h00=0x0042, h01=0x0050, text=»**************************************************************«, t00=0x001b, t01=0x0108}
0x2b6c…2b76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x014e}
0x2b76…2ba6 Head {h00=0x002c, h01=0x0050, text=»* TRANSFER PARAMETER FOR MAIN FRAME #1«, t00=0x001b, t01=0x0158}
0x2ba6…2bb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0188}
0x2bb0…2bf6 (28, 0, 400) Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x001c, t01=0x0004}
0x2bf6…2bfe Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x004a}
0x2bfe…2c22 Head {h00=0x0020, h01=0x0050, text=» LDR* A4,TCABAS REL TASK NO «, t00=0x001c, t01=0x0052}
0x2c22…2c48 Head {h00=0x0022, h01=0x0050, text=» AD A4,6,CREBAS 'CB1' ADDRESS «, t00=0x001c, t01=0x0076}
0x2c48…2c72 Head {h00=0x0026, h01=0x0050, text=» LC A1,MF1KBV-1,A4 GET DV-ADDRESS «, t00=0x001c, t01=0x009c}
0x2c72…2c86 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x001c, t01=0x00c6}
0x2c86…2c9c Head {h00=0x0012, h01=0x0050, text=» LDKL A8,ECBDC«, t00=0x001c, t01=0x00da}
0x2c9c…2cb2 Head {h00=0x0012, h01=0x0050, text=» CF A14,EMULA «, t00=0x001c, t01=0x00f0}
0x2cb2…2cba Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0106}
0x2cba…2cce Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x001c, t01=0x010e}
0x2cce…2d14 Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x001c, t01=0x0122}
0x2d14…2d1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0168}
0x2d1e…2d4e Head {h00=0x002c, h01=0x0050, text=»* TRANSFER PARAMETER FOR MAIN-FRAME #2«, t00=0x001c, t01=0x0172}
0x2d4e…2d58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0012}
0x2d58…2d9e Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x001d, t01=0x001c}
0x2d9e…2da6 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0062}
0x2da6…2dd0 Head {h00=0x0026, h01=0x0050, text=» LC A1,MF2KBV-1,A4 GET DV ADDRESS «, t00=0x001d, t01=0x006a}
0x2dd0…2de4 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x001d, t01=0x0094}
0x2de4…2dfc Head {h00=0x0014, h01=0x0050, text=» LDKL A8,ECBDC2 «, t00=0x001d, t01=0x00a8}
0x2dfc…2e12 Head {h00=0x0012, h01=0x0050, text=» CF A14,EMULA «, t00=0x001d, t01=0x00c0}
0x2e12…2e1e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00d6}
0x2e1e…2e36 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x001d, t01=0x00e2}
0x2e36…2e4a Head {h00=0x0010, h01=0x0050, text=»VDU080 EQU *«, t00=0x001d, t01=0x00fa}
0x2e4a…2e6c Head {h00=0x001e, h01=0x0050, text=» CF A14,ERASE ERASE SCREEN«, t00=0x001d, t01=0x010e}
0x2e6c…2e74 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0130}
0x2e74…2e86 Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x001d, t01=0x0138}
0x2e86…2e9e Head {h00=0x0014, h01=0x0050, text=» LDKL A1,LBVDU+1«, t00=0x001d, t01=0x014a}
0x2e9e…2ed8 Head {h00=0x0036, h01=0x0050, text=» ST A1,CURATT,TCABAS INITIATE WITH UNFORM. SCREEN «, t00=0x001d, t01=0x0162}
0x2ed8…2eee Head {h00=0x0012, h01=0x0050, text=» CF A14,LMF1ON«, t00=0x001e, t01=0x000c}
0x2eee…2f1e Head {h00=0x002c, h01=0x0050, text=» CM MAIN,TCABAS INDICATE MAIN-FRAME # 1 «, t00=0x001e, t01=0x0022}
0x2f1e…2f36 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x001e, t01=0x0052}
0x2f36…2f40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x006a}
0x2f40…2f60 Head {h00=0x001c, h01=0x0050, text=»* RELATIVE POS IN ECBBLK«, t00=0x001e, t01=0x0074}
0x2f60…2f70 Head {h00=0x000c, h01=0x0050, text=»KB EQU 2«, t00=0x001e, t01=0x0094}
0x2f70…2f82 Head {h00=0x000e, h01=0x0050, text=»DC1 EQU 4 «, t00=0x001e, t01=0x00a4}
0x2f82…2f96 Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x001e, t01=0x00b6}
0x2f96…2fac Head {h00=0x0012, h01=0x0050, text=» IFT COPCMD=1 «, t00=0x001e, t01=0x00ca}
0x2fac…2fbe Head {h00=0x000e, h01=0x0050, text=»DC2 EQU 6 «, t00=0x001e, t01=0x00e0}
0x2fbe…2fd0 Head {h00=0x000e, h01=0x0050, text=»ICR EQU 8 «, t00=0x001e, t01=0x00f2}
0x2fd0…2fe4 Head {h00=0x0010, h01=0x0050, text=»ECBBS EQU 4 «, t00=0x001e, t01=0x0104}
0x2fe4…2ff0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0118}
0x2ff0…3004 Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x001e, t01=0x0124}
0x3004…301a Head {h00=0x0012, h01=0x0050, text=» IFF COPCMD=1 «, t00=0x001e, t01=0x0138}
0x301a…302c Head {h00=0x000e, h01=0x0050, text=»DC2 EQU 6 «, t00=0x001e, t01=0x014e}
0x302c…3040 Head {h00=0x0010, h01=0x0050, text=»ECBBS EQU 3 «, t00=0x001e, t01=0x0160}
0x3040…304c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0174}
0x304c…3060 Head {h00=0x0010, h01=0x0050, text=» IFF DCLIN=2«, t00=0x001e, t01=0x0180}
0x3060…3076 (31, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT COPCMD=1 «, t00=0x001f, t01=0x0004}
0x3076…3088 Head {h00=0x000e, h01=0x0050, text=»ICR EQU 6 «, t00=0x001f, t01=0x001a}
0x3088…309c Head {h00=0x0010, h01=0x0050, text=»ECBBS EQU 3 «, t00=0x001f, t01=0x002c}
0x309c…30a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0040}
0x30a8…30bc Head {h00=0x0010, h01=0x0050, text=» IFF DCLIN=2«, t00=0x001f, t01=0x004c}
0x30bc…30d2 Head {h00=0x0012, h01=0x0050, text=» IFF COPCMD=1 «, t00=0x001f, t01=0x0060}
0x30d2…30e6 Head {h00=0x0010, h01=0x0050, text=»ECBBS EQU 2 «, t00=0x001f, t01=0x0076}
0x30e6…30f2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x008a}
0x30f2…30fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0096}
0x30fc…3112 Head {h00=0x0012, h01=0x0050, text=» LDK A1,ECBBS «, t00=0x001f, t01=0x00a0}
0x3112…312e Head {h00=0x0018, h01=0x0050, text=» ST A1,ECBBLK,TCABAS«, t00=0x001f, t01=0x00b6}
0x312e…3142 Head {h00=0x0010, h01=0x0050, text=»VDU100 EQU *«, t00=0x001f, t01=0x00d2}
0x3142…3162 Head {h00=0x001c, h01=0x0050, text=» LD A1,ECBBLK+DC1,TCABAS«, t00=0x001f, t01=0x00e6}
0x3162…3180 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) VDU110 PENDING«, t00=0x001f, t01=0x0106}
0x3180…31b4 Head {h00=0x0030, h01=0x0050, text=» CF A14,DC1INQ TEST IF ANY MESSAGE, NO WAIT «, t00=0x001f, t01=0x0124}
0x31b4…31c8 Head {h00=0x0010, h01=0x0050, text=»VDU110 EQU *«, t00=0x001f, t01=0x0158}
0x31c8…31dc Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x001f, t01=0x016c}
0x31dc…31fc Head {h00=0x001c, h01=0x0050, text=» LD A1,ECBBLK+DC2,TCABAS«, t00=0x001f, t01=0x0180}
0x31fc…321a Head {h00=0x001a, h01=0x0050, text=» RF(NZ) VDU120 PENDING«, t00=0x0020, t01=0x0010}
0x321a…3254 Head {h00=0x0036, h01=0x0050, text=» CF A14,DC2INQ TEST IF ANY MESSAGE MF # 2, NO WAIT«, t00=0x0020, t01=0x002e}
0x3254…3260 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0068}
0x3260…3274 Head {h00=0x0010, h01=0x0050, text=»VDU120 EQU *«, t00=0x0020, t01=0x0074}
0x3274…328a Head {h00=0x0012, h01=0x0050, text=» IFT COPCMD=1 «, t00=0x0020, t01=0x0088}
0x328a…32aa Head {h00=0x001c, h01=0x0050, text=» LD A1,ECBBLK+ICR,TCABAS«, t00=0x0020, t01=0x009e}
0x32aa…32c8 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) VDU125 PENDING«, t00=0x0020, t01=0x00be}
0x32c8…32e6 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,ICWORK BUFFER«, t00=0x0020, t01=0x00dc}
0x32e6…3306 Head {h00=0x001c, h01=0x0050, text=» ADR A3,TCABAS ADDRESS«, t00=0x0020, t01=0x00fa}
0x3306…3322 Head {h00=0x0018, h01=0x0050, text=» LDK A6,2 REQ LENGTH«, t00=0x0020, t01=0x011a}
0x3322…3338 Head {h00=0x0012, h01=0x0050, text=» CF A14,ICREAD«, t00=0x0020, t01=0x0136}
0x3338…3358 Head {h00=0x001c, h01=0x0050, text=» ST A8,ECBBLK+ICR,TCABAS«, t00=0x0020, t01=0x014c}
0x3358…3364 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x016c}
0x3364…3378 Head {h00=0x0010, h01=0x0050, text=»VDU125 EQU *«, t00=0x0020, t01=0x0178}
0x3378…3398 Head {h00=0x001c, h01=0x0050, text=» LD A1,ECBBLK+KB,TCABAS «, t00=0x0020, t01=0x018c}
0x3398…33b6 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) VDU150 PENDING«, t00=0x0021, t01=0x001c}
0x33b6…33e2 Head {h00=0x0028, h01=0x0050, text=» CF A14,RDKBNW READ KEYBOARD NO WAIT«, t00=0x0021, t01=0x003a}
0x33e2…33f6 Head {h00=0x0010, h01=0x0050, text=»VDU150 EQU *«, t00=0x0021, t01=0x0066}
0x33f6…340e Head {h00=0x0014, h01=0x0050, text=» LDKL A7,ECBBLK «, t00=0x0021, t01=0x007a}
0x340e…3424 Head {h00=0x0012, h01=0x0050, text=» ADR A7,TCABAS«, t00=0x0021, t01=0x0092}
0x3424…3430 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0021, t01=0x00a8}
0x3430…344e Head {h00=0x001a, h01=0x0050, text=» DATA 7 MULTIPLE WAIT «, t00=0x0021, t01=0x00b4}
0x344e…346e Head {h00=0x001c, h01=0x0050, text=» CW A8,ECBBLK+KB,TCABAS «, t00=0x0021, t01=0x00d2}
0x346e…3496 Head {h00=0x0024, h01=0x0050, text=» RF(E) KBINP INPUT FROM KEYBOARD«, t00=0x0021, t01=0x00f2}
0x3496…34ac Head {h00=0x0012, h01=0x0050, text=» IFT COPCMD=1 «, t00=0x0021, t01=0x011a}
0x34ac…34cc Head {h00=0x001c, h01=0x0050, text=» CW A8,ECBBLK+ICR,TCABAS«, t00=0x0021, t01=0x0130}
0x34cc…34f8 Head {h00=0x0028, h01=0x0050, text=» RF(E) BUFCOP SEND BUFFER TO PRINTER«, t00=0x0021, t01=0x0150}
0x34f8…3504 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x017c}
0x3504…3542 Head {h00=0x003a, h01=0x0050, text=» ST A8,ECBDCC,TCABAS SAVE ECB ADDRESS FOR CURRENT READ«, t00=0x0021, t01=0x0188}
0x3542…3566 Head {h00=0x0020, h01=0x0050, text=» CF A14,DCINP INPUT FROM DC «, t00=0x0022, t01=0x0036}
0x3566…3578 Head {h00=0x000e, h01=0x0050, text=» RB VDU100«, t00=0x0022, t01=0x005a}
0x3578…3590 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0022, t01=0x006c}
0x3590…359a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0084}
0x359a…35be Head {h00=0x0020, h01=0x0050, text=»* READ KEYBOARD WITH NO WAIT«, t00=0x0022, t01=0x008e}
0x35be…35c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00b2}
0x35c8…35dc Head {h00=0x0010, h01=0x0050, text=»RDKBNW EQU *«, t00=0x0022, t01=0x00bc}
0x35dc…35f2 Head {h00=0x0012, h01=0x0050, text=» LDKL A8,ECBKB«, t00=0x0022, t01=0x00d0}
0x35f2…3608 Head {h00=0x0012, h01=0x0050, text=» ADR A8,CREBAS«, t00=0x0022, t01=0x00e6}
0x3608…361a Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x0022, t01=0x00fc}
0x361a…3640 Head {h00=0x0022, h01=0x0050, text=» ST A7,ECBRL,A8 REQ LENGTH = 1«, t00=0x0022, t01=0x010e}
0x3640…366e Head {h00=0x002a, h01=0x0050, text=» ST A7,ECBCW,A8 INDICATE NOT POWER OFF«, t00=0x0022, t01=0x0134}
0x366e…368e Head {h00=0x001c, h01=0x0050, text=» ST A8,ECBBLK+KB,TCABAS «, t00=0x0022, t01=0x0162}
0x368e…36a0 Head {h00=0x000e, h01=0x0050, text=» RF DC1I30«, t00=0x0022, t01=0x0182}
0x36a0…36aa (35, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0004}
0x36aa…36ca Head {h00=0x001c, h01=0x0050, text=»* TEST IF ANY MESSAGE DC«, t00=0x0023, t01=0x000e}
0x36ca…36d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x002e}
0x36d4…36e8 Head {h00=0x0010, h01=0x0050, text=»DC1INQ EQU *«, t00=0x0023, t01=0x0038}
0x36e8…36fe Head {h00=0x0012, h01=0x0050, text=» LDKL A8,ECBDC«, t00=0x0023, t01=0x004c}
0x36fe…3714 Head {h00=0x0012, h01=0x0050, text=» ADR A8,CREBAS«, t00=0x0023, t01=0x0062}
0x3714…3734 Head {h00=0x001c, h01=0x0050, text=» ST A8,ECBBLK+DC1,TCABAS«, t00=0x0023, t01=0x0078}
0x3734…3748 Head {h00=0x0010, h01=0x0050, text=»DC1I20 EQU *«, t00=0x0023, t01=0x0098}
0x3748…375a Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0023, t01=0x00ac}
0x375a…3770 Head {h00=0x0012, h01=0x0050, text=» CF A14,REQTIM«, t00=0x0023, t01=0x00be}
0x3770…3782 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0023, t01=0x00d4}
0x3782…3796 Head {h00=0x0010, h01=0x0050, text=»DC1I30 EQU *«, t00=0x0023, t01=0x00e6}
0x3796…37a2 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0023, t01=0x00fa}
0x37a2…37b2 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0023, t01=0x0106}
0x37b2…37c2 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0023, t01=0x0116}
0x37c2…37d6 Head {h00=0x0010, h01=0x0050, text=»DC2INQ EQU *«, t00=0x0023, t01=0x0126}
0x37d6…37ea Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x0023, t01=0x013a}
0x37ea…3802 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,ECBDC2 «, t00=0x0023, t01=0x014e}
0x3802…3818 Head {h00=0x0012, h01=0x0050, text=» ADR A8,CREBAS«, t00=0x0023, t01=0x0166}
0x3818…3838 Head {h00=0x001c, h01=0x0050, text=» ST A8,ECBBLK+DC2,TCABAS«, t00=0x0023, t01=0x017c}
0x3838…384a Head {h00=0x000e, h01=0x0050, text=» RB DC1I20«, t00=0x0024, t01=0x000c}
0x384a…3856 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x001e}
0x3856…386c Head {h00=0x0012, h01=0x0050, text=» IFT COPCMD=1 «, t00=0x0024, t01=0x002a}
0x386c…3884 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0024, t01=0x0040}
0x3884…388e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0058}
0x388e…38b4 Head {h00=0x0022, h01=0x0050, text=»* SEND BUFFER TO PRINTER TASK «, t00=0x0024, t01=0x0062}
0x38b4…38be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0088}
0x38be…38d2 Head {h00=0x0010, h01=0x0050, text=»BUFCOP EQU *«, t00=0x0024, t01=0x0092}
0x38d2…38f0 Head {h00=0x001a, h01=0x0050, text=» CM ECBBLK+ICR,TCABAS «, t00=0x0024, t01=0x00a6}
0x38f0…390c Head {h00=0x0018, h01=0x0050, text=» LDKL A3,BVDU BUFFER«, t00=0x0024, t01=0x00c4}
0x390c…392c Head {h00=0x001c, h01=0x0050, text=» ADR A3,TCABAS ADDRESS«, t00=0x0024, t01=0x00e0}
0x392c…3940 Head {h00=0x0010, h01=0x0050, text=» IFT COPL=1 «, t00=0x0024, t01=0x0100}
0x3940…394a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0114}
0x394a…3966 Head {h00=0x0018, h01=0x0050, text=»* CHECK IF COPY LOCK«, t00=0x0024, t01=0x011e}
0x3966…3970 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x013a}
0x3970…3982 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A3«, t00=0x0024, t01=0x0144}
0x3982…3996 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/18 «, t00=0x0024, t01=0x0156}
0x3996…39aa Head {h00=0x0010, h01=0x0050, text=» XRK A2,/10 «, t00=0x0024, t01=0x016a}
0x39aa…39ca Head {h00=0x001c, h01=0x0050, text=» RB(Z) VDU100 DON'T COPY«, t00=0x0024, t01=0x017e}
0x39ca…39d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x000e}
0x39d6…39ec Head {h00=0x0012, h01=0x0050, text=» IFT COPCMD=1 «, t00=0x0025, t01=0x001a}
0x39ec…3a20 Head {h00=0x0030, h01=0x0050, text=» LDK A4,/8B ORDER: WRITE ADDRESSED WITH WAIT«, t00=0x0025, t01=0x0030}
0x3a20…3a44 Head {h00=0x0020, h01=0x0050, text=» LD A5,ICWORK,TCABAS TASK ID«, t00=0x0025, t01=0x0064}
0x3a44…3a66 Head {h00=0x001e, h01=0x0050, text=» LDKL A6,LBVDU REQ LENGTH «, t00=0x0025, t01=0x0088}
0x3a66…3a7c Head {h00=0x0012, h01=0x0050, text=» CF A14,ICWRTE«, t00=0x0025, t01=0x00aa}
0x3a7c…3a98 Head {h00=0x0018, h01=0x0050, text=» LD A1,KBINH,TCABAS «, t00=0x0025, t01=0x00c0}
0x3a98…3ac4 Head {h00=0x0028, h01=0x0050, text=» ANK A1,/E NOT INHIBITED ANY LONGER «, t00=0x0025, t01=0x00dc}
0x3ac4…3ae0 Head {h00=0x0018, h01=0x0050, text=» ST A1,KBINH,TCABAS «, t00=0x0025, t01=0x0108}
0x3ae0…3af2 Head {h00=0x000e, h01=0x0050, text=» RB VDU100«, t00=0x0025, t01=0x0124}
0x3af2…3afe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0136}
0x3afe…3b16 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0025, t01=0x0142}
0x3b16…3b30 Head {h00=0x0016, h01=0x0050, text=»** KEYBOARD INPUT «, t00=0x0025, t01=0x015a}
0x3b30…3b3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0174}
0x3b3a…3b4e Head {h00=0x0010, h01=0x0050, text=»KBINP EQU * «, t00=0x0025, t01=0x017e}
0x3b4e…3b6a (38, 0, 398) Head {h00=0x0018, h01=0x0050, text=» CM ECBBLK+KB,TCABAS«, t00=0x0026, t01=0x0004}
0x3b6a…3b82 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A8 «, t00=0x0026, t01=0x0020}
0x3b82…3ba2 Head {h00=0x001c, h01=0x0050, text=» RF(Z) KBIN05 POWER OFF «, t00=0x0026, t01=0x0038}
0x3ba2…3bba Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRC,A8 «, t00=0x0026, t01=0x0058}
0x3bba…3bd0 Head {h00=0x0012, h01=0x0050, text=» RF(0) KBIN10 «, t00=0x0026, t01=0x0070}
0x3bd0…3be4 Head {h00=0x0010, h01=0x0050, text=»KBIN05 EQU *«, t00=0x0026, t01=0x0086}
0x3be4…3c0c Head {h00=0x0024, h01=0x0050, text=» LDK A7,4 RESET KEYBOARD BUFFER «, t00=0x0026, t01=0x009a}
0x3c0c…3c18 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0026, t01=0x00c2}
0x3c18…3c28 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0026, t01=0x00ce}
0x3c28…3c3a Head {h00=0x000e, h01=0x0050, text=» RB VDU100«, t00=0x0026, t01=0x00de}
0x3c3a…3c4e Head {h00=0x0010, h01=0x0050, text=»KBIN10 EQU *«, t00=0x0026, t01=0x00f0}
0x3c4e…3c6a Head {h00=0x0018, h01=0x0050, text=» LD A1,KBINH,TCABAS «, t00=0x0026, t01=0x0104}
0x3c6a…3c9a Head {h00=0x002c, h01=0x0050, text=» ANK A1,1 RESETTING BY 'RESET' ALLOWED ?«, t00=0x0026, t01=0x0120}
0x3c9a…3cb4 Head {h00=0x0016, h01=0x0050, text=» RB(NZ) KBIN05 NO «, t00=0x0026, t01=0x0150}
0x3cb4…3ce0 Head {h00=0x0028, h01=0x0050, text=» LC* A2,ECBBA,A8 GET INPUT CHARACTER«, t00=0x0026, t01=0x016a}
0x3ce0…3cfa Head {h00=0x0016, h01=0x0050, text=» IFF KB6272=1 =5 «, t00=0x0027, t01=0x0008}
0x3cfa…3d24 Head {h00=0x0026, h01=0x0050, text=» CF A14,KEYCNV CONVERT KEY CODE =5«, t00=0x0027, t01=0x0022}
0x3d24…3d36 Head {h00=0x000e, h01=0x0050, text=» XIF =5 «, t00=0x0027, t01=0x004c}
0x3d36…3d52 Head {h00=0x0018, h01=0x0050, text=» LD A1,KBINH,TCABAS «, t00=0x0027, t01=0x005e}
0x3d52…3d78 Head {h00=0x0022, h01=0x0050, text=» ANK A1,6 MUST BE RESET KEY ? «, t00=0x0027, t01=0x007a}
0x3d78…3d90 Head {h00=0x0014, h01=0x0050, text=» RF(Z) KBIN20 NO«, t00=0x0027, t01=0x00a0}
0x3d90…3db0 Head {h00=0x001c, h01=0x0050, text=» CWK A2,RSET RESET KEY ?«, t00=0x0027, t01=0x00b8}
0x3db0…3dca Head {h00=0x0016, h01=0x0050, text=» RB(NE) KBIN05 NO «, t00=0x0027, t01=0x00d8}
0x3dca…3dde Head {h00=0x0010, h01=0x0050, text=»KBIN20 EQU *«, t00=0x0027, t01=0x00f2}
0x3dde…3e06 Head {h00=0x0024, h01=0x0050, text=» LDR A5,A2 COPY INPUT CHARACTER «, t00=0x0027, t01=0x0106}
0x3e06…3e20 Head {h00=0x0016, h01=0x0050, text=» SUK A5,/20 INDEX «, t00=0x0027, t01=0x012e}
0x3e20…3e42 Head {h00=0x001e, h01=0x0050, text=» RB(N) VDU100 ILLEGAL CHAR«, t00=0x0027, t01=0x0148}
0x3e42…3e56 Head {h00=0x0010, h01=0x0050, text=» CWK A5,/A7 «, t00=0x0027, t01=0x016a}
0x3e56…3e78 Head {h00=0x001e, h01=0x0050, text=» RB(G) VDU100 ILLEGAL CHAR«, t00=0x0027, t01=0x017e}
0x3e78…3eb0 Head {h00=0x0034, h01=0x0050, text=» CF A14,DCABOR ABORT DC-READ TO ENABLE DC-WRITE «, t00=0x0028, t01=0x0010}
0x3eb0…3ec2 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A7«, t00=0x0028, t01=0x0048}
0x3ec2…3efc Head {h00=0x0036, h01=0x0050, text=» ABL(NZ) VDU100 DC COMPLETED, TAKE CARE OF MESSAGE«, t00=0x0028, t01=0x005a}
0x3efc…3f1c Head {h00=0x001c, h01=0x0050, text=» ADR A5,A5 TO KEY TABLE «, t00=0x0028, t01=0x0094}
0x3f1c…3f26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00b4}
0x3f26…3f3e Head {h00=0x0014, h01=0x0050, text=» LDKL A8,ECBVDU «, t00=0x0028, t01=0x00be}
0x3f3e…3f54 Head {h00=0x0012, h01=0x0050, text=» ADR A8,CREBAS«, t00=0x0028, t01=0x00d6}
0x3f54…3f70 Head {h00=0x0018, h01=0x0050, text=» LD A1,RDMORE,TCABAS«, t00=0x0028, t01=0x00ec}
0x3f70…3f86 Head {h00=0x0012, h01=0x0050, text=» RF(Z) KBIN30 «, t00=0x0028, t01=0x0108}
0x3f86…3f90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x011e}
0x3f90…3fa4 Head {h00=0x0010, h01=0x0050, text=» CFR A14,A1 «, t00=0x0028, t01=0x0128}
0x3fa4…3fb8 Head {h00=0x0010, h01=0x0050, text=» ABL VDU100 «, t00=0x0028, t01=0x013c}
0x3fb8…3fc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0150}
0x3fc2…3fd6 Head {h00=0x0010, h01=0x0050, text=»KBIN30 EQU *«, t00=0x0028, t01=0x015a}
0x3fd6…4014 Head {h00=0x003a, h01=0x0050, text=» CFI A14,KEYTAB,A5 BRANCH TO RESPECTIVE INPUT HANDLER «, t00=0x0028, t01=0x016e}
0x4014…4028 Head {h00=0x0010, h01=0x0050, text=» ABL VDU100 «, t00=0x0029, t01=0x001c}
0x4028…4040 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0029, t01=0x0030}
0x4040…404a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0048}
0x404a…4074 Head {h00=0x0026, h01=0x0050, text=»* ABORT DC-REQUEST TO ENABLE WRITE«, t00=0x0029, t01=0x0052}
0x4074…407e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x007c}
0x407e…4092 Head {h00=0x0010, h01=0x0050, text=»DCABOR EQU *«, t00=0x0029, t01=0x0086}
0x4092…40a4 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0029, t01=0x009a}
0x40a4…40ba Head {h00=0x0012, h01=0x0050, text=» LDKL A8,ECBDC«, t00=0x0029, t01=0x00ac}
0x40ba…40ce Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x0029, t01=0x00c2}
0x40ce…40e8 Head {h00=0x0016, h01=0x0050, text=» LD A1,MAIN,TCABAS«, t00=0x0029, t01=0x00d6}
0x40e8…40fe Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DCAB05«, t00=0x0029, t01=0x00f0}
0x40fe…410a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x0106}
0x410a…4128 Head {h00=0x001a, h01=0x0050, text=» CM ECBBLK+DC1,TCABAS «, t00=0x0029, t01=0x0112}
0x4128…413c Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x0029, t01=0x0130}
0x413c…414e Head {h00=0x000e, h01=0x0050, text=» RF DCAB10«, t00=0x0029, t01=0x0144}
0x414e…4162 Head {h00=0x0010, h01=0x0050, text=»DCAB05 EQU *«, t00=0x0029, t01=0x0156}
0x4162…4180 Head {h00=0x001a, h01=0x0050, text=» CM ECBBLK+DC2,TCABAS «, t00=0x0029, t01=0x016a}
0x4180…4198 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,ECBDC2 «, t00=0x0029, t01=0x0188}
0x4198…41ac Head {h00=0x0010, h01=0x0050, text=»DCAB10 EQU *«, t00=0x002a, t01=0x0010}
0x41ac…41b8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0024}
0x41b8…41ce Head {h00=0x0012, h01=0x0050, text=» ADR A8,CREBAS«, t00=0x002a, t01=0x0030}
0x41ce…41da Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x002a, t01=0x0046}
0x41da…41ea Head {h00=0x000c, h01=0x0050, text=» DATA 10«, t00=0x002a, t01=0x0052}
0x41ea…41fa Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x002a, t01=0x0062}
0x41fa…4212 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x002a, t01=0x0072}
0x4212…421c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x008a}
0x421c…4238 Head {h00=0x0018, h01=0x0050, text=»* SET REQUEST TIMER «, t00=0x002a, t01=0x0094}
0x4238…4256 Head {h00=0x001a, h01=0x0050, text=»* A1 = TIME OUT VALUE «, t00=0x002a, t01=0x00b0}
0x4256…4270 Head {h00=0x0016, h01=0x0050, text=»* A8 = ECB ADDRESS«, t00=0x002a, t01=0x00ce}
0x4270…427a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00e8}
0x427a…428e Head {h00=0x0010, h01=0x0050, text=»REQTIM EQU *«, t00=0x002a, t01=0x00f2}
0x428e…42a6 Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW,A8 «, t00=0x002a, t01=0x0106}
0x42a6…42ba Head {h00=0x0010, h01=0x0050, text=» LDK A7,/B9 «, t00=0x002a, t01=0x011e}
0x42ba…42c6 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x002a, t01=0x0132}
0x42c6…42d6 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x002a, t01=0x013e}
0x42d6…42e6 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x002a, t01=0x014e}
0x42e6…42fe Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x002a, t01=0x015e}
0x42fe…4306 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0176}
0x4306…4310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x017e}
0x4310…431a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0188}
0x431a…435c (43, 0, 400) Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x002b, t01=0x0004}
0x435c…4366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0046}
0x4366…4376 Head {h00=0x000c, h01=0x0050, text=»* RETURN«, t00=0x002b, t01=0x0050}
0x4376…4380 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0060}
0x4380…43c6 Head {h00=0x0042, h01=0x0050, text=»**************************************************************«, t00=0x002b, t01=0x006a}
0x43c6…43d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00b0}
0x43d0…43e6 Head {h00=0x0012, h01=0x0050, text=»RETURN RTN A14«, t00=0x002b, t01=0x00ba}
0x43e6…43fe Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x002b, t01=0x00d0}
0x43fe…4408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00e8}
0x4408…4448 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x002b, t01=0x00f2}
0x4448…4452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0132}
0x4452…4466 Head {h00=0x0010, h01=0x0050, text=»* CRLEFT«, t00=0x002b, t01=0x013c}
0x4466…4470 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0150}
0x4470…44aa Head {h00=0x0036, h01=0x0050, text=»* THIS MODULE MOVES THE CURSOR ONE POS TO LEFT«, t00=0x002b, t01=0x015a}
0x44aa…44b4 (44, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0004}
0x44b4…44f4 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x002c, t01=0x000e}
0x44f4…44fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x004e}
0x44fe…4512 Head {h00=0x0010, h01=0x0050, text=»CRLEFT EQU *«, t00=0x002c, t01=0x0058}
0x4512…4540 Head {h00=0x002a, h01=0x0050, text=» LD A2,PCURS,TCABAS GET CURSOR BINARY «, t00=0x002c, t01=0x006c}
0x4540…4552 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x002c, t01=0x009a}
0x4552…457a Head {h00=0x0024, h01=0x0050, text=» RF(NN) CRL050 NOT LEFTMOST POS «, t00=0x002c, t01=0x00ac}
0x457a…4592 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,LBVDU-1«, t00=0x002c, t01=0x00d4}
0x4592…45aa Head {h00=0x0014, h01=0x0050, text=»CRL050 RF CRH100«, t00=0x002c, t01=0x00ec}
0x45aa…45b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0104}
0x45b4…45f4 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x002c, t01=0x010e}
0x45f4…45fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x014e}
0x45fe…4612 Head {h00=0x0010, h01=0x0050, text=»* CRRIGT«, t00=0x002c, t01=0x0158}
0x4612…461c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x016c}
0x461c…465c Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE MOVES THE CURSOR ONE POS. TO THE RIGHT«, t00=0x002c, t01=0x0176}
0x465c…4666 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0026}
0x4666…46a6 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x002d, t01=0x0030}
0x46a6…46b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0070}
0x46b0…46c6 Head {h00=0x0012, h01=0x0050, text=»* A3=CHARACTER«, t00=0x002d, t01=0x007a}
0x46c6…46d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0090}
0x46d0…46e4 Head {h00=0x0010, h01=0x0050, text=»CRRIGT EQU *«, t00=0x002d, t01=0x009a}
0x46e4…4712 Head {h00=0x002a, h01=0x0050, text=» LD A2,PCURS,TCABAS GET CURSOR BINARY «, t00=0x002d, t01=0x00ae}
0x4712…4724 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x002d, t01=0x00dc}
0x4724…4748 Head {h00=0x0020, h01=0x0050, text=» CWK A2,LBVDU END OF BUFFER?«, t00=0x002d, t01=0x00ee}
0x4748…4760 Head {h00=0x0014, h01=0x0050, text=» RF(L) CRR050 NO«, t00=0x002d, t01=0x0112}
0x4760…4772 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x002d, t01=0x012a}
0x4772…478a Head {h00=0x0014, h01=0x0050, text=»CRR050 RF CRH100«, t00=0x002d, t01=0x013c}
0x478a…47a2 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x002d, t01=0x0154}
0x47a2…47ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x016c}
0x47ac…47f0 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x002d, t01=0x0176}
0x47f0…47fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x002a}
0x47fa…480a Head {h00=0x000c, h01=0x0050, text=»* CRDOWN«, t00=0x002e, t01=0x0034}
0x480a…4814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0044}
0x4814…4854 Head {h00=0x003c, h01=0x0050, text=»* THE MODULE MOVES THE CURSOR TO NEXT ROW. SAME COLUMN. «, t00=0x002e, t01=0x004e}
0x4854…485e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x008e}
0x485e…48a2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x002e, t01=0x0098}
0x48a2…48ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00dc}
0x48ac…48c0 Head {h00=0x0010, h01=0x0050, text=»CRDOWN EQU *«, t00=0x002e, t01=0x00e6}
0x48c0…48ea Head {h00=0x0026, h01=0x0050, text=» LD A2,PCURS,TCABAS GET CURSOR POS«, t00=0x002e, t01=0x00fa}
0x48ea…4900 Head {h00=0x0012, h01=0x0050, text=» ADKL A2,LLINE«, t00=0x002e, t01=0x0124}
0x4900…4920 Head {h00=0x001c, h01=0x0050, text=» CWK A2,LBVDU LAST LINE?«, t00=0x002e, t01=0x013a}
0x4920…4938 Head {h00=0x0014, h01=0x0050, text=» RF(L) CRD050 NO«, t00=0x002e, t01=0x015a}
0x4938…494e Head {h00=0x0012, h01=0x0050, text=» SUKL A2,LBVDU«, t00=0x002e, t01=0x0172}
0x494e…4966 Head {h00=0x0014, h01=0x0050, text=»CRD050 RF CRH100«, t00=0x002e, t01=0x0188}
0x4966…4970 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0010}
0x4970…49b6 Head {h00=0x0042, h01=0x0050, text=»**************************************************************«, t00=0x002f, t01=0x001a}
0x49b6…49c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0060}
0x49c0…49ce Head {h00=0x000a, h01=0x0050, text=»* CRUP«, t00=0x002f, t01=0x006a}
0x49ce…49d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0078}
0x49d8…4a04 Head {h00=0x0028, h01=0x0050, text=»* MOVE CURSOR ONE LINE UP. SAME COL.«, t00=0x002f, t01=0x0082}
0x4a04…4a0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00ae}
0x4a0e…4a54 Head {h00=0x0042, h01=0x0050, text=»**************************************************************«, t00=0x002f, t01=0x00b8}
0x4a54…4a5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00fe}
0x4a5e…4a70 Head {h00=0x000e, h01=0x0050, text=»CRUP EQU *«, t00=0x002f, t01=0x0108}
0x4a70…4a9e Head {h00=0x002a, h01=0x0050, text=» LD A2,PCURS,TCABAS GET CURSOR BINARY «, t00=0x002f, t01=0x011a}
0x4a9e…4ab4 Head {h00=0x0012, h01=0x0050, text=» SUKL A2,LLINE«, t00=0x002f, t01=0x0148}
0x4ab4…4ad6 Head {h00=0x001e, h01=0x0050, text=» RF(NN) CRU050 UPMOST LINE«, t00=0x002f, t01=0x015e}
0x4ad6…4aec Head {h00=0x0012, h01=0x0050, text=» ADKL A2,LBVDU«, t00=0x002f, t01=0x0180}
0x4aec…4b04 Head {h00=0x0014, h01=0x0050, text=»CRU050 RF CRH100«, t00=0x0030, t01=0x0008}
0x4b04…4b1c Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0030, t01=0x0020}
0x4b1c…4b26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0038}
0x4b26…4b64 Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0030, t01=0x0042}
0x4b64…4b6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0080}
0x4b6e…4b7e Head {h00=0x000c, h01=0x0050, text=»* CRHOME«, t00=0x0030, t01=0x008a}
0x4b7e…4b88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x009a}
0x4b88…4bac Head {h00=0x0020, h01=0x0050, text=»* HOME POSITIONING OF CURSOR«, t00=0x0030, t01=0x00a4}
0x4bac…4bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00c8}
0x4bb6…4bf4 Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0030, t01=0x00d2}
0x4bf4…4bfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0110}
0x4bfe…4c12 Head {h00=0x0010, h01=0x0050, text=»CRHOME EQU *«, t00=0x0030, t01=0x011a}
0x4c12…4c24 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0030, t01=0x012e}
0x4c24…4c38 Head {h00=0x0010, h01=0x0050, text=»CRH100 EQU *«, t00=0x0030, t01=0x0140}
0x4c38…4c66 Head {h00=0x002a, h01=0x0050, text=» ST A2,PCURS,TCABAS GET CURSOR BINARY «, t00=0x0030, t01=0x0154}
0x4c66…4c8a Head {h00=0x0020, h01=0x0050, text=» CF A14,ATMASB UPDATE ATTRIB«, t00=0x0030, t01=0x0182}
0x4c8a…4cb0 Head {h00=0x0022, h01=0x0050, text=» CF A14,SETCUR DISPLAY CURSOR «, t00=0x0031, t01=0x0016}
0x4cb0…4cc0 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0031, t01=0x003c}
0x4cc0…4cd8 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0031, t01=0x004c}
0x4cd8…4ce2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0064}
0x4ce2…4d20 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0031, t01=0x006e}
0x4d20…4d2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ac}
0x4d2a…4d38 Head {h00=0x000a, h01=0x0050, text=»* CRNL«, t00=0x0031, t01=0x00b6}
0x4d38…4d42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00c4}
0x4d42…4d78 Head {h00=0x0032, h01=0x0050, text=»* CURSOR IN FIRST UNPROTECTED POS ON NEW LINE «, t00=0x0031, t01=0x00ce}
0x4d78…4d82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0104}
0x4d82…4dc0 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0031, t01=0x010e}
0x4dc0…4dca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x014c}
0x4dca…4ddc Head {h00=0x000e, h01=0x0050, text=»CRNL EQU *«, t00=0x0031, t01=0x0156}
0x4ddc…4e06 Head {h00=0x0026, h01=0x0050, text=» LD A2,PCURS,TCABAS GET CURSOR POS«, t00=0x0031, t01=0x0168}
0x4e06…4e26 (50, 0, 400) Head {h00=0x001c, h01=0x0050, text=» ADKL A2,LLINE NEXT LINE«, t00=0x0032, t01=0x0004}
0x4e26…4e3c Head {h00=0x0012, h01=0x0050, text=» CWK A2,LBVDU «, t00=0x0032, t01=0x0024}
0x4e3c…4e52 Head {h00=0x0012, h01=0x0050, text=» RF(L) CRN050 «, t00=0x0032, t01=0x003a}
0x4e52…4e70 Head {h00=0x001a, h01=0x0050, text=» LDK A2,0 WRAP AROUND «, t00=0x0032, t01=0x0050}
0x4e70…4e7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x006e}
0x4e7a…4e98 Head {h00=0x001a, h01=0x0050, text=»* COMPUTE LEFTMOST POS«, t00=0x0032, t01=0x0078}
0x4e98…4ea2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0096}
0x4ea2…4eba Head {h00=0x0014, h01=0x0050, text=»CRN050 LDK A1,0 «, t00=0x0032, t01=0x00a0}
0x4eba…4ed6 Head {h00=0x0018, h01=0x0050, text=»CRN100 SUKL A2,LLINE«, t00=0x0032, t01=0x00b8}
0x4ed6…4eec Head {h00=0x0012, h01=0x0050, text=» RF(N) CRN120 «, t00=0x0032, t01=0x00d4}
0x4eec…4f02 Head {h00=0x0012, h01=0x0050, text=» ADKL A1,LLINE«, t00=0x0032, t01=0x00ea}
0x4f02…4f14 Head {h00=0x000e, h01=0x0050, text=» RB CRN100«, t00=0x0032, t01=0x0100}
0x4f14…4f4a Head {h00=0x0032, h01=0x0050, text=»CRN120 ST A1,PCURS,TCABAS STORE CURSOR ADDRESS«, t00=0x0032, t01=0x0112}
0x4f4a…4f62 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0032, t01=0x0148}
0x4f62…4f6a Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x0160}
0x4f6a…4fb4 Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x0032, t01=0x0168}
0x4fb4…4fc6 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0033, t01=0x0022}
0x4fc6…4ff8 Head {h00=0x002e, h01=0x0050, text=» CF A14,ATMASB SEARCH ATTRIBUTE BACKWARDS «, t00=0x0033, t01=0x0034}
0x4ff8…500a Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0033, t01=0x0066}
0x500a…5032 Head {h00=0x0024, h01=0x0050, text=» RF(Z) CRN130 NO ATTRIBUTE FOUND«, t00=0x0033, t01=0x0078}
0x5032…5046 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/10 «, t00=0x0033, t01=0x00a0}
0x5046…506a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TAB PROTECTED FIELD «, t00=0x0033, t01=0x00b4}
0x506a…509c Head {h00=0x002e, h01=0x0050, text=» CW A2,PCURS,TCABAS CURSOR ON ATTRIBUTE ??«, t00=0x0033, t01=0x00d8}
0x509c…50b8 Head {h00=0x0018, h01=0x0050, text=» RF(NE) CRN150 NO!! «, t00=0x0033, t01=0x010a}
0x50b8…50e4 Head {h00=0x0028, h01=0x0050, text=» CWK A2,1919 LAST SCREEN POSITION?? «, t00=0x0033, t01=0x0126}
0x50e4…5100 Head {h00=0x0018, h01=0x0050, text=» RF(NE) CRN140 NO!! «, t00=0x0033, t01=0x0152}
0x5100…511a Head {h00=0x0016, h01=0x0050, text=»CRN130 LDKL A2,-1 «, t00=0x0033, t01=0x016e}
0x511a…5132 Head {h00=0x0014, h01=0x0050, text=»CRN140 ADK A2,1 «, t00=0x0033, t01=0x0188}
0x5132…514e Head {h00=0x0018, h01=0x0050, text=» ST A2,PCURS,TCABAS «, t00=0x0034, t01=0x0010}
0x514e…517a Head {h00=0x0028, h01=0x0050, text=»CRN150 CF A14,SETCUR POSITION CURSOR«, t00=0x0034, t01=0x002c}
0x517a…518a Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0034, t01=0x0058}
0x518a…51d6 Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x0034, t01=0x0068}
0x51d6…51ee Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0034, t01=0x00b4}
0x51ee…51f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00cc}
0x51f8…5234 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0034, t01=0x00d6}
0x5234…523e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0112}
0x523e…524c Head {h00=0x000a, h01=0x0050, text=»* TAB «, t00=0x0034, t01=0x011c}
0x524c…5256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x012a}
0x5256…528c Head {h00=0x0032, h01=0x0050, text=»* MOVE THE CURSOR TO THE FIRST CHAR. LOCATION «, t00=0x0034, t01=0x0134}
0x528c…52b8 Head {h00=0x0028, h01=0x0050, text=»* OF THE NEXT UNPROTECTED DATA FIELD«, t00=0x0034, t01=0x016a}
0x52b8…52c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0008}
0x52c2…52fe Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0035, t01=0x0012}
0x52fe…5308 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x004e}
0x5308…533e Head {h00=0x0032, h01=0x0050, text=»* A1=END OF BUFFER PAREM. 0=EOB NOT REACHED«, t00=0x0035, t01=0x0058}
0x533e…5350 Head {h00=0x000e, h01=0x0050, text=»* 2=EOB «, t00=0x0035, t01=0x008e}
0x5350…5370 Head {h00=0x001c, h01=0x0050, text=»* 3=ATTRIB. IN EOB POS«, t00=0x0035, t01=0x00a0}
0x5370…5392 Head {h00=0x001e, h01=0x0050, text=»* A2=CURSOR BINARY ADDRESS«, t00=0x0035, t01=0x00c0}
0x5392…53a8 Head {h00=0x0012, h01=0x0050, text=»* A3=CHARACTGR«, t00=0x0035, t01=0x00e2}
0x53a8…53b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00f8}
0x53b2…53c4 Head {h00=0x000e, h01=0x0050, text=»TAB EQU * «, t00=0x0035, t01=0x0102}
0x53c4…53d6 Head {h00=0x000e, h01=0x0050, text=» LDK A5,1 «, t00=0x0035, t01=0x0114}
0x53d6…5400 Head {h00=0x0026, h01=0x0050, text=» LD A2,PCURS,TCABAS GET CURSOR POS«, t00=0x0035, t01=0x0126}
0x5400…542e Head {h00=0x002a, h01=0x0050, text=»TAB100 CF A14,ATMASF SEARCH ATTRIBUTE «, t00=0x0035, t01=0x0150}
0x542e…544e Head {h00=0x001c, h01=0x0050, text=» CWK A1,0 END OF BUFFER?«, t00=0x0035, t01=0x017e}
0x544e…5468 Head {h00=0x0016, h01=0x0050, text=» RF(G) TAB300 YES «, t00=0x0036, t01=0x000e}
0x5468…547a Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0036, t01=0x0028}
0x547a…54a0 Head {h00=0x0022, h01=0x0050, text=»TAB150 ANK A3,/10 UNPROTECTED?«, t00=0x0036, t01=0x003a}
0x54a0…54ba Head {h00=0x0016, h01=0x0050, text=» RF(E) TAB200 YES «, t00=0x0036, t01=0x0060}
0x54ba…54da Head {h00=0x001c, h01=0x0050, text=» RB TAB100 NEXT ATTRIB. «, t00=0x0036, t01=0x007a}
0x54da…54fc Head {h00=0x001e, h01=0x0050, text=»TAB200 ST A2,PCURS,TCABAS «, t00=0x0036, t01=0x009a}
0x54fc…5526 Head {h00=0x0026, h01=0x0050, text=» CF A14,SETCUR DISPLAY NEW CURSOR «, t00=0x0036, t01=0x00bc}
0x5526…5536 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0036, t01=0x00e6}
0x5536…554e Head {h00=0x0014, h01=0x0050, text=»TAB300 LDK A2,0 «, t00=0x0036, t01=0x00f6}
0x554e…557e Head {h00=0x002c, h01=0x0050, text=» CWK A1,3 ATTRIBUTE IN LAST POSITION ?? «, t00=0x0036, t01=0x010e}
0x557e…5596 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0036, t01=0x013e}
0x5596…55d6 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0036, t01=0x0156}
0x55d6…55f2 Head {h00=0x0018, h01=0x0050, text=» RF(NE) TAB350 NO!! «, t00=0x0037, t01=0x0008}
0x55f2…561e Head {h00=0x0028, h01=0x0050, text=» ANK A5,1 WHOLE BUFFER CONTROLLED ??«, t00=0x0037, t01=0x0024}
0x561e…563a Head {h00=0x0018, h01=0x0050, text=» RB(Z) TAB200 YES!! «, t00=0x0037, t01=0x0050}
0x563a…564e Head {h00=0x0010, h01=0x0050, text=» SUR A5,A5 «, t00=0x0037, t01=0x006c}
0x564e…5670 Head {h00=0x001e, h01=0x0050, text=» RB TAB150 CHECK ATTRIBUTE«, t00=0x0037, t01=0x0080}
0x5670…5684 Head {h00=0x0010, h01=0x0050, text=»TAB350 EQU *«, t00=0x0037, t01=0x00a2}
0x5684…56c4 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0037, t01=0x00b6}
0x56c4…56ec Head {h00=0x0024, h01=0x0050, text=» ANK A5,1 WHOLE BUFF. CONTROLED?«, t00=0x0037, t01=0x00f6}
0x56ec…5704 Head {h00=0x0014, h01=0x0050, text=» RF(G) TAB400 NO«, t00=0x0037, t01=0x011e}
0x5704…5738 Head {h00=0x0030, h01=0x0050, text=» RB TAB200 ALL PROT. OR NON-FORMATTED BUFF. «, t00=0x0037, t01=0x0136}
0x5738…5750 Head {h00=0x0014, h01=0x0050, text=»TAB400 LDK A5,0 «, t00=0x0037, t01=0x016a}
0x5750…5762 Head {h00=0x000e, h01=0x0050, text=» RB TAB100«, t00=0x0037, t01=0x0182}
0x5762…577a (56, 0, 400) Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0038, t01=0x0004}
0x577a…5784 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x001c}
0x5784…57c8 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0038, t01=0x0026}
0x57c8…57d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x006a}
0x57d2…57e0 Head {h00=0x000a, h01=0x0050, text=»* DUP «, t00=0x0038, t01=0x0074}
0x57e0…57ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0082}
0x57ea…5802 Head {h00=0x0014, h01=0x0050, text=»* DUPLICATE KEY «, t00=0x0038, t01=0x008c}
0x5802…5840 Head {h00=0x003a, h01=0x0050, text=»* OPERATION OF THIS KEY CAUSES A UNIQUE CHARACTER CODE«, t00=0x0038, t01=0x00a4}
0x5840…587e Head {h00=0x003a, h01=0x0050, text=»* TO BE ENTERED INTO THE DISPLAY BUFFER AND A STANDARD«, t00=0x0038, t01=0x00e2}
0x587e…58aa Head {h00=0x0028, h01=0x0050, text=»* TAB KEY OPERATION TO BE PERFORMED «, t00=0x0038, t01=0x0120}
0x58aa…58b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x014c}
0x58b4…58f8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0038, t01=0x0156}
0x58f8…5902 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x000a}
0x5902…5914 Head {h00=0x000e, h01=0x0050, text=»DUP EQU * «, t00=0x0039, t01=0x0014}
0x5914…593e Head {h00=0x0026, h01=0x0050, text=» LD A1,MODE,TCABAS INSERT MODE ?? «, t00=0x0039, t01=0x0026}
0x593e…5978 Head {h00=0x0036, h01=0x0050, text=» ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INSERT MODE«, t00=0x0039, t01=0x0050}
0x5978…598e Head {h00=0x0012, h01=0x0050, text=» LDK A2,DUPCH «, t00=0x0039, t01=0x008a}
0x598e…59c2 Head {h00=0x0030, h01=0x0050, text=» LD A3,ECBKB+ECBBA,CREBAS GET KB BUFF. ADDR.«, t00=0x0039, t01=0x00a0}
0x59c2…59d4 Head {h00=0x000e, h01=0x0050, text=» SCR A2,A3«, t00=0x0039, t01=0x00d4}
0x59d4…59e8 Head {h00=0x0010, h01=0x0050, text=» CF A14,NUM «, t00=0x0039, t01=0x00e6}
0x59e8…59fc Head {h00=0x0010, h01=0x0050, text=» CF A14,TAB «, t00=0x0039, t01=0x00fa}
0x59fc…5a0c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0039, t01=0x010e}
0x5a0c…5a24 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0039, t01=0x011e}
0x5a24…5a2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0136}
0x5a2e…5a72 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0039, t01=0x0140}
0x5a72…5a7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0184}
0x5a7c…5a96 Head {h00=0x0016, h01=0x0050, text=»* FIELD MARK«, t00=0x0039, t01=0x018e}
0x5a96…5aa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0018}
0x5aa0…5ae4 Head {h00=0x0040, h01=0x0050, text=»* OPERATION OF THIS KEY CAUSES A UNIQUE CHARACTER CODE«, t00=0x003a, t01=0x0022}
0x5ae4…5b24 Head {h00=0x003c, h01=0x0050, text=»* TO BE ENTERED IN THE DISPLAY BUFFER IN ADDITION «, t00=0x003a, t01=0x0066}
0x5b24…5b54 Head {h00=0x002c, h01=0x0050, text=»* TO THE DC CHARACTER TRANSMITTED «, t00=0x003a, t01=0x00a6}
0x5b54…5b5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00d6}
0x5b5e…5ba0 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x003a, t01=0x00e0}
0x5ba0…5baa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0122}
0x5baa…5bbe Head {h00=0x0010, h01=0x0050, text=»FLDMRK EQU *«, t00=0x003a, t01=0x012c}
0x5bbe…5be6 Head {h00=0x0024, h01=0x0050, text=» LD A1,MODE,TCABAS INSERT MODE??«, t00=0x003a, t01=0x0140}
0x5be6…5c20 Head {h00=0x0036, h01=0x0050, text=» ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INSERT MODE«, t00=0x003a, t01=0x0168}
0x5c20…5c34 Head {h00=0x0010, h01=0x0050, text=» LDK A2,FMCH«, t00=0x003b, t01=0x0012}
0x5c34…5c6a Head {h00=0x0032, h01=0x0050, text=» LD A3,ECBKB+ECBBA,CREBAS GET KB BUFFER ADDR. «, t00=0x003b, t01=0x0026}
0x5c6a…5c7c Head {h00=0x000e, h01=0x0050, text=» SCR A2,A3«, t00=0x003b, t01=0x005c}
0x5c7c…5c90 Head {h00=0x0010, h01=0x0050, text=» CF A14,NUM «, t00=0x003b, t01=0x006e}
0x5c90…5ca0 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x003b, t01=0x0082}
0x5ca0…5cb8 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x003b, t01=0x0092}
0x5cb8…5cc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00aa}
0x5cc2…5d04 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x003b, t01=0x00b4}
0x5d04…5d0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00f6}
0x5d0e…5d24 Head {h00=0x0012, h01=0x0050, text=»* RDHOME«, t00=0x003b, t01=0x0100}
0x5d24…5d2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0116}
0x5d2e…5d4c Head {h00=0x001a, h01=0x0050, text=»* READY HOME KEY«, t00=0x003b, t01=0x0120}
0x5d4c…5d88 Head {h00=0x0038, h01=0x0050, text=»* OPERATION OF THIS KEY CAUSES THE CURSOR TOBE«, t00=0x003b, t01=0x013e}
0x5d88…5dc6 Head {h00=0x003a, h01=0x0050, text=»* POSITIONED AT THE FIRST UNPROTECTED CHARACTER«, t00=0x003b, t01=0x017a}
0x5dc6…5de4 Head {h00=0x001a, h01=0x0050, text=»* ON THE SCREEN «, t00=0x003c, t01=0x0028}
0x5de4…5dee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0046}
0x5dee…5e2e Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x003c, t01=0x0050}
0x5e2e…5e38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0090}
0x5e38…5e54 Head {h00=0x0018, h01=0x0050, text=»RDHOME LDKL A4,BVDU «, t00=0x003c, t01=0x009a}
0x5e54…5e7e Head {h00=0x0026, h01=0x0050, text=» ADR A4,TCABAS VDU BUFFER ADDRESS «, t00=0x003c, t01=0x00b6}
0x5e7e…5eae Head {h00=0x002c, h01=0x0050, text=» LC A2,1919,A4 GET LAST SCREEN CHARACTER«, t00=0x003c, t01=0x00e0}
0x5eae…5ec2 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x003c, t01=0x0110}
0x5ec2…5ed6 Head {h00=0x0010, h01=0x0050, text=» CWK A2,/20 «, t00=0x003c, t01=0x0124}
0x5ed6…5eec Head {h00=0x0012, h01=0x0050, text=» RF(NL) RDH10 «, t00=0x003c, t01=0x0138}
0x5eec…5f00 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/10 «, t00=0x003c, t01=0x014e}
0x5f00…5f28 Head {h00=0x0024, h01=0x0050, text=» ABL(Z) CRHOME UNPROTECTED FIELD«, t00=0x003c, t01=0x0162}
0x5f28…5f46 Head {h00=0x001a, h01=0x0050, text=»RDH10 CM PCURS,TCABAS «, t00=0x003c, t01=0x018a}
0x5f46…5f76 Head {h00=0x002c, h01=0x0050, text=» CF A14,TAB SEARCH 1ST UNPROTECTED FIELD«, t00=0x003d, t01=0x0018}
0x5f76…5f86 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x003d, t01=0x0048}
0x5f86…5f9e Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x003d, t01=0x0058}
0x5f9e…5fa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0070}
0x5fa8…5fe6 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x003d, t01=0x007a}
0x5fe6…5ff0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00b8}
0x5ff0…6000 Head {h00=0x000c, h01=0x0050, text=»* BAKTAB«, t00=0x003d, t01=0x00c2}
0x6000…600a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00d2}
0x600a…6044 Head {h00=0x0036, h01=0x0050, text=»* MOVE THE CURSOR TO THE FIRST CHARACTER LOCATION «, t00=0x003d, t01=0x00dc}
0x6044…607a Head {h00=0x0032, h01=0x0050, text=»* OF THE NEXT PRECIDING UNPROTECTED DATA FIELD«, t00=0x003d, t01=0x0116}
0x607a…6084 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x014c}
0x6084…60c0 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x003d, t01=0x0156}
0x60c0…60ca (62, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0004}
0x60ca…60ec Head {h00=0x001e, h01=0x0050, text=»* A2=CURSOR BINARY ADDRESS«, t00=0x003e, t01=0x000e}
0x60ec…6102 Head {h00=0x0012, h01=0x0050, text=»* A3=CHARACTER«, t00=0x003e, t01=0x0030}
0x6102…6116 Head {h00=0x0010, h01=0x0050, text=»BAKTAB EQU *«, t00=0x003e, t01=0x0046}
0x6116…6128 Head {h00=0x000e, h01=0x0050, text=» LDK A5,1 «, t00=0x003e, t01=0x005a}
0x6128…6152 Head {h00=0x0026, h01=0x0050, text=» LD A2,PCURS,TCABAS GET CURSOR POS«, t00=0x003e, t01=0x006c}
0x6152…6178 Head {h00=0x0022, h01=0x0050, text=» CF A14,GBUFFC GET BUFF CHAR. «, t00=0x003e, t01=0x0096}
0x6178…619a Head {h00=0x001e, h01=0x0050, text=» CWK A3,/1F ATTRIB. CHAR? «, t00=0x003e, t01=0x00bc}
0x619a…61b4 Head {h00=0x0016, h01=0x0050, text=» RF(NG) BAK100 YES«, t00=0x003e, t01=0x00de}
0x61b4…61da Head {h00=0x0022, h01=0x0050, text=» CWK A2,0 UPPER LEFTMOST POS? «, t00=0x003e, t01=0x00f8}
0x61da…61f4 Head {h00=0x0016, h01=0x0050, text=» RF(E) BAK400 YES «, t00=0x003e, t01=0x011e}
0x61f4…6206 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x003e, t01=0x0138}
0x6206…6232 Head {h00=0x0028, h01=0x0050, text=»BAK100 CWK A2,0 UPPER LEFTMOST POS? «, t00=0x003e, t01=0x014a}
0x6232…624c Head {h00=0x0016, h01=0x0050, text=» RF(E) BAK400 YES «, t00=0x003e, t01=0x0176}
0x624c…6264 Head {h00=0x0014, h01=0x0050, text=»BAK200 SUK A2,1 «, t00=0x003e, t01=0x0190}
0x6264…628c Head {h00=0x0024, h01=0x0050, text=» CF A14,ATMASB SEARCH ATTRIBUTE «, t00=0x003f, t01=0x0018}
0x628c…62d0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x003f, t01=0x0040}
0x62d0…62e2 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x003f, t01=0x0084}
0x62e2…6304 Head {h00=0x001e, h01=0x0050, text=» RF(Z) BAK400 NO ATTRIBUTE«, t00=0x003f, t01=0x0096}
0x6304…633c Head {h00=0x0034, h01=0x0050, text=» RF(N) BAK250 ATTRIBUTE FOUND. NOT IN LAST POS. «, t00=0x003f, t01=0x00b8}
0x633c…6370 Head {h00=0x0030, h01=0x0050, text=» SUR A2,A2 ATTRIBUTE FOUND IN LAST POSITION «, t00=0x003f, t01=0x00f0}
0x6370…6382 Head {h00=0x000e, h01=0x0050, text=» RF BAK300«, t00=0x003f, t01=0x0124}
0x6382…6396 Head {h00=0x0010, h01=0x0050, text=»BAK250 EQU *«, t00=0x003f, t01=0x0136}
0x6396…63d8 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x003f, t01=0x014a}
0x63d8…63f6 Head {h00=0x001a, h01=0x0050, text=» ANK A3,/10 PROTECTED?«, t00=0x003f, t01=0x018c}
0x63f6…6410 Head {h00=0x0016, h01=0x0050, text=» RB(NE) BAK100 YES«, t00=0x0040, t01=0x001a}
0x6410…6422 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0040, t01=0x0034}
0x6422…6444 Head {h00=0x001e, h01=0x0050, text=»BAK300 ST A2,PCURS,TCABAS «, t00=0x0040, t01=0x0046}
0x6444…6466 Head {h00=0x001e, h01=0x0050, text=» CF A14,SETCUR SET CURSOR «, t00=0x0040, t01=0x0068}
0x6466…6476 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0040, t01=0x008a}
0x6476…64a4 Head {h00=0x002a, h01=0x0050, text=»BAK400 SUK A5,1 WHOLE BUFF CONTROLLED?«, t00=0x0040, t01=0x009a}
0x64a4…64be Head {h00=0x0016, h01=0x0050, text=» RB(NZ) BAK300 YES«, t00=0x0040, t01=0x00c8}
0x64be…64ea Head {h00=0x0028, h01=0x0050, text=» LDKL A2,LBVDU-1 END BUFFER ADDRESS «, t00=0x0040, t01=0x00e2}
0x64ea…6510 Head {h00=0x0022, h01=0x0050, text=» CF A14,GBUFFC GET BUFF CHAR. «, t00=0x0040, t01=0x010e}
0x6510…6534 Head {h00=0x0020, h01=0x0050, text=» CWK A3,/1F ATTRIBUTE CHAR? «, t00=0x0040, t01=0x0134}
0x6534…654c Head {h00=0x0014, h01=0x0050, text=» RB(G) BAK200 NO«, t00=0x0040, t01=0x0158}
0x654c…656a Head {h00=0x001a, h01=0x0050, text=» ANK A3,/10 PROTECTED?«, t00=0x0040, t01=0x0170}
0x656a…6584 Head {h00=0x0016, h01=0x0050, text=» RB(NE) BAK200 YES«, t00=0x0040, t01=0x018e}
0x6584…65b6 Head {h00=0x002e, h01=0x0050, text=» ST A3,ATTRIB,TCABAS UPDATE NEW ATTRIBUTE «, t00=0x0041, t01=0x0018}
0x65b6…65d2 Head {h00=0x0018, h01=0x0050, text=» ST A2,CURATT,TCABAS«, t00=0x0041, t01=0x004a}
0x65d2…661a Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0041, t01=0x0066}
0x661a…662c Head {h00=0x000e, h01=0x0050, text=» RB BAK200«, t00=0x0041, t01=0x00ae}
0x662c…6674 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0041, t01=0x00c0}
0x6674…667c Head {h00=0x0004, h01=0x0050, t00=0x0041, t01=0x0108}
0x667c…6694 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0041, t01=0x0110}
0x6694…669e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0128}
0x669e…66e0 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0041, t01=0x0132}
0x66e0…66ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0174}
0x66ea…66f8 Head {h00=0x000a, h01=0x0050, text=»* CHAR«, t00=0x0041, t01=0x017e}
0x66f8…6702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x018c}
0x6702…6740 Head {h00=0x003a, h01=0x0050, text=»* ALPHABETIC AND SPECIAL CHAR UPDATING AND DISPLAYING «, t00=0x0042, t01=0x0008}
0x6740…674a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0046}
0x674a…678c Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0042, t01=0x0050}
0x678c…6796 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0092}
0x6796…67aa Head {h00=0x0010, h01=0x0050, text=»LCASPW EQU *«, t00=0x0042, t01=0x009c}
0x67aa…67da Head {h00=0x002c, h01=0x0050, text=» SUK A2,/50 CONVERT TO LOWER CASE P - W «, t00=0x0042, t01=0x00b0}
0x67da…67fc Head {h00=0x001e, h01=0x0050, text=» SC* A2,ECBKB+ECBBA,CREBAS«, t00=0x0042, t01=0x00e0}
0x67fc…6806 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0102}
0x6806…6818 Head {h00=0x000e, h01=0x0050, text=»CHAR EQU *«, t00=0x0042, t01=0x010c}
0x6818…6842 Head {h00=0x0026, h01=0x0050, text=» LD A2,PCURS,TCABAS GET CURSOR POS«, t00=0x0042, t01=0x011e}
0x6842…6874 Head {h00=0x002e, h01=0x0050, text=» LD A3,CURATT,TCABAS GET ATTRIBUTE ADDRESS«, t00=0x0042, t01=0x0148}
0x6874…6898 Head {h00=0x0020, h01=0x0050, text=» CWR A2,A3 CURSOR ON ATTRIB?«, t00=0x0042, t01=0x017a}
0x6898…68b2 Head {h00=0x0016, h01=0x0050, text=» RF(E) CHA300 YES «, t00=0x0043, t01=0x000e}
0x68b2…68e8 Head {h00=0x0032, h01=0x0050, text=»CHA100 LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR «, t00=0x0043, t01=0x0028}
0x68e8…68fa Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0043, t01=0x005e}
0x68fa…6920 Head {h00=0x0022, h01=0x0050, text=» ANK A4,/10 PROTECTRED FIELD? «, t00=0x0043, t01=0x0070}
0x6920…693a Head {h00=0x0016, h01=0x0050, text=» RF(NE) CHA300 YES«, t00=0x0043, t01=0x0096}
0x693a…6952 Head {h00=0x0014, h01=0x0050, text=»CHA200 LDR A4,A3«, t00=0x0043, t01=0x00b0}
0x6952…6974 Head {h00=0x001e, h01=0x0050, text=» ANK A4,/8 NUMERIC FIELD? «, t00=0x0043, t01=0x00c8}
0x6974…698c Head {h00=0x0014, h01=0x0050, text=» RF(E) ANCOMM NO«, t00=0x0043, t01=0x00ea}
0x698c…69bc Head {h00=0x002c, h01=0x0050, text=»CHA300 ABL ERROR NOT ALLOWED DISPLAY POS«, t00=0x0043, t01=0x0102}
0x69bc…69d4 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0043, t01=0x0132}
0x69d4…6a1c Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0043, t01=0x014a}
0x6a1c…6a26 (68, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0004}
0x6a26…6a50 Head {h00=0x0026, h01=0x0050, text=»* Z E R O : 3 TRIPLE ZERO KEY«, t00=0x0044, t01=0x000e}
0x6a50…6a7c Head {h00=0x0028, h01=0x0050, text=»* Z E R O : 2 DOUBLE ZERO KEY «, t00=0x0044, t01=0x0038}
0x6a7c…6a86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0064}
0x6a86…6ac0 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0044, t01=0x006e}
0x6ac0…6ac8 Head {h00=0x0004, h01=0x0050, t00=0x0044, t01=0x00a8}
0x6ac8…6adc Head {h00=0x0010, h01=0x0050, text=»ZERO:3 EQU *«, t00=0x0044, t01=0x00b0}
0x6adc…6b00 Head {h00=0x0020, h01=0x0050, text=» LDK A1,X'30' CHARACTER ZERO«, t00=0x0044, t01=0x00c4}
0x6b00…6b3c Head {h00=0x0038, h01=0x0050, text=» SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER«, t00=0x0044, t01=0x00e8}
0x6b3c…6b62 Head {h00=0x0022, h01=0x0050, text=» CF A14,NUM DISPLAY CHARACTER «, t00=0x0044, t01=0x0124}
0x6b62…6b6a Head {h00=0x0004, h01=0x0050, t00=0x0044, t01=0x014a}
0x6b6a…6b7e Head {h00=0x0010, h01=0x0050, text=»ZERO:2 EQU *«, t00=0x0044, t01=0x0152}
0x6b7e…6ba2 Head {h00=0x0020, h01=0x0050, text=» LDK A1,X'30' CHARACTER ZERO«, t00=0x0044, t01=0x0166}
0x6ba2…6bde Head {h00=0x0038, h01=0x0050, text=» SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER«, t00=0x0044, t01=0x018a}
0x6bde…6c04 Head {h00=0x0022, h01=0x0050, text=» CF A14,NUM DISPLAY CHARACTER «, t00=0x0045, t01=0x0036}
0x6c04…6c2a Head {h00=0x0022, h01=0x0050, text=» CF A14,NUM DISPLAY CHARACTER «, t00=0x0045, t01=0x005c}
0x6c2a…6c42 Head {h00=0x0014, h01=0x0050, text=» RTN A14 RETURN «, t00=0x0045, t01=0x0082}
0x6c42…6c4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x009a}
0x6c4c…6c8e Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0045, t01=0x00a4}
0x6c8e…6c98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00e6}
0x6c98…6ca6 Head {h00=0x000a, h01=0x0050, text=»* NUM «, t00=0x0045, t01=0x00f0}
0x6ca6…6cb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00fe}
0x6cb0…6cd6 Head {h00=0x0022, h01=0x0050, text=»* DISPLAY AND UPDATE NUMERICS «, t00=0x0045, t01=0x0108}
0x6cd6…6ce0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x012e}
0x6ce0…6d22 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0045, t01=0x0138}
0x6d22…6d2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x017a}
0x6d2c…6d40 Head {h00=0x0010, h01=0x0050, text=»NUMCOM EQU *«, t00=0x0045, t01=0x0184}
0x6d40…6d54 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/2C «, t00=0x0046, t01=0x0008}
0x6d54…6d76 Head {h00=0x001e, h01=0x0050, text=» SC* A2,ECBKB+ECBBA,CREBAS«, t00=0x0046, t01=0x001c}
0x6d76…6d80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x003e}
0x6d80…6d92 Head {h00=0x000e, h01=0x0050, text=»NUM EQU * «, t00=0x0046, t01=0x0048}
0x6d92…6dbc Head {h00=0x0026, h01=0x0050, text=» LD A2,PCURS,TCABAS GET CURSOR POS«, t00=0x0046, t01=0x005a}
0x6dbc…6dee Head {h00=0x002e, h01=0x0050, text=» LD A3,CURATT,TCABAS GET ATTRIBUTE ADDRESS«, t00=0x0046, t01=0x0084}
0x6dee…6e16 Head {h00=0x0024, h01=0x0050, text=» CWR A2,A3 CURSOR ON ATTRIBUTE? «, t00=0x0046, t01=0x00b6}
0x6e16…6e30 Head {h00=0x0016, h01=0x0050, text=» RF(E) NUM200 YES «, t00=0x0046, t01=0x00de}
0x6e30…6e66 Head {h00=0x0032, h01=0x0050, text=»NUM100 LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR «, t00=0x0046, t01=0x00f8}
0x6e66…6e78 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0046, t01=0x012e}
0x6e78…6e9c Head {h00=0x0020, h01=0x0050, text=» ANK A4,/10 PROTECTED FIELD?«, t00=0x0046, t01=0x0140}
0x6e9c…6eb4 Head {h00=0x0014, h01=0x0050, text=» RF(E) ANCOMM NO«, t00=0x0046, t01=0x0164}
0x6eb4…6ee4 Head {h00=0x002c, h01=0x0050, text=»NUM200 ABL ERROR NOT ALLOWED DISPLAY POS«, t00=0x0046, t01=0x017c}
0x6ee4…6efc Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0047, t01=0x001c}
0x6efc…6f06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0034}
0x6f06…6f48 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0047, t01=0x003e}
0x6f48…6f52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0080}
0x6f52…6f62 Head {h00=0x000c, h01=0x0050, text=»* ANCOMM«, t00=0x0047, t01=0x008a}
0x6f62…6f6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x009a}
0x6f6c…6fac Head {h00=0x003c, h01=0x0050, text=»* COMMON SUBMODULE FOR ALPHANUMERIC CHAR. DISPLAYING AND«, t00=0x0047, t01=0x00a4}
0x6fac…6fbe Head {h00=0x000e, h01=0x0050, text=»* UPDATING«, t00=0x0047, t01=0x00e4}
0x6fbe…6fc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00f6}
0x6fc8…700a Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0047, t01=0x0100}
0x700a…7014 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0142}
0x7014…7028 Head {h00=0x0010, h01=0x0050, text=»ANCOMM EQU *«, t00=0x0047, t01=0x014c}
0x7028…704e Head {h00=0x0022, h01=0x0050, text=» LC* A4,ECBKB+ECBBA,CREBAS =1«, t00=0x0047, t01=0x0160}
0x704e…7062 Head {h00=0x0010, h01=0x0050, text=»ANC005 EQU *«, t00=0x0047, t01=0x0186}
0x7062…7078 Head {h00=0x0012, h01=0x0050, text=» LDKL A6,BVDU «, t00=0x0048, t01=0x000a}
0x7078…708e Head {h00=0x0012, h01=0x0050, text=» ADR A6,TCABAS«, t00=0x0048, t01=0x0020}
0x708e…70a0 Head {h00=0x000e, h01=0x0050, text=» ADR A6,A2«, t00=0x0048, t01=0x0036}
0x70a0…70a8 Head {h00=0x0004, h01=0x0050, t00=0x0048, t01=0x0048}
0x70a8…70d2 Head {h00=0x0026, h01=0x0050, text=» LD A1,MODE,TCABAS INSERT MODE ?? «, t00=0x0048, t01=0x0050}
0x70d2…70ee Head {h00=0x0018, h01=0x0050, text=» RF(NZ) ANC010 YES!!«, t00=0x0048, t01=0x007a}
0x70ee…7110 Head {h00=0x001e, h01=0x0050, text=» SCR A4,A6 UPDATE VDU BUFF«, t00=0x0048, t01=0x0096}
0x7110…713e Head {h00=0x002a, h01=0x0050, text=»ANC010 LDR A7,A6 SAVE CURSOR POSITION «, t00=0x0048, t01=0x00b8}
0x713e…715a Head {h00=0x0018, h01=0x0050, text=» LD A5,CURATT,TCABAS«, t00=0x0048, t01=0x00e6}
0x715a…7186 Head {h00=0x0028, h01=0x0050, text=» CWK A5,LBVDU+1 UNFORMATTED SCREEN? «, t00=0x0048, t01=0x0102}
0x7186…71a0 Head {h00=0x0016, h01=0x0050, text=» RF(E) ANC100 YES «, t00=0x0048, t01=0x012e}
0x71a0…71c4 Head {h00=0x0020, h01=0x0050, text=» SUR A6,A2 BVDU START ADDR. «, t00=0x0048, t01=0x0148}
0x71c4…71e2 Head {h00=0x001a, h01=0x0050, text=» ADR A6,A5 ATTRIB. POS«, t00=0x0048, t01=0x016c}
0x71e2…7212 Head {h00=0x002c, h01=0x0050, text=» LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR «, t00=0x0048, t01=0x018a}
0x7212…722e Head {h00=0x0018, h01=0x0050, text=» ORK A3,1 MDT-BIT ON«, t00=0x0049, t01=0x002a}
0x722e…7240 Head {h00=0x000e, h01=0x0050, text=» SCR A3,A6«, t00=0x0049, t01=0x0046}
0x7240…7254 Head {h00=0x0010, h01=0x0050, text=»ANC100 EQU *«, t00=0x0049, t01=0x0058}
0x7254…726c Head {h00=0x0014, h01=0x0050, text=» IFT IN:DL=1 =3«, t00=0x0049, t01=0x006c}
0x726c…7296 Head {h00=0x0026, h01=0x0050, text=» LD A1,MODE,TCABAS INSERT MODE ?? «, t00=0x0049, t01=0x0084}
0x7296…72b0 Head {h00=0x0016, h01=0x0050, text=» RF(Z) ANC120 NO!!«, t00=0x0049, t01=0x00ae}
0x72b0…72e4 Head {h00=0x0030, h01=0x0050, text=» LCR A1,A7 GET CHARACTER AT CURSOR POSITION «, t00=0x0049, t01=0x00c8}
0x72e4…72f8 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/7F «, t00=0x0049, t01=0x00fc}
0x72f8…7314 Head {h00=0x0018, h01=0x0050, text=» CWK A1,NULL NULL?? «, t00=0x0049, t01=0x0110}
0x7314…7330 Head {h00=0x0018, h01=0x0050, text=» RF(NE) INS:10 NO!! «, t00=0x0049, t01=0x012c}
0x7330…7358 Head {h00=0x0024, h01=0x0050, text=» SCR A4,A7 STORE INPUT CHARACTER«, t00=0x0049, t01=0x0148}
0x7358…736a Head {h00=0x000e, h01=0x0050, text=» XIF =3 «, t00=0x0049, t01=0x0170}
0x736a…737e Head {h00=0x0010, h01=0x0050, text=»ANC120 EQU *«, t00=0x0049, t01=0x0182}
0x737e…7386 Head {h00=0x0004, h01=0x0050, t00=0x004a, t01=0x0008}
0x7386…73bc Head {h00=0x0032, h01=0x0050, text=» LDK A5,/2B CURSOR NOT MOVED BEFORE DISPLAYING«, t00=0x004a, t01=0x0010}
0x73bc…73e0 Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBVDU+ECBBA,CREBAS «, t00=0x004a, t01=0x0046}
0x73e0…73f8 Head {h00=0x0014, h01=0x0050, text=» SC A5,1,A1 =1 «, t00=0x004a, t01=0x006a}
0x73f8…740c Head {h00=0x0010, h01=0x0050, text=» LDK A5,/1E «, t00=0x004a, t01=0x0082}
0x740c…7426 Head {h00=0x0016, h01=0x0050, text=» ADK A1,2 NEXT POS«, t00=0x004a, t01=0x0096}
0x7426…7452 Head {h00=0x0028, h01=0x0050, text=» SCR A5,A1 LOW INT, STORE IN BUFFER «, t00=0x004a, t01=0x00b0}
0x7452…7464 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A3«, t00=0x004a, t01=0x00dc}
0x7464…748c Head {h00=0x0024, h01=0x0050, text=» ANK A3,/4 STANDARD DISPLAYING? «, t00=0x004a, t01=0x00ee}
0x748c…74a6 Head {h00=0x0016, h01=0x0050, text=» RF(Z) ANC200 YES «, t00=0x004a, t01=0x0116}
0x74a6…74d0 Head {h00=0x0026, h01=0x0050, text=» ANK A6,/2 INTENSIFIED DISPLAYING?«, t00=0x004a, t01=0x0130}
0x74d0…74ea Head {h00=0x0016, h01=0x0050, text=» RF(Z) ANC150 YES «, t00=0x004a, t01=0x015a}
0x74ea…7508 Head {h00=0x001a, h01=0x0050, text=» LDK A2,/20 LOAD SPACE«, t00=0x004a, t01=0x0174}
0x7508…752a (75, 0, 398) Head {h00=0x001e, h01=0x0050, text=» RF ANC250 NON DISPLAYING «, t00=0x004b, t01=0x0004}
0x752a…7556 Head {h00=0x0028, h01=0x0050, text=»ANC150 LDK A5,/1F SET HIGH INTENSITY«, t00=0x004b, t01=0x0026}
0x7556…7578 Head {h00=0x001e, h01=0x0050, text=» SCR A5,A1 STORE IN BUFFER«, t00=0x004b, t01=0x0052}
0x7578…75a4 Head {h00=0x0028, h01=0x0050, text=»ANC200 LDR A2,A4 UPDATE A2 WITH CHAR«, t00=0x004b, t01=0x0074}
0x75a4…75d8 Head {h00=0x0030, h01=0x0050, text=»ANC250 CF A14,WCHAR DISPLAY CHAR AND CURSOR «, t00=0x004b, t01=0x00a0}
0x75d8…7602 Head {h00=0x0026, h01=0x0050, text=» LD A2,PCURS,TCABAS GET CURSOR POS«, t00=0x004b, t01=0x00d4}
0x7602…7614 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x004b, t01=0x00fe}
0x7614…7628 Head {h00=0x0010, h01=0x0050, text=»ANC252 EQU *«, t00=0x004b, t01=0x0110}
0x7628…763e Head {h00=0x0012, h01=0x0050, text=» CWK A2,LBVDU «, t00=0x004b, t01=0x0124}
0x763e…7654 Head {h00=0x0012, h01=0x0050, text=» RF(NE) ANC255«, t00=0x004b, t01=0x013a}
0x7654…7666 Head {h00=0x000e, h01=0x0050, text=» LDKL A2,0«, t00=0x004b, t01=0x0150}
0x7666…767a Head {h00=0x0010, h01=0x0050, text=»ANC255 EQU *«, t00=0x004b, t01=0x0162}
0x767a…7696 Head {h00=0x0018, h01=0x0050, text=» ST A2,PCURS,TCABAS «, t00=0x004b, t01=0x0176}
0x7696…76bc (76, 0, 400) Head {h00=0x0022, h01=0x0050, text=» CF A14,GBUFFC GET BUFFER CHAR«, t00=0x004c, t01=0x0004}
0x76bc…76e0 Head {h00=0x0020, h01=0x0050, text=» CWK A3,/1F ATTRIBUTE CHAR? «, t00=0x004c, t01=0x002a}
0x76e0…76f8 Head {h00=0x0014, h01=0x0050, text=» RF(G) ANC300 NO«, t00=0x004c, t01=0x004e}
0x76f8…7700 Head {h00=0x0004, h01=0x0050, t00=0x004c, t01=0x0066}
0x7700…772c Head {h00=0x0028, h01=0x0050, text=» CF A14,TAB SKIP TO NEXT UNPROTECTED«, t00=0x004c, t01=0x006e}
0x772c…7740 Head {h00=0x0010, h01=0x0050, text=»ANC300 EQU *«, t00=0x004c, t01=0x009a}
0x7740…7764 Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBCW,A8 CONTROL WORD«, t00=0x004c, t01=0x00ae}
0x7764…7788 Head {h00=0x0020, h01=0x0050, text=» ANK A1,X'FF' LINE POSITION «, t00=0x004c, t01=0x00d2}
0x7788…77b4 Head {h00=0x0028, h01=0x0050, text=» SUK A1,80 LAST POSITION ON LINE ?? «, t00=0x004c, t01=0x00f6}
0x77b4…77d0 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) ANC350 NO!!!«, t00=0x004c, t01=0x0122}
0x77d0…780e Head {h00=0x003a, h01=0x0050, text=» CF A14,SETCUR POSITION CURSOR TO 1:ST POS. NEXT LINE «, t00=0x004c, t01=0x013e}
0x780e…7822 Head {h00=0x0010, h01=0x0050, text=»ANC350 EQU *«, t00=0x004c, t01=0x017c}
0x7822…7832 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x004c, t01=0x0190}
0x7832…7846 Head {h00=0x0010, h01=0x0050, text=» IFT IN:DL=1«, t00=0x004d, t01=0x0010}
0x7846…785e Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x004d, t01=0x0024}
0x785e…7866 Head {h00=0x0004, h01=0x0050, t00=0x004d, t01=0x003c}
0x7866…78a2 Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x004d, t01=0x0044}
0x78a2…78ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0080}
0x78ac…78ec Head {h00=0x003c, h01=0x0050, text=»* DELETE CHARACTER AT CURSOR POSITION. SHIFT CARACTERS«, t00=0x004d, t01=0x008a}
0x78ec…791e Head {h00=0x002e, h01=0x0050, text=»* AT SAME LINE ONE POSITION TO THE LEFT «, t00=0x004d, t01=0x00ca}
0x791e…7928 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00fc}
0x7928…796c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004d, t01=0x0106}
0x796c…7974 Head {h00=0x0004, h01=0x0050, t00=0x004d, t01=0x014a}
0x7974…7988 Head {h00=0x0010, h01=0x0050, text=»DELETE EQU *«, t00=0x004d, t01=0x0152}
0x7988…799c Head {h00=0x0010, h01=0x0050, text=» LDKL A6,-1 «, t00=0x004d, t01=0x0166}
0x799c…79c6 Head {h00=0x0026, h01=0x0050, text=» LD A2,PCURS,TCABAS CURSOR ADDRESS«, t00=0x004d, t01=0x017a}
0x79c6…79f2 Head {h00=0x0028, h01=0x0050, text=»DEL:10 ADK A6,80 END OF LINE POINTER«, t00=0x004e, t01=0x0014}
0x79f2…7a24 Head {h00=0x002e, h01=0x0050, text=» CWR A6,A2 LAST POSITION ON CURRENT LINE??«, t00=0x004e, t01=0x0040}
0x7a24…7a4c Head {h00=0x0024, h01=0x0050, text=» RB(L) DEL:10 NO!! TRY NEXT LINE«, t00=0x004e, t01=0x0072}
0x7a4c…7a54 Head {h00=0x0004, h01=0x0050, t00=0x004e, t01=0x009a}
0x7a54…7a82 Head {h00=0x002a, h01=0x0050, text=» CF A14,S:ATT SEARCH ATTRIBUTE FORWARD«, t00=0x004e, t01=0x00a2}
0x7a82…7aa6 Head {h00=0x0020, h01=0x0050, text=» SUK A1,2 ATTRIBUTE FOUND ??«, t00=0x004e, t01=0x00d0}
0x7aa6…7ac0 Head {h00=0x0016, h01=0x0050, text=» RF(Z) DEL:20 NO!!«, t00=0x004e, t01=0x00f4}
0x7ac0…7af2 Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 ATTRIBUTE AFTER END OF LINE ?? «, t00=0x004e, t01=0x010e}
0x7af2…7b0e Head {h00=0x0018, h01=0x0050, text=» RF(G) DEL:20 YES!! «, t00=0x004e, t01=0x0140}
0x7b0e…7b2e Head {h00=0x001c, h01=0x0050, text=» SUK A2,1 SKIP ATTRIBUTE«, t00=0x004e, t01=0x015c}
0x7b2e…7b40 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A2«, t00=0x004e, t01=0x017c}
0x7b40…7b58 Head {h00=0x0014, h01=0x0050, text=»DEL:20 LDR A2,A6«, t00=0x004e, t01=0x018e}
0x7b58…7b60 Head {h00=0x0004, h01=0x0050, t00=0x004f, t01=0x0016}
0x7b60…7b68 Head {h00=0x0004, h01=0x0050, t00=0x004f, t01=0x001e}
0x7b68…7b7c Head {h00=0x0010, h01=0x0050, text=» LDK A1,BVDU«, t00=0x004f, t01=0x0026}
0x7b7c…7baa Head {h00=0x002a, h01=0x0050, text=» ADR A1,TCABAS ABSOLUTE BUFFER ADDRESS«, t00=0x004f, t01=0x003a}
0x7baa…7bce Head {h00=0x0020, h01=0x0050, text=» ADR A2,A1 END OF FIELD/LINE«, t00=0x004f, t01=0x0068}
0x7bce…7bfa Head {h00=0x0028, h01=0x0050, text=» AD A1,PCURS,TCABAS CURSOR POSITION «, t00=0x004f, t01=0x008c}
0x7bfa…7c02 Head {h00=0x0004, h01=0x0050, t00=0x004f, t01=0x00b8}
0x7c02…7c34 Head {h00=0x002e, h01=0x0050, text=»DEL:30 CWR A2,A1 ALL CHARACTERS SHIFTED ??«, t00=0x004f, t01=0x00c0}
0x7c34…7c50 Head {h00=0x0018, h01=0x0050, text=» RF(E) DEL:40 YES!! «, t00=0x004f, t01=0x00f2}
0x7c50…7c72 Head {h00=0x001e, h01=0x0050, text=» LC A3,1,A1 GET CHARACTER «, t00=0x004f, t01=0x010e}
0x7c72…7c96 Head {h00=0x0020, h01=0x0050, text=» ORK A3,/80 SET MODIFIED BIT«, t00=0x004f, t01=0x0130}
0x7c96…7cc4 Head {h00=0x002a, h01=0x0050, text=» SCR A3,A1 SHIFT CHARACTER 1 POS. LEFT«, t00=0x004f, t01=0x0154}
0x7cc4…7cd6 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x004f, t01=0x0182}
0x7cd6…7cfc (80, 0, 400) Head {h00=0x0022, h01=0x0050, text=» RB DEL:30 GET NEXT CHARACTER «, t00=0x0050, t01=0x0004}
0x7cfc…7d04 Head {h00=0x0004, h01=0x0050, t00=0x0050, t01=0x002a}
0x7d04…7d0c Head {h00=0x0004, h01=0x0050, t00=0x0050, t01=0x0032}
0x7d0c…7d3a Head {h00=0x002a, h01=0x0050, text=»DEL:40 LDK A3,NULL+/80 NULL CHARACTER «, t00=0x0050, t01=0x003a}
0x7d3a…7d68 Head {h00=0x002a, h01=0x0050, text=» SCR A3,A2 STORE AT END OF FIELD/LINE «, t00=0x0050, t01=0x0068}
0x7d68…7d8e Head {h00=0x0022, h01=0x0050, text=» LD A3,ATTRIB,TCABAS ATTRIBUTE«, t00=0x0050, t01=0x0096}
0x7d8e…7db6 Head {h00=0x0024, h01=0x0050, text=» ORK A3,1 SET MODIFIED FIELD BIT«, t00=0x0050, t01=0x00bc}
0x7db6…7dbe Head {h00=0x0004, h01=0x0050, t00=0x0050, t01=0x00e4}
0x7dbe…7df4 Head {h00=0x0032, h01=0x0050, text=» LD A1,CURATT,TCABAS CURRENT ATTRIBUTE ADDRESS«, t00=0x0050, t01=0x00ec}
0x7df4…7e22 Head {h00=0x002a, h01=0x0050, text=» CWK A1,LBVDU+1 UNFORMATTED SCREEN ???«, t00=0x0050, t01=0x0122}
0x7e22…7e3e Head {h00=0x0018, h01=0x0050, text=» RF(E) INS:60 YES!!!«, t00=0x0050, t01=0x0150}
0x7e3e…7e54 Head {h00=0x0012, h01=0x0050, text=» ADKL A1,BVDU «, t00=0x0050, t01=0x016c}
0x7e54…7e86 Head {h00=0x002e, h01=0x0050, text=» ADR A1,TCABAS ABSOLUTE ATTRIBUTE ADDRESS «, t00=0x0050, t01=0x0182}
0x7e86…7eac Head {h00=0x0022, h01=0x0050, text=» SCR A3,A1 SAVE NEW ATTRIBUTE «, t00=0x0051, t01=0x0024}
0x7eac…7ed6 Head {h00=0x0026, h01=0x0050, text=» RF INS:60 DISPLAY MODIFIED FIELD «, t00=0x0051, t01=0x004a}
0x7ed6…7eee Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0051, t01=0x0074}
0x7eee…7ef6 Head {h00=0x0004, h01=0x0050, t00=0x0051, t01=0x008c}
0x7ef6…7f3c Head {h00=0x0042, h01=0x0050, text=»**************************************************************«, t00=0x0051, t01=0x0094}
0x7f3c…7f46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00da}
0x7f46…7f8a Head {h00=0x0040, h01=0x0050, text=»* INSERT CHARACTER AT CURSOR POSITION. SHIFT CHARACTERS IN«, t00=0x0051, t01=0x00e4}
0x7f8a…7fca Head {h00=0x003c, h01=0x0050, text=»* SAME FIELD , EXCEPT NULLS, ONE POSITION TO THE RIGHT«, t00=0x0051, t01=0x0128}
0x7fca…7fd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0168}
0x7fd4…8010 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0051, t01=0x0172}
0x8010…8018 Head {h00=0x0004, h01=0x0050, t00=0x0052, t01=0x001e}
0x8018…802c Head {h00=0x0010, h01=0x0050, text=»INSERT EQU *«, t00=0x0052, t01=0x0026}
0x802c…8054 Head {h00=0x0024, h01=0x0050, text=» IM MODE,TCABAS SET INSERT MODE «, t00=0x0052, t01=0x003a}
0x8054…8086 Head {h00=0x002e, h01=0x0050, text=» CF A14,LIOLON TURN ON "INSERT MODE" LAMP «, t00=0x0052, t01=0x0062}
0x8086…8096 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0052, t01=0x0094}
0x8096…809e Head {h00=0x0004, h01=0x0050, t00=0x0052, t01=0x00a4}
0x809e…80a6 Head {h00=0x0004, h01=0x0050, t00=0x0052, t01=0x00ac}
0x80a6…80c0 Head {h00=0x0016, h01=0x0050, text=»INS:10 LDR A6,A7 «, t00=0x0052, t01=0x00b4}
0x80c0…80d4 Head {h00=0x0010, h01=0x0050, text=» LDR A9,A4 «, t00=0x0052, t01=0x00ce}
0x80d4…8100 Head {h00=0x0028, h01=0x0050, text=» CWK A5,LBVDU+1 UNFORMATTED SCREEN??«, t00=0x0052, t01=0x00e2}
0x8100…811c Head {h00=0x0018, h01=0x0050, text=» RF(NE) INS:20 NO!! «, t00=0x0052, t01=0x010e}
0x811c…8134 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,LBVDU-1«, t00=0x0052, t01=0x012a}
0x8134…8146 Head {h00=0x000e, h01=0x0050, text=» RF INS:30«, t00=0x0052, t01=0x0142}
0x8146…814e Head {h00=0x0004, h01=0x0050, t00=0x0052, t01=0x0154}
0x814e…8156 Head {h00=0x0004, h01=0x0050, t00=0x0052, t01=0x015c}
0x8156…818a Head {h00=0x0030, h01=0x0050, text=»INS:20 CF A14,S:ATT SEARCH ATTRIBUTE FORWARD«, t00=0x0052, t01=0x0164}
0x818a…8192 Head {h00=0x0004, h01=0x0050, t00=0x0053, t01=0x0008}
0x8192…819a Head {h00=0x0004, h01=0x0050, t00=0x0053, t01=0x0010}
0x819a…81be Head {h00=0x0020, h01=0x0050, text=» SUK A1,2 ATTRIBUTE FOUND ??«, t00=0x0053, t01=0x0018}
0x81be…81d8 Head {h00=0x0016, h01=0x0050, text=» RF(Z) INS:30 NO!!«, t00=0x0053, t01=0x003c}
0x81d8…81ea Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0053, t01=0x0056}
0x81ea…81f2 Head {h00=0x0004, h01=0x0050, t00=0x0053, t01=0x0068}
0x81f2…820e Head {h00=0x0018, h01=0x0050, text=»INS:30 ADR A2,TCABAS«, t00=0x0053, t01=0x0070}
0x820e…8248 Head {h00=0x0036, h01=0x0050, text=» ADK A2,BVDU ADD BUFFER DISPLACEMENT IN WORK-BLOCK«, t00=0x0053, t01=0x008c}
0x8248…827a Head {h00=0x002e, h01=0x0050, text=» CF A14,S:NULL SEARCH FIRST NULL CHARACTER«, t00=0x0053, t01=0x00c6}
0x827a…82ac Head {h00=0x002e, h01=0x0050, text=»INS:40 CWR A2,A6 ALL CHARACTERS SHIFTED ??«, t00=0x0053, t01=0x00f8}
0x82ac…82c8 Head {h00=0x0018, h01=0x0050, text=» RF(E) INS:50 YES!! «, t00=0x0053, t01=0x012a}
0x82c8…82ea Head {h00=0x001e, h01=0x0050, text=» LC A3,-1,A2 GET CHARACTER«, t00=0x0053, t01=0x0146}
0x82ea…830e Head {h00=0x0020, h01=0x0050, text=» ORK A3,/80 SET MODIFIED BIT«, t00=0x0053, t01=0x0168}
0x830e…833c Head {h00=0x002a, h01=0x0050, text=» SCR A3,A2 SHIFT CHAR ONE POS TO RIGHT«, t00=0x0053, t01=0x018c}
0x833c…834e Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0054, t01=0x002a}
0x834e…8374 Head {h00=0x0022, h01=0x0050, text=» RB INS:40 GET NEXT CHARACTER «, t00=0x0054, t01=0x003c}
0x8374…837c Head {h00=0x0004, h01=0x0050, t00=0x0054, t01=0x0062}
0x837c…8384 Head {h00=0x0004, h01=0x0050, t00=0x0054, t01=0x006a}
0x8384…83b0 Head {h00=0x0028, h01=0x0050, text=»INS:50 ORKL A9,/80 SET MODIFIED BIT «, t00=0x0054, t01=0x0072}
0x83b0…83e2 Head {h00=0x002e, h01=0x0050, text=» SCR A9,A6 SAVE INPUT CHARACTER IN BUFFER «, t00=0x0054, t01=0x009e}
0x83e2…8414 Head {h00=0x002e, h01=0x0050, text=» IM PCURS,TCABAS INCREMENT CURSOR POSITION«, t00=0x0054, t01=0x00d0}
0x8414…8428 Head {h00=0x0010, h01=0x0050, text=»INS:60 EQU *«, t00=0x0054, t01=0x0102}
0x8428…8456 Head {h00=0x002a, h01=0x0050, text=» CF A14,DISPL DISPLAY MODIFIED FIELDS «, t00=0x0054, t01=0x0116}
0x8456…8482 Head {h00=0x0028, h01=0x0050, text=» LD A2,PCURS,TCABAS CURSOR POSITION «, t00=0x0054, t01=0x0144}
0x8482…8494 Head {h00=0x000e, h01=0x0050, text=» RB ANC252«, t00=0x0054, t01=0x0170}
0x8494…84a0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x0182}
0x84a0…84b8 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0054, t01=0x018e}
0x84b8…84c0 Head {h00=0x0004, h01=0x0050, t00=0x0055, t01=0x0016}
0x84c0…8502 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0055, t01=0x001e}
0x8502…850c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0060}
0x850c…8544 Head {h00=0x0034, h01=0x0050, text=»* SEARCH FIRST NULL CHARACTER AFTER CURSOR POS«, t00=0x0055, t01=0x006a}
0x8544…854e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00a2}
0x854e…858c Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0055, t01=0x00ac}
0x858c…8594 Head {h00=0x0004, h01=0x0050, t00=0x0055, t01=0x00ea}
0x8594…85a8 Head {h00=0x0010, h01=0x0050, text=»S:NULL EQU *«, t00=0x0055, t01=0x00f2}
0x85a8…85ba Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0055, t01=0x0106}
0x85ba…85c2 Head {h00=0x0004, h01=0x0050, t00=0x0055, t01=0x0118}
0x85c2…85da Head {h00=0x0014, h01=0x0050, text=»S:NU10 CWR A1,A2«, t00=0x0055, t01=0x0120}
0x85da…85f0 Head {h00=0x0012, h01=0x0050, text=» RF(E) S:NU30 «, t00=0x0055, t01=0x0138}
0x85f0…8610 Head {h00=0x001c, h01=0x0050, text=» LCR A3,A1 GET CHARACTER«, t00=0x0055, t01=0x014e}
0x8610…863a Head {h00=0x0026, h01=0x0050, text=» ANK A3,/7F MASK AWAY MODIFIED BIT«, t00=0x0055, t01=0x016e}
0x863a…865e Head {h00=0x0020, h01=0x0050, text=» CWK A3,NULL NULL CHARACTER «, t00=0x0056, t01=0x0008}
0x865e…867a Head {h00=0x0018, h01=0x0050, text=» RF(E) S:NU20 YES!! «, t00=0x0056, t01=0x002c}
0x867a…868c Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0056, t01=0x0048}
0x868c…86ba Head {h00=0x002a, h01=0x0050, text=» RB S:NU10 CHECK NEXT BUFFER CHARACTER«, t00=0x0056, t01=0x005a}
0x86ba…86c2 Head {h00=0x0004, h01=0x0050, t00=0x0056, t01=0x0088}
0x86c2…86f0 Head {h00=0x002a, h01=0x0050, text=»S:NU20 LDR A2,A1 ADDRESS OF FIRST NULL«, t00=0x0056, t01=0x0090}
0x86f0…8706 Head {h00=0x0012, h01=0x0050, text=»S:NU30 RTN A14«, t00=0x0056, t01=0x00be}
0x8706…871e Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0056, t01=0x00d4}
0x871e…8728 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00ec}
0x8728…876a Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0056, t01=0x00f6}
0x876a…8774 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0138}
0x8774…8784 Head {h00=0x000c, h01=0x0050, text=»* CANCEL«, t00=0x0056, t01=0x0142}
0x8784…878e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0152}
0x878e…87cc Head {h00=0x003a, h01=0x0050, text=»* PROGRAM ATTENTION KEY WHICH CAUSES AN I/O OPERATION «, t00=0x0056, t01=0x015c}
0x87cc…87f4 Head {h00=0x0024, h01=0x0050, text=»* AND GENERATE AN AID CHARACTER «, t00=0x0057, t01=0x000a}
0x87f4…87fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0032}
0x87fe…8840 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0057, t01=0x003c}
0x8840…884a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x007e}
0x884a…885e Head {h00=0x0010, h01=0x0050, text=»CANCEL EQU *«, t00=0x0057, t01=0x0088}
0x885e…8870 Head {h00=0x000e, h01=0x0050, text=»PA2 EQU * «, t00=0x0057, t01=0x009c}
0x8870…888e Head {h00=0x001a, h01=0x0050, text=» LDK A2,/2E CANCEL POS«, t00=0x0057, t01=0x00ae}
0x888e…88a2 Head {h00=0x0010, h01=0x0050, text=»CAN100 EQU *«, t00=0x0057, t01=0x00cc}
0x88a2…88ca Head {h00=0x0024, h01=0x0050, text=» LC A2,TASCII,A2 GET ASCII CODE «, t00=0x0057, t01=0x00e0}
0x88ca…88de Head {h00=0x0010, h01=0x0050, text=»CAN200 EQU *«, t00=0x0057, t01=0x0108}
0x88de…8910 Head {h00=0x002e, h01=0x0050, text=» CF A14,LINHON TURN ON "KEYBOARD INHIBIT" «, t00=0x0057, t01=0x011c}
0x8910…893c Head {h00=0x0028, h01=0x0050, text=» CF A14,TRPA UPDATE AID AND TRANSMIT«, t00=0x0057, t01=0x014e}
0x893c…894c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0057, t01=0x017a}
0x894c…8956 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x018a}
0x8956…895e (88, 0, 400) Head {h00=0x0004, h01=0x0050, t00=0x0058, t01=0x0004}
0x895e…8970 Head {h00=0x000e, h01=0x0050, text=» IFT PAX=1«, t00=0x0058, t01=0x000c}
0x8970…8978 Head {h00=0x0004, h01=0x0050, t00=0x0058, t01=0x001e}
0x8978…8982 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0026}
0x8982…898c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0030}
0x898c…89d6 Head {h00=0x0046, h01=0x0050, text=»* PROGRAM ATTENTION KEY IS PRESSED AND NUMBER WILL BE INSERTED TO «, t00=0x0058, t01=0x003a}
0x89d6…8a14 Head {h00=0x003a, h01=0x0050, text=»* DEFINE ONE OF THE FUNCTIONS UNDER PA1.CANCEL OR PA3 «, t00=0x0058, t01=0x0084}
0x8a14…8a1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00c2}
0x8a1e…8a28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00cc}
0x8a28…8a3a Head {h00=0x000e, h01=0x0050, text=»PAEX EQU *«, t00=0x0058, t01=0x00d6}
0x8a3a…8a50 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,PAEXA«, t00=0x0058, t01=0x00e8}
0x8a50…8a6c Head {h00=0x0018, h01=0x0050, text=» ST A1,RDMORE,TCABAS«, t00=0x0058, t01=0x00fe}
0x8a6c…8a7c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0058, t01=0x011a}
0x8a7c…8a90 Head {h00=0x0010, h01=0x0050, text=»PAEXA EQU * «, t00=0x0058, t01=0x012a}
0x8a90…8aaa Head {h00=0x0016, h01=0x0050, text=» CM RDMORE,TCABAS «, t00=0x0058, t01=0x013e}
0x8aaa…8ace Head {h00=0x0020, h01=0x0050, text=» SUK A2,/31 CHECK IF NUM.1-3«, t00=0x0058, t01=0x0158}
0x8ace…8af0 Head {h00=0x001e, h01=0x0050, text=» RF(L) PFERR ILLEGAL CHAR.«, t00=0x0058, t01=0x017c}
0x8af0…8b14 Head {h00=0x0020, h01=0x0050, text=» SUK A2,/2 CHECK IF NUM.1-3 «, t00=0x0059, t01=0x000e}
0x8b14…8b36 Head {h00=0x001e, h01=0x0050, text=» RF(G) PFERR ILLEGAL CHAR.«, t00=0x0059, t01=0x0032}
0x8b36…8b48 Head {h00=0x000e, h01=0x0050, text=» RF(Z) PA3«, t00=0x0059, t01=0x0054}
0x8b48…8b5a Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0059, t01=0x0066}
0x8b5a…8b6c Head {h00=0x000e, h01=0x0050, text=» RB(Z) PA2«, t00=0x0059, t01=0x0078}
0x8b6c…8b7c Head {h00=0x000c, h01=0x0050, text=» RF PA1 «, t00=0x0059, t01=0x008a}
0x8b7c…8ba6 Head {h00=0x0026, h01=0x0050, text=» RTN A14 RETURN TO MAIN READ LOOP «, t00=0x0059, t01=0x009a}
0x8ba6…8bae Head {h00=0x0004, h01=0x0050, t00=0x0059, t01=0x00c4}
0x8bae…8bba Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x00cc}
0x8bba…8bd2 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0059, t01=0x00d8}
0x8bd2…8bda Head {h00=0x0004, h01=0x0050, t00=0x0059, t01=0x00f0}
0x8bda…8be4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00f8}
0x8be4…8c0e Head {h00=0x0026, h01=0x0050, text=»* PA1 PROGRAM ATTENTION KEY «, t00=0x0059, t01=0x0102}
0x8c0e…8c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x012c}
0x8c18…8c22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0136}
0x8c22…8c34 Head {h00=0x000e, h01=0x0050, text=»PA1 EQU * «, t00=0x0059, t01=0x0140}
0x8c34…8c50 Head {h00=0x0018, h01=0x0050, text=» LDK A2,/2C PA1 POS «, t00=0x0059, t01=0x0152}
0x8c50…8c62 Head {h00=0x000e, h01=0x0050, text=» RB CAN100«, t00=0x0059, t01=0x016e}
0x8c62…8c6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0180}
0x8c6c…8c76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x018a}
0x8c76…8c9e (90, 0, 400) Head {h00=0x0024, h01=0x0050, text=»* PA3 PROGRAM ATTENTION KEY«, t00=0x005a, t01=0x0004}
0x8c9e…8ca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x002c}
0x8ca8…8cb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0036}
0x8cb2…8cc4 Head {h00=0x000e, h01=0x0050, text=»PA3 EQU * «, t00=0x005a, t01=0x0040}
0x8cc4…8ce0 Head {h00=0x0018, h01=0x0050, text=» LDK A2,/2B PA3 POS «, t00=0x005a, t01=0x0052}
0x8ce0…8cf2 Head {h00=0x000e, h01=0x0050, text=» RB CAN100«, t00=0x005a, t01=0x006e}
0x8cf2…8cfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0080}
0x8cfc…8d1c Head {h00=0x001c, h01=0x0050, text=»* PA4 - PA10 (ALFASKOP) «, t00=0x005a, t01=0x008a}
0x8d1c…8d26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00aa}
0x8d26…8d3a Head {h00=0x0010, h01=0x0050, text=»PA410 EQU * «, t00=0x005a, t01=0x00b4}
0x8d3a…8d4e Head {h00=0x0010, h01=0x0050, text=» SUK A2,/20 «, t00=0x005a, t01=0x00c8}
0x8d4e…8d60 Head {h00=0x000e, h01=0x0050, text=» RB CAN200«, t00=0x005a, t01=0x00dc}
0x8d60…8d78 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x005a, t01=0x00ee}
0x8d78…8d82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0106}
0x8d82…8dc2 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x005a, t01=0x0110}
0x8dc2…8dcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0150}
0x8dcc…8ddc Head {h00=0x000c, h01=0x0050, text=»* ENTER «, t00=0x005a, t01=0x015a}
0x8ddc…8de6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x016a}
0x8de6…8e22 Head {h00=0x0038, h01=0x0050, text=»* PROGRAM FUNCTION KEY WHICH CAUSES AN I/O OPERATION«, t00=0x005a, t01=0x0174}
0x8e22…8e62 Head {h00=0x003c, h01=0x0050, text=»* AND GENERATE AN AID CHARACTER FOLLOWED BY AN SBA ORDER«, t00=0x005b, t01=0x0020}
0x8e62…8e9e Head {h00=0x0038, h01=0x0050, text=»* ATTRIBUTE ADDRESS AND TEXT FOR EACH MODIFIED FIELD«, t00=0x005b, t01=0x0060}
0x8e9e…8ebc Head {h00=0x001a, h01=0x0050, text=»* NULLS ARE SUPRESSED «, t00=0x005b, t01=0x009c}
0x8ebc…8ec6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00ba}
0x8ec6…8f08 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x005b, t01=0x00c4}
0x8f08…8f12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0106}
0x8f12…8f26 Head {h00=0x0010, h01=0x0050, text=»ENTER EQU * «, t00=0x005b, t01=0x0110}
0x8f26…8f44 Head {h00=0x001a, h01=0x0050, text=» LDK A2,/3D ENTER POS «, t00=0x005b, t01=0x0124}
0x8f44…8f58 Head {h00=0x0010, h01=0x0050, text=»ENT100 EQU *«, t00=0x005b, t01=0x0142}
0x8f58…8f82 Head {h00=0x0026, h01=0x0050, text=» LC A2,TASCII,A2 CONVERT TO ASCII «, t00=0x005b, t01=0x0156}
0x8f82…8fb4 Head {h00=0x002e, h01=0x0050, text=» CF A14,LINHON TURN ON "KEYBOARD INHIBIT" «, t00=0x005b, t01=0x0180}
0x8fb4…8fe6 Head {h00=0x002e, h01=0x0050, text=» CF A14,TRPF AID+MODIFIED FIELDS+TRANSMIT «, t00=0x005c, t01=0x0022}
0x8fe6…8ffa Head {h00=0x0010, h01=0x0050, text=»ENT200 EQU *«, t00=0x005c, t01=0x0054}
0x8ffa…900a Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x005c, t01=0x0068}
0x900a…9014 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0078}
0x9014…901c Head {h00=0x0004, h01=0x0050, t00=0x005c, t01=0x0082}
0x901c…902e Head {h00=0x000e, h01=0x0050, text=» IFT PFX=1«, t00=0x005c, t01=0x008a}
0x902e…9036 Head {h00=0x0004, h01=0x0050, t00=0x005c, t01=0x009c}
0x9036…9040 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00a4}
0x9040…904a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00ae}
0x904a…9094 Head {h00=0x0046, h01=0x0050, text=»* PROGRAM FUNCTION KEY IOS PRESSED AND NUMBER WILL BE INSERTED TO «, t00=0x005c, t01=0x00b8}
0x9094…90c8 Head {h00=0x0030, h01=0x0050, text=»* DEFINE ONE OF THE FUNCTIONS UNDER PF1-PF12«, t00=0x005c, t01=0x0102}
0x90c8…90d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0136}
0x90d2…90dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0140}
0x90dc…90ee Head {h00=0x000e, h01=0x0050, text=»PFEX EQU *«, t00=0x005c, t01=0x014a}
0x90ee…9104 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,PFEXA«, t00=0x005c, t01=0x015c}
0x9104…9116 Head {h00=0x000e, h01=0x0050, text=» RF PFNXT «, t00=0x005c, t01=0x0172}
0x9116…912a Head {h00=0x0010, h01=0x0050, text=»PFEXA EQU * «, t00=0x005c, t01=0x0184}
0x912a…9144 Head {h00=0x0016, h01=0x0050, text=» CM RDMORE,TCABAS «, t00=0x005d, t01=0x0008}
0x9144…9164 Head {h00=0x001c, h01=0x0050, text=» SUK A2,/30 LEGAL CHAR ?«, t00=0x005d, t01=0x0022}
0x9164…9194 Head {h00=0x002c, h01=0x0050, text=» RF(L) PFERR ILLEGAL,GO TO ERR.HANDLING «, t00=0x005d, t01=0x0042}
0x9194…91be Head {h00=0x0026, h01=0x0050, text=» RF(Z) PF0 FIRST NUM. 0 GO TO PF0 «, t00=0x005d, t01=0x0072}
0x91be…91e0 Head {h00=0x001e, h01=0x0050, text=» SUK A2,/1 FIRST NUM. 1 ? «, t00=0x005d, t01=0x009c}
0x91e0…9202 Head {h00=0x001e, h01=0x0050, text=» RF(G) PFERR ILLEGAL NUM. «, t00=0x005d, t01=0x00be}
0x9202…9218 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,PF1A «, t00=0x005d, t01=0x00e0}
0x9218…922a Head {h00=0x000e, h01=0x0050, text=» RF PFNXT «, t00=0x005d, t01=0x00f6}
0x922a…923c Head {h00=0x000e, h01=0x0050, text=»PF1A EQU *«, t00=0x005d, t01=0x0108}
0x923c…9256 Head {h00=0x0016, h01=0x0050, text=» CM RDMORE,TCABAS «, t00=0x005d, t01=0x011a}
0x9256…9276 Head {h00=0x001c, h01=0x0050, text=» SUK A2,/30 LEGAL NUM.? «, t00=0x005d, t01=0x0134}
0x9276…92a6 Head {h00=0x002c, h01=0x0050, text=» RF(L) PFERR ILLEGAL GO TO ERR.HANDLING «, t00=0x005d, t01=0x0154}
0x92a6…92c4 Head {h00=0x001a, h01=0x0050, text=» SUK A2,/2 LEGAL NUM ?«, t00=0x005d, t01=0x0184}
0x92c4…92f4 Head {h00=0x002c, h01=0x0050, text=» RF(G) PFERR ILLEGAL GO TO ERR.HANDLING «, t00=0x005e, t01=0x0012}
0x92f4…9314 Head {h00=0x001c, h01=0x0050, text=» ADK A2,/3C PF10-12 POS «, t00=0x005e, t01=0x0042}
0x9314…9326 Head {h00=0x000e, h01=0x0050, text=» RB ENT100«, t00=0x005e, t01=0x0062}
0x9326…932e Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x0074}
0x932e…9340 Head {h00=0x000e, h01=0x0050, text=»PF0 EQU * «, t00=0x005e, t01=0x007c}
0x9340…9356 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,PF0A «, t00=0x005e, t01=0x008e}
0x9356…936a Head {h00=0x0010, h01=0x0050, text=»PFNXT EQU * «, t00=0x005e, t01=0x00a4}
0x936a…9386 Head {h00=0x0018, h01=0x0050, text=» ST A1,RDMORE,TCABAS«, t00=0x005e, t01=0x00b8}
0x9386…9396 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x005e, t01=0x00d4}
0x9396…93a8 Head {h00=0x000e, h01=0x0050, text=»PF0A EQU *«, t00=0x005e, t01=0x00e4}
0x93a8…93c2 Head {h00=0x0016, h01=0x0050, text=» CM RDMORE,TCABAS «, t00=0x005e, t01=0x00f6}
0x93c2…93e2 Head {h00=0x001c, h01=0x0050, text=» SUK A2,/31 LEGAL NUM ? «, t00=0x005e, t01=0x0110}
0x93e2…9412 Head {h00=0x002c, h01=0x0050, text=» RF(L) PFERR ILLEGAL GO TO ERR.HANDLING «, t00=0x005e, t01=0x0130}
0x9412…9430 Head {h00=0x001a, h01=0x0050, text=» SUK A2,/8 LEGAL NUM ?«, t00=0x005e, t01=0x0160}
0x9430…9460 Head {h00=0x002c, h01=0x0050, text=» RF(G) PFERR ILLEGAL GO TO ERR.HANDLING «, t00=0x005e, t01=0x017e}
0x9460…947e Head {h00=0x001a, h01=0x0050, text=» ADK A2,/39 PF1-9 POS «, t00=0x005f, t01=0x001e}
0x947e…9490 Head {h00=0x000e, h01=0x0050, text=» RB ENT100«, t00=0x005f, t01=0x003c}
0x9490…949c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x004e}
0x949c…94b0 Head {h00=0x0010, h01=0x0050, text=»PFERR EQU * «, t00=0x005f, t01=0x005a}
0x94b0…94de Head {h00=0x002a, h01=0x0050, text=» CF A14,ERROR GO TO ERR-HANDLING RUTIN«, t00=0x005f, t01=0x006e}
0x94de…9506 Head {h00=0x0024, h01=0x0050, text=» RTN A14 GO TO MAIN READ MODULE «, t00=0x005f, t01=0x009c}
0x9506…950e Head {h00=0x0004, h01=0x0050, t00=0x005f, t01=0x00c4}
0x950e…9516 Head {h00=0x0004, h01=0x0050, t00=0x005f, t01=0x00cc}
0x9516…9526 Head {h00=0x000c, h01=0x0050, text=»PF EQU *«, t00=0x005f, t01=0x00d4}
0x9526…953a Head {h00=0x0010, h01=0x0050, text=» SUK A2,/5C «, t00=0x005f, t01=0x00e4}
0x953a…954c Head {h00=0x000e, h01=0x0050, text=» RB ENT100«, t00=0x005f, t01=0x00f8}
0x954c…9560 Head {h00=0x0010, h01=0x0050, text=» IFT OFLIN=1«, t00=0x005f, t01=0x010a}
0x9560…9578 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x005f, t01=0x011e}
0x9578…95bc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x005f, t01=0x0136}
0x95bc…95c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x017a}
0x95c6…95d6 Head {h00=0x000c, h01=0x0050, text=»* OFLINE«, t00=0x005f, t01=0x0184}
0x95d6…9616 (96, 0, 400) Head {h00=0x003c, h01=0x0050, text=»* THE OFFLINE SWITCH "OFFFLG" IS SET = 1 AND «, t00=0x0060, t01=0x0004}
0x9616…9652 Head {h00=0x0038, h01=0x0050, text=»* A BRANCH IS MADE BACK TO CREDIT PROGRAM «, t00=0x0060, t01=0x0044}
0x9652…965c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0080}
0x965c…96a2 Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0060, t01=0x008a}
0x96a2…96b6 Head {h00=0x0010, h01=0x0050, text=»OFLINE EQU *«, t00=0x0060, t01=0x00d0}
0x96b6…96cc Head {h00=0x0012, h01=0x0050, text=» CF A14,CLEAR «, t00=0x0060, t01=0x00e4}
0x96cc…96e0 Head {h00=0x0010, h01=0x0050, text=»OFLI05 EQU *«, t00=0x0060, t01=0x00fa}
0x96e0…96f6 Head {h00=0x0012, h01=0x0050, text=» CF A14,RESET «, t00=0x0060, t01=0x010e}
0x96f6…970a Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x0060, t01=0x0124}
0x970a…9724 Head {h00=0x0016, h01=0x0050, text=» LD A7,MAIN,TCABAS«, t00=0x0060, t01=0x0138}
0x9724…9736 Head {h00=0x000e, h01=0x0050, text=» XRK A7,1 «, t00=0x0060, t01=0x0152}
0x9736…9750 Head {h00=0x0016, h01=0x0050, text=» ST A7,MAIN,TCABAS«, t00=0x0060, t01=0x0164}
0x9750…9784 Head {h00=0x0030, h01=0x0050, text=» CF A14,DCABOR ABORT REQUEST NOT CURRENT MF «, t00=0x0060, t01=0x017e}
0x9784…9790 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0022}
0x9790…97a4 Head {h00=0x0010, h01=0x0050, text=» IFT OFLIN=1«, t00=0x0061, t01=0x002e}
0x97a4…97de Head {h00=0x0036, h01=0x0050, text=» LDK A1,0 DV ADDRESS ::= 0MESSAGES TO VDU IGNORED «, t00=0x0061, t01=0x0042}
0x97de…97fc Head {h00=0x001a, h01=0x0050, text=» LDKL A8,ECBDC MF # 1 «, t00=0x0061, t01=0x007c}
0x97fc…9826 Head {h00=0x0026, h01=0x0050, text=» CF A14,EMULA TRANSFER PARAMETERS «, t00=0x0061, t01=0x009a}
0x9826…983a Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x0061, t01=0x00c4}
0x983a…9858 Head {h00=0x001a, h01=0x0050, text=» LDKL A8,ECBDC2 MF # 2«, t00=0x0061, t01=0x00d8}
0x9858…9882 Head {h00=0x0026, h01=0x0050, text=» CF A14,EMULA TRANSFER PARAMETERS «, t00=0x0061, t01=0x00f6}
0x9882…988e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0120}
0x988e…98a2 Head {h00=0x0010, h01=0x0050, text=» IFT OFLIN=1«, t00=0x0061, t01=0x012c}
0x98a2…98b8 Head {h00=0x0012, h01=0x0050, text=» CF A14,LMF1OF«, t00=0x0061, t01=0x0140}
0x98b8…98ce Head {h00=0x0012, h01=0x0050, text=» CF A14,LMF2OF«, t00=0x0061, t01=0x0156}
0x98ce…98e4 Head {h00=0x0012, h01=0x0050, text=» CF A14,LSAVOF«, t00=0x0061, t01=0x016c}
0x98e4…9910 Head {h00=0x0028, h01=0x0050, text=» CF A14,LIOLON TURN ON OFFLINE LAMP «, t00=0x0061, t01=0x0182}
0x9910…993a Head {h00=0x0026, h01=0x0050, text=» IM OFFFLG,TCABAS SET OFFLINE FLAG«, t00=0x0062, t01=0x001e}
0x993a…9962 Head {h00=0x0024, h01=0x0050, text=» ADKL A14,4 SKIP ONE STACK LEVEL«, t00=0x0062, t01=0x0048}
0x9962…9990 Head {h00=0x002a, h01=0x0050, text=» LD A13,2,A14 RELOAD REGISTERS A12-A13«, t00=0x0062, t01=0x0070}
0x9990…99a6 Head {h00=0x0012, h01=0x0050, text=» LD A12,4,A14 «, t00=0x0062, t01=0x009e}
0x99a6…99ce Head {h00=0x0024, h01=0x0050, text=» ADKL A14,4 UPDATE STACK POINTER«, t00=0x0062, t01=0x00b4}
0x99ce…99fc Head {h00=0x002a, h01=0x0050, text=» ABL I:RT1 RETURN TO "OFFLINE" PROGRAM«, t00=0x0062, t01=0x00dc}
0x99fc…9a04 Head {h00=0x0004, h01=0x0050, t00=0x0062, t01=0x010a}
0x9a04…9a10 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0062, t01=0x0112}
0x9a10…9a24 Head {h00=0x0010, h01=0x0050, text=» IFT DCLIN=2«, t00=0x0062, t01=0x011e}
0x9a24…9a3c Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0062, t01=0x0132}
0x9a3c…9a80 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0062, t01=0x014a}
0x9a80…9a8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x018e}
0x9a8a…9aa4 Head {h00=0x0016, h01=0x0050, text=»* MAINFRAME CHANGE«, t00=0x0063, t01=0x0008}
0x9aa4…9af0 Head {h00=0x0048, h01=0x0050, text=»* THE SWITCH 'MAIN' IS CHANGED, AND THE APPROPRIATE 'SYSTEM' LAMP «, t00=0x0063, t01=0x0022}
0x9af0…9b0e Head {h00=0x001a, h01=0x0050, text=»* IS TTURNED ON «, t00=0x0063, t01=0x006e}
0x9b0e…9b18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x008c}
0x9b18…9b66 Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x0063, t01=0x0096}
0x9b66…9b70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00e4}
0x9b70…9b84 Head {h00=0x0010, h01=0x0050, text=»MFCHGE EQU *«, t00=0x0063, t01=0x00ee}
0x9b84…9b9a Head {h00=0x0012, h01=0x0050, text=» CF A14,CLEAR «, t00=0x0063, t01=0x0102}
0x9b9a…9bae Head {h00=0x0010, h01=0x0050, text=»MFCH05 EQU *«, t00=0x0063, t01=0x0118}
0x9bae…9bc4 Head {h00=0x0012, h01=0x0050, text=» CF A14,RESET «, t00=0x0063, t01=0x012c}
0x9bc4…9bda Head {h00=0x0012, h01=0x0050, text=» CF A14,LMF1OF«, t00=0x0063, t01=0x0142}
0x9bda…9bf0 Head {h00=0x0012, h01=0x0050, text=» CF A14,LMF2OF«, t00=0x0063, t01=0x0158}
0x9bf0…9c06 Head {h00=0x0012, h01=0x0050, text=» CF A14,LSAVOF«, t00=0x0063, t01=0x016e}
0x9c06…9c20 Head {h00=0x0016, h01=0x0050, text=» LD A1,MAIN,TCABAS«, t00=0x0063, t01=0x0184}
0x9c20…9c32 Head {h00=0x000e, h01=0x0050, text=» XRK A1,1 «, t00=0x0064, t01=0x000e}
0x9c32…9c48 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) MFCH10«, t00=0x0064, t01=0x0020}
0x9c48…9c5e Head {h00=0x0012, h01=0x0050, text=» CF A14,LMF1ON«, t00=0x0064, t01=0x0036}
0x9c5e…9c70 Head {h00=0x000e, h01=0x0050, text=» RF MFCH90«, t00=0x0064, t01=0x004c}
0x9c70…9c84 Head {h00=0x0010, h01=0x0050, text=»MFCH10 EQU *«, t00=0x0064, t01=0x005e}
0x9c84…9c9a Head {h00=0x0012, h01=0x0050, text=» CF A14,LMF2ON«, t00=0x0064, t01=0x0072}
0x9c9a…9cae Head {h00=0x0010, h01=0x0050, text=»MFCH90 EQU *«, t00=0x0064, t01=0x0088}
0x9cae…9cc8 Head {h00=0x0016, h01=0x0050, text=» ST A1,MAIN,TCABAS«, t00=0x0064, t01=0x009c}
0x9cc8…9cd8 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0064, t01=0x00b6}
0x9cd8…9ce4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0064, t01=0x00c6}
0x9ce4…9cfc Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0064, t01=0x00d2}
0x9cfc…9d06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00ea}
0x9d06…9d46 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0064, t01=0x00f4}
0x9d46…9d50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0134}
0x9d50…9d60 Head {h00=0x000c, h01=0x0050, text=»* CLEAR «, t00=0x0064, t01=0x013e}
0x9d60…9d6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x014e}
0x9d6a…9da8 Head {h00=0x003a, h01=0x0050, text=»* PROGRAM ATTENTION KEY WHICH CAUSES AN I/O OPERATION «, t00=0x0064, t01=0x0158}
0x9da8…9de4 Head {h00=0x0038, h01=0x0050, text=»* AND GENERATE AN AID CHARACTER. THE ENTIRE DISPLAY «, t00=0x0065, t01=0x0008}
0x9de4…9e22 Head {h00=0x003a, h01=0x0050, text=»* BUFFER IS CLEARED TO NULLS AND CURSOR IS LOCATED IN «, t00=0x0065, t01=0x0044}
0x9e22…9e34 Head {h00=0x000e, h01=0x0050, text=»* HOME POS«, t00=0x0065, t01=0x0082}
0x9e34…9e3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0094}
0x9e3e…9e7e Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0065, t01=0x009e}
0x9e7e…9e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00de}
0x9e88…9e9c Head {h00=0x0010, h01=0x0050, text=»CLEAR EQU * «, t00=0x0065, t01=0x00e8}
0x9e9c…9ec0 Head {h00=0x0020, h01=0x0050, text=» LDK A2,/2D POS FOR 'CLEAR' «, t00=0x0065, t01=0x00fc}
0x9ec0…9ed8 Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x0065, t01=0x0120}
0x9ed8…9f0a Head {h00=0x002e, h01=0x0050, text=» CF A14,LINHON TURN ON "KEYBOARD INHIBIT" «, t00=0x0065, t01=0x0138}
0x9f0a…9f36 Head {h00=0x0028, h01=0x0050, text=» CF A14,TRPA UPDATE AID AND TRANSMIT«, t00=0x0065, t01=0x016a}
0x9f36…9f60 Head {h00=0x0026, h01=0x0050, text=» CF A14,ERASE ERASE ENTIRE SCREEN «, t00=0x0066, t01=0x0008}
0x9f60…9f70 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0066, t01=0x0032}
0x9f70…9f88 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0066, t01=0x0042}
0x9f88…9f92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x005a}
0x9f92…9fd6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0066, t01=0x0064}
0x9fd6…9fe0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00a8}
0x9fe0…9ff0 Head {h00=0x000c, h01=0x0050, text=»* EREOF «, t00=0x0066, t01=0x00b2}
0x9ff0…9ffa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00c2}
0x9ffa…a01a Head {h00=0x001c, h01=0x0050, text=»* ERASE TO END OF FIELD «, t00=0x0066, t01=0x00cc}
0xa01a…a024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00ec}
0xa024…a068 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0066, t01=0x00f6}
0xa068…a072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x013a}
0xa072…a086 Head {h00=0x0010, h01=0x0050, text=»EREOF EQU * «, t00=0x0066, t01=0x0144}
0xa086…a098 Head {h00=0x000e, h01=0x0050, text=» LDK A6,1 «, t00=0x0066, t01=0x0158}
0xa098…a0c2 Head {h00=0x0026, h01=0x0050, text=» LD A3,ATTRIB,TCABAS GET ATTRIBUTE«, t00=0x0066, t01=0x016a}
0xa0c2…a0e2 (103, 0, 400) Head {h00=0x001c, h01=0x0050, text=» ANK A3,/10 UNPROTECTED?«, t00=0x0067, t01=0x0004}
0xa0e2…a0fc Head {h00=0x0016, h01=0x0050, text=» RF(E) ERE100 YES «, t00=0x0067, t01=0x0024}
0xa0fc…a10e Head {h00=0x000e, h01=0x0050, text=» ABL ERROR«, t00=0x0067, t01=0x003e}
0xa10e…a130 Head {h00=0x001e, h01=0x0050, text=»ERE100 LD A2,PCURS,TCABAS «, t00=0x0067, t01=0x0050}
0xa130…a138 Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x0072}
0xa138…a164 Head {h00=0x0028, h01=0x0050, text=»************************ 77.06.01 «, t00=0x0067, t01=0x007a}
0xa164…a16c Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x00a6}
0xa16c…a1a2 Head {h00=0x0032, h01=0x0050, text=» CW A2,CURATT,TCABAS STANDING ON ATTRIBUTE ?? «, t00=0x0067, t01=0x00ae}
0xa1a2…a1d0 Head {h00=0x002a, h01=0x0050, text=» ABL(E) ERROR YES!! TURN ON ERROR LAMP«, t00=0x0067, t01=0x00e4}
0xa1d0…a1d8 Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x0112}
0xa1d8…a204 Head {h00=0x0028, h01=0x0050, text=»************************ 77.06.01 «, t00=0x0067, t01=0x011a}
0xa204…a20c Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x0146}
0xa20c…a238 Head {h00=0x0028, h01=0x0050, text=»ERE150 CF A14,GBUFFC GET BUFF. CHAR «, t00=0x0067, t01=0x014e}
0xa238…a25a Head {h00=0x001e, h01=0x0050, text=» CWK A3,/1F ATTRIBUTE CHAR«, t00=0x0067, t01=0x017a}
0xa25a…a272 Head {h00=0x0014, h01=0x0050, text=» RF(G) ERE200 NO«, t00=0x0068, t01=0x000c}
0xa272…a28a Head {h00=0x0014, h01=0x0050, text=»ERE160 LDR A1,A2«, t00=0x0068, t01=0x0024}
0xa28a…a2a6 Head {h00=0x0018, h01=0x0050, text=» LD A3,PCURS,TCABAS «, t00=0x0068, t01=0x003c}
0xa2a6…a2ba Head {h00=0x0010, h01=0x0050, text=»ERE170 EQU *«, t00=0x0068, t01=0x0058}
0xa2ba…a2d0 Head {h00=0x0012, h01=0x0050, text=» LDKL A4,BVDU «, t00=0x0068, t01=0x006c}
0xa2d0…a2e6 Head {h00=0x0012, h01=0x0050, text=» ADR A4,TCABAS«, t00=0x0068, t01=0x0082}
0xa2e6…a2f8 Head {h00=0x000e, h01=0x0050, text=» ADR A4,A3«, t00=0x0068, t01=0x0098}
0xa2f8…a32c Head {h00=0x0030, h01=0x0050, text=» CF A14,ERASUA ERASE AND REPLASE WITH NULLS «, t00=0x0068, t01=0x00aa}
0xa32c…a358 Head {h00=0x0028, h01=0x0050, text=» CF A14,DISPL DISPLAY ERASED SCREEN «, t00=0x0068, t01=0x00de}
0xa358…a362 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x010a}
0xa362…a38e Head {h00=0x0028, h01=0x0050, text=»* SET MDT BIT IF FORMATTED SCREEN «, t00=0x0068, t01=0x0114}
0xa38e…a398 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0140}
0xa398…a3a0 Head {h00=0x0004, h01=0x0050, t00=0x0068, t01=0x014a}
0xa3a0…a3bc Head {h00=0x0018, h01=0x0050, text=» LD A2,CURATT,TCABAS«, t00=0x0068, t01=0x0152}
0xa3bc…a3d4 Head {h00=0x0014, h01=0x0050, text=» CWK A2,LBVDU+1 «, t00=0x0068, t01=0x016e}
0xa3d4…a3fc Head {h00=0x0024, h01=0x0050, text=» RF(E) ERE180 UNFORMATTED SCREEN«, t00=0x0068, t01=0x0186}
0xa3fc…a404 Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x001e}
0xa404…a418 Head {h00=0x0010, h01=0x0050, text=» ADK A2,BVDU«, t00=0x0069, t01=0x0026}
0xa418…a44a Head {h00=0x002e, h01=0x0050, text=» ADR A2,TCABAS ABSOLUTE ATTRIBUTE ADDRESS «, t00=0x0069, t01=0x003a}
0xa44a…a46a Head {h00=0x001c, h01=0x0050, text=» LCR A1,A2 GET ATTRIBUTE«, t00=0x0069, t01=0x006c}
0xa46a…a488 Head {h00=0x001a, h01=0x0050, text=» ORK A1,1 SET MDT BIT «, t00=0x0069, t01=0x008c}
0xa488…a49a Head {h00=0x000e, h01=0x0050, text=» SCR A1,A2«, t00=0x0069, t01=0x00aa}
0xa49a…a4ae Head {h00=0x0010, h01=0x0050, text=»ERE180 EQU *«, t00=0x0069, t01=0x00bc}
0xa4ae…a4be Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0069, t01=0x00d0}
0xa4be…a4ea Head {h00=0x0028, h01=0x0050, text=»ERE200 CWK A2,LBVDU-1 END OF BUFFER?«, t00=0x0069, t01=0x00e0}
0xa4ea…a504 Head {h00=0x0016, h01=0x0050, text=» RF(E) ERE300 YES «, t00=0x0069, t01=0x010c}
0xa504…a516 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0069, t01=0x0126}
0xa516…a52e Head {h00=0x0014, h01=0x0050, text=» RB ERE150 NEXT «, t00=0x0069, t01=0x0138}
0xa52e…a55c Head {h00=0x002a, h01=0x0050, text=»ERE300 SUK A6,1 WHOLW BUFF CONTROLED? «, t00=0x0069, t01=0x0150}
0xa55c…a572 Head {h00=0x0012, h01=0x0050, text=» RB(N) ERE160 «, t00=0x0069, t01=0x017e}
0xa572…a590 (106, 0, 400) Head {h00=0x001a, h01=0x0050, text=» LDK A2,0 WRAP AROUND.«, t00=0x006a, t01=0x0004}
0xa590…a5a2 Head {h00=0x000e, h01=0x0050, text=» RB ERE150«, t00=0x006a, t01=0x0022}
0xa5a2…a5ba Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x006a, t01=0x0034}
0xa5ba…a5c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x004c}
0xa5c4…a604 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x006a, t01=0x0056}
0xa604…a60e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0096}
0xa60e…a61e Head {h00=0x000c, h01=0x0050, text=»* ERINPT«, t00=0x006a, t01=0x00a0}
0xa61e…a628 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x00b0}
0xa628…a666 Head {h00=0x003a, h01=0x0050, text=»* CLEARS ALL UNPROTECTED CHARACTER LOCATIONS TO NULLS «, t00=0x006a, t01=0x00ba}
0xa666…a6a4 Head {h00=0x003a, h01=0x0050, text=»* AND REPOSITIONS THE CURSOR TO THE FIRST UNPROTECTED «, t00=0x006a, t01=0x00f8}
0xa6a4…a6ca Head {h00=0x0022, h01=0x0050, text=»* CHAR LOCATION ON THE SCREEN «, t00=0x006a, t01=0x0136}
0xa6ca…a6d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x015c}
0xa6d4…a714 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x006a, t01=0x0166}
0xa714…a71e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0016}
0xa71e…a732 Head {h00=0x0010, h01=0x0050, text=»ERINPT EQU *«, t00=0x006b, t01=0x0020}
0xa732…a75e Head {h00=0x0028, h01=0x0050, text=» CF A14,ERASUP ERASE ALL UNPROTECTED«, t00=0x006b, t01=0x0034}
0xa75e…a774 Head {h00=0x0012, h01=0x0050, text=» CF A14,DISPL «, t00=0x006b, t01=0x0060}
0xa774…a790 Head {h00=0x0018, h01=0x0050, text=» LD A2,PCURS,TCABAS «, t00=0x006b, t01=0x0076}
0xa790…a7a6 Head {h00=0x0012, h01=0x0050, text=» CF A14,ATMASB«, t00=0x006b, t01=0x0092}
0xa7a6…a7e8 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x006b, t01=0x00a8}
0xa7e8…a7fa Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x006b, t01=0x00ea}
0xa7fa…a822 Head {h00=0x0024, h01=0x0050, text=» RF(Z) ERI:10 NO ATTRIBUTE FOUND«, t00=0x006b, t01=0x00fc}
0xa822…a856 Head {h00=0x0030, h01=0x0050, text=» RF(N) ERI:5 ATTRIBUTE NOT IN LAST POSITION «, t00=0x006b, t01=0x0124}
0xa856…a884 Head {h00=0x002a, h01=0x0050, text=» LDKL A2,-1 ATTRIBUTE IN LAST POSITION«, t00=0x006b, t01=0x0158}
0xa884…a898 Head {h00=0x0010, h01=0x0050, text=»ERI:5 EQU * «, t00=0x006b, t01=0x0186}
0xa898…a8da Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x006c, t01=0x000a}
0xa8da…a8ec Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x006c, t01=0x004c}
0xa8ec…a8f4 Head {h00=0x0004, h01=0x0050, t00=0x006c, t01=0x005e}
0xa8f4…a908 Head {h00=0x0010, h01=0x0050, text=»ERI:10 EQU *«, t00=0x006c, t01=0x0066}
0xa908…a924 Head {h00=0x0018, h01=0x0050, text=» ST A2,PCURS,TCABAS «, t00=0x006c, t01=0x007a}
0xa924…a934 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x006c, t01=0x0096}
0xa934…a94c Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x006c, t01=0x00a6}
0xa94c…a956 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00be}
0xa956…a99a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x006c, t01=0x00c8}
0xa99a…a9a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x010c}
0xa9a4…a9b4 Head {h00=0x000c, h01=0x0050, text=»* ERROR «, t00=0x006c, t01=0x0116}
0xa9b4…a9be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0126}
0xa9be…a9f0 Head {h00=0x002e, h01=0x0050, text=»* THE MODULE TAKES CARE OF UNALLOWED KEYS «, t00=0x006c, t01=0x0130}
0xa9f0…a9fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0162}
0xa9fa…aa3e Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x006c, t01=0x016c}
0xaa3e…aa48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0020}
0xaa48…aa5c Head {h00=0x0010, h01=0x0050, text=»ERROR EQU * «, t00=0x006d, t01=0x002a}
0xaa5c…aa88 Head {h00=0x0028, h01=0x0050, text=» CF A14,LERRON TURN ON 'ERROR' LAMP «, t00=0x006d, t01=0x003e}
0xaa88…aaa4 Head {h00=0x0018, h01=0x0050, text=» LD A5,KBINH,TCABAS «, t00=0x006d, t01=0x006a}
0xaaa4…aadc Head {h00=0x0034, h01=0x0050, text=» ORK A5,4 BIT 13:=1,ERROR HANDLING.RESET ALLOWED«, t00=0x006d, t01=0x0086}
0xaadc…aaf8 Head {h00=0x0018, h01=0x0050, text=» ST A5,KBINH,TCABAS «, t00=0x006d, t01=0x00be}
0xaaf8…ab00 Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x00da}
0xab00…ab0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00e2}
0xab0a…ab2a Head {h00=0x001c, h01=0x0050, text=»* TURN ON SOUND ALARM «, t00=0x006d, t01=0x00ec}
0xab2a…ab34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x010c}
0xab34…ab3c Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0116}
0xab3c…ab54 Head {h00=0x0014, h01=0x0050, text=» LDKL A8,ECBVDU «, t00=0x006d, t01=0x011e}
0xab54…ab7a Head {h00=0x0022, h01=0x0050, text=» ADR A8,CREBAS VDU-ECB ADDRESS«, t00=0x006d, t01=0x0136}
0xab7a…aba0 Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBBA,A8 BUFFER ADDRESS«, t00=0x006d, t01=0x015c}
0xaba0…abc8 Head {h00=0x0024, h01=0x0050, text=» LDK A7,X'2B' CONTROL CHARACTER «, t00=0x006d, t01=0x0182}
0xabc8…abdc Head {h00=0x0010, h01=0x0050, text=» SC A7,1,A2 «, t00=0x006e, t01=0x001a}
0xabdc…ac00 Head {h00=0x0020, h01=0x0050, text=» LDK A7,X'07' BELL CHARACTER«, t00=0x006e, t01=0x002e}
0xac00…ac14 Head {h00=0x0010, h01=0x0050, text=» SC A7,2,A2 «, t00=0x006e, t01=0x0052}
0xac14…ac36 Head {h00=0x001e, h01=0x0050, text=» LDK A7,3 REQUESTED LENGTH«, t00=0x006e, t01=0x0066}
0xac36…ac4e Head {h00=0x0014, h01=0x0050, text=» ST A7,ECBRL,A8 «, t00=0x006e, t01=0x0088}
0xac4e…ac70 Head {h00=0x001e, h01=0x0050, text=» LDK A7,X'86' SOUND ALARM «, t00=0x006e, t01=0x00a0}
0xac70…ac7c Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x006e, t01=0x00c2}
0xac7c…ac8c Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x006e, t01=0x00ce}
0xac8c…ac94 Head {h00=0x0004, h01=0x0050, t00=0x006e, t01=0x00de}
0xac94…aca4 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x006e, t01=0x00e6}
0xaca4…acba Head {h00=0x0012, h01=0x0050, text=» IFT KEYLST=1 «, t00=0x006e, t01=0x00f6}
0xacba…acd2 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x006e, t01=0x010c}
0xacd2…ad1c Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x006e, t01=0x0124}
0xad1c…ad26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x016e}
0xad26…ad52 Head {h00=0x0028, h01=0x0050, text=»* KEY LOCK STATUS IS SET IN 'KEYS'«, t00=0x006e, t01=0x0178}
0xad52…ad82 Head {h00=0x002c, h01=0x0050, text=»* ON ENTRY A2 = KEY LOCK VALUE /70-/77 «, t00=0x006f, t01=0x0014}
0xad82…ad8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0044}
0xad8c…add6 Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x006f, t01=0x004e}
0xadd6…ade0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0098}
0xade0…adf2 Head {h00=0x000e, h01=0x0050, text=»KEYL EQU *«, t00=0x006f, t01=0x00a2}
0xadf2…ae1c Head {h00=0x0026, h01=0x0050, text=» SUK A2,/78 GET NEG KEY LOCK VALUE«, t00=0x006f, t01=0x00b4}
0xae1c…ae42 Head {h00=0x0022, h01=0x0050, text=» LD A3,KEYS,TCABAS OLD STATUS «, t00=0x006f, t01=0x00de}
0xae42…ae56 Head {h00=0x0010, h01=0x0050, text=» LDK A4,/10 «, t00=0x006f, t01=0x0104}
0xae56…ae6a Head {h00=0x0010, h01=0x0050, text=»KEYL10 EQU *«, t00=0x006f, t01=0x0118}
0xae6a…ae7c Head {h00=0x000e, h01=0x0050, text=» SRL A4,1 «, t00=0x006f, t01=0x012c}
0xae7c…ae9c Head {h00=0x001c, h01=0x0050, text=» ADK A2,2 1 = OFF,0 = ON«, t00=0x006f, t01=0x013e}
0xae9c…aeb2 Head {h00=0x0012, h01=0x0050, text=» RB(N) KEYL10 «, t00=0x006f, t01=0x015e}
0xaeb2…aed6 Head {h00=0x0020, h01=0x0050, text=» ANR A3,A4 CHECK OLD KEY POS«, t00=0x006f, t01=0x0174}
0xaed6…aef4 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) KEYL20 WAS ON «, t00=0x0070, t01=0x0008}
0xaef4…af0e Head {h00=0x0016, h01=0x0050, text=» LDR A2,A2 WAS OFF«, t00=0x0070, t01=0x0026}
0xaf0e…af38 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) KEYL99 NOW OFF, NO CHANGE «, t00=0x0070, t01=0x0040}
0xaf38…af52 Head {h00=0x0016, h01=0x0050, text=» RF KEYL30 NOW ON «, t00=0x0070, t01=0x006a}
0xaf52…af6e Head {h00=0x0018, h01=0x0050, text=»KEYL20 EQU * WAS ON «, t00=0x0070, t01=0x0084}
0xaf6e…af80 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0070, t01=0x00a0}
0xaf80…afa8 Head {h00=0x0024, h01=0x0050, text=» RF(Z) KEYL99 NOW ON, NO CHANGE «, t00=0x0070, t01=0x00b2}
0xafa8…afc4 Head {h00=0x0018, h01=0x0050, text=»KEYL30 EQU * CHANGE«, t00=0x0070, t01=0x00da}
0xafc4…afde Head {h00=0x0016, h01=0x0050, text=» LD A3,KEYS,TCABAS«, t00=0x0070, t01=0x00f6}
0xafde…affe Head {h00=0x001c, h01=0x0050, text=» XRR A3,A4 CHANGE STATUS«, t00=0x0070, t01=0x0110}
0xaffe…b02a Head {h00=0x0028, h01=0x0050, text=» ST A3,KEYS,TCABAS STORE NEW STATUS «, t00=0x0070, t01=0x0130}
0xb02a…b034 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x015c}
0xb034…b054 Head {h00=0x001c, h01=0x0050, text=»* KEYLOCK STATUS CHANGED«, t00=0x0070, t01=0x0166}
0xb054…b0a2 Head {h00=0x004a, h01=0x0050, text=»* A3 = NEW STATUS, RIGHTMOST BIT = RIGHTMOST LOCK, BIT ON = LOCK ON «, t00=0x0070, t01=0x0186}
0xb0a2…b0d0 Head {h00=0x002a, h01=0x0050, text=»* A4 = KEYLOCK CHANGED, LAYOUT AS A3«, t00=0x0071, t01=0x0044}
0xb0d0…b0fc Head {h00=0x0028, h01=0x0050, text=»* A2 = 1, IF CHANGED TO OFF ELSE 0«, t00=0x0071, t01=0x0072}
0xb0fc…b106 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x009e}
0xb106…b134 Head {h00=0x002a, h01=0x0050, text=»* INSERT USER ROUTINE BELOW THIS LINE «, t00=0x0071, t01=0x00a8}
0xb134…b13e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00d6}
0xb13e…b152 Head {h00=0x0010, h01=0x0050, text=»KEYL99 EQU *«, t00=0x0071, t01=0x00e0}
0xb152…b162 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0071, t01=0x00f4}
0xb162…b16e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x0104}
0xb16e…b186 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0071, t01=0x0110}
0xb186…b190 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0128}
0xb190…b1d0 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0071, t01=0x0132}
0xb1d0…b1da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0172}
0xb1da…b1ee Head {h00=0x0010, h01=0x0050, text=»* LAMPMODULE«, t00=0x0071, t01=0x017c}
0xb1ee…b1f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0190}
0xb1f8…b202 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x000a}
0xb202…b242 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0072, t01=0x0014}
0xb242…b24c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0054}
0xb24c…b260 Head {h00=0x0010, h01=0x0050, text=»LON EQU /B7 «, t00=0x0072, t01=0x005e}
0xb260…b274 Head {h00=0x0010, h01=0x0050, text=»LOF EQU /B8 «, t00=0x0072, t01=0x0072}
0xb274…b28a Head {h00=0x0012, h01=0x0050, text=» IFT KB6272=1 «, t00=0x0072, t01=0x0086}
0xb28a…b29e Head {h00=0x0010, h01=0x0050, text=»LMF1 EQU /20«, t00=0x0072, t01=0x009c}
0xb29e…b2b2 Head {h00=0x0010, h01=0x0050, text=»LMF2 EQU /10«, t00=0x0072, t01=0x00b0}
0xb2b2…b2c4 Head {h00=0x000e, h01=0x0050, text=»LIOL EQU 8«, t00=0x0072, t01=0x00c4}
0xb2c4…b2d6 Head {h00=0x000e, h01=0x0050, text=»LINH EQU 4«, t00=0x0072, t01=0x00d6}
0xb2d6…b2e8 Head {h00=0x000e, h01=0x0050, text=»LERR EQU 2«, t00=0x0072, t01=0x00e8}
0xb2e8…b2fa Head {h00=0x000e, h01=0x0050, text=»LSAV EQU 1«, t00=0x0072, t01=0x00fa}
0xb2fa…b306 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x010c}
0xb306…b31c Head {h00=0x0012, h01=0x0050, text=» IFF KB6272=1 «, t00=0x0072, t01=0x0118}
0xb31c…b332 Head {h00=0x0012, h01=0x0050, text=»LMF1 EQU 0 =2«, t00=0x0072, t01=0x012e}
0xb332…b348 Head {h00=0x0012, h01=0x0050, text=»LMF2 EQU 0 =2«, t00=0x0072, t01=0x0144}
0xb348…b35e Head {h00=0x0012, h01=0x0050, text=»LIOL EQU 1 =2«, t00=0x0072, t01=0x015a}
0xb35e…b374 Head {h00=0x0012, h01=0x0050, text=»LINH EQU 2 =2«, t00=0x0072, t01=0x0170}
0xb374…b38a Head {h00=0x0012, h01=0x0050, text=»LERR EQU 4 =2«, t00=0x0072, t01=0x0186}
0xb38a…b3a0 Head {h00=0x0012, h01=0x0050, text=»LSAV EQU 8 =2«, t00=0x0073, t01=0x000c}
0xb3a0…b3ac Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x0022}
0xb3ac…b3c6 Head {h00=0x0016, h01=0x0050, text=»LMF1ON LDK A3,LMF1«, t00=0x0073, t01=0x002e}
0xb3c6…b3d8 Head {h00=0x000e, h01=0x0050, text=» RF LMPON «, t00=0x0073, t01=0x0048}
0xb3d8…b3f2 Head {h00=0x0016, h01=0x0050, text=»LMF1OF LDK A3,LMF1«, t00=0x0073, t01=0x005a}
0xb3f2…b404 Head {h00=0x000e, h01=0x0050, text=» RF LMPOF «, t00=0x0073, t01=0x0074}
0xb404…b41e Head {h00=0x0016, h01=0x0050, text=»LMF2ON LDK A3,LMF2«, t00=0x0073, t01=0x0086}
0xb41e…b430 Head {h00=0x000e, h01=0x0050, text=» RF LMPON «, t00=0x0073, t01=0x00a0}
0xb430…b44a Head {h00=0x0016, h01=0x0050, text=»LMF2OF LDK A3,LMF2«, t00=0x0073, t01=0x00b2}
0xb44a…b45c Head {h00=0x000e, h01=0x0050, text=» RF LMPOF «, t00=0x0073, t01=0x00cc}
0xb45c…b476 Head {h00=0x0016, h01=0x0050, text=»LIOLON LDK A3,LIOL«, t00=0x0073, t01=0x00de}
0xb476…b488 Head {h00=0x000e, h01=0x0050, text=» RF LMPON «, t00=0x0073, t01=0x00f8}
0xb488…b4a2 Head {h00=0x0016, h01=0x0050, text=»LIOLOF LDK A3,LIOL«, t00=0x0073, t01=0x010a}
0xb4a2…b4b4 Head {h00=0x000e, h01=0x0050, text=» RF LMPOF «, t00=0x0073, t01=0x0124}
0xb4b4…b4ce Head {h00=0x0016, h01=0x0050, text=»LINHON LDK A3,LINH«, t00=0x0073, t01=0x0136}
0xb4ce…b4e0 Head {h00=0x000e, h01=0x0050, text=» RF LMPON «, t00=0x0073, t01=0x0150}
0xb4e0…b4fa Head {h00=0x0016, h01=0x0050, text=»LINHOF LDK A3,LINH«, t00=0x0073, t01=0x0162}
0xb4fa…b50c Head {h00=0x000e, h01=0x0050, text=» RF LMPOF «, t00=0x0073, t01=0x017c}
0xb50c…b526 Head {h00=0x0016, h01=0x0050, text=»LERRON LDK A3,LERR«, t00=0x0073, t01=0x018e}
0xb526…b538 Head {h00=0x000e, h01=0x0050, text=» RF LMPON «, t00=0x0074, t01=0x0018}
0xb538…b552 Head {h00=0x0016, h01=0x0050, text=»LERROF LDK A3,LERR«, t00=0x0074, t01=0x002a}
0xb552…b564 Head {h00=0x000e, h01=0x0050, text=» RF LMPOF «, t00=0x0074, t01=0x0044}
0xb564…b57e Head {h00=0x0016, h01=0x0050, text=»LSAVON LDK A3,LSAV«, t00=0x0074, t01=0x0056}
0xb57e…b590 Head {h00=0x000e, h01=0x0050, text=» RF LMPON «, t00=0x0074, t01=0x0070}
0xb590…b5aa Head {h00=0x0016, h01=0x0050, text=»LSAVOF LDK A3,LSAV«, t00=0x0074, t01=0x0082}
0xb5aa…b5bc Head {h00=0x000e, h01=0x0050, text=» RF LMPOF «, t00=0x0074, t01=0x009c}
0xb5bc…b5c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00ae}
0xb5c6…b5de Head {h00=0x0014, h01=0x0050, text=»LMPON LDK A7,LON«, t00=0x0074, t01=0x00b8}
0xb5de…b5f0 Head {h00=0x000e, h01=0x0050, text=» RF SDISP «, t00=0x0074, t01=0x00d0}
0xb5f0…b608 Head {h00=0x0014, h01=0x0050, text=»LMPOF LDK A7,LOF«, t00=0x0074, t01=0x00e2}
0xb608…b61a Head {h00=0x000e, h01=0x0050, text=» RF SDISP «, t00=0x0074, t01=0x00fa}
0xb61a…b632 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0074, t01=0x010c}
0xb632…b63a Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x0124}
0xb63a…b644 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x012c}
0xb644…b684 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0074, t01=0x0136}
0xb684…b68e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0176}
0xb68e…b69e Head {h00=0x000c, h01=0x0050, text=»* SDISP «, t00=0x0074, t01=0x0180}
0xb69e…b6a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0190}
0xb6a8…b6d0 Head {h00=0x0024, h01=0x0050, text=»* SIGNAL DISPLAY MONITOR REQUEST«, t00=0x0075, t01=0x000a}
0xb6d0…b6da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0032}
0xb6da…b71a Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0075, t01=0x003c}
0xb71a…b724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x007c}
0xb724…b738 Head {h00=0x0010, h01=0x0050, text=»SDISP EQU * «, t00=0x0075, t01=0x0086}
0xb738…b74e Head {h00=0x0012, h01=0x0050, text=» LDKL A8,ECBSD«, t00=0x0075, t01=0x009a}
0xb74e…b764 Head {h00=0x0012, h01=0x0050, text=» ADR A8,CREBAS«, t00=0x0075, t01=0x00b0}
0xb764…b77c Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBCW,A8 «, t00=0x0075, t01=0x00c6}
0xb77c…b788 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0075, t01=0x00de}
0xb788…b798 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0075, t01=0x00ea}
0xb798…b7a8 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0075, t01=0x00fa}
0xb7a8…b7c0 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0075, t01=0x010a}
0xb7c0…b7ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0122}
0xb7ca…b80a Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0075, t01=0x012c}
0xb80a…b814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x016c}
0xb814…b828 Head {h00=0x0010, h01=0x0050, text=»* ATMASB«, t00=0x0075, t01=0x0176}
0xb828…b832 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x018a}
0xb832…b870 (118, 0, 400) Head {h00=0x003a, h01=0x0050, text=»* SEARCH FOR ATTRIBUTE CHAR BACKWARDS AND MASK IT «, t00=0x0076, t01=0x0004}
0xb870…b87a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0042}
0xb87a…b8ba Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0076, t01=0x004c}
0xb8ba…b8c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x008c}
0xb8c4…b8ea Head {h00=0x0022, h01=0x0050, text=»* A2=CURSOR BINARY ADDRESS«, t00=0x0076, t01=0x0096}
0xb8ea…b912 Head {h00=0x0024, h01=0x0050, text=»* A1=BUFFER SCANNING PARAM. «, t00=0x0076, t01=0x00bc}
0xb912…b944 Head {h00=0x002e, h01=0x0050, text=»* 0=ATTRIB FOUND 1=END OF BUFFER LEFT «, t00=0x0076, t01=0x00e4}
0xb944…b970 Head {h00=0x0028, h01=0x0050, text=»* 2= ATTRIBUTE IN LAST POSITION«, t00=0x0076, t01=0x0116}
0xb970…b97a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0142}
0xb97a…b98e Head {h00=0x0010, h01=0x0050, text=»ATMASB EQU *«, t00=0x0076, t01=0x014c}
0xb98e…b9a0 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0076, t01=0x0160}
0xb9a0…b9b4 Head {h00=0x0010, h01=0x0050, text=»ASB05 EQU * «, t00=0x0076, t01=0x0172}
0xb9b4…b9da Head {h00=0x0022, h01=0x0050, text=» CF A14,GBUFFC GET BUFFER CHAR«, t00=0x0076, t01=0x0186}
0xb9da…b9fc Head {h00=0x001e, h01=0x0050, text=» CWK A3,/1F ATTRIB. CHAR. «, t00=0x0077, t01=0x001c}
0xb9fc…ba14 Head {h00=0x0014, h01=0x0050, text=» RF(G) ASB10 NO «, t00=0x0077, t01=0x003e}
0xba14…ba36 Head {h00=0x001e, h01=0x0050, text=»ASB08 ST A3,ATTRIB,TCABAS «, t00=0x0077, t01=0x0056}
0xba36…ba66 Head {h00=0x002c, h01=0x0050, text=» ST A2,CURATT,TCABAS CURSOR ON ATTRIBUTE«, t00=0x0077, t01=0x0078}
0xba66…ba76 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0077, t01=0x00a8}
0xba76…ba9a Head {h00=0x0020, h01=0x0050, text=»ASB10 CWK A2,0 END OF BUFFER«, t00=0x0077, t01=0x00b8}
0xba9a…bab2 Head {h00=0x0014, h01=0x0050, text=» RF(E) ASB20 YES«, t00=0x0077, t01=0x00dc}
0xbab2…bac4 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0077, t01=0x00f4}
0xbac4…bada Head {h00=0x0012, h01=0x0050, text=» RB ASB05 NEXT«, t00=0x0077, t01=0x0106}
0xbada…baee Head {h00=0x0010, h01=0x0050, text=»ASB20 EQU * «, t00=0x0077, t01=0x011c}
0xbaee…bb06 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0077, t01=0x0130}
0xbb06…bb0e Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x0148}
0xbb0e…bb48 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0077, t01=0x0150}
0xbb48…bb70 Head {h00=0x0024, h01=0x0050, text=» LDK A1,2 ATTRIBUTE IN LAST POS.«, t00=0x0077, t01=0x018a}
0xbb70…bb9a Head {h00=0x0026, h01=0x0050, text=» LDKL A2,1919 LAST BUFFER POSITION«, t00=0x0078, t01=0x0022}
0xbb9a…bbbe Head {h00=0x0020, h01=0x0050, text=» CF A14,GBUFFC GET CHARACTER«, t00=0x0078, t01=0x004c}
0xbbbe…bbe0 Head {h00=0x001e, h01=0x0050, text=» CWK A3,/1F ATTRIBUTE ??? «, t00=0x0078, t01=0x0070}
0xbbe0…bbfc Head {h00=0x0018, h01=0x0050, text=» RB(NG) ASB08 YES!!!«, t00=0x0078, t01=0x0092}
0xbbfc…bc20 Head {h00=0x0020, h01=0x0050, text=» SUR A2,A2 FIRST SCREEN POS.«, t00=0x0078, t01=0x00ae}
0xbc20…bc56 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0078, t01=0x00d2}
0xbc56…bc5e Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x0108}
0xbc5e…bc80 Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 END BUFFER LEFT «, t00=0x0078, t01=0x0110}
0xbc80…bc9a Head {h00=0x0016, h01=0x0050, text=» CM ATTRIB,TCABAS «, t00=0x0078, t01=0x0132}
0xbc9a…bcb2 Head {h00=0x0014, h01=0x0050, text=» LDKL A7,LBVDU+1«, t00=0x0078, t01=0x014c}
0xbcb2…bcea Head {h00=0x0034, h01=0x0050, text=» ST A7,CURATT,TCABAS POSSIBLY UNFORMATTED SCREEN«, t00=0x0078, t01=0x0164}
0xbcea…bcfa Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0079, t01=0x000c}
0xbcfa…bd12 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0079, t01=0x001c}
0xbd12…bd1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0034}
0xbd1c…bd5c Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0079, t01=0x003e}
0xbd5c…bd66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x007e}
0xbd66…bd7a Head {h00=0x0010, h01=0x0050, text=»* ATMASF«, t00=0x0079, t01=0x0088}
0xbd7a…bd84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x009c}
0xbd84…bdc2 Head {h00=0x003a, h01=0x0050, text=»* SEARCH FOR ATTRIBUTE CHAR. FORWARDS AND MASK IT «, t00=0x0079, t01=0x00a6}
0xbdc2…bdcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00e4}
0xbdcc…be0e Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0079, t01=0x00ee}
0xbe0e…be18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0130}
0xbe18…be2e Head {h00=0x0012, h01=0x0050, text=»* A3=CHARACTER«, t00=0x0079, t01=0x013a}
0xbe2e…be54 Head {h00=0x0022, h01=0x0050, text=»* A2=CURSOR BINARY ADDRESS«, t00=0x0079, t01=0x0150}
0xbe54…be7c Head {h00=0x0024, h01=0x0050, text=»* A1=BUFFER SCANNING PARAM. «, t00=0x0079, t01=0x0176}
0xbe7c…beae Head {h00=0x002e, h01=0x0050, text=»* 0=ATTRIB FOUND 2=END OF BUFFER RIGHT«, t00=0x007a, t01=0x000e}
0xbeae…bed4 Head {h00=0x0022, h01=0x0050, text=»* A3=ATTRIB IN LAST BUFF POS«, t00=0x007a, t01=0x0040}
0xbed4…bede Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0066}
0xbede…bee6 Head {h00=0x0004, h01=0x0050, t00=0x007a, t01=0x0070}
0xbee6…beee Head {h00=0x0004, h01=0x0050, t00=0x007a, t01=0x0078}
0xbeee…bf02 Head {h00=0x0010, h01=0x0050, text=»S:ATT EQU * «, t00=0x007a, t01=0x0080}
0xbf02…bf1e Head {h00=0x0018, h01=0x0050, text=» LD A7,ATTRIB,TCABAS«, t00=0x007a, t01=0x0094}
0xbf1e…bf3a Head {h00=0x0018, h01=0x0050, text=» LD A8,CURATT,TCABAS«, t00=0x007a, t01=0x00b0}
0xbf3a…bf6a Head {h00=0x002c, h01=0x0050, text=» CF A14,ATMASF SEARCH ATTRIBUTE FORWARD «, t00=0x007a, t01=0x00cc}
0xbf6a…bf86 Head {h00=0x0018, h01=0x0050, text=» ST A7,ATTRIB,TCABAS«, t00=0x007a, t01=0x00fc}
0xbf86…bfa2 Head {h00=0x0018, h01=0x0050, text=» ST A8,CURATT,TCABAS«, t00=0x007a, t01=0x0118}
0xbfa2…bfb2 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x007a, t01=0x0134}
0xbfb2…bfba Head {h00=0x0004, h01=0x0050, t00=0x007a, t01=0x0144}
0xbfba…bfce Head {h00=0x0010, h01=0x0050, text=»ATMASF EQU *«, t00=0x007a, t01=0x014c}
0xbfce…bfe0 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x007a, t01=0x0160}
0xbfe0…bff4 Head {h00=0x0010, h01=0x0050, text=»ASF05 EQU * «, t00=0x007a, t01=0x0172}
0xbff4…c01a Head {h00=0x0022, h01=0x0050, text=» CF A14,GBUFFC GET BUFFER CHAR«, t00=0x007a, t01=0x0186}
0xc01a…c03a Head {h00=0x001c, h01=0x0050, text=» CWK A3,/1F ATTRIB CHAR?«, t00=0x007b, t01=0x001c}
0xc03a…c052 Head {h00=0x0014, h01=0x0050, text=» RF(G) ASF10 NO «, t00=0x007b, t01=0x003c}
0xc052…c096 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007b, t01=0x0054}
0xc096…c0c6 Head {h00=0x002c, h01=0x0050, text=» CWK A2,LBVDU-1 EOB +ATTRIB IN LAST POS «, t00=0x007b, t01=0x0098}
0xc0c6…c10a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007b, t01=0x00c8}
0xc10a…c122 Head {h00=0x0014, h01=0x0050, text=» RF(NE) ASF08 NO«, t00=0x007b, t01=0x010c}
0xc122…c134 Head {h00=0x000e, h01=0x0050, text=» LDK A1,3 «, t00=0x007b, t01=0x0124}
0xc134…c156 Head {h00=0x001e, h01=0x0050, text=»ASF08 ST A3,ATTRIB,TCABAS «, t00=0x007b, t01=0x0136}
0xc156…c186 Head {h00=0x002c, h01=0x0050, text=» ST A2,CURATT,TCABAS CURSOR ON ATTRIBUTE«, t00=0x007b, t01=0x0158}
0xc186…c196 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x007b, t01=0x0188}
0xc196…c1c2 Head {h00=0x0028, h01=0x0050, text=»ASF10 CWK A2,LBVDU-1 END OF BUFFER? «, t00=0x007c, t01=0x0008}
0xc1c2…c1da Head {h00=0x0014, h01=0x0050, text=» RF(L) ASF20 NO «, t00=0x007c, t01=0x0034}
0xc1da…c1ec Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x007c, t01=0x004c}
0xc1ec…c1fc Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x007c, t01=0x005e}
0xc1fc…c212 Head {h00=0x0012, h01=0x0050, text=»ASF20 ADK A2,1«, t00=0x007c, t01=0x006e}
0xc212…c224 Head {h00=0x000e, h01=0x0050, text=» RB ASF05 «, t00=0x007c, t01=0x0084}
0xc224…c23c Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x007c, t01=0x0096}
0xc23c…c246 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00ae}
0xc246…c280 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x007c, t01=0x00b8}
0xc280…c28a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00f2}
0xc28a…c29a Head {h00=0x000c, h01=0x0050, text=»* GBUFFC«, t00=0x007c, t01=0x00fc}
0xc29a…c2a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x010c}
0xc2a4…c2de Head {h00=0x0036, h01=0x0050, text=»* GET VDU BUFFER CHAR WHICH IS INDICATED BY CURSOR«, t00=0x007c, t01=0x0116}
0xc2de…c2e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0150}
0xc2e8…c322 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x007c, t01=0x015a}
0xc322…c32c (125, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0004}
0xc32c…c34c Head {h00=0x001c, h01=0x0050, text=»* A2=CURSOR BINARY ADDR «, t00=0x007d, t01=0x000e}
0xc34c…c362 Head {h00=0x0012, h01=0x0050, text=»* A3=CHARACTER«, t00=0x007d, t01=0x002e}
0xc362…c36c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0044}
0xc36c…c376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x004e}
0xc376…c38a Head {h00=0x0010, h01=0x0050, text=»GBUFFC EQU *«, t00=0x007d, t01=0x0058}
0xc38a…c39c Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x007d, t01=0x006c}
0xc39c…c3b2 Head {h00=0x0012, h01=0x0050, text=» LDKL A4,BVDU «, t00=0x007d, t01=0x007e}
0xc3b2…c3d8 Head {h00=0x0022, h01=0x0050, text=» ADR A4,TCABAS GET VDU BUFFER «, t00=0x007d, t01=0x0094}
0xc3d8…c3ea Head {h00=0x000e, h01=0x0050, text=» ADR A4,A2«, t00=0x007d, t01=0x00ba}
0xc3ea…c414 Head {h00=0x0026, h01=0x0050, text=» LCR A3,A4 GET CHARACTER IN BUFF. «, t00=0x007d, t01=0x00cc}
0xc414…c424 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x007d, t01=0x00f6}
0xc424…c43c Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x007d, t01=0x0106}
0xc43c…c446 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x011e}
0xc446…c48a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007d, t01=0x0128}
0xc48a…c494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x016c}
0xc494…c4a4 Head {h00=0x000c, h01=0x0050, text=»* RESET «, t00=0x007d, t01=0x0176}
0xc4a4…c4ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0186}
0xc4ae…c4ea Head {h00=0x0038, h01=0x0050, text=»* RESET 'KEYBOARD INHIBIT' IN FOLLOWING SITUATIONS: «, t00=0x007d, t01=0x0190}
0xc4ea…c526 Head {h00=0x0038, h01=0x0050, text=»* 1- A DEVICE WITH AN ATTACHED KEYBOARD IS EXECUTING«, t00=0x007e, t01=0x003c}
0xc526…c54e Head {h00=0x0024, h01=0x0050, text=»* A COMMAND. BIT 14=1 IN KBINH «, t00=0x007e, t01=0x0078}
0xc54e…c584 Head {h00=0x0032, h01=0x0050, text=»* 2- A PA-KEY OPERATION IS IN PROCESS PRIOR TO«, t00=0x007e, t01=0x00a0}
0xc584…c5c4 Head {h00=0x003c, h01=0x0050, text=»* INITIATION OF A COMMAND FOR A DEVICE WITH AN ATTACHED«, t00=0x007e, t01=0x00d6}
0xc5c4…c5ea Head {h00=0x0022, h01=0x0050, text=»* KEYBOARD. BIT 14=1 IN KBINH«, t00=0x007e, t01=0x0116}
0xc5ea…c618 Head {h00=0x002a, h01=0x0050, text=»* 3- ERRORSITUATION. BIT 14=1 IN KBINH«, t00=0x007e, t01=0x013c}
0xc618…c622 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x016a}
0xc622…c660 Head {h00=0x003a, h01=0x0050, text=»* IF BIT 15=1 IN KBINH => NO RESETTING ALLOWED DURING «, t00=0x007e, t01=0x0174}
0xc660…c688 Head {h00=0x0024, h01=0x0050, text=»* UPDATE AND DISPLAY SITUATION. «, t00=0x007f, t01=0x0022}
0xc688…c692 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x004a}
0xc692…c6d6 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x007f, t01=0x0054}
0xc6d6…c6e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0098}
0xc6e0…c6f4 Head {h00=0x0010, h01=0x0050, text=»RESET EQU * «, t00=0x007f, t01=0x00a2}
0xc6f4…c71e Head {h00=0x0026, h01=0x0050, text=» CM MODE,TCABAS RESET INSERT MODE «, t00=0x007f, t01=0x00b6}
0xc71e…c74c Head {h00=0x002a, h01=0x0050, text=» CF A14,LIOLOF TURN OFF "INSERT" LAMP «, t00=0x007f, t01=0x00e0}
0xc74c…c776 Head {h00=0x0026, h01=0x0050, text=» CM KBINH,TCABAS RESSTORE KEYBOARD«, t00=0x007f, t01=0x010e}
0xc776…c7a2 Head {h00=0x0028, h01=0x0050, text=» CF A14,LERROF TURN OFF 'ERROR' LAMP«, t00=0x007f, t01=0x0138}
0xc7a2…c7da Head {h00=0x0034, h01=0x0050, text=» CF A14,LINHOF TURN OFF 'KEYBOARD INHIBIT' LAMP «, t00=0x007f, t01=0x0164}
0xc7da…c7ea Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0080, t01=0x000c}
0xc7ea…c802 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0080, t01=0x001c}
0xc802…c80a Head {h00=0x0004, h01=0x0050, t00=0x0080, t01=0x0034}
0xc80a…c812 Head {h00=0x0004, h01=0x0050, t00=0x0080, t01=0x003c}
0xc812…c85a Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0080, t01=0x0044}
0xc85a…c864 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x008c}
0xc864…c89c Head {h00=0x0034, h01=0x0050, text=»* C O P Y : COPY CONTENTS IN VDU BUFFER ON «, t00=0x0080, t01=0x0096}
0xc89c…c8c4 Head {h00=0x0024, h01=0x0050, text=»* HARDCOPY DEVICE«, t00=0x0080, t01=0x00ce}
0xc8c4…c8ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00f6}
0xc8ce…c912 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0080, t01=0x0100}
0xc912…c91a Head {h00=0x0004, h01=0x0050, t00=0x0080, t01=0x0144}
0xc91a…c92c Head {h00=0x000e, h01=0x0050, text=»COPY EQU *«, t00=0x0080, t01=0x014c}
0xc92c…c948 Head {h00=0x0018, h01=0x0050, text=» LD A5,COPNO,TCABAS «, t00=0x0080, t01=0x015e}
0xc948…c95e Head {h00=0x0012, h01=0x0050, text=» ABL(Z) ERROR «, t00=0x0080, t01=0x017a}
0xc95e…c97a Head {h00=0x0018, h01=0x0050, text=» LDKL A3,BVDU BUFFER«, t00=0x0080, t01=0x0190}
0xc97a…c99c Head {h00=0x001e, h01=0x0050, text=» ADR A3,TCABAS ADDRESSS «, t00=0x0081, t01=0x001c}
0xc99c…c9be Head {h00=0x001e, h01=0x0050, text=» LDKL A6,LBVDU REQ LENGTH «, t00=0x0081, t01=0x003e}
0xc9be…c9ee Head {h00=0x002c, h01=0x0050, text=» LDK A4,/8B ORDER = WRITE ADDRESSED WAIT«, t00=0x0081, t01=0x0060}
0xc9ee…ca06 Head {h00=0x0014, h01=0x0050, text=» * EJECT «, t00=0x0081, t01=0x0090}
0xca06…ca10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00a8}
0xca10…ca38 Head {h00=0x0024, h01=0x0050, text=»* WRITE INTERTASK COMMUNICATION «, t00=0x0081, t01=0x00b2}
0xca38…ca42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00da}
0xca42…ca60 Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER ADDRESS «, t00=0x0081, t01=0x00e4}
0xca60…ca74 Head {h00=0x0010, h01=0x0050, text=»* A4 = ORDER«, t00=0x0081, t01=0x0102}
0xca74…ca8c Head {h00=0x0014, h01=0x0050, text=»* A5 = "TO-TID" «, t00=0x0081, t01=0x0116}
0xca8c…caa6 Head {h00=0x0016, h01=0x0050, text=»* A6 = REQ LENGTH «, t00=0x0081, t01=0x012e}
0xcaa6…cab0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0148}
0xcab0…cac4 Head {h00=0x0010, h01=0x0050, text=»ICWRTE EQU *«, t00=0x0081, t01=0x0152}
0xcac4…cadc Head {h00=0x0014, h01=0x0050, text=» LDKL A8,ECBICW «, t00=0x0081, t01=0x0166}
0xcadc…caf2 Head {h00=0x0012, h01=0x0050, text=» ADR A8,CREBAS«, t00=0x0081, t01=0x017e}
0xcaf2…cb06 (130, 2, 246) Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-1 «, t00=0x0082, t01=0x0004}
0xcb06…cb34 Head {h00=0x002a, h01=0x0050, text=» CF A14,REQTIM NO TIME OUT SUPERVISION«, t00=0x0082, t01=0x0018}
0xcb34…cb56 Head {h00=0x001e, h01=0x0050, text=» ST A5,ECBCW,A8 TO TASK ID«, t00=0x0082, t01=0x0046}
0xcb56…cb78 Head {h00=0x001e, h01=0x0050, text=» ST A6,ECBRL,A8 REQ LENGTH«, t00=0x0082, t01=0x0068}
0xcb78…cb90 Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBBA,A8 «, t00=0x0082, t01=0x008a}
0xcb90…cba8 Head {h00=0x0014, h01=0x0050, text=» LDR A7,A4 ORDER«, t00=0x0082, t01=0x00a2}
0xcba8…cbb4 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0082, t01=0x00ba}
0xcbb4…cbc4 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0082, t01=0x00c6}
0xcbc4…cbd4 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0082, t01=0x00d6}
0xcbd4…cbe0 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0082, t01=0x00e6}
0xcbe0…cbe4 Head {h00=0x4004, h01=0x0000}
0xcbe4…cbe8 00 82 00 f2 ┆ ┆
0xcbe8…cbf0 (131, 1, 8) 20 04 00 00 00 83 00 04 ┆ ┆