|
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: 52546 (0xcd42)
Notes: pts_type(SC)
Names: »VDU.SC«
└─⟦928b1fd3e⟧ Bits:30009671 Philips computer tape "600131"
└─⟦this⟧ »MODIFY/VDU.SC«
IDENT VDU REL 11.0 82-03-10 870150541100 DK1 BAD CHECK ON ATTRIBUTE DK BAD TEST ON INTESITY =1, LINFLG AT UNFORM. 81-01-26 **************************************************************** * * * MODULE VDU * * MODULE HANDLING THE DISPLAY SCREEN AND * * BUFFER * * (EMULATION 3270 SNA/SDLC, BSC) * * * **************************************************************** EJECT *********************************************************** * * LIST OF ROUTINES * * DISMOD DISPLAY MODIFIED FIELDS * DISLIN DISPLAY LINE * SPACES MOVE SPACES INTO ECB BUFFER * INTCHK GET INTENSITY CHAR. * SETIND SET DISPLAY INDICATOR * INSMOD INSERT CHAR. * UPDCNT UPDATE COUNTERS * GETVDU GET CHAR. IN VDU BUFFER * STOVDU STORE CHAR IN VDU BUFFER * SCRINF GET SCREEN INFORMATION * STOINF STORE SCREEN INFORMATION * SOUND SOUND ALARM * WRAP CHECK IF WRAP AROUND * LINWRP CHECK IF LINE WRAP * LINE UPDATE LINE FLAG * LINATT UPDATE LINFLG AT ATTRIBUTE CHANGE * NLROUT NEW LINE ROUTINE * ERASE ERASE ENTIRE SCREEN * ERASUP ERASE ALL UNPROTECTED * ERASUA ERASE UNPROTECTED TO ADDRESS * POSUNP MOVE CURSOR TO NEXT UNPRO. POS * DISID DISPLAY HARDCOPY TASKID * DISSTA DISPLAY STATISTICS * MOVTXT MOVE TEXT * CONASC CONVERT TO ASCII * ATMASF SEARCH ATTRIBUTE FORWARD * ATMASB SEARCH ATTRIBUTE BACKWARD * SNULL SEARCH FIRST NULL CHAR. * WCHAR DISPLAY CHAR. AND CURSOR * RFMDUP REPLACE FM OR DUP CHAR. IF ANY * DISCHA DISPLAY CHAR. * ***************************************************************** EJECT ******************************************************************** * * * ENTRY POINTS * * * ******************************************************************** ENTRY INSMOD INSERT CHARACTER ENTRY GETVDU GET CHAR. FROM VDU BUFFER ENTRY STOVDU STORE CHAR. IN VDU BUFFER ENTRY SCRINF GET SCREEN INFORMATION ENTRY STOINF SAVE SCREEN INFORMATION ENTRY POSUNP MOVE TO NEXT UNPROTECTED POS. ENTRY ATMASB SEARCH ATTRIBUTE BACKWARDS ENTRY ATMASF SEARCH ATTRIBUTE FOREWARD ENTRY DISCHA DISPLAY CHAR. ENTRY WCHAR DISPLAY CHAR. AND CURSOR ENTRY DISMOD DISPLAY MODIFIED FIELDS ENTRY DISID DISPLAY HARDCOPY TASKID ENTRY ERASUA ERASE UNPROTECTED TO ADDRESS ENTRY ERASE ERASE ENTIRE SCREEN ENTRY SOUND SOUND ALARM ON VDU ENTRY ERASUP ERASE ALL UNPROTECTED ENTRY WRAP CHECK IF WRAP AROUND ENTRY NLROUT NEW LINE ROUTINE ENTRY LINWRP CHECK LINE WRAP ENTRY LINE UPDATE LINE FLAG ENTRY LINATT UPADTE ENTRY DISSTA DISPLAY STATISTICS EJECT ******************************************************************** * * * EXTERNAL REFERENCES * * * ******************************************************************** EXTRN TAB TAB UNPROCTECTED FOREWARD (KEYB) EXTRN CRDOWN MOVE CURSOR UNPROTECTED NEXT LINE (KEYB) EXTRN RDHOME UNPROTECTED FIRST ON SCREEN (KEYB) EXTRN SAVE1 SAVE REGISTERS (PAD) EXTRN REST1 RESTORE REGISTERS (PAD) EJECT ********************************************************************* * * * CONDITIONAL ASSEMBLY PARAMETERS * * * ********************************************************************* X:I EQU 1 INSERT/DELETE HANDLING IN:DL EQU 1 X:O EQU 0 TEST INCLUDED IF:=1 TEST EQU 0 EJECT *************************************************************** * * * DECLARATIONS OF DATA AND EQUATES * * *************************************************************** * * EQUATES FOR ECB HANDLING * ECBBA EQU 2 BUFFER ADDRESS ECBRL EQU 4 REQUESTED LENGTH ECBEL EQU 6 EFFECTIVE LENGTH ECBRC EQU 8 RETURN CODE ECBCW EQU 10 CONTROL WORD * * SPECIAL CHARACTERS * NULL EQU 0 NULL CHAR. NEWLIN EQU /0A NEW LINE CHAR. FORMFD EQU /0C FORM FEED CHAR. ENDMES EQU /19 END MESSAGE CHAR. DUPCH EQU /1C DUPLICATE CHAR. FMCH EQU /1E FIELD MARK CHAR. * * TASK IDENTIFICATION CODE * VDUCOD EQU 'VV' VDU KB TASK * * INTERNAL STATUS * LINUPD EQU /0001 LINE UPDATED ATTREC EQU /0002 ATTRIBUTE RECEIVED * * VDU SCREEN SIZE * LLINE EQU 80 LINE LENGTH LBVDU EQU 1920 TOTAL SIZE IFT TEST=1 * * STAT. LAYOUT * NUMLIN EQU 13 NUMBER OF LINES YO DISPLAY STALIN EQU 5 STARTING LINE OF DISPLAY STAPOS EQU 5 STARTTING POS ON LINE TXTSIZ EQU 15 SIZE OF PERMANENT TEXT INDEX DATA /0102,/0405,/0608,/090A,/0C0E,/1D1E,/1F00 XIF EJECT * * RELATIVE ADDRESSES IN * TERMINAL WORKBLOCK * TCT01 EQU 0 TASK IDENTIFICATION BVDU EQU TCT01+2 SCREEN BUFFER LINFLG EQU BVDU+1920 INTERNAL LINE FLAGS PCURS EQU LINFLG+24 CURSOR ADDRESS ATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR CURATT EQU ATTRIB+2 WCC EQU CURATT+2 WCC/CCC CHARACTER INTATT EQU WCC+8 INTENSITY ATTRIBUTE REGI EQU INTATT+32 WORK REGISTER ECBVDU EQU REGI+40 * * RELATIVE ADDRESSES IN * COMMON WORKBLOCK * IDTEXT EQU 2 IDENT TEXT LAYOUT IFT TEST=1 STATXT EQU IDTEXT+22 STATISTIC TEXT LAYOUT XIF EJECT ********************************************************* * * * DISMOD DISPLAY MODIFIED FIELDS * * * ********************************************************* * REGISTERS * * A2= CHAR. * A3= ADDRESS IN VDU-BUFFER * A4= REL. CURSOR POS. * A5= REL. ATTRIBUTE POS. * A6= ADDRESS IN ECB * A7= INDEX IN ECB * A8= VDU ECB * A9= INTENSITY COUNTER * A10= INDICATOR * A11= CREDIT WORK AREA * A13= RESERVED * ***************************************************** DISMOD EQU * LD A8,ECBVDU,A11 LDKL A1,/101 LINE 1 POS. 1 ST A1,ECBCW,A8 SUR A9,A9 RESET INTENSITY COUNTER SUR A10,A10 LDKL A3,BVDU ADR A3,A11 CF A14,SCRINF LDK A4,0 FIRST SCREEN POS. DK CF A14,SPACES SPACES IN ECB BUFFER ST A5,REGI,A11 LDKL A1,LBVDU+1 LDR A5,A11 CW A1,REGI,A11 RF(NE) DIS100 NO LDK A2,0 LOW INTENSITY ST A2,INTATT,A11 DIS100 EQU * LDR A10,A10 RF(NZ) DIS900 CF A14,INTCHK CHECK INTENSITY CHAR. LDR A1,A10 SUR A10,A10 LDR A1,A1 RF(N) DIS800 NONDISPLAY RF(NZ) DIS400 DISPLAY LINE LD A2,ECBCW,A8 NO MODIFICATION CWK A2,/1901 ALLDISPLAYED RB(NE) DIS100 NO RF DIS900 DIS400 EQU * CWK A7,LLINE LINE COMPLETED? RF(L) DIS500 NO CF A14,DISLIN DISPLAY LINE RB DIS100 DIS500 EQU * LCR A2,A3 GET CHAR. IN VDU-BUFFER CF A14,SETIND SET SPACE INDICATOR CCK A2,/8000 ATTRIBUTE? RF(NL) DIS700 YES CF A14,UPDCNT UPDATE COUNTERS CWK A2,NULL NULL CHAR.? RB(E) DIS400 YES CWK A2,NEWLIN NEW LINE CHAR.? RB(E) DIS400 YES CWK A2,ENDMES END MESSAGE CHAR.? RB(E) DIS400 YES CWK A2,FORMFD FORM FEED CHAR.? RB(E) DIS400 YES CF A14,RFMDUP REPLACE DUP AND FM CHAR. SC A2,-1,A6 STORE CHAR. IN ECB BUFFER RB DIS400 DIS700 EQU * ST A2,INTATT,A11 LDR A1,A2 ANK A1,8 LOW INTENSITY? RF(Z) DIS725 YES ANK A2,4 HIGH INTENSITY? RF(Z) DIS715 YES CF A14,UPDCNT UPDATE COUNTERS RF DIS800 NONDISPLAY DIS715 EQU * LDK A2,/1F HIGH RF DIS750 DIS725 EQU * LDK A2,/1E LOW DIS750 EQU * SCR A2,A6 SAVE CHAR. IN ECB BUFFER ADKL A9,1 CF A14,UPDCNT UPDATE COUNTERS ADK A6,1 RB DIS400 DIS800 EQU * CWK A7,LLINE LINE COMPLETED? RF(L) DIS850 NO CF A14,DISLIN DISPLAY LINE RB DIS100 DIS850 EQU * LCR A2,A3 GET CHAR. IN VDU-BUFFER CCK A2,/8000 ATTRIBUTE? RB(NL) DIS700 YES CF A14,UPDCNT UPDATE COUNTERS RB DIS800 DIS900 EQU * CF A14,SCRINF GET SCREEN INFORMATION LDK A1,2 REQ. LENGTH CF A14,DISCHA SET CURSOR RTN A14 EJECT *********************************************************** * * * DISLIN DISPLAY LINE ON VDU * * * *********************************************************** * REGISTERS * * A3= RESERVED * A4= RESERVED * A5= RESERVED * A6= RESERVED * A8= ECB VDU * A9= INTENSITY COUNTER * A10= INDICATOR * A11= RESERVED * A13= RESERVED * *********************************************************** DISLIN EQU * LDK A7,2 REQ. LENGTH LDR A1,A10 ANKL A1,1 ONLY SPACES? RF(Z) DISL10 YES LDKL A7,LLINE+2 REQ. LENGTH ADR A7,A9 ADD NUMBER OF INTENSITY CHAR. DISL10 EQU * ST A7,ECBRL,A8 LDKL A7,/8B SET CURSOR AND WRITE LKM DATA 1 LD A1,ECBCW,A8 GET CURSOR POS. ANK A1,/FF SUK A1,81 LAST POS. ON LINE DISPLAYED? RF(Z) DISL90 YES LD A6,ECBBA,A8 LDK A2,/2B SC A2,1,A6 LDKL A2,/1420 SC A2,3,A6 SRL A2,8 SC A2,2,A6 LDK A2,84 ST A2,ECBRL,A8 LDK A7,/86 WRITE LKM DATA 1 DISL90 EQU * ADK A5,1 LDK A2,1 FIRST POS. ON LINE SC A2,ECBCW+1,A8 LDKL A2,/100 MOVE ONE LINE DOWN ADS A2,ECBCW,A8 SUR A10,A10 LD A2,ECBCW,A8 CWK A2,/1901 END OF SCREEN RF(NE) DISL95 NO LDKL A10,1 DISL95 EQU * CF A14,SPACES MOVE SPACES TO ECB BUFFER RTN A14 EJECT ************************************************************ * * * SPACES MOVE SPACES TO ECB BUFFER * * * ************************************************************ * REGISTERS * * A2= CHAR. * A3= RESERVED * A4= RESERVED * A5= RESERVED * A6= ADDRESS IN ECB BUFFER * A7= INDEX IN ECB * A8= VDU ECB * A9= INTENSITY COUNTER * A10= INDICATOR * A11= RESERVED * A13= RESERVED * ************************************************************ SPACES EQU * LD A6,ECBBA,A8 GET BUFFER ADDRESS ADK A6,2 LDK A7,LLINE LINE LENGTH ADR A7,A7 BUFFER LENGTH LDKL A2,' ' SPACES SPAC10 EQU * SCR A2,A6 SC A2,1,A6 ADK A6,2 SUK A7,2 WHOLE BUFFER SPACED? RB(P) SPAC10 NO LDK A2,0 CHAR. LD A6,ECBBA,A8 BUFFER ADDRESS ADK A6,2 LDK A7,0 RESET CHAR. COUNTER RTN A14 EJECT ********************************************************* * * * INTCHK GET INTENSITY CHAR. * * * ********************************************************* * REGISTERS * * A2= CHAR. * A3= RESERVED * A4= RESERVED * A5= RESERVED * A6= ADDRESS IN ECB BUFFER * A7= RESERVED * A8= RESERVED * A9= INTENSITY COUNTER * A10= INDICATOR * A11= CREDIT WORK AREA * A13= RESERVED * ************************************************ INTCHK EQU * SUR A9,A9 RESET INTENSITY COUNTER LC A2,LINFLG,A5 GET LINE FLAG ANK A2,1 MODIFIED? RF(NZ) INT100 YES ADK A3,LLINE NEXT LINE ADK A4,LLINE ADK A5,1 LDK A2,1 SC A2,ECBCW+1,A8 LDKL A2,/100 ADS A2,ECBCW,A8 LDKL A10,0 RF INT900 INT100 EQU * LC A2,LINFLG,A5 ANK A2,2 SC A2,LINFLG,A5 LDKL A10,1 LD A2,REGI,A11 CWK A2,LBVDU+1 UNFORMATTED SCREEN? RF(E) INT200 YES CF A14,SAVE1 LDR A1,A4 CF A14,SCRINF LDR A2,A5 LDR A3,A6 CF A14,ATMASB GET CURRENT ATTRIBUTE ST A6,INTATT,A11 LDR A5,A2 LDR A6,A3 CF A14,STOINF CF A14,REST1 LDK A7,0 INT200 EQU * LD A2,INTATT,A11 LDR A1,A2 ANK A1,8 LOW INTENSITY? RF(Z) INT300 YES ANK A2,4 HIGH INTENSITY? RF(NZ) INT800 NO, NONDISPLAY LDK A2,/1F HIGH RF INT400 INT300 EQU * LDK A2,/1E LOW INT400 EQU * SCR A2,A6 SAVE IN ECB BUFFER ADK A6,1 ADKL A9,1 RF INT900 INT800 EQU * LDKL A10,/8000 INT900 EQU * RTN A14 EJECT ************************************************ * * * SETIND SET DISPLAY INDICATOR * * * ************************************************ * REGISTERS * * A2= CHAR * A3= RESERVED * A4= RESERVED * A5= RESERVED * A6= RESERVED * A7= RESERVED * A8= RESERVED * A9= RESERVED * A10= DISPLAY INDICATOR * A11= RESERVED * A13= RESERVED * ********************************** SETIND EQU * CWK A2,NULL NULL CHAR? RF(E) SETI90 YES ORKL A10,1 INDICATE NOT ONLY SPACES SETI90 EQU * RTN A14 EJECT **************************************************************** * * * INSMOD INSERT CHARACTER * * * **************************************************************** * REGISTERS * * A1= AT RETURN 0=NULL IN POS., 1=NORMAL INSERT, 2=NOT ALLOWED * A2= RESERVED * A4= REL. CURSOR POS. * A5= REL. ATTRIBUTE POS. * A6= ATTRIBUTE CHAR. * A11= CREDIT WORK AREA * A13= RESERVED * *************************************************************** INSMOD EQU * IFT IN:DL=1 LDR A1,A4 CF A14,GETVDU GET CHAR. IN VDU BUFFER CCK A7,NULL NULL CHAR.? RF(NE) INS100 NO LDK A1,0 INDICATE NULL IN CURSOR POS. RF INS900 INS100 EQU * LDR A3,A4 CWK A5,LBVDU+1 UNFORMATTED SCREEN? RF(E) INS200 YES LDR A8,A6 SAVE OLD LDR A9,A5 SAVE OLD CF A14,ATMASF SEARCH ATTRIBUTE FORWARD LDR A3,A5 ST A8,ATTRIB,A11 RESTORE ST A9,CURATT,A11 RESTORE LDR A6,A8 LDR A5,A9 INS200 EQU * CF A14,SNULL SEARCH FIRST NULL ANK A1,2 NULL FOUND? RF(Z) INS300 YES LDK A1,2 INDICATE ERROR RF INS900 INS300 EQU * CWK A5,LBVDU+1 UNFORMATTED SCREEN? RF(E) INS350 YES ORK A6,1 SET MDT-BIT ON IN ATTRIBUTE ST A6,ATTRIB,A11 LDR A1,A5 LDR A7,A6 CF A14,STOVDU SAVE NEW ATTRIBUTE IN VDU-BUFFER INS350 EQU * LDR A1,A3 ST A4,REGI,A11 LDR A4,A1 LDK A5,LLINE LDR A6,A11 SUR A10,A10 LDR A9,A1 CF A14,LINE UPDATE LINE FLAG LDR A1,A9 INS400 EQU * CWK A1,0 CHAR TO MOVE IN LAST SCREEN POS? RF(E) INS500 YES SUK A1,1 CF A14,GETVDU GET CHAR IN VDU BUFFER ADK A1,1 LDR A9,A1 LDK A5,LLINE LDR A6,A11 CF A14,LINE LDR A1,A9 LC A9,LINFLG,A6 ORKL A9,1 SC A9,LINFLG,A6 CF A14,STOVDU STORE CHAR IN VDU BUFFER SUK A1,1 SUK A4,1 INS450 EQU * CW A1,REGI,A11 ALL SHIFTED? RF(E) INS600 YES RB INS400 INS500 EQU * LDKL A1,LBVDU-1 GET LAST CHAR CF A14,GETVDU GET CHAR IN VDU BUFFER LDK A1,0 LDK A4,0 LDR A9,A1 LDK A5,LLINE LDR A6,A11 CF A14,LINE LDR A1,A9 LC A9,LINFLG,A6 ORKL A9,1 SC A9,LINFLG,A6 CF A14,STOVDU STORE CHAR IN VDU BUFFER LDKL A1,LBVDU-1 LAST SCREEN POS. LDKL A4,LBVDU-1 RB INS450 INS600 EQU * LDR A7,A2 GET KEY-CHAR CF A14,STOVDU STORE CHAR IN VDU BUFFER LDK A5,LLINE LDR A6,A11 CF A14,LINE LC A9,LINFLG,A6 ORKL A9,1 SC A9,LINFLG,A6 IM PCURS,A11 MOVE CURSOR LD A4,REGI,A11 ADK A4,1 CWK A4,LBVDU-1 WRAP AROUND? RF(NG) INS700 NO LDK A4,0 FIRST POS. ON SCREEN CM PCURS,A11 INS700 EQU * CF A14,DISMOD DISPLAY MODIFIED FIELD LDK A1,1 INDICATE NORMAL INSERT INS900 EQU * RTN A14 XIF EJECT ********************************************************* * * * UPDCNT UPDATE COUNTERS * * * ********************************************************* * REGISTERS * * A3= ADDRESS IN VDU BUFFER * A4= REL CURSOR POS * A5= RESERVED * A6= ADDRESS IN ECB * A7= INDEX IN ECB * A8= RESERVED * A9= RESERVED * A10= RESERVED * A11= RESERVED * A13= RESERVED * ********************************************************* UPDCNT EQU * ADK A3,1 ADK A4,1 ADK A6,1 ADK A7,1 RTN A14 EJECT **************************************************************** * * * GETVDU GET CHAR. IN VDU BUFFER * * * **************************************************************** * REGISTERS * * A1= REL. POS IN VDU BUFFER * A2= RESERVED * A3= RESERVED * A4= RESERVED * A5= RESERVED * A6= RESERVED * A7= CHAR. FROM VDU BUFFER * A8= RESERVED * A9= RESERVED * A10= RESERVED * A11= CREDIT WORK AREA * A13= RESERVED * ******************************************************** GETVDU EQU * LDKL A7,BVDU ADR A7,A11 ADR A7,A1 LCR A7,A7 ANK A7,/FF RTN A14 EJECT ************************************************************** * * * STOVDU STORE CHAR. IN VDU BUFFER * * * ************************************************************** * REGISTERS * * A1= REL. POS. IN VDU BUFFER * A2= RESERVED * A3= RESERVED * A4= RESERVED * A5= RESERVED * A6= RESERVED * A7= CHAR. TO STORE IN VDU BUFFER * A9= RESERVED * A10= RESERVED * A11= CREDIT WORK AREA * A13= RESERVED * ******************************************************** STOVDU EQU * LDKL A8,BVDU ADR A8,A11 ADR A8,A1 SCR A7,A8 RTN A14 EJECT ******************************************************** * * * SCRINF GET SCREEN INFORMATION * * * ******************************************************** * REGISTERS * * A2= RESERVED * A4= REL. CURSOR POS. * A5= REL. ATTRIBUTE POS. * A6= ATTRIBUTE CHAR. * A11= CREDIT WORK AREA * A13= RESERVED * ******************************************************* SCRINF EQU * LD A4,PCURS,A11 GET CURSOR POS. LD A5,CURATT,A11 GET ATTRIBUTE POS. LD A6,ATTRIB,A11 GET ATTRIBUTE CHAR. RTN A14 EJECT ******************************************************** * * * STOINF STORE SCREEN INFORMATION * * * ******************************************************** * REGISTERS * * A4= REL. CURSOR POS. * A5= REL. ATTRIBUTE POS. * A6= ATTRIBUTE CHAR. * A11= CREDIT WORK AREA * A13= RESERVED * ******************************************************** STOINF EQU * ST A4,PCURS,A11 ST A5,CURATT,A11 ST A6,ATTRIB,A11 RTN A14 EJECT ******************************************************* * * * SOUND SOUND ALARM ON VDU * * * ******************************************************* * REGISTERS * * A1= RETURN CODE * A8= ECBVDU * A11= CREDIT WORK AREA * A13= RESERVED * ******************************************************* SOUND EQU * LD A8,ECBVDU,A11 LD A1,ECBBA,A8 LDK A2,/2B CONTROL CHAR. SC A2,1,A1 LDK A2,/07 BELL CHAR. SC A2,2,A1 LDK A2,3 REQ. LENGTH ST A2,ECBRL,A8 LDK A7,/86 LKM DATA 1 LD A1,ECBRC,A8 GET RETURN CODE RTN A14 EJECT ***************************************************** * * * WRAP CHECK IF WRAP AROUND * * * ***************************************************** * REGISTERS * * A2= RESERVED * A3= ADDRESS IN VDU BUFFER * A4= REL. CURSOR POS. * A5= RESERVED * A6= RESERVED * A7= RESERVED * A8= RESERVED * A9= RESERVED * A10= RESERVED * A11= CREDIT WORK AREA * A13= RESERVED * ***************************************************** WRAP EQU * CWK A4,LBVDU WRAP AROUND RF(L) WRAP90 NO LDK A4,0 FIRST SCREEN POS. LDKL A3,BVDU ADR A3,A11 WRAP90 EQU * RTN A14 EJECT ************************************************************ * * * LINWRP CHECK LINE WRAP * * * ************************************************************ * REGISTERS * * A3= RESERVED * A4= REL CURSOR POS * A5= LAST IN ROW REL POS * A6= RESERVED * A8= RESERVED * A9= RESERVED * A10= RESERVED * A11= RESERVED * A13= RESERVED * *********************************************************** LINWRP EQU * CWR A5,A4 END OF LINE? RF(G) LINW10 NO CF A14,LINE UPDATE LINE FLAG LINW10 EQU * RTN A14 EJECT ************************************************************ * * * LINE UPDATE LINE FLAG * * * ************************************************************* * REGISTERS * * A3= ADDRESS IN VDU BUFFER * A4= REL CURSOR POS * A5= LAST IN ROW REL POS * A6= INTERNAL LINE FLAG ADDRESS * A8= RESERVED * A9= RESERVED * A10= RESERFED * A11= CREDIT WORK AREA * A13= RESERVED * *********************************************************** LINE EQU * CWR A5,A4 THIS LINE? RF(G) LIN400 YES,MAYBE LDR A1,A10 ANK A1,ATTREC ATTRIBUTE RECEIVED? RF(Z) LIN100 NO LC A1,LINFLG,A6 ORK A1,2 SC A1,LINFLG,A6 LIN100 EQU * SUR A6,A11 ADK A6,1 UPDATE ADDRESS CWK A6,23 WRAP SCREEN? RF(G) LIN300 YES ADK A5,LLINE ADR A6,A11 RB LINE LIN300 EQU * LDK A4,0 FIRST SCREEN POS. LDKL A3,BVDU ADR A3,A11 LDR A6,A11 LDK A5,LLINE LIN400 EQU * SUR A5,A4 CWK A5,81 RF(L) LIN500 THIS LINE LDK A5,LLINE LDR A6,A11 RB LINE LIN500 EQU * ADR A5,A4 RESTORE RTN A14 EJECT ************************************************************* * * * LINATT UPADTE LINFLG AT ATTRIBUTE CHANGE * * * ************************************************************* * REGISTERS * * A3= ADDRESS IN VDU BUFFER * A4= REL CURSOR POS * A5= LAST IN ROW REL POS * A6= INTERNAL LINE FLAG ADDRESS * A8= RESERVED * A9= RESERVED * A10= RESERVED * A11= CREDIT WORK AREA * A13= RESERVED * ************************************************************** LINATT EQU * CF A14,SAVE1 SUR A6,A11 LDK A2,0 LDR A10,A4 . =1 LINA10 EQU * ADK A4,1 ADK A3,1 CWR A5,A4 END OF LINE? RF(G) LINA30 NO ADR A6,A11 LC A1,LINFLG,A6 ORK A1,1 SC A1,LINFLG,A6 SUR A6,A11 ADK A6,1 CWK A6,23 WRAP AROUND? RF(G) LINA20 YES ADK A5,LLINE RF LINA30 LINA20 EQU * LDK A6,0 LDK A4,0 LDKL A3,BVDU ADR A3,A11 LDK A5,LLINE LINA30 EQU * CWR A4,A10 ALL CHECKED? =1 RF(E) LINA40 YES =1 LCR A2,A3 CWK A2,/80 ATTRIBUTE RB(NG) LINA10 YES LINA40 EQU * . =1 CF A14,REST1 RTN A14 EJECT *********************************************************** * * * NLROUT NEW LINE ROUTINE * * * *********************************************************** * REGISTERS * * A3= ADDRES IN VDU BUFFER * A4= REL CURSOR POS * A5= RESERVED * A6= RESERVED * A8= RESERVED * A9= RESERVED * A10= RESERVED * A11= RESERVED * A13= RESERVED * *********************************************************** NLROUT EQU * LDR A1,A4 SAVE CURSOR POS. CF A14,CRDOWN MOVE CURSOR ON E LINE DOWN LDK A7,0 NLR100 EQU * SUK A4,LLINE COMPUTE LEFTMOST POS. RF(N) NLR200 ADK A7,LLINE RB NLR100 NLR200 EQU * LDR A4,A1 LDK A2,NULL NLR300 EQU * CWR A7,A4 ALL NULLED? RF(E) NLR900 YES SCR A2,A3 NULL IN VDU BUFFER LC A1,LINFLG,A6 ORKL A1,1 SC A1,LINFLG,A6 ADK A3,1 ADK A4,1 CF A14,LINWRP RB NLR300 NLR900 EQU * RTN A14 EJECT ******************************************************************** * * * ERASE ERASE ENTIRE SCREEN * * * ******************************************************************* * REGISTERS * * A2= CHAR. * A3= ADDRESS IN VDU-BUFFER * A4= REL. CURSOR ADDRESS * A5= REL ATTRIBUTE POS * A6= ATTRIBUTE CHAR * A11= CREDIT WORK AREA * A13= RESERVED * ********************************************************* ERASE EQU * LDK A4,0 FIRST SCREEN POS. LDKL A3,BVDU ADR A3,A11 LDK A2,NULL STORE NULL CHAR. ERAS10 EQU * CWK A4,LBVDU+24 WHOLE SCREEN NULLED? RF(NL) ERAS20 YES SCR A2,A3 STORE CHAR. ADK A3,1 ADK A4,1 RB ERAS10 ERAS20 EQU * LDK A4,0 FIRST SCREEN POS. LDKL A5,LBVDU+1 UNFORMATTED SCREEN LDK A6,0 CF A14,STOINF SAVE SCREEN INFORMATION LC A1,TCT01,A11 CCK A1,VDUCOD PRINTER UNPACK? RF(NE) ERAS30 YES LD A8,ECBVDU,A11 LDK A2,'1' ERASE CHAR. LD A1,ECBBA,A8 SC A2,1,A1 LDK A1,2 REQ. LENGTH ST A1,ECBRL,A8 LDK A7,/86 WRITE LKM DATA 1 ERAS30 EQU * RTN A14 EJECT ********************************************************* * * * ERASUP ERASE ALL UNPROTECTED * * * ********************************************************* * REGISTERS * * A2= CHAR. * A3= ADDRESS IN VDU-BUFFER * A4= REL. CURSOR POS. * A5= REL. ATTRIBUTE POS. * A6= INTERNAL LINE FLAG ADDRESS * A11= CREDIT WORK AREA * A13= RESERVED * ********************************************************* ERASUP EQU * LDK A1,2 RESTORE KEYBOARD-BIT ST A1,WCC,A11 LDK A4,0 FIRST SCREEN POS. LDKL A3,BVDU ADR A3,A11 LDK A7,NULL STORE NULL CHAR. CWK A5,LBVDU+1 UNFORMATTED SCREEN? RF(NE) ERUP10 NO CF A14,ERASE RF ERUP90 ERUP10 EQU * LCR A2,A3 GET CHAR. CCK A2,/8000 ATTRIBUTE? RF(NL) ERUP20 YES ADK A3,1 ADK A4,1 RB ERUP10 ERUP20 EQU * LDR A9,A4 FIRST ATTRIBUTE POS. LDK A5,LLINE LDR A6,A11 SUR A10,A10 CF A14,LINE RF ERUP47 ERUP30 EQU * ADK A3,1 ADK A4,1 CF A14,LINWRP CHECK IF LINWRP AROUND LCR A2,A3 GET CHAR. CCK A2,/8000 ATTRIBUTE? RB(L) ERUP30 NO ERUP45 EQU * CWR A9,A4 ALL SCANNED? RF(E) ERUP70 YES ERUP47 EQU * LDR A1,A2 ANK A1,/20 PROTECTED? RB(NZ) ERUP30 YES ANK A2,/FE RESET MDT-BIT SCR A2,A3 SAVE ATTRIBUTE LC A1,LINFLG,A6 ORK A1,1 SC A1,LINFLG,A6 ADK A3,1 ADK A4,1 ERUP50 EQU * CF A14,LINWRP CHECK IF LINWRP AROUND LCR A2,A3 GET CHAR. CCK A2,/8000 ATTRIBUTE? RB(NL) ERUP45 YES SCR A7,A3 STORE NULL CHAR. IN VDU BUFFER LC A1,LINFLG,A6 ORK A1,1 SC A1,LINFLG,A6 ADK A3,1 ADK A4,1 RB ERUP50 ERUP70 EQU * CF A14,RDHOME TAB. UNPROTECTED FIRST ON SCREEN ERUP90 EQU * RTN A14 EJECT **************************************************************** * * ERASUA ERASE UNPROTECTED TO ADDRESS * * * **************************************************************** * REGISTERS * * A1= STOP ADDRESS * A2= CHAR. * A3= ADDRESS IN VDU-BUFFER * A4= REL. CURSOR POS. * A5= REL ATTRIBUTE POS. * A6= ATTRIBUTE CHAR. * A7= NULL CHAR. * A11= CREDIT WORK AREA * A13= RESERVED * **************************************************************** ERASUA EQU * LDK A7,NULL STORE NULL CHAR. LDKL A3,BVDU ADR A3,A11 ADR A3,A4 BUFFER POS. CWK A5,LBVDU+1 UNFORMATTED SCREEN? RF(E) ERUA47 YES LDR A2,A6 GET CURRENT ATTRIBUTE CWR A5,A4 STANDING ON ATTRIBUTE? RF(NE) ERUA10 NO ADK A3,1 ADK A4,1 CWR A1,A4 ALL NULLED? RF(E) ERUA70 YES CF A14,WRAP CHECK IF WRAP AROUND ERUA10 EQU * ANK A2,/20 PROTECTED FIELD? RF(Z) ERUA47 NO ERUA30 EQU * CF A14,WRAP CHECK IF WRAP AROUND LCR A2,A3 GET CHAR. ADK A3,1 ADK A4,1 CWR A1,A4 ALL NULLED? RF(E) ERUA70 YES CCK A2,/8000 ATTRIBUTE? RB(L) ERUA30 NO ERUA45 EQU * LDR A8,A2 ANKL A8,/20 PROTECTED? RB(NZ) ERUA30 YES ERUA47 EQU * LDR A6,A11 LDK A5,LLINE LDR A8,A1 CF A14,LINE LDR A1,A8 RF ERUA60 ERUA50 EQU * LDR A8,A1 CF A14,LINWRP LDR A1,A8 CWR A1,A4 ALL NULLED? RF(E) ERUA70 YES ERUA60 EQU * LCR A2,A3 GET CHAR. CCK A2,/8000 ATTRIBUTE? RB(NL) ERUA45 YES SCR A7,A3 STORE NULL CHAR, IN VDU-BUFFER LC A8,LINFLG,A6 ORKL A8,1 SC A8,LINFLG,A6 ADK A3,1 ADK A4,1 RB ERUA50 ERUA70 EQU * RTN A14 EJECT ********************************************************** * * * POSUNP MOVE CURSOR TO NEXT UNPR. POS. * * * ********************************************************** * REGISTERS * * A2= RESERVED * A4= REL. CURSOR POS. * A5= REL. ATTRIBUTE POS. * A6= ATTRIBUTE CHAR * A11= CREDIT WORK AREA * A13= RESERVED * *********************************************************** POSUNP EQU * CWK A4,LBVDU-1 WRAP AROUND? RF(NG) POSU20 NO LDK A4,0 FIRST POS. ON SCREEN ST A4,PCURS,A11 POSU20 EQU * LDR A1,A4 CF A14,GETVDU GET CHAR IN VDU BUFFER CCK A7,/8000 ATTRIBUTE? RF(L) POSU30 NO LDR A6,A7 ANK A7,/30 CWK A7,/30 PROTECTED AND NUMERIC? RF(E) POSU25 YES LDR A5,A1 IM PCURS,A11 MOVE CURSOR ADK A4,1 CWK A4,LBVDU-1 WRAP AROUND? RF(NG) POSU23 NO LDK A4,0 POSU23 EQU * CF A14,STOINF SAVE SCREEN INFORMATION LDK A1,2 REQ. LENGTH CF A14,DISCHA SET CURSOR RF POSU30 POSU25 EQU * CF A14,TAB TAB NEXT UNPROTECTED FIELD POSU30 EQU * LD A8,ECBVDU,A11 LD A1,ECBCW,A8 ANK A1,/FF LINE POS. SUK A1,81 LAST POS. ON LINE? RF(NZ) POSU90 NO LDK A1,2 REQ. LENGTH CF A14,DISCHA SET CURSOR POSU90 EQU * RTN A14 EJECT ************************************************************ * * * DISID DISPLAY HARDCOPY TASKID * * * ************************************************************ * REGISTERS * * ************************************************************ DISID EQU * LD A8,ECBVDU,A11 CF A14,SPACES SPACE IN ECB BUFFER LD A3,6,A13 GET COMMON BLOCK BASE LDR A1,A5 SAVE TASK ID LDK A5,IDTEXT ADR A5,A3 POINT ON IDBUFFER ADK A6,46 LDK A3,6 ANK A4,1 PRINTER OPERABLE? RF(Z) DISI10 YES ADK A3,16 DISI10 EQU * SUK A3,2 MOVE INTO ECBBUFFER RF(N) DISI20 COMPLETED LDR* A2,A5 STR A2,A6 ADK A5,2 ADK A6,2 RB DISI10 DISI20 EQU * LD A6,ECBBA,A8 ST A1,ECBBA+52,A6 SAVE TASK ID IN BUFFER LC A2,X'1F' HIGH INTENSITY CHAR. SC A2,ECBBA+45,A6 LDKL A10,1 INDICATE NOT ONLY SPACES LDKL A9,1 1 INTENSITY CHAR. LDKL A2,X'1801' DISPLAY ON LAST ROW ST A2,ECBCW,A8 CF A14,DISLIN DISPLAY IDENT TEXT RTN A14 EJECT ************************************************************** * * DISSTA DISPLAY STATISTICS * *************************************************************** * REGISTERS * * *************************************************************** DISSTA EQU * IFT TEST=1 LD A8,ECBVDU,A11 LDK A1,STALIN WHERE TO START SLL A1,8 LDK A2,1 ORR A2,A1 FIRST POS. ON THAT LINE ST A2,ECBCW,A8 CF A14,SPACES CLEAN THE BUFFER LDK A5,0 RESET INDEX LD A3,6,A13 ADK A3,STATXT POINT TO TEXT DISS10 EQU * LDK A2,/1F HIGH INTENSITY SCR A2,A6 ADK A6,1 LDKL A9,1 LDK A1,TXTSIZ GET SIZE OF TEXT PER LINE CF A14,MOVTXT MOVE IT IN TO BUFFER ADK A6,5+STAPOS MAKE SOME ROOM LC A1,INDEX,A5 SLL A1,1 ADR A1,A12 POINT OUT STAT VALUE LCR A2,A1 CF A14,CONASC MAKE IT VISABLE LDR A4,A2 LCR A2,A1 SRL A2,4 CF A14,CONASC SLL A2,8 ORR A2,A4 SC A2,+1,A6 SRL A2,8 SCR A2,A6 ADK A6,2 LC A2,+1,A1 CF A14,CONASC AS ABOVE LDR A4,A2 LC A2,+1,A1 SRL A2,4 CF A14,CONASC SLL A2,8 ORR A2,A4 SC A2,+1,A6 SRL A2,8 SCR A2,A6 LDKL A10,1 NOT ONLY SPACES CF A14,DISLIN DISPLAY STAT. CWK A5,NUMLIN LIMIT REACHED? RB(NE) DISS10 NO XIF RTN A14 IFT TEST=1 EJECT *********************************************************** * * MOVTXT MOVE TEXT * *********************************************************** * REGISTERS * * ********************************************************** MOVTXT EQU * LCR A2,A3 ADK A3,1 SC A2,STAPOS,A6 ADK A6,1 SUK A1,1 RB(NZ) MOVTXT RTN A14 EJECT ********************************************************** * * CONASC CONVERT TO ASCII * ******************************************************** * REGISTERS * * ******************************************************** CONASC EQU * ANK A2,/0F CCK A2,/0909 RF(G) CONA10 ORK A2,/30 RF CONA90 CONA10 EQU * ADK A2,/37 CONA90 EQU * RTN A14 XIF EJECT ********************************************************* * * * ATMASF SEARCH ATTRIBUTE FORWARD * * * ********************************************************* * REGISTERS * * A1= AT ENTRY START SEARCH ADDRESS * A2= RESERVED * A3= RESERVED * A4= REL. CURSOR POS. * A5= REL. ATTRIBUTE POS. * A6= ATTRIBUTE CHAR. * A8= RESERVED * A9= RESERVED * A10= RESERVED * A11= CREDIT WORK AREA * A13= RESERVED * ********************************************************* ATMASF EQU * ST A1,REGI,A11 ASF100 EQU * ADK A1,1 CWK A1,LBVDU-1 WRAP AROUND? RF(NG) ASF200 NO LDK A1,0 FIRST POS. ON SCREEN ASF200 EQU * CW A1,REGI,A11 WHOLE SCREEN SEARCHED? RF(E) ASF900 YES CF A14,GETVDU GET CHAR. IN VDU BUFFER CCK A7,/8000 ATTRIBUTE? RB(L) ASF100 NO LDR A6,A7 LDR A5,A1 CF A14,STOINF SAVE NEW SCREEN INFORMATION ASF900 EQU * RTN A14 EJECT *********************************************************************** * * * ATMASB SEARCH ATTRIBUTE BACKWARD * * * *********************************************************************** * REGISTERS * * A1= ATENTRY START SEARCH ADDR. * A2= RESERVED * A3= RESERVED * A4= REL. CURSOR POS. * A5= REL. ATTRIBUTE POS. * A6= ATTRIBUTE CHAR. * A8= RESERVED * A9= RESERVED * A10= RESERVED * A11= CREDIT WORK AREA * A13= RESERVED * ************************************************************************ ATMASB EQU * ST A1,REGI,A11 ASB100 EQU * CF A14,GETVDU GET CHAR. IN VDU BUFFER CCK A7,/8000 ATTRIBUTE? RF(NL) ASB300 YES SUK A1,1 RF(NN) ASB200 NOT WRAP AROUND LDKL A1,LBVDU-1 LAST POS. ON SCREEN ASB200 EQU * CW A1,REGI,A11 WHOLE SCREEN SEARCHED? RF(E) ASB900 YES RB ASB100 ASB300 EQU * LDR A6,A7 LDR A5,A1 CF A14,STOINF SAVE SCREEN INFORMATION ASB900 EQU * RTN A14 EJECT *************************************************************** * * * SNULL SEARCH FIRST NULL CHAR. * * * *************************************************************** * REGISTERS * * A1= AT RETURN 1=NULL FOUND, 2=NO NULL FOUND * A2= RESERVED * A3= AT ENTRY LAST SEARCH ADDR., AT RETURN NULL ADDR. IF ANY * A4= REL. CURSOR POS. * A5= RESERVED * A6= RESERVED * A11= CREDIT WORK AREA * A13= RESERVED * **************************************************************** SNULL EQU * LDR A1,A4 SNU100 EQU * ADK A1,1 CWK A1,LBVDU-1 WRAP AROUND? RF(NG) SNU200 NO LDK A1,0 FIRST SCREEN POS. SNU200 EQU * CWR A1,A3 ALL SEARCHED? RF(E) SNU300 YES CF A14,GETVDU GET CHAR IN VDU BUFFER CCK A7,NULL NULL CHAR? RB(NE) SNU100 NO LDR A3,A1 LDK A1,1 INDICATE NULL FOUND RF SNU900 SNU300 EQU * LDK A1,2 SNU900 EQU * RTN A14 EJECT ************************************************************ * * * WCHAR DISPLAY CHAR. AND CURSOR * * * ************************************************************ * REGISTERS * * A2= KEY-CHAR * A4= REL. CURSOR POS. * A5= REL. ATTRIBUTE POS. * A6= ATTRIBUTE CHAR. * A8= VDU-ECB * A11= CREDIT WORK AREA * A13= RESERVED * ************************************************************* WCHAR EQU * LD A8,ECBVDU,A11 LDK A1,/1E LOW INTENSITY CHAR. LDR A7,A6 ANK A7,/8 STANDARD DISPLAY? RF(Z) WCH300 YES LDR A7,A6 ANK A7,/4 INTENSIFIED DISPLAY? RF(NZ) WCH200 NO LDK A1,/1F HIGH INTENSITY CHAR. RF WCH300 WCH200 EQU * LDK A2,/20 NONDISPLAY WCH300 EQU * LD A7,ECBBA,A8 GET BUFFER ADDRESS SC A1,2,A7 SAVE INTENSITY CHAR. CF A14,RFMDUP REPLACE FM OR DUP CHAR. SC A2,3,A7 STORE CHAR. IN VDU BUFFER LDK A1,4 REQ. LENGTH CF A14,DISCHA DISPLAY ADK A4,1 IM PCURS,A11 CWK A5,LBVDU+1 UNFORMATTED SCREEN? RF(E) WCH900 YES ORK A6,1 SET MDT-BITS IN ATTRIBUTE ST A6,ATTRIB,A11 LDR A1,A5 LDR A7,A6 CF A14,STOVDU STORE CHAR. IN VDU BUFFER WCH900 EQU * RTN A14 EJECT ********************************************************* * * * RFMDUP REPLACE FM OR DUP CHAR IF PRESENT * * * ********************************************************* * REGISTERS * A2= KEY-CHAR * A4= RESERVED * A5= RESERVED * A6= RESERVED * A11= CREDIT WORK AREA * A13= RESERVED * *********************************************** RFMDUP EQU * CWK A2,DUPCH DUP CHAR? RF(NE) RFMD10 NO LDK A2,/2A REPLACE RF RFMD90 RFMD10 EQU * CWK A2,FMCH FM CHAR? RF(NE) RFMD90 NO LDK A2,/3B REPLACE RFMD90 EQU * RTN A14 EJECT ************************************************ * * * DISCHA DISPLAY CHAR * * * ************************************************ * REGISTERS * * A1= REQ. LENGTH * A2= RESERVED * A4= RESERVED * A5= RESERVED * A6= RESERVED * A8= VDU-ECB * A11= CREDIT WORK AREA * A13= RESERVED * ************************************************* DISCHA EQU * LC A2,TCT01,A11 CCK A2,VDUCOD PRINTER UNPACK? RF(NE) DISC95 YES LD A8,ECBVDU,A11 ST A1,ECBRL,A8 LDKL A1,/101 START AT LINE 1 POS. 1 ST A1,ECBCW,A8 LDKL A1,/100 LDR A7,A4 CURSOR POS. DISC10 EQU * CWK A7,LLINE NEXT LINE? RF(L) DISC90 NO ADS A1,ECBCW,A8 MOVE TO NEXT LINE SUKL A7,LLINE RB DISC10 DISC90 EQU * ADS A7,ECBCW,A8 POSITION IN LINE LDK A7,/8B SET CURSOR AND WRITE LKM DATA 1 DISC95 EQU * RTN A14 END
0x0000…0032 (0, 0, 398) Head {h00=0x002e, h01=0x0050, text=» IDENT VDU REL 11.0 82-03-10 870150541100 «, t00=0x0000, t01=0x0004}
0x0032…003a Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0036}
0x003a…0060 Head {h00=0x0022, h01=0x0050, text=» DK1 BAD CHECK ON ATTRIBUTE «, t00=0x0000, t01=0x003e}
0x0060…0082 Head {h00=0x001e, h01=0x0050, text=» DK BAD TEST ON INTESITY«, t00=0x0000, t01=0x0064}
0x0082…00a2 Head {h00=0x001c, h01=0x0050, text=» =1, LINFLG AT UNFORM.«, t00=0x0000, t01=0x0086}
0x00a2…00b6 Head {h00=0x0010, h01=0x0050, text=» 81-01-26 «, t00=0x0000, t01=0x00a6}
0x00b6…00fe Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0000, t01=0x00ba}
0x00fe…0146 Head {h00=0x0044, h01=0x0050, text=»* *«, t00=0x0000, t01=0x0102}
0x0146…018e Head {h00=0x0044, h01=0x0050, text=»* MODULE VDU *«, t00=0x0000, t01=0x014a}
0x018e…01d6 (1, 0, 400) Head {h00=0x0044, h01=0x0050, text=»* MODULE HANDLING THE DISPLAY SCREEN AND *«, t00=0x0001, t01=0x0004}
0x01d6…021e Head {h00=0x0044, h01=0x0050, text=»* BUFFER *«, t00=0x0001, t01=0x004c}
0x021e…0266 Head {h00=0x0044, h01=0x0050, text=»* (EMULATION 3270 SNA/SDLC, BSC) *«, t00=0x0001, t01=0x0094}
0x0266…02ae Head {h00=0x0044, h01=0x0050, text=»* *«, t00=0x0001, t01=0x00dc}
0x02ae…02f6 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0001, t01=0x0124}
0x02f6…0304 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x016c}
0x0304…0348 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0001, t01=0x017a}
0x0348…0352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002e}
0x0352…036c Head {h00=0x0016, h01=0x0050, text=»* LIST OF ROUTINES«, t00=0x0002, t01=0x0038}
0x036c…0376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0052}
0x0376…03ac Head {h00=0x0032, h01=0x0050, text=»* DISMOD DISPLAY MODIFIED FIELDS «, t00=0x0002, t01=0x005c}
0x03ac…03d6 Head {h00=0x0026, h01=0x0050, text=»* DISLIN DISPLAY LINE«, t00=0x0002, t01=0x0092}
0x03d6…0410 Head {h00=0x0036, h01=0x0050, text=»* SPACES MOVE SPACES INTO ECB BUFFER «, t00=0x0002, t01=0x00bc}
0x0410…0442 Head {h00=0x002e, h01=0x0050, text=»* INTCHK GET INTENSITY CHAR. «, t00=0x0002, t01=0x00f6}
0x0442…0476 Head {h00=0x0030, h01=0x0050, text=»* SETIND SET DISPLAY INDICATOR «, t00=0x0002, t01=0x0128}
0x0476…04a0 Head {h00=0x0026, h01=0x0050, text=»* INSMOD INSERT CHAR.«, t00=0x0002, t01=0x015c}
0x04a0…04ce Head {h00=0x002a, h01=0x0050, text=»* UPDCNT UPDATE COUNTERS «, t00=0x0002, t01=0x0186}
0x04ce…0504 Head {h00=0x0032, h01=0x0050, text=»* GETVDU GET CHAR. IN VDU BUFFER «, t00=0x0003, t01=0x0024}
0x0504…053a Head {h00=0x0032, h01=0x0050, text=»* STOVDU STORE CHAR IN VDU BUFFER«, t00=0x0003, t01=0x005a}
0x053a…056e Head {h00=0x0030, h01=0x0050, text=»* SCRINF GET SCREEN INFORMATION«, t00=0x0003, t01=0x0090}
0x056e…05a4 Head {h00=0x0032, h01=0x0050, text=»* STOINF STORE SCREEN INFORMATION«, t00=0x0003, t01=0x00c4}
0x05a4…05ce Head {h00=0x0026, h01=0x0050, text=»* SOUND SOUND ALARM «, t00=0x0003, t01=0x00fa}
0x05ce…0600 Head {h00=0x002e, h01=0x0050, text=»* WRAP CHECK IF WRAP AROUND«, t00=0x0003, t01=0x0124}
0x0600…0630 Head {h00=0x002c, h01=0x0050, text=»* LINWRP CHECK IF LINE WRAP«, t00=0x0003, t01=0x0156}
0x0630…065e Head {h00=0x002a, h01=0x0050, text=»* LINE UPDATE LINE FLAG«, t00=0x0003, t01=0x0186}
0x065e…069e Head {h00=0x003c, h01=0x0050, text=»* LINATT UPDATE LINFLG AT ATTRIBUTE CHANGE «, t00=0x0004, t01=0x0024}
0x069e…06cc Head {h00=0x002a, h01=0x0050, text=»* NLROUT NEW LINE ROUTINE«, t00=0x0004, t01=0x0064}
0x06cc…06fe Head {h00=0x002e, h01=0x0050, text=»* ERASE ERASE ENTIRE SCREEN «, t00=0x0004, t01=0x0092}
0x06fe…0732 Head {h00=0x0030, h01=0x0050, text=»* ERASUP ERASE ALL UNPROTECTED «, t00=0x0004, t01=0x00c4}
0x0732…076c Head {h00=0x0036, h01=0x0050, text=»* ERASUA ERASE UNPROTECTED TO ADDRESS«, t00=0x0004, t01=0x00f8}
0x076c…07a8 Head {h00=0x0038, h01=0x0050, text=»* POSUNP MOVE CURSOR TO NEXT UNPRO. POS«, t00=0x0004, t01=0x0132}
0x07a8…07de Head {h00=0x0032, h01=0x0050, text=»* DISID DISPLAY HARDCOPY TASKID «, t00=0x0004, t01=0x016e}
0x07de…080e Head {h00=0x002c, h01=0x0050, text=»* DISSTA DISPLAY STATISTICS«, t00=0x0005, t01=0x0014}
0x080e…0836 Head {h00=0x0024, h01=0x0050, text=»* MOVTXT MOVE TEXT «, t00=0x0005, t01=0x0044}
0x0836…0864 Head {h00=0x002a, h01=0x0050, text=»* CONASC CONVERT TO ASCII«, t00=0x0005, t01=0x006c}
0x0864…089a Head {h00=0x0032, h01=0x0050, text=»* ATMASF SEARCH ATTRIBUTE FORWARD«, t00=0x0005, t01=0x009a}
0x089a…08d2 Head {h00=0x0034, h01=0x0050, text=»* ATMASB SEARCH ATTRIBUTE BACKWARD «, t00=0x0005, t01=0x00d0}
0x08d2…0908 Head {h00=0x0032, h01=0x0050, text=»* SNULL SEARCH FIRST NULL CHAR. «, t00=0x0005, t01=0x0108}
0x0908…093e Head {h00=0x0032, h01=0x0050, text=»* WCHAR DISPLAY CHAR. AND CURSOR«, t00=0x0005, t01=0x013e}
0x093e…097a Head {h00=0x0038, h01=0x0050, text=»* RFMDUP REPLACE FM OR DUP CHAR. IF ANY«, t00=0x0005, t01=0x0174}
0x097a…09a6 Head {h00=0x0028, h01=0x0050, text=»* DISCHA DISPLAY CHAR. «, t00=0x0006, t01=0x0020}
0x09a6…09b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x004c}
0x09b0…09fa Head {h00=0x0046, h01=0x0050, text=»***************************************************************** «, t00=0x0006, t01=0x0056}
0x09fa…0a08 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x00a0}
0x0a08…0a54 Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x0006, t01=0x00ae}
0x0a54…0aa0 Head {h00=0x0048, h01=0x0050, text=»* *«, t00=0x0006, t01=0x00fa}
0x0aa0…0aec Head {h00=0x0048, h01=0x0050, text=»* ENTRY POINTS *«, t00=0x0006, t01=0x0146}
0x0aec…0b38 (7, 0, 400) Head {h00=0x0048, h01=0x0050, text=»* *«, t00=0x0007, t01=0x0004}
0x0b38…0b84 Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x0007, t01=0x0050}
0x0b84…0b8c Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x009c}
0x0b8c…0bb2 Head {h00=0x0022, h01=0x0050, text=» ENTRY INSMOD INSERT CHARACTER«, t00=0x0007, t01=0x00a4}
0x0bb2…0be2 Head {h00=0x002c, h01=0x0050, text=» ENTRY GETVDU GET CHAR. FROM VDU BUFFER «, t00=0x0007, t01=0x00ca}
0x0be2…0c12 Head {h00=0x002c, h01=0x0050, text=» ENTRY STOVDU STORE CHAR. IN VDU BUFFER «, t00=0x0007, t01=0x00fa}
0x0c12…0c3e Head {h00=0x0028, h01=0x0050, text=» ENTRY SCRINF GET SCREEN INFORMATION«, t00=0x0007, t01=0x012a}
0x0c3e…0c6c Head {h00=0x002a, h01=0x0050, text=» ENTRY STOINF SAVE SCREEN INFORMATION «, t00=0x0007, t01=0x0156}
0x0c6c…0ca0 Head {h00=0x0030, h01=0x0050, text=» ENTRY POSUNP MOVE TO NEXT UNPROTECTED POS. «, t00=0x0007, t01=0x0184}
0x0ca0…0cd0 Head {h00=0x002c, h01=0x0050, text=» ENTRY ATMASB SEARCH ATTRIBUTE BACKWARDS«, t00=0x0008, t01=0x0028}
0x0cd0…0d00 Head {h00=0x002c, h01=0x0050, text=» ENTRY ATMASF SEARCH ATTRIBUTE FOREWARD «, t00=0x0008, t01=0x0058}
0x0d00…0d24 Head {h00=0x0020, h01=0x0050, text=» ENTRY DISCHA DISPLAY CHAR. «, t00=0x0008, t01=0x0088}
0x0d24…0d52 Head {h00=0x002a, h01=0x0050, text=» ENTRY WCHAR DISPLAY CHAR. AND CURSOR «, t00=0x0008, t01=0x00ac}
0x0d52…0d80 Head {h00=0x002a, h01=0x0050, text=» ENTRY DISMOD DISPLAY MODIFIED FIELDS «, t00=0x0008, t01=0x00da}
0x0d80…0dac Head {h00=0x0028, h01=0x0050, text=» ENTRY DISID DISPLAY HARDCOPY TASKID«, t00=0x0008, t01=0x0108}
0x0dac…0dde Head {h00=0x002e, h01=0x0050, text=» ENTRY ERASUA ERASE UNPROTECTED TO ADDRESS«, t00=0x0008, t01=0x0134}
0x0dde…0e06 Head {h00=0x0024, h01=0x0050, text=» ENTRY ERASE ERASE ENTIRE SCREEN«, t00=0x0008, t01=0x0166}
0x0e06…0e2e Head {h00=0x0024, h01=0x0050, text=» ENTRY SOUND SOUND ALARM ON VDU «, t00=0x0008, t01=0x018e}
0x0e2e…0e5a Head {h00=0x0028, h01=0x0050, text=» ENTRY ERASUP ERASE ALL UNPROTECTED «, t00=0x0009, t01=0x0026}
0x0e5a…0e82 Head {h00=0x0024, h01=0x0050, text=» ENTRY WRAP CHECK IF WRAP AROUND«, t00=0x0009, t01=0x0052}
0x0e82…0ea8 Head {h00=0x0022, h01=0x0050, text=» ENTRY NLROUT NEW LINE ROUTINE«, t00=0x0009, t01=0x007a}
0x0ea8…0ece Head {h00=0x0022, h01=0x0050, text=» ENTRY LINWRP CHECK LINE WRAP «, t00=0x0009, t01=0x00a0}
0x0ece…0ef2 Head {h00=0x0020, h01=0x0050, text=» ENTRY LINE UPDATE LINE FLAG«, t00=0x0009, t01=0x00c6}
0x0ef2…0f0e Head {h00=0x0018, h01=0x0050, text=» ENTRY LINATT UPADTE«, t00=0x0009, t01=0x00ea}
0x0f0e…0f36 Head {h00=0x0024, h01=0x0050, text=» ENTRY DISSTA DISPLAY STATISTICS«, t00=0x0009, t01=0x0106}
0x0f36…0f3e Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x012e}
0x0f3e…0f4c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0136}
0x0f4c…0f98 Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x0009, t01=0x0144}
0x0f98…0fe4 Head {h00=0x0048, h01=0x0050, text=»* *«, t00=0x0009, t01=0x0190}
0x0fe4…1030 Head {h00=0x0048, h01=0x0050, text=»* EXTERNAL REFERENCES *«, t00=0x000a, t01=0x004c}
0x1030…107c Head {h00=0x0048, h01=0x0050, text=»* *«, t00=0x000a, t01=0x0098}
0x107c…10c8 Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x000a, t01=0x00e4}
0x10c8…10d0 Head {h00=0x0004, h01=0x0050, t00=0x000a, t01=0x0130}
0x10d0…1104 Head {h00=0x0030, h01=0x0050, text=» EXTRN TAB TAB UNPROCTECTED FOREWARD (KEYB) «, t00=0x000a, t01=0x0138}
0x1104…1142 Head {h00=0x003a, h01=0x0050, text=» EXTRN CRDOWN MOVE CURSOR UNPROTECTED NEXT LINE (KEYB)«, t00=0x000a, t01=0x016c}
0x1142…117a Head {h00=0x0034, h01=0x0050, text=» EXTRN RDHOME UNPROTECTED FIRST ON SCREEN (KEYB)«, t00=0x000b, t01=0x001a}
0x117a…11a4 Head {h00=0x0026, h01=0x0050, text=» EXTRN SAVE1 SAVE REGISTERS (PAD) «, t00=0x000b, t01=0x0052}
0x11a4…11d0 Head {h00=0x0028, h01=0x0050, text=» EXTRN REST1 RESTORE REGISTERS (PAD)«, t00=0x000b, t01=0x007c}
0x11d0…11de Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x00a8}
0x11de…11e6 Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x00b6}
0x11e6…11ee Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x00be}
0x11ee…123c Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x000b, t01=0x00c6}
0x123c…128a Head {h00=0x004a, h01=0x0050, text=»* * «, t00=0x000b, t01=0x0114}
0x128a…12d8 Head {h00=0x004a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY PARAMETERS * «, t00=0x000b, t01=0x0162}
0x12d8…1326 Head {h00=0x004a, h01=0x0050, text=»* * «, t00=0x000c, t01=0x0020}
0x1326…1374 Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x000c, t01=0x006e}
0x1374…137c Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x00bc}
0x137c…13a4 Head {h00=0x0024, h01=0x0050, text=»X:I EQU 1 INSERT/DELETE HANDLING«, t00=0x000c, t01=0x00c4}
0x13a4…13b8 Head {h00=0x0010, h01=0x0050, text=»IN:DL EQU 1 «, t00=0x000c, t01=0x00ec}
0x13b8…13de Head {h00=0x0022, h01=0x0050, text=»X:O EQU 0 TEST INCLUDED IF:=1 «, t00=0x000c, t01=0x0100}
0x13de…13f0 Head {h00=0x000e, h01=0x0050, text=»TEST EQU 0«, t00=0x000c, t01=0x0126}
0x13f0…13fe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0138}
0x13fe…1446 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000c, t01=0x0146}
0x1446…148e Head {h00=0x0044, h01=0x0050, text=»* * «, t00=0x000c, t01=0x018e}
0x148e…14b8 Head {h00=0x0026, h01=0x0050, text=»* DECLARATIONS OF DATA AND EQUATES«, t00=0x000d, t01=0x0046}
0x14b8…1500 Head {h00=0x0044, h01=0x0050, text=»* * «, t00=0x000d, t01=0x0070}
0x1500…1548 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000d, t01=0x00b8}
0x1548…1550 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0100}
0x1550…155a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0108}
0x155a…1582 Head {h00=0x0024, h01=0x0050, text=»* EQUATES FOR ECB HANDLING«, t00=0x000d, t01=0x0112}
0x1582…158c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x013a}
0x158c…15ae Head {h00=0x001e, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS«, t00=0x000d, t01=0x0144}
0x15ae…15d2 Head {h00=0x0020, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH«, t00=0x000d, t01=0x0166}
0x15d2…15f6 Head {h00=0x0020, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH«, t00=0x000d, t01=0x018a}
0x15f6…1616 Head {h00=0x001c, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE «, t00=0x000e, t01=0x001e}
0x1616…1638 Head {h00=0x001e, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD «, t00=0x000e, t01=0x003e}
0x1638…1642 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0060}
0x1642…165e Head {h00=0x0018, h01=0x0050, text=»* SPECIAL CHARACTERS«, t00=0x000e, t01=0x006a}
0x165e…1668 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0086}
0x1668…1686 Head {h00=0x001a, h01=0x0050, text=»NULL EQU 0 NULL CHAR. «, t00=0x000e, t01=0x0090}
0x1686…16ac Head {h00=0x0022, h01=0x0050, text=»NEWLIN EQU /0A NEW LINE CHAR. «, t00=0x000e, t01=0x00ae}
0x16ac…16d2 Head {h00=0x0022, h01=0x0050, text=»FORMFD EQU /0C FORM FEED CHAR.«, t00=0x000e, t01=0x00d4}
0x16d2…16fa Head {h00=0x0024, h01=0x0050, text=»ENDMES EQU /19 END MESSAGE CHAR.«, t00=0x000e, t01=0x00fa}
0x16fa…1720 Head {h00=0x0022, h01=0x0050, text=»DUPCH EQU /1C DUPLICATE CHAR. «, t00=0x000e, t01=0x0122}
0x1720…1746 Head {h00=0x0022, h01=0x0050, text=»FMCH EQU /1E FIELD MARK CHAR. «, t00=0x000e, t01=0x0148}
0x1746…1750 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x016e}
0x1750…1772 Head {h00=0x001e, h01=0x0050, text=»* TASK IDENTIFICATION CODE«, t00=0x000e, t01=0x0178}
0x1772…177c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x000a}
0x177c…17a0 Head {h00=0x0020, h01=0x0050, text=»VDUCOD EQU 'VV' VDU KB TASK «, t00=0x000f, t01=0x0014}
0x17a0…17aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0038}
0x17aa…17c4 Head {h00=0x0016, h01=0x0050, text=»* INTERNAL STATUS «, t00=0x000f, t01=0x0042}
0x17c4…17ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x005c}
0x17ce…17f4 Head {h00=0x0022, h01=0x0050, text=»LINUPD EQU /0001 LINE UPDATED «, t00=0x000f, t01=0x0066}
0x17f4…1820 Head {h00=0x0028, h01=0x0050, text=»ATTREC EQU /0002 ATTRIBUTE RECEIVED «, t00=0x000f, t01=0x008c}
0x1820…182a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b8}
0x182a…1844 Head {h00=0x0016, h01=0x0050, text=»* VDU SCREEN SIZE «, t00=0x000f, t01=0x00c2}
0x1844…184e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00dc}
0x184e…186e Head {h00=0x001c, h01=0x0050, text=»LLINE EQU 80 LINE LENGTH«, t00=0x000f, t01=0x00e6}
0x186e…1890 Head {h00=0x001e, h01=0x0050, text=»LBVDU EQU 1920 TOTAL SIZE «, t00=0x000f, t01=0x0106}
0x1890…18a4 Head {h00=0x0010, h01=0x0050, text=» IFT TEST=1 «, t00=0x000f, t01=0x0128}
0x18a4…18ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x013c}
0x18ae…18c4 Head {h00=0x0012, h01=0x0050, text=»* STAT. LAYOUT«, t00=0x000f, t01=0x0146}
0x18c4…18ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x015c}
0x18ce…18fe Head {h00=0x002c, h01=0x0050, text=»NUMLIN EQU 13 NUMBER OF LINES YO DISPLAY«, t00=0x000f, t01=0x0166}
0x18fe…192c Head {h00=0x002a, h01=0x0050, text=»STALIN EQU 5 STARTING LINE OF DISPLAY «, t00=0x0010, t01=0x0008}
0x192c…1956 Head {h00=0x0026, h01=0x0050, text=»STAPOS EQU 5 STARTTING POS ON LINE«, t00=0x0010, t01=0x0036}
0x1956…1982 Head {h00=0x0028, h01=0x0050, text=»TXTSIZ EQU 15 SIZE OF PERMANENT TEXT«, t00=0x0010, t01=0x0060}
0x1982…19be Head {h00=0x0038, h01=0x0050, text=»INDEX DATA /0102,/0405,/0608,/090A,/0C0E,/1D1E,/1F00«, t00=0x0010, t01=0x008c}
0x19be…19ca Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x00c8}
0x19ca…19d8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x00d4}
0x19d8…19e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00e2}
0x19e2…1a02 Head {h00=0x001c, h01=0x0050, text=»* RELATIVE ADDRESSES IN «, t00=0x0010, t01=0x00ec}
0x1a02…1a1e Head {h00=0x0018, h01=0x0050, text=»* TERMINAL WORKBLOCK«, t00=0x0010, t01=0x010c}
0x1a1e…1a28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0128}
0x1a28…1a50 Head {h00=0x0024, h01=0x0050, text=»TCT01 EQU 0 TASK IDENTIFICATION «, t00=0x0010, t01=0x0132}
0x1a50…1a76 Head {h00=0x0022, h01=0x0050, text=»BVDU EQU TCT01+2 SCREEN BUFFER«, t00=0x0010, t01=0x015a}
0x1a76…1aa6 Head {h00=0x002c, h01=0x0050, text=»LINFLG EQU BVDU+1920 INTERNAL LINE FLAGS«, t00=0x0010, t01=0x0180}
0x1aa6…1ad0 Head {h00=0x0026, h01=0x0050, text=»PCURS EQU LINFLG+24 CURSOR ADDRESS«, t00=0x0011, t01=0x0020}
0x1ad0…1afe Head {h00=0x002a, h01=0x0050, text=»ATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR«, t00=0x0011, t01=0x004a}
0x1afe…1b1a Head {h00=0x0018, h01=0x0050, text=»CURATT EQU ATTRIB+2 «, t00=0x0011, t01=0x0078}
0x1b1a…1b44 Head {h00=0x0026, h01=0x0050, text=»WCC EQU CURATT+2 WCC/CCC CHARACTER«, t00=0x0011, t01=0x0094}
0x1b44…1b70 Head {h00=0x0028, h01=0x0050, text=»INTATT EQU WCC+8 INTENSITY ATTRIBUTE«, t00=0x0011, t01=0x00be}
0x1b70…1b98 Head {h00=0x0024, h01=0x0050, text=»REGI EQU INTATT+32 WORK REGISTER«, t00=0x0011, t01=0x00ea}
0x1b98…1bb2 Head {h00=0x0016, h01=0x0050, text=»ECBVDU EQU REGI+40«, t00=0x0011, t01=0x0112}
0x1bb2…1bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x012c}
0x1bbc…1bdc Head {h00=0x001c, h01=0x0050, text=»* RELATIVE ADDRESSES IN «, t00=0x0011, t01=0x0136}
0x1bdc…1bf6 Head {h00=0x0016, h01=0x0050, text=»* COMMON WORKBLOCK«, t00=0x0011, t01=0x0156}
0x1bf6…1c00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0170}
0x1c00…1c26 Head {h00=0x0022, h01=0x0050, text=»IDTEXT EQU 2 IDENT TEXT LAYOUT«, t00=0x0011, t01=0x017a}
0x1c26…1c3a Head {h00=0x0010, h01=0x0050, text=» IFT TEST=1 «, t00=0x0012, t01=0x0010}
0x1c3a…1c6c Head {h00=0x002e, h01=0x0050, text=»STATXT EQU IDTEXT+22 STATISTIC TEXT LAYOUT«, t00=0x0012, t01=0x0024}
0x1c6c…1c78 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0056}
0x1c78…1c86 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0062}
0x1c86…1cc8 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0012, t01=0x0070}
0x1cc8…1d0a Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0012, t01=0x00b2}
0x1d0a…1d4c Head {h00=0x003e, h01=0x0050, text=»* DISMOD DISPLAY MODIFIED FIELDS * «, t00=0x0012, t01=0x00f4}
0x1d4c…1d8e Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0012, t01=0x0136}
0x1d8e…1dd0 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0012, t01=0x0178}
0x1dd0…1de4 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0013, t01=0x002a}
0x1de4…1dee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x003e}
0x1dee…1e02 Head {h00=0x0010, h01=0x0050, text=»* A2= CHAR. «, t00=0x0013, t01=0x0048}
0x1e02…1e26 Head {h00=0x0020, h01=0x0050, text=»* A3= ADDRESS IN VDU-BUFFER «, t00=0x0013, t01=0x005c}
0x1e26…1e44 Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x0013, t01=0x0080}
0x1e44…1e66 Head {h00=0x001e, h01=0x0050, text=»* A5= REL. ATTRIBUTE POS. «, t00=0x0013, t01=0x009e}
0x1e66…1e82 Head {h00=0x0018, h01=0x0050, text=»* A6= ADDRESS IN ECB«, t00=0x0013, t01=0x00c0}
0x1e82…1e9c Head {h00=0x0016, h01=0x0050, text=»* A7= INDEX IN ECB«, t00=0x0013, t01=0x00dc}
0x1e9c…1eb2 Head {h00=0x0012, h01=0x0050, text=»* A8= VDU ECB «, t00=0x0013, t01=0x00f6}
0x1eb2…1ed2 Head {h00=0x001c, h01=0x0050, text=»* A9= INTENSITY COUNTER «, t00=0x0013, t01=0x010c}
0x1ed2…1eea Head {h00=0x0014, h01=0x0050, text=»* A10= INDICATOR«, t00=0x0013, t01=0x012c}
0x1eea…1f0a Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0013, t01=0x0144}
0x1f0a…1f22 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0013, t01=0x0164}
0x1f22…1f2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x017c}
0x1f2c…1f6a Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0013, t01=0x0186}
0x1f6a…1f7e Head {h00=0x0010, h01=0x0050, text=»DISMOD EQU *«, t00=0x0014, t01=0x0034}
0x1f7e…1f98 Head {h00=0x0016, h01=0x0050, text=» LD A8,ECBVDU,A11 «, t00=0x0014, t01=0x0048}
0x1f98…1fbc Head {h00=0x0020, h01=0x0050, text=» LDKL A1,/101 LINE 1 POS. 1 «, t00=0x0014, t01=0x0062}
0x1fbc…1fd4 Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW,A8 «, t00=0x0014, t01=0x0086}
0x1fd4…1ffe Head {h00=0x0026, h01=0x0050, text=» SUR A9,A9 RESET INTENSITY COUNTER«, t00=0x0014, t01=0x009e}
0x1ffe…2012 Head {h00=0x0010, h01=0x0050, text=» SUR A10,A10«, t00=0x0014, t01=0x00c8}
0x2012…2028 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,BVDU «, t00=0x0014, t01=0x00dc}
0x2028…203c Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x0014, t01=0x00f2}
0x203c…2052 Head {h00=0x0012, h01=0x0050, text=» CF A14,SCRINF«, t00=0x0014, t01=0x0106}
0x2052…2078 Head {h00=0x0022, h01=0x0050, text=» LDK A4,0 FIRST SCREEN POS. DK«, t00=0x0014, t01=0x011c}
0x2078…20a4 Head {h00=0x0028, h01=0x0050, text=» CF A14,SPACES SPACES IN ECB BUFFER «, t00=0x0014, t01=0x0142}
0x20a4…20bc Head {h00=0x0014, h01=0x0050, text=» ST A5,REGI,A11 «, t00=0x0014, t01=0x016e}
0x20bc…20d4 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,LBVDU+1«, t00=0x0014, t01=0x0186}
0x20d4…20e8 Head {h00=0x0010, h01=0x0050, text=» LDR A5,A11 «, t00=0x0015, t01=0x000e}
0x20e8…2100 Head {h00=0x0014, h01=0x0050, text=» CW A1,REGI,A11 «, t00=0x0015, t01=0x0022}
0x2100…211a Head {h00=0x0016, h01=0x0050, text=» RF(NE) DIS100 NO «, t00=0x0015, t01=0x003a}
0x211a…213a Head {h00=0x001c, h01=0x0050, text=» LDK A2,0 LOW INTENSITY «, t00=0x0015, t01=0x0054}
0x213a…2154 Head {h00=0x0016, h01=0x0050, text=» ST A2,INTATT,A11 «, t00=0x0015, t01=0x0074}
0x2154…2168 Head {h00=0x0010, h01=0x0050, text=»DIS100 EQU *«, t00=0x0015, t01=0x008e}
0x2168…217c Head {h00=0x0010, h01=0x0050, text=» LDR A10,A10«, t00=0x0015, t01=0x00a2}
0x217c…2192 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DIS900«, t00=0x0015, t01=0x00b6}
0x2192…21be Head {h00=0x0028, h01=0x0050, text=» CF A14,INTCHK CHECK INTENSITY CHAR.«, t00=0x0015, t01=0x00cc}
0x21be…21d2 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A10 «, t00=0x0015, t01=0x00f8}
0x21d2…21e6 Head {h00=0x0010, h01=0x0050, text=» SUR A10,A10«, t00=0x0015, t01=0x010c}
0x21e6…21f8 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0015, t01=0x0120}
0x21f8…2218 Head {h00=0x001c, h01=0x0050, text=» RF(N) DIS800 NONDISPLAY«, t00=0x0015, t01=0x0132}
0x2218…223c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DIS400 DISPLAY LINE «, t00=0x0015, t01=0x0152}
0x223c…2264 Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBCW,A8 NO MODIFICATION «, t00=0x0015, t01=0x0176}
0x2264…2286 Head {h00=0x001e, h01=0x0050, text=» CWK A2,/1901 ALLDISPLAYED«, t00=0x0016, t01=0x000e}
0x2286…22a0 Head {h00=0x0016, h01=0x0050, text=» RB(NE) DIS100 NO «, t00=0x0016, t01=0x0030}
0x22a0…22b2 Head {h00=0x000e, h01=0x0050, text=» RF DIS900«, t00=0x0016, t01=0x004a}
0x22b2…22c6 Head {h00=0x0010, h01=0x0050, text=»DIS400 EQU *«, t00=0x0016, t01=0x005c}
0x22c6…22ec Head {h00=0x0022, h01=0x0050, text=» CWK A7,LLINE LINE COMPLETED? «, t00=0x0016, t01=0x0070}
0x22ec…2304 Head {h00=0x0014, h01=0x0050, text=» RF(L) DIS500 NO«, t00=0x0016, t01=0x0096}
0x2304…2328 Head {h00=0x0020, h01=0x0050, text=» CF A14,DISLIN DISPLAY LINE «, t00=0x0016, t01=0x00ae}
0x2328…233a Head {h00=0x000e, h01=0x0050, text=» RB DIS100«, t00=0x0016, t01=0x00d2}
0x233a…234e Head {h00=0x0010, h01=0x0050, text=»DIS500 EQU *«, t00=0x0016, t01=0x00e4}
0x234e…2378 Head {h00=0x0026, h01=0x0050, text=» LCR A2,A3 GET CHAR. IN VDU-BUFFER«, t00=0x0016, t01=0x00f8}
0x2378…23a2 Head {h00=0x0026, h01=0x0050, text=» CF A14,SETIND SET SPACE INDICATOR«, t00=0x0016, t01=0x0122}
0x23a2…23c2 Head {h00=0x001c, h01=0x0050, text=» CCK A2,/8000 ATTRIBUTE?«, t00=0x0016, t01=0x014c}
0x23c2…23dc Head {h00=0x0016, h01=0x0050, text=» RF(NL) DIS700 YES«, t00=0x0016, t01=0x016c}
0x23dc…2402 Head {h00=0x0022, h01=0x0050, text=» CF A14,UPDCNT UPDATE COUNTERS«, t00=0x0016, t01=0x0186}
0x2402…2422 Head {h00=0x001c, h01=0x0050, text=» CWK A2,NULL NULL CHAR.?«, t00=0x0017, t01=0x001c}
0x2422…243c Head {h00=0x0016, h01=0x0050, text=» RB(E) DIS400 YES «, t00=0x0017, t01=0x003c}
0x243c…2462 Head {h00=0x0022, h01=0x0050, text=» CWK A2,NEWLIN NEW LINE CHAR.?«, t00=0x0017, t01=0x0056}
0x2462…247c Head {h00=0x0016, h01=0x0050, text=» RB(E) DIS400 YES «, t00=0x0017, t01=0x007c}
0x247c…24a6 Head {h00=0x0026, h01=0x0050, text=» CWK A2,ENDMES END MESSAGE CHAR.? «, t00=0x0017, t01=0x0096}
0x24a6…24c0 Head {h00=0x0016, h01=0x0050, text=» RB(E) DIS400 YES «, t00=0x0017, t01=0x00c0}
0x24c0…24e8 Head {h00=0x0024, h01=0x0050, text=» CWK A2,FORMFD FORM FEED CHAR.? «, t00=0x0017, t01=0x00da}
0x24e8…2502 Head {h00=0x0016, h01=0x0050, text=» RB(E) DIS400 YES «, t00=0x0017, t01=0x0102}
0x2502…2532 Head {h00=0x002c, h01=0x0050, text=» CF A14,RFMDUP REPLACE DUP AND FM CHAR. «, t00=0x0017, t01=0x011c}
0x2532…2560 Head {h00=0x002a, h01=0x0050, text=» SC A2,-1,A6 STORE CHAR. IN ECB BUFFER«, t00=0x0017, t01=0x014c}
0x2560…2572 Head {h00=0x000e, h01=0x0050, text=» RB DIS400«, t00=0x0017, t01=0x017a}
0x2572…2586 Head {h00=0x0010, h01=0x0050, text=»DIS700 EQU *«, t00=0x0017, t01=0x018c}
0x2586…25a0 Head {h00=0x0016, h01=0x0050, text=» ST A2,INTATT,A11 «, t00=0x0018, t01=0x0010}
0x25a0…25b2 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0018, t01=0x002a}
0x25b2…25d2 Head {h00=0x001c, h01=0x0050, text=» ANK A1,8 LOW INTENSITY?«, t00=0x0018, t01=0x003c}
0x25d2…25ec Head {h00=0x0016, h01=0x0050, text=» RF(Z) DIS725 YES «, t00=0x0018, t01=0x005c}
0x25ec…260e Head {h00=0x001e, h01=0x0050, text=» ANK A2,4 HIGH INTENSITY? «, t00=0x0018, t01=0x0076}
0x260e…2628 Head {h00=0x0016, h01=0x0050, text=» RF(Z) DIS715 YES «, t00=0x0018, t01=0x0098}
0x2628…264e Head {h00=0x0022, h01=0x0050, text=» CF A14,UPDCNT UPDATE COUNTERS«, t00=0x0018, t01=0x00b2}
0x264e…266c Head {h00=0x001a, h01=0x0050, text=» RF DIS800 NONDISPLAY «, t00=0x0018, t01=0x00d8}
0x266c…2680 Head {h00=0x0010, h01=0x0050, text=»DIS715 EQU *«, t00=0x0018, t01=0x00f6}
0x2680…2698 Head {h00=0x0014, h01=0x0050, text=» LDK A2,/1F HIGH«, t00=0x0018, t01=0x010a}
0x2698…26aa Head {h00=0x000e, h01=0x0050, text=» RF DIS750«, t00=0x0018, t01=0x0122}
0x26aa…26be Head {h00=0x0010, h01=0x0050, text=»DIS725 EQU *«, t00=0x0018, t01=0x0134}
0x26be…26d6 Head {h00=0x0014, h01=0x0050, text=» LDK A2,/1E LOW «, t00=0x0018, t01=0x0148}
0x26d6…26ea Head {h00=0x0010, h01=0x0050, text=»DIS750 EQU *«, t00=0x0018, t01=0x0160}
0x26ea…2716 Head {h00=0x0028, h01=0x0050, text=» SCR A2,A6 SAVE CHAR. IN ECB BUFFER «, t00=0x0018, t01=0x0174}
0x2716…2728 Head {h00=0x000e, h01=0x0050, text=» ADKL A9,1«, t00=0x0019, t01=0x0010}
0x2728…274e Head {h00=0x0022, h01=0x0050, text=» CF A14,UPDCNT UPDATE COUNTERS«, t00=0x0019, t01=0x0022}
0x274e…2760 Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0019, t01=0x0048}
0x2760…2772 Head {h00=0x000e, h01=0x0050, text=» RB DIS400«, t00=0x0019, t01=0x005a}
0x2772…2786 Head {h00=0x0010, h01=0x0050, text=»DIS800 EQU *«, t00=0x0019, t01=0x006c}
0x2786…27ac Head {h00=0x0022, h01=0x0050, text=» CWK A7,LLINE LINE COMPLETED? «, t00=0x0019, t01=0x0080}
0x27ac…27c4 Head {h00=0x0014, h01=0x0050, text=» RF(L) DIS850 NO«, t00=0x0019, t01=0x00a6}
0x27c4…27e8 Head {h00=0x0020, h01=0x0050, text=» CF A14,DISLIN DISPLAY LINE «, t00=0x0019, t01=0x00be}
0x27e8…27fa Head {h00=0x000e, h01=0x0050, text=» RB DIS100«, t00=0x0019, t01=0x00e2}
0x27fa…280e Head {h00=0x0010, h01=0x0050, text=»DIS850 EQU *«, t00=0x0019, t01=0x00f4}
0x280e…2838 Head {h00=0x0026, h01=0x0050, text=» LCR A2,A3 GET CHAR. IN VDU-BUFFER«, t00=0x0019, t01=0x0108}
0x2838…2858 Head {h00=0x001c, h01=0x0050, text=» CCK A2,/8000 ATTRIBUTE?«, t00=0x0019, t01=0x0132}
0x2858…2872 Head {h00=0x0016, h01=0x0050, text=» RB(NL) DIS700 YES«, t00=0x0019, t01=0x0152}
0x2872…2898 Head {h00=0x0022, h01=0x0050, text=» CF A14,UPDCNT UPDATE COUNTERS«, t00=0x0019, t01=0x016c}
0x2898…28aa (26, 0, 400) Head {h00=0x000e, h01=0x0050, text=» RB DIS800«, t00=0x001a, t01=0x0004}
0x28aa…28be Head {h00=0x0010, h01=0x0050, text=»DIS900 EQU *«, t00=0x001a, t01=0x0016}
0x28be…28ec Head {h00=0x002a, h01=0x0050, text=» CF A14,SCRINF GET SCREEN INFORMATION «, t00=0x001a, t01=0x002a}
0x28ec…290a Head {h00=0x001a, h01=0x0050, text=» LDK A1,2 REQ. LENGTH «, t00=0x001a, t01=0x0058}
0x290a…292c Head {h00=0x001e, h01=0x0050, text=» CF A14,DISCHA SET CURSOR «, t00=0x001a, t01=0x0076}
0x292c…293c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001a, t01=0x0098}
0x293c…294a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x00a8}
0x294a…298e Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x001a, t01=0x00b6}
0x298e…29d2 Head {h00=0x0040, h01=0x0050, text=»* * «, t00=0x001a, t01=0x00fa}
0x29d2…2a16 Head {h00=0x0040, h01=0x0050, text=»* DISLIN DISPLAY LINE ON VDU * «, t00=0x001a, t01=0x013e}
0x2a16…2a5a Head {h00=0x0040, h01=0x0050, text=»* * «, t00=0x001a, t01=0x0182}
0x2a5a…2a9e Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x001b, t01=0x0036}
0x2a9e…2ab2 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x001b, t01=0x007a}
0x2ab2…2abc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x008e}
0x2abc…2ad2 Head {h00=0x0012, h01=0x0050, text=»* A3= RESERVED«, t00=0x001b, t01=0x0098}
0x2ad2…2ae8 Head {h00=0x0012, h01=0x0050, text=»* A4= RESERVED«, t00=0x001b, t01=0x00ae}
0x2ae8…2afe Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x001b, t01=0x00c4}
0x2afe…2b14 Head {h00=0x0012, h01=0x0050, text=»* A6= RESERVED«, t00=0x001b, t01=0x00da}
0x2b14…2b2a Head {h00=0x0012, h01=0x0050, text=»* A8= ECB VDU «, t00=0x001b, t01=0x00f0}
0x2b2a…2b4a Head {h00=0x001c, h01=0x0050, text=»* A9= INTENSITY COUNTER «, t00=0x001b, t01=0x0106}
0x2b4a…2b62 Head {h00=0x0014, h01=0x0050, text=»* A10= INDICATOR«, t00=0x001b, t01=0x0126}
0x2b62…2b7a Head {h00=0x0014, h01=0x0050, text=»* A11= RESERVED «, t00=0x001b, t01=0x013e}
0x2b7a…2b92 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x001b, t01=0x0156}
0x2b92…2b9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x016e}
0x2b9c…2be0 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x001b, t01=0x0178}
0x2be0…2bf4 Head {h00=0x0010, h01=0x0050, text=»DISLIN EQU *«, t00=0x001c, t01=0x002c}
0x2bf4…2c12 Head {h00=0x001a, h01=0x0050, text=» LDK A7,2 REQ. LENGTH «, t00=0x001c, t01=0x0040}
0x2c12…2c26 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A10 «, t00=0x001c, t01=0x005e}
0x2c26…2c46 Head {h00=0x001c, h01=0x0050, text=» ANKL A1,1 ONLY SPACES? «, t00=0x001c, t01=0x0072}
0x2c46…2c60 Head {h00=0x0016, h01=0x0050, text=» RF(Z) DISL10 YES «, t00=0x001c, t01=0x0092}
0x2c60…2c84 Head {h00=0x0020, h01=0x0050, text=» LDKL A7,LLINE+2 REQ. LENGTH«, t00=0x001c, t01=0x00ac}
0x2c84…2cb4 Head {h00=0x002c, h01=0x0050, text=» ADR A7,A9 ADD NUMBER OF INTENSITY CHAR.«, t00=0x001c, t01=0x00d0}
0x2cb4…2cc8 Head {h00=0x0010, h01=0x0050, text=»DISL10 EQU *«, t00=0x001c, t01=0x0100}
0x2cc8…2ce0 Head {h00=0x0014, h01=0x0050, text=» ST A7,ECBRL,A8 «, t00=0x001c, t01=0x0114}
0x2ce0…2d0a Head {h00=0x0026, h01=0x0050, text=» LDKL A7,/8B SET CURSOR AND WRITE «, t00=0x001c, t01=0x012c}
0x2d0a…2d16 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x001c, t01=0x0156}
0x2d16…2d26 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x001c, t01=0x0162}
0x2d26…2d4e Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBCW,A8 GET CURSOR POS. «, t00=0x001c, t01=0x0172}
0x2d4e…2d62 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x001d, t01=0x000a}
0x2d62…2d92 Head {h00=0x002c, h01=0x0050, text=» SUK A1,81 LAST POS. ON LINE DISPLAYED? «, t00=0x001d, t01=0x001e}
0x2d92…2dac Head {h00=0x0016, h01=0x0050, text=» RF(Z) DISL90 YES «, t00=0x001d, t01=0x004e}
0x2dac…2dc4 Head {h00=0x0014, h01=0x0050, text=» LD A6,ECBBA,A8 «, t00=0x001d, t01=0x0068}
0x2dc4…2dd8 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/2B «, t00=0x001d, t01=0x0080}
0x2dd8…2dec Head {h00=0x0010, h01=0x0050, text=» SC A2,1,A6 «, t00=0x001d, t01=0x0094}
0x2dec…2e02 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/1420«, t00=0x001d, t01=0x00a8}
0x2e02…2e16 Head {h00=0x0010, h01=0x0050, text=» SC A2,3,A6 «, t00=0x001d, t01=0x00be}
0x2e16…2e28 Head {h00=0x000e, h01=0x0050, text=» SRL A2,8 «, t00=0x001d, t01=0x00d2}
0x2e28…2e3c Head {h00=0x0010, h01=0x0050, text=» SC A2,2,A6 «, t00=0x001d, t01=0x00e4}
0x2e3c…2e4e Head {h00=0x000e, h01=0x0050, text=» LDK A2,84«, t00=0x001d, t01=0x00f8}
0x2e4e…2e66 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBRL,A8 «, t00=0x001d, t01=0x010a}
0x2e66…2e80 Head {h00=0x0016, h01=0x0050, text=» LDK A7,/86 WRITE «, t00=0x001d, t01=0x0122}
0x2e80…2e8c Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x001d, t01=0x013c}
0x2e8c…2e9c Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x001d, t01=0x0148}
0x2e9c…2eb0 Head {h00=0x0010, h01=0x0050, text=»DISL90 EQU *«, t00=0x001d, t01=0x0158}
0x2eb0…2ec2 Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x001d, t01=0x016c}
0x2ec2…2ee6 Head {h00=0x0020, h01=0x0050, text=» LDK A2,1 FIRST POS. ON LINE«, t00=0x001d, t01=0x017e}
0x2ee6…2f00 Head {h00=0x0016, h01=0x0050, text=» SC A2,ECBCW+1,A8 «, t00=0x001e, t01=0x0012}
0x2f00…2f28 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,/100 MOVE ONE LINE DOWN«, t00=0x001e, t01=0x002c}
0x2f28…2f40 Head {h00=0x0014, h01=0x0050, text=» ADS A2,ECBCW,A8«, t00=0x001e, t01=0x0054}
0x2f40…2f54 Head {h00=0x0010, h01=0x0050, text=» SUR A10,A10«, t00=0x001e, t01=0x006c}
0x2f54…2f6c Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBCW,A8 «, t00=0x001e, t01=0x0080}
0x2f6c…2f90 Head {h00=0x0020, h01=0x0050, text=» CWK A2,/1901 END OF SCREEN «, t00=0x001e, t01=0x0098}
0x2f90…2faa Head {h00=0x0016, h01=0x0050, text=» RF(NE) DISL95 NO «, t00=0x001e, t01=0x00bc}
0x2faa…2fbe Head {h00=0x0010, h01=0x0050, text=» LDKL A10,1 «, t00=0x001e, t01=0x00d6}
0x2fbe…2fd2 Head {h00=0x0010, h01=0x0050, text=»DISL95 EQU *«, t00=0x001e, t01=0x00ea}
0x2fd2…3002 Head {h00=0x002c, h01=0x0050, text=» CF A14,SPACES MOVE SPACES TO ECB BUFFER«, t00=0x001e, t01=0x00fe}
0x3002…3012 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001e, t01=0x012e}
0x3012…3020 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x013e}
0x3020…3064 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x001e, t01=0x014c}
0x3064…30a8 Head {h00=0x0040, h01=0x0050, text=»* *«, t00=0x001e, t01=0x0190}
0x30a8…30ec Head {h00=0x0040, h01=0x0050, text=»* SPACES MOVE SPACES TO ECB BUFFER *«, t00=0x001f, t01=0x0044}
0x30ec…3130 Head {h00=0x0040, h01=0x0050, text=»* *«, t00=0x001f, t01=0x0088}
0x3130…3174 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x001f, t01=0x00cc}
0x3174…3188 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x001f, t01=0x0110}
0x3188…3192 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0124}
0x3192…31a6 Head {h00=0x0010, h01=0x0050, text=»* A2= CHAR. «, t00=0x001f, t01=0x012e}
0x31a6…31bc Head {h00=0x0012, h01=0x0050, text=»* A3= RESERVED«, t00=0x001f, t01=0x0142}
0x31bc…31d2 Head {h00=0x0012, h01=0x0050, text=»* A4= RESERVED«, t00=0x001f, t01=0x0158}
0x31d2…31e8 Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x001f, t01=0x016e}
0x31e8…320c Head {h00=0x0020, h01=0x0050, text=»* A6= ADDRESS IN ECB BUFFER «, t00=0x001f, t01=0x0184}
0x320c…3226 Head {h00=0x0016, h01=0x0050, text=»* A7= INDEX IN ECB«, t00=0x0020, t01=0x0018}
0x3226…323c Head {h00=0x0012, h01=0x0050, text=»* A8= VDU ECB «, t00=0x0020, t01=0x0032}
0x323c…325c Head {h00=0x001c, h01=0x0050, text=»* A9= INTENSITY COUNTER «, t00=0x0020, t01=0x0048}
0x325c…3274 Head {h00=0x0014, h01=0x0050, text=»* A10= INDICATOR«, t00=0x0020, t01=0x0068}
0x3274…328c Head {h00=0x0014, h01=0x0050, text=»* A11= RESERVED «, t00=0x0020, t01=0x0080}
0x328c…32a4 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0020, t01=0x0098}
0x32a4…32ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00b0}
0x32ae…32f2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0020, t01=0x00ba}
0x32f2…3306 Head {h00=0x0010, h01=0x0050, text=»SPACES EQU *«, t00=0x0020, t01=0x00fe}
0x3306…3330 Head {h00=0x0026, h01=0x0050, text=» LD A6,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0020, t01=0x0112}
0x3330…3342 Head {h00=0x000e, h01=0x0050, text=» ADK A6,2 «, t00=0x0020, t01=0x013c}
0x3342…3364 Head {h00=0x001e, h01=0x0050, text=» LDK A7,LLINE LINE LENGTH «, t00=0x0020, t01=0x014e}
0x3364…3384 Head {h00=0x001c, h01=0x0050, text=» ADR A7,A7 BUFFER LENGTH«, t00=0x0020, t01=0x0170}
0x3384…33a0 Head {h00=0x0018, h01=0x0050, text=» LDKL A2,' ' SPACES«, t00=0x0020, t01=0x0190}
0x33a0…33b4 Head {h00=0x0010, h01=0x0050, text=»SPAC10 EQU *«, t00=0x0021, t01=0x001c}
0x33b4…33c6 Head {h00=0x000e, h01=0x0050, text=» SCR A2,A6«, t00=0x0021, t01=0x0030}
0x33c6…33da Head {h00=0x0010, h01=0x0050, text=» SC A2,1,A6 «, t00=0x0021, t01=0x0042}
0x33da…33ec Head {h00=0x000e, h01=0x0050, text=» ADK A6,2 «, t00=0x0021, t01=0x0056}
0x33ec…3412 Head {h00=0x0022, h01=0x0050, text=» SUK A7,2 WHOLE BUFFER SPACED?«, t00=0x0021, t01=0x0068}
0x3412…342a Head {h00=0x0014, h01=0x0050, text=» RB(P) SPAC10 NO«, t00=0x0021, t01=0x008e}
0x342a…3442 Head {h00=0x0014, h01=0x0050, text=» LDK A2,0 CHAR. «, t00=0x0021, t01=0x00a6}
0x3442…3468 Head {h00=0x0022, h01=0x0050, text=» LD A6,ECBBA,A8 BUFFER ADDRESS«, t00=0x0021, t01=0x00be}
0x3468…347a Head {h00=0x000e, h01=0x0050, text=» ADK A6,2 «, t00=0x0021, t01=0x00e4}
0x347a…34a0 Head {h00=0x0022, h01=0x0050, text=» LDK A7,0 RESET CHAR. COUNTER «, t00=0x0021, t01=0x00f6}
0x34a0…34b0 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0021, t01=0x011c}
0x34b0…34be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x012c}
0x34be…3500 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0021, t01=0x013a}
0x3500…3542 Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0021, t01=0x017c}
0x3542…3584 Head {h00=0x003e, h01=0x0050, text=»* INTCHK GET INTENSITY CHAR. * «, t00=0x0022, t01=0x002e}
0x3584…35c6 Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0022, t01=0x0070}
0x35c6…3608 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0022, t01=0x00b2}
0x3608…361c Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0022, t01=0x00f4}
0x361c…3626 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0108}
0x3626…363a Head {h00=0x0010, h01=0x0050, text=»* A2= CHAR. «, t00=0x0022, t01=0x0112}
0x363a…3650 Head {h00=0x0012, h01=0x0050, text=»* A3= RESERVED«, t00=0x0022, t01=0x0126}
0x3650…3666 Head {h00=0x0012, h01=0x0050, text=»* A4= RESERVED«, t00=0x0022, t01=0x013c}
0x3666…367c Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x0022, t01=0x0152}
0x367c…36a0 Head {h00=0x0020, h01=0x0050, text=»* A6= ADDRESS IN ECB BUFFER «, t00=0x0022, t01=0x0168}
0x36a0…36b6 Head {h00=0x0012, h01=0x0050, text=»* A7= RESERVED«, t00=0x0022, t01=0x018c}
0x36b6…36cc Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x0023, t01=0x0012}
0x36cc…36ec Head {h00=0x001c, h01=0x0050, text=»* A9= INTENSITY COUNTER «, t00=0x0023, t01=0x0028}
0x36ec…3704 Head {h00=0x0014, h01=0x0050, text=»* A10= INDICATOR«, t00=0x0023, t01=0x0048}
0x3704…3724 Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0023, t01=0x0060}
0x3724…373c Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0023, t01=0x0080}
0x373c…3746 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0098}
0x3746…377e Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0023, t01=0x00a2}
0x377e…3792 Head {h00=0x0010, h01=0x0050, text=»INTCHK EQU *«, t00=0x0023, t01=0x00da}
0x3792…37bc Head {h00=0x0026, h01=0x0050, text=» SUR A9,A9 RESET INTENSITY COUNTER«, t00=0x0023, t01=0x00ee}
0x37bc…37e4 Head {h00=0x0024, h01=0x0050, text=» LC A2,LINFLG,A5 GET LINE FLAG «, t00=0x0023, t01=0x0118}
0x37e4…3800 Head {h00=0x0018, h01=0x0050, text=» ANK A2,1 MODIFIED? «, t00=0x0023, t01=0x0140}
0x3800…381a Head {h00=0x0016, h01=0x0050, text=» RF(NZ) INT100 YES«, t00=0x0023, t01=0x015c}
0x381a…383a Head {h00=0x001c, h01=0x0050, text=» ADK A3,LLINE NEXT LINE «, t00=0x0023, t01=0x0176}
0x383a…3850 Head {h00=0x0012, h01=0x0050, text=» ADK A4,LLINE «, t00=0x0024, t01=0x0008}
0x3850…3862 Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x0024, t01=0x001e}
0x3862…3874 Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0024, t01=0x0030}
0x3874…388e Head {h00=0x0016, h01=0x0050, text=» SC A2,ECBCW+1,A8 «, t00=0x0024, t01=0x0042}
0x388e…38a4 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/100 «, t00=0x0024, t01=0x005c}
0x38a4…38bc Head {h00=0x0014, h01=0x0050, text=» ADS A2,ECBCW,A8«, t00=0x0024, t01=0x0072}
0x38bc…38d0 Head {h00=0x0010, h01=0x0050, text=» LDKL A10,0 «, t00=0x0024, t01=0x008a}
0x38d0…38e2 Head {h00=0x000e, h01=0x0050, text=» RF INT900«, t00=0x0024, t01=0x009e}
0x38e2…38f6 Head {h00=0x0010, h01=0x0050, text=»INT100 EQU *«, t00=0x0024, t01=0x00b0}
0x38f6…390e Head {h00=0x0014, h01=0x0050, text=» LC A2,LINFLG,A5«, t00=0x0024, t01=0x00c4}
0x390e…3920 Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0024, t01=0x00dc}
0x3920…3938 Head {h00=0x0014, h01=0x0050, text=» SC A2,LINFLG,A5«, t00=0x0024, t01=0x00ee}
0x3938…394c Head {h00=0x0010, h01=0x0050, text=» LDKL A10,1 «, t00=0x0024, t01=0x0106}
0x394c…3964 Head {h00=0x0014, h01=0x0050, text=» LD A2,REGI,A11 «, t00=0x0024, t01=0x011a}
0x3964…3990 Head {h00=0x0028, h01=0x0050, text=» CWK A2,LBVDU+1 UNFORMATTED SCREEN? «, t00=0x0024, t01=0x0132}
0x3990…39aa Head {h00=0x0016, h01=0x0050, text=» RF(E) INT200 YES «, t00=0x0024, t01=0x015e}
0x39aa…39c0 Head {h00=0x0012, h01=0x0050, text=» CF A14,SAVE1 «, t00=0x0024, t01=0x0178}
0x39c0…39d2 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x0024, t01=0x018e}
0x39d2…39e8 Head {h00=0x0012, h01=0x0050, text=» CF A14,SCRINF«, t00=0x0025, t01=0x0010}
0x39e8…39fa Head {h00=0x000e, h01=0x0050, text=» LDR A2,A5«, t00=0x0025, t01=0x0026}
0x39fa…3a0c Head {h00=0x000e, h01=0x0050, text=» LDR A3,A6«, t00=0x0025, t01=0x0038}
0x3a0c…3a38 Head {h00=0x0028, h01=0x0050, text=» CF A14,ATMASB GET CURRENT ATTRIBUTE«, t00=0x0025, t01=0x004a}
0x3a38…3a52 Head {h00=0x0016, h01=0x0050, text=» ST A6,INTATT,A11 «, t00=0x0025, t01=0x0076}
0x3a52…3a64 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A2«, t00=0x0025, t01=0x0090}
0x3a64…3a76 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A3«, t00=0x0025, t01=0x00a2}
0x3a76…3a8c Head {h00=0x0012, h01=0x0050, text=» CF A14,STOINF«, t00=0x0025, t01=0x00b4}
0x3a8c…3aa2 Head {h00=0x0012, h01=0x0050, text=» CF A14,REST1 «, t00=0x0025, t01=0x00ca}
0x3aa2…3ab4 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0025, t01=0x00e0}
0x3ab4…3ac8 Head {h00=0x0010, h01=0x0050, text=»INT200 EQU *«, t00=0x0025, t01=0x00f2}
0x3ac8…3ae2 Head {h00=0x0016, h01=0x0050, text=» LD A2,INTATT,A11 «, t00=0x0025, t01=0x0106}
0x3ae2…3af4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0025, t01=0x0120}
0x3af4…3b14 Head {h00=0x001c, h01=0x0050, text=» ANK A1,8 LOW INTENSITY?«, t00=0x0025, t01=0x0132}
0x3b14…3b2e Head {h00=0x0016, h01=0x0050, text=» RF(Z) INT300 YES «, t00=0x0025, t01=0x0152}
0x3b2e…3b50 Head {h00=0x001e, h01=0x0050, text=» ANK A2,4 HIGH INTENSITY? «, t00=0x0025, t01=0x016c}
0x3b50…3b76 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) INT800 NO, NONDISPLAY «, t00=0x0025, t01=0x018e}
0x3b76…3b8e Head {h00=0x0014, h01=0x0050, text=» LDK A2,/1F HIGH«, t00=0x0026, t01=0x0024}
0x3b8e…3ba0 Head {h00=0x000e, h01=0x0050, text=» RF INT400«, t00=0x0026, t01=0x003c}
0x3ba0…3bb4 Head {h00=0x0010, h01=0x0050, text=»INT300 EQU *«, t00=0x0026, t01=0x004e}
0x3bb4…3bcc Head {h00=0x0014, h01=0x0050, text=» LDK A2,/1E LOW «, t00=0x0026, t01=0x0062}
0x3bcc…3be0 Head {h00=0x0010, h01=0x0050, text=»INT400 EQU *«, t00=0x0026, t01=0x007a}
0x3be0…3c06 Head {h00=0x0022, h01=0x0050, text=» SCR A2,A6 SAVE IN ECB BUFFER «, t00=0x0026, t01=0x008e}
0x3c06…3c18 Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0026, t01=0x00b4}
0x3c18…3c2a Head {h00=0x000e, h01=0x0050, text=» ADKL A9,1«, t00=0x0026, t01=0x00c6}
0x3c2a…3c3c Head {h00=0x000e, h01=0x0050, text=» RF INT900«, t00=0x0026, t01=0x00d8}
0x3c3c…3c50 Head {h00=0x0010, h01=0x0050, text=»INT800 EQU *«, t00=0x0026, t01=0x00ea}
0x3c50…3c68 Head {h00=0x0014, h01=0x0050, text=» LDKL A10,/8000 «, t00=0x0026, t01=0x00fe}
0x3c68…3c7c Head {h00=0x0010, h01=0x0050, text=»INT900 EQU *«, t00=0x0026, t01=0x0116}
0x3c7c…3c8c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0026, t01=0x012a}
0x3c8c…3c9a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x013a}
0x3c9a…3cd2 Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0026, t01=0x0148}
0x3cd2…3d0a Head {h00=0x0034, h01=0x0050, text=»* *«, t00=0x0026, t01=0x0180}
0x3d0a…3d42 Head {h00=0x0034, h01=0x0050, text=»* SETIND SET DISPLAY INDICATOR *«, t00=0x0027, t01=0x0028}
0x3d42…3d7a Head {h00=0x0034, h01=0x0050, text=»* *«, t00=0x0027, t01=0x0060}
0x3d7a…3db2 Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0027, t01=0x0098}
0x3db2…3dc6 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0027, t01=0x00d0}
0x3dc6…3dd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00e4}
0x3dd0…3de2 Head {h00=0x000e, h01=0x0050, text=»* A2= CHAR«, t00=0x0027, t01=0x00ee}
0x3de2…3df8 Head {h00=0x0012, h01=0x0050, text=»* A3= RESERVED«, t00=0x0027, t01=0x0100}
0x3df8…3e0e Head {h00=0x0012, h01=0x0050, text=»* A4= RESERVED«, t00=0x0027, t01=0x0116}
0x3e0e…3e24 Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x0027, t01=0x012c}
0x3e24…3e3a Head {h00=0x0012, h01=0x0050, text=»* A6= RESERVED«, t00=0x0027, t01=0x0142}
0x3e3a…3e50 Head {h00=0x0012, h01=0x0050, text=»* A7= RESERVED«, t00=0x0027, t01=0x0158}
0x3e50…3e66 Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x0027, t01=0x016e}
0x3e66…3e7c Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x0027, t01=0x0184}
0x3e7c…3e9c Head {h00=0x001c, h01=0x0050, text=»* A10= DISPLAY INDICATOR«, t00=0x0028, t01=0x000a}
0x3e9c…3eb4 Head {h00=0x0014, h01=0x0050, text=»* A11= RESERVED «, t00=0x0028, t01=0x002a}
0x3eb4…3ecc Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0028, t01=0x0042}
0x3ecc…3ed6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x005a}
0x3ed6…3f00 Head {h00=0x0026, h01=0x0050, text=»**********************************«, t00=0x0028, t01=0x0064}
0x3f00…3f14 Head {h00=0x0010, h01=0x0050, text=»SETIND EQU *«, t00=0x0028, t01=0x008e}
0x3f14…3f34 Head {h00=0x001c, h01=0x0050, text=» CWK A2,NULL NULL CHAR? «, t00=0x0028, t01=0x00a2}
0x3f34…3f4e Head {h00=0x0016, h01=0x0050, text=» RF(E) SETI90 YES «, t00=0x0028, t01=0x00c2}
0x3f4e…3f7a Head {h00=0x0028, h01=0x0050, text=» ORKL A10,1 INDICATE NOT ONLY SPACES«, t00=0x0028, t01=0x00dc}
0x3f7a…3f8e Head {h00=0x0010, h01=0x0050, text=»SETI90 EQU *«, t00=0x0028, t01=0x0108}
0x3f8e…3f9e Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0028, t01=0x011c}
0x3f9e…3fac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x012c}
0x3fac…3ff4 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0028, t01=0x013a}
0x3ff4…403c Head {h00=0x0044, h01=0x0050, text=»* *«, t00=0x0028, t01=0x0182}
0x403c…4084 Head {h00=0x0044, h01=0x0050, text=»* INSMOD INSERT CHARACTER *«, t00=0x0029, t01=0x003a}
0x4084…40cc Head {h00=0x0044, h01=0x0050, text=»* *«, t00=0x0029, t01=0x0082}
0x40cc…4114 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0029, t01=0x00ca}
0x4114…4128 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0029, t01=0x0112}
0x4128…4132 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0126}
0x4132…417a Head {h00=0x0044, h01=0x0050, text=»* A1= AT RETURN 0=NULL IN POS., 1=NORMAL INSERT, 2=NOT ALLOWED «, t00=0x0029, t01=0x0130}
0x417a…4190 Head {h00=0x0012, h01=0x0050, text=»* A2= RESERVED«, t00=0x0029, t01=0x0178}
0x4190…41ae Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x0029, t01=0x018e}
0x41ae…41d0 Head {h00=0x001e, h01=0x0050, text=»* A5= REL. ATTRIBUTE POS. «, t00=0x002a, t01=0x001c}
0x41d0…41ee Head {h00=0x001a, h01=0x0050, text=»* A6= ATTRIBUTE CHAR. «, t00=0x002a, t01=0x003e}
0x41ee…420e Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x002a, t01=0x005c}
0x420e…4226 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x002a, t01=0x007c}
0x4226…4230 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0094}
0x4230…4278 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x002a, t01=0x009e}
0x4278…428c Head {h00=0x0010, h01=0x0050, text=»INSMOD EQU *«, t00=0x002a, t01=0x00e6}
0x428c…42a0 Head {h00=0x0010, h01=0x0050, text=» IFT IN:DL=1«, t00=0x002a, t01=0x00fa}
0x42a0…42b2 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x002a, t01=0x010e}
0x42b2…42e0 Head {h00=0x002a, h01=0x0050, text=» CF A14,GETVDU GET CHAR. IN VDU BUFFER«, t00=0x002a, t01=0x0120}
0x42e0…4300 Head {h00=0x001c, h01=0x0050, text=» CCK A7,NULL NULL CHAR.?«, t00=0x002a, t01=0x014e}
0x4300…431a Head {h00=0x0016, h01=0x0050, text=» RF(NE) INS100 NO «, t00=0x002a, t01=0x016e}
0x431a…4348 Head {h00=0x002a, h01=0x0050, text=» LDK A1,0 INDICATE NULL IN CURSOR POS.«, t00=0x002a, t01=0x0188}
0x4348…435a Head {h00=0x000e, h01=0x0050, text=» RF INS900«, t00=0x002b, t01=0x0026}
0x435a…436e Head {h00=0x0010, h01=0x0050, text=»INS100 EQU *«, t00=0x002b, t01=0x0038}
0x436e…4380 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A4«, t00=0x002b, t01=0x004c}
0x4380…43ac Head {h00=0x0028, h01=0x0050, text=» CWK A5,LBVDU+1 UNFORMATTED SCREEN? «, t00=0x002b, t01=0x005e}
0x43ac…43c6 Head {h00=0x0016, h01=0x0050, text=» RF(E) INS200 YES «, t00=0x002b, t01=0x008a}
0x43c6…43e2 Head {h00=0x0018, h01=0x0050, text=» LDR A8,A6 SAVE OLD «, t00=0x002b, t01=0x00a4}
0x43e2…43fe Head {h00=0x0018, h01=0x0050, text=» LDR A9,A5 SAVE OLD «, t00=0x002b, t01=0x00c0}
0x43fe…442e Head {h00=0x002c, h01=0x0050, text=» CF A14,ATMASF SEARCH ATTRIBUTE FORWARD «, t00=0x002b, t01=0x00dc}
0x442e…4440 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A5«, t00=0x002b, t01=0x010c}
0x4440…4462 Head {h00=0x001e, h01=0x0050, text=» ST A8,ATTRIB,A11 RESTORE «, t00=0x002b, t01=0x011e}
0x4462…4484 Head {h00=0x001e, h01=0x0050, text=» ST A9,CURATT,A11 RESTORE «, t00=0x002b, t01=0x0140}
0x4484…4496 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A8«, t00=0x002b, t01=0x0162}
0x4496…44a8 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A9«, t00=0x002b, t01=0x0174}
0x44a8…44bc Head {h00=0x0010, h01=0x0050, text=»INS200 EQU *«, t00=0x002b, t01=0x0186}
0x44bc…44e4 Head {h00=0x0024, h01=0x0050, text=» CF A14,SNULL SEARCH FIRST NULL «, t00=0x002c, t01=0x000a}
0x44e4…4502 Head {h00=0x001a, h01=0x0050, text=» ANK A1,2 NULL FOUND? «, t00=0x002c, t01=0x0032}
0x4502…451c Head {h00=0x0016, h01=0x0050, text=» RF(Z) INS300 YES «, t00=0x002c, t01=0x0050}
0x451c…453c Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 INDICATE ERROR«, t00=0x002c, t01=0x006a}
0x453c…454e Head {h00=0x000e, h01=0x0050, text=» RF INS900«, t00=0x002c, t01=0x008a}
0x454e…4562 Head {h00=0x0010, h01=0x0050, text=»INS300 EQU *«, t00=0x002c, t01=0x009c}
0x4562…458e Head {h00=0x0028, h01=0x0050, text=» CWK A5,LBVDU+1 UNFORMATTED SCREEN? «, t00=0x002c, t01=0x00b0}
0x458e…45a8 Head {h00=0x0016, h01=0x0050, text=» RF(E) INS350 YES «, t00=0x002c, t01=0x00dc}
0x45a8…45d6 Head {h00=0x002a, h01=0x0050, text=» ORK A6,1 SET MDT-BIT ON IN ATTRIBUTE «, t00=0x002c, t01=0x00f6}
0x45d6…45f0 Head {h00=0x0016, h01=0x0050, text=» ST A6,ATTRIB,A11 «, t00=0x002c, t01=0x0124}
0x45f0…4602 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A5«, t00=0x002c, t01=0x013e}
0x4602…4614 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A6«, t00=0x002c, t01=0x0150}
0x4614…464c Head {h00=0x0034, h01=0x0050, text=» CF A14,STOVDU SAVE NEW ATTRIBUTE IN VDU-BUFFER «, t00=0x002c, t01=0x0162}
0x464c…4660 Head {h00=0x0010, h01=0x0050, text=»INS350 EQU *«, t00=0x002d, t01=0x000a}
0x4660…4672 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x002d, t01=0x001e}
0x4672…468a Head {h00=0x0014, h01=0x0050, text=» ST A4,REGI,A11 «, t00=0x002d, t01=0x0030}
0x468a…469c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x002d, t01=0x0048}
0x469c…46b2 Head {h00=0x0012, h01=0x0050, text=» LDK A5,LLINE «, t00=0x002d, t01=0x005a}
0x46b2…46c6 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A11 «, t00=0x002d, t01=0x0070}
0x46c6…46da Head {h00=0x0010, h01=0x0050, text=» SUR A10,A10«, t00=0x002d, t01=0x0084}
0x46da…46ec Head {h00=0x000e, h01=0x0050, text=» LDR A9,A1«, t00=0x002d, t01=0x0098}
0x46ec…4712 Head {h00=0x0022, h01=0x0050, text=» CF A14,LINE UPDATE LINE FLAG «, t00=0x002d, t01=0x00aa}
0x4712…4724 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A9«, t00=0x002d, t01=0x00d0}
0x4724…4738 Head {h00=0x0010, h01=0x0050, text=»INS400 EQU *«, t00=0x002d, t01=0x00e2}
0x4738…476a Head {h00=0x002e, h01=0x0050, text=» CWK A1,0 CHAR TO MOVE IN LAST SCREEN POS?«, t00=0x002d, t01=0x00f6}
0x476a…4784 Head {h00=0x0016, h01=0x0050, text=» RF(E) INS500 YES «, t00=0x002d, t01=0x0128}
0x4784…4796 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x002d, t01=0x0142}
0x4796…47c4 Head {h00=0x002a, h01=0x0050, text=» CF A14,GETVDU GET CHAR IN VDU BUFFER «, t00=0x002d, t01=0x0154}
0x47c4…47d6 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x002d, t01=0x0182}
0x47d6…47e8 (46, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A9,A1«, t00=0x002e, t01=0x0004}
0x47e8…47fe Head {h00=0x0012, h01=0x0050, text=» LDK A5,LLINE «, t00=0x002e, t01=0x0016}
0x47fe…4812 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A11 «, t00=0x002e, t01=0x002c}
0x4812…4826 Head {h00=0x0010, h01=0x0050, text=» CF A14,LINE«, t00=0x002e, t01=0x0040}
0x4826…4838 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A9«, t00=0x002e, t01=0x0054}
0x4838…4850 Head {h00=0x0014, h01=0x0050, text=» LC A9,LINFLG,A6«, t00=0x002e, t01=0x0066}
0x4850…4862 Head {h00=0x000e, h01=0x0050, text=» ORKL A9,1«, t00=0x002e, t01=0x007e}
0x4862…487a Head {h00=0x0014, h01=0x0050, text=» SC A9,LINFLG,A6«, t00=0x002e, t01=0x0090}
0x487a…48aa Head {h00=0x002c, h01=0x0050, text=» CF A14,STOVDU STORE CHAR IN VDU BUFFER «, t00=0x002e, t01=0x00a8}
0x48aa…48bc Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x002e, t01=0x00d8}
0x48bc…48ce Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x002e, t01=0x00ea}
0x48ce…48e2 Head {h00=0x0010, h01=0x0050, text=»INS450 EQU *«, t00=0x002e, t01=0x00fc}
0x48e2…4906 Head {h00=0x0020, h01=0x0050, text=» CW A1,REGI,A11 ALL SHIFTED?«, t00=0x002e, t01=0x0110}
0x4906…4920 Head {h00=0x0016, h01=0x0050, text=» RF(E) INS600 YES «, t00=0x002e, t01=0x0134}
0x4920…4932 Head {h00=0x000e, h01=0x0050, text=» RB INS400«, t00=0x002e, t01=0x014e}
0x4932…4946 Head {h00=0x0010, h01=0x0050, text=»INS500 EQU *«, t00=0x002e, t01=0x0160}
0x4946…496c Head {h00=0x0022, h01=0x0050, text=» LDKL A1,LBVDU-1 GET LAST CHAR«, t00=0x002e, t01=0x0174}
0x496c…499a Head {h00=0x002a, h01=0x0050, text=» CF A14,GETVDU GET CHAR IN VDU BUFFER «, t00=0x002f, t01=0x000a}
0x499a…49ac Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x002f, t01=0x0038}
0x49ac…49be Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x002f, t01=0x004a}
0x49be…49d0 Head {h00=0x000e, h01=0x0050, text=» LDR A9,A1«, t00=0x002f, t01=0x005c}
0x49d0…49e6 Head {h00=0x0012, h01=0x0050, text=» LDK A5,LLINE «, t00=0x002f, t01=0x006e}
0x49e6…49fa Head {h00=0x0010, h01=0x0050, text=» LDR A6,A11 «, t00=0x002f, t01=0x0084}
0x49fa…4a0e Head {h00=0x0010, h01=0x0050, text=» CF A14,LINE«, t00=0x002f, t01=0x0098}
0x4a0e…4a20 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A9«, t00=0x002f, t01=0x00ac}
0x4a20…4a38 Head {h00=0x0014, h01=0x0050, text=» LC A9,LINFLG,A6«, t00=0x002f, t01=0x00be}
0x4a38…4a4a Head {h00=0x000e, h01=0x0050, text=» ORKL A9,1«, t00=0x002f, t01=0x00d6}
0x4a4a…4a62 Head {h00=0x0014, h01=0x0050, text=» SC A9,LINFLG,A6«, t00=0x002f, t01=0x00e8}
0x4a62…4a92 Head {h00=0x002c, h01=0x0050, text=» CF A14,STOVDU STORE CHAR IN VDU BUFFER «, t00=0x002f, t01=0x0100}
0x4a92…4abc Head {h00=0x0026, h01=0x0050, text=» LDKL A1,LBVDU-1 LAST SCREEN POS. «, t00=0x002f, t01=0x0130}
0x4abc…4ad4 Head {h00=0x0014, h01=0x0050, text=» LDKL A4,LBVDU-1«, t00=0x002f, t01=0x015a}
0x4ad4…4ae6 Head {h00=0x000e, h01=0x0050, text=» RB INS450«, t00=0x002f, t01=0x0172}
0x4ae6…4afa Head {h00=0x0010, h01=0x0050, text=»INS600 EQU *«, t00=0x002f, t01=0x0184}
0x4afa…4b1a Head {h00=0x001c, h01=0x0050, text=» LDR A7,A2 GET KEY-CHAR «, t00=0x0030, t01=0x0008}
0x4b1a…4b4a Head {h00=0x002c, h01=0x0050, text=» CF A14,STOVDU STORE CHAR IN VDU BUFFER «, t00=0x0030, t01=0x0028}
0x4b4a…4b60 Head {h00=0x0012, h01=0x0050, text=» LDK A5,LLINE «, t00=0x0030, t01=0x0058}
0x4b60…4b74 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A11 «, t00=0x0030, t01=0x006e}
0x4b74…4b88 Head {h00=0x0010, h01=0x0050, text=» CF A14,LINE«, t00=0x0030, t01=0x0082}
0x4b88…4ba0 Head {h00=0x0014, h01=0x0050, text=» LC A9,LINFLG,A6«, t00=0x0030, t01=0x0096}
0x4ba0…4bb2 Head {h00=0x000e, h01=0x0050, text=» ORKL A9,1«, t00=0x0030, t01=0x00ae}
0x4bb2…4bca Head {h00=0x0014, h01=0x0050, text=» SC A9,LINFLG,A6«, t00=0x0030, t01=0x00c0}
0x4bca…4bec Head {h00=0x001e, h01=0x0050, text=» IM PCURS,A11 MOVE CURSOR «, t00=0x0030, t01=0x00d8}
0x4bec…4c04 Head {h00=0x0014, h01=0x0050, text=» LD A4,REGI,A11 «, t00=0x0030, t01=0x00fa}
0x4c04…4c16 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0030, t01=0x0112}
0x4c16…4c3a Head {h00=0x0020, h01=0x0050, text=» CWK A4,LBVDU-1 WRAP AROUND?«, t00=0x0030, t01=0x0124}
0x4c3a…4c54 Head {h00=0x0016, h01=0x0050, text=» RF(NG) INS700 NO «, t00=0x0030, t01=0x0148}
0x4c54…4c7a Head {h00=0x0022, h01=0x0050, text=» LDK A4,0 FIRST POS. ON SCREEN«, t00=0x0030, t01=0x0162}
0x4c7a…4c90 Head {h00=0x0012, h01=0x0050, text=» CM PCURS,A11 «, t00=0x0030, t01=0x0188}
0x4c90…4ca4 Head {h00=0x0010, h01=0x0050, text=»INS700 EQU *«, t00=0x0031, t01=0x000e}
0x4ca4…4cd2 Head {h00=0x002a, h01=0x0050, text=» CF A14,DISMOD DISPLAY MODIFIED FIELD «, t00=0x0031, t01=0x0022}
0x4cd2…4cfa Head {h00=0x0024, h01=0x0050, text=» LDK A1,1 INDICATE NORMAL INSERT«, t00=0x0031, t01=0x0050}
0x4cfa…4d0e Head {h00=0x0010, h01=0x0050, text=»INS900 EQU *«, t00=0x0031, t01=0x0078}
0x4d0e…4d1e Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0031, t01=0x008c}
0x4d1e…4d2a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x009c}
0x4d2a…4d38 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x00a8}
0x4d38…4d7a Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0031, t01=0x00b6}
0x4d7a…4dbc Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0031, t01=0x00f8}
0x4dbc…4dfe Head {h00=0x003e, h01=0x0050, text=»* UPDCNT UPDATE COUNTERS *«, t00=0x0031, t01=0x013a}
0x4dfe…4e40 Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0031, t01=0x017c}
0x4e40…4e82 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0032, t01=0x002e}
0x4e82…4e9e Head {h00=0x0018, h01=0x0050, text=»* REGISTERS«, t00=0x0032, t01=0x0070}
0x4e9e…4ea8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x008c}
0x4ea8…4ecc Head {h00=0x0020, h01=0x0050, text=»* A3= ADDRESS IN VDU BUFFER «, t00=0x0032, t01=0x0096}
0x4ecc…4ee8 Head {h00=0x0018, h01=0x0050, text=»* A4= REL CURSOR POS«, t00=0x0032, t01=0x00ba}
0x4ee8…4efe Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x0032, t01=0x00d6}
0x4efe…4f1a Head {h00=0x0018, h01=0x0050, text=»* A6= ADDRESS IN ECB«, t00=0x0032, t01=0x00ec}
0x4f1a…4f34 Head {h00=0x0016, h01=0x0050, text=»* A7= INDEX IN ECB«, t00=0x0032, t01=0x0108}
0x4f34…4f4a Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x0032, t01=0x0122}
0x4f4a…4f60 Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x0032, t01=0x0138}
0x4f60…4f78 Head {h00=0x0014, h01=0x0050, text=»* A10= RESERVED «, t00=0x0032, t01=0x014e}
0x4f78…4f90 Head {h00=0x0014, h01=0x0050, text=»* A11= RESERVED «, t00=0x0032, t01=0x0166}
0x4f90…4fa8 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0032, t01=0x017e}
0x4fa8…4fb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0008}
0x4fb2…4ff4 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0033, t01=0x0012}
0x4ff4…5008 Head {h00=0x0010, h01=0x0050, text=»UPDCNT EQU *«, t00=0x0033, t01=0x0054}
0x5008…501a Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0033, t01=0x0068}
0x501a…502c Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0033, t01=0x007a}
0x502c…503e Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0033, t01=0x008c}
0x503e…5050 Head {h00=0x000e, h01=0x0050, text=» ADK A7,1 «, t00=0x0033, t01=0x009e}
0x5050…5060 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0033, t01=0x00b0}
0x5060…506e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x00c0}
0x506e…50b6 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0033, t01=0x00ce}
0x50b6…50fe Head {h00=0x0044, h01=0x0050, text=»* *«, t00=0x0033, t01=0x0116}
0x50fe…5146 Head {h00=0x0044, h01=0x0050, text=»* GETVDU GET CHAR. IN VDU BUFFER *«, t00=0x0033, t01=0x015e}
0x5146…518e Head {h00=0x0044, h01=0x0050, text=»* *«, t00=0x0034, t01=0x0016}
0x518e…51d6 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0034, t01=0x005e}
0x51d6…51ea Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0034, t01=0x00a6}
0x51ea…51f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00ba}
0x51f4…5218 Head {h00=0x0020, h01=0x0050, text=»* A1= REL. POS IN VDU BUFFER«, t00=0x0034, t01=0x00c4}
0x5218…522e Head {h00=0x0012, h01=0x0050, text=»* A2= RESERVED«, t00=0x0034, t01=0x00e8}
0x522e…5244 Head {h00=0x0012, h01=0x0050, text=»* A3= RESERVED«, t00=0x0034, t01=0x00fe}
0x5244…525a Head {h00=0x0012, h01=0x0050, text=»* A4= RESERVED«, t00=0x0034, t01=0x0114}
0x525a…5270 Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x0034, t01=0x012a}
0x5270…5286 Head {h00=0x0012, h01=0x0050, text=»* A6= RESERVED«, t00=0x0034, t01=0x0140}
0x5286…52aa Head {h00=0x0020, h01=0x0050, text=»* A7= CHAR. FROM VDU BUFFER «, t00=0x0034, t01=0x0156}
0x52aa…52c0 Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x0034, t01=0x017a}
0x52c0…52d6 Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x0034, t01=0x0190}
0x52d6…52ee Head {h00=0x0014, h01=0x0050, text=»* A10= RESERVED «, t00=0x0035, t01=0x0016}
0x52ee…530e Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0035, t01=0x002e}
0x530e…5326 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0035, t01=0x004e}
0x5326…5330 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0066}
0x5330…5370 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0035, t01=0x0070}
0x5370…5384 Head {h00=0x0010, h01=0x0050, text=»GETVDU EQU *«, t00=0x0035, t01=0x00b0}
0x5384…539a Head {h00=0x0012, h01=0x0050, text=» LDKL A7,BVDU «, t00=0x0035, t01=0x00c4}
0x539a…53ae Head {h00=0x0010, h01=0x0050, text=» ADR A7,A11 «, t00=0x0035, t01=0x00da}
0x53ae…53c0 Head {h00=0x000e, h01=0x0050, text=» ADR A7,A1«, t00=0x0035, t01=0x00ee}
0x53c0…53d2 Head {h00=0x000e, h01=0x0050, text=» LCR A7,A7«, t00=0x0035, t01=0x0100}
0x53d2…53e6 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0035, t01=0x0112}
0x53e6…53f6 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0035, t01=0x0126}
0x53f6…5404 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x0136}
0x5404…544a Head {h00=0x0042, h01=0x0050, text=»**************************************************************«, t00=0x0035, t01=0x0144}
0x544a…5490 Head {h00=0x0042, h01=0x0050, text=»* *«, t00=0x0035, t01=0x018a}
0x5490…54d6 Head {h00=0x0042, h01=0x0050, text=»* STOVDU STORE CHAR. IN VDU BUFFER *«, t00=0x0036, t01=0x0040}
0x54d6…551c Head {h00=0x0042, h01=0x0050, text=»* *«, t00=0x0036, t01=0x0086}
0x551c…5562 Head {h00=0x0042, h01=0x0050, text=»**************************************************************«, t00=0x0036, t01=0x00cc}
0x5562…5576 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0036, t01=0x0112}
0x5576…5580 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0126}
0x5580…55a6 Head {h00=0x0022, h01=0x0050, text=»* A1= REL. POS. IN VDU BUFFER «, t00=0x0036, t01=0x0130}
0x55a6…55bc Head {h00=0x0012, h01=0x0050, text=»* A2= RESERVED«, t00=0x0036, t01=0x0156}
0x55bc…55d2 Head {h00=0x0012, h01=0x0050, text=»* A3= RESERVED«, t00=0x0036, t01=0x016c}
0x55d2…55e8 Head {h00=0x0012, h01=0x0050, text=»* A4= RESERVED«, t00=0x0036, t01=0x0182}
0x55e8…55fe Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x0037, t01=0x0008}
0x55fe…5614 Head {h00=0x0012, h01=0x0050, text=»* A6= RESERVED«, t00=0x0037, t01=0x001e}
0x5614…563e Head {h00=0x0026, h01=0x0050, text=»* A7= CHAR. TO STORE IN VDU BUFFER«, t00=0x0037, t01=0x0034}
0x563e…5654 Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x0037, t01=0x005e}
0x5654…566c Head {h00=0x0014, h01=0x0050, text=»* A10= RESERVED «, t00=0x0037, t01=0x0074}
0x566c…568c Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0037, t01=0x008c}
0x568c…56a4 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0037, t01=0x00ac}
0x56a4…56ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00c4}
0x56ae…56ee Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0037, t01=0x00ce}
0x56ee…5702 Head {h00=0x0010, h01=0x0050, text=»STOVDU EQU *«, t00=0x0037, t01=0x010e}
0x5702…5718 Head {h00=0x0012, h01=0x0050, text=» LDKL A8,BVDU «, t00=0x0037, t01=0x0122}
0x5718…572c Head {h00=0x0010, h01=0x0050, text=» ADR A8,A11 «, t00=0x0037, t01=0x0138}
0x572c…573e Head {h00=0x000e, h01=0x0050, text=» ADR A8,A1«, t00=0x0037, t01=0x014c}
0x573e…5750 Head {h00=0x000e, h01=0x0050, text=» SCR A7,A8«, t00=0x0037, t01=0x015e}
0x5750…5760 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0037, t01=0x0170}
0x5760…576e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0180}
0x576e…57ae Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0037, t01=0x018e}
0x57ae…57ee Head {h00=0x003c, h01=0x0050, text=»* *«, t00=0x0038, t01=0x003e}
0x57ee…582e Head {h00=0x003c, h01=0x0050, text=»* SCRINF GET SCREEN INFORMATION *«, t00=0x0038, t01=0x007e}
0x582e…586e Head {h00=0x003c, h01=0x0050, text=»* *«, t00=0x0038, t01=0x00be}
0x586e…58ae Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0038, t01=0x00fe}
0x58ae…58c2 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0038, t01=0x013e}
0x58c2…58cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0152}
0x58cc…58e2 Head {h00=0x0012, h01=0x0050, text=»* A2= RESERVED«, t00=0x0038, t01=0x015c}
0x58e2…5900 Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x0038, t01=0x0172}
0x5900…5922 Head {h00=0x001e, h01=0x0050, text=»* A5= REL. ATTRIBUTE POS. «, t00=0x0038, t01=0x0190}
0x5922…5940 Head {h00=0x001a, h01=0x0050, text=»* A6= ATTRIBUTE CHAR. «, t00=0x0039, t01=0x0022}
0x5940…5960 Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0039, t01=0x0040}
0x5960…5978 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0039, t01=0x0060}
0x5978…5982 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0078}
0x5982…59c2 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0039, t01=0x0082}
0x59c2…59d6 Head {h00=0x0010, h01=0x0050, text=»SCRINF EQU *«, t00=0x0039, t01=0x00c2}
0x59d6…59fe Head {h00=0x0024, h01=0x0050, text=» LD A4,PCURS,A11 GET CURSOR POS.«, t00=0x0039, t01=0x00d6}
0x59fe…5a2a Head {h00=0x0028, h01=0x0050, text=» LD A5,CURATT,A11 GET ATTRIBUTE POS.«, t00=0x0039, t01=0x00fe}
0x5a2a…5a58 Head {h00=0x002a, h01=0x0050, text=» LD A6,ATTRIB,A11 GET ATTRIBUTE CHAR. «, t00=0x0039, t01=0x012a}
0x5a58…5a68 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0039, t01=0x0158}
0x5a68…5a76 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x0168}
0x5a76…5ab6 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0039, t01=0x0176}
0x5ab6…5af6 Head {h00=0x003c, h01=0x0050, text=»* *«, t00=0x003a, t01=0x0026}
0x5af6…5b36 Head {h00=0x003c, h01=0x0050, text=»* STOINF STORE SCREEN INFORMATION *«, t00=0x003a, t01=0x0066}
0x5b36…5b76 Head {h00=0x003c, h01=0x0050, text=»* *«, t00=0x003a, t01=0x00a6}
0x5b76…5bb6 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x003a, t01=0x00e6}
0x5bb6…5bca Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x003a, t01=0x0126}
0x5bca…5bd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x013a}
0x5bd4…5bf2 Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x003a, t01=0x0144}
0x5bf2…5c14 Head {h00=0x001e, h01=0x0050, text=»* A5= REL. ATTRIBUTE POS. «, t00=0x003a, t01=0x0162}
0x5c14…5c32 Head {h00=0x001a, h01=0x0050, text=»* A6= ATTRIBUTE CHAR. «, t00=0x003a, t01=0x0184}
0x5c32…5c52 Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x003b, t01=0x0012}
0x5c52…5c6a Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x003b, t01=0x0032}
0x5c6a…5c74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x004a}
0x5c74…5cb4 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x003b, t01=0x0054}
0x5cb4…5cc8 Head {h00=0x0010, h01=0x0050, text=»STOINF EQU *«, t00=0x003b, t01=0x0094}
0x5cc8…5ce0 Head {h00=0x0014, h01=0x0050, text=» ST A4,PCURS,A11«, t00=0x003b, t01=0x00a8}
0x5ce0…5cfa Head {h00=0x0016, h01=0x0050, text=» ST A5,CURATT,A11 «, t00=0x003b, t01=0x00c0}
0x5cfa…5d14 Head {h00=0x0016, h01=0x0050, text=» ST A6,ATTRIB,A11 «, t00=0x003b, t01=0x00da}
0x5d14…5d24 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x003b, t01=0x00f4}
0x5d24…5d32 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003b, t01=0x0104}
0x5d32…5d72 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x003b, t01=0x0112}
0x5d72…5db2 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x003b, t01=0x0152}
0x5db2…5df2 (60, 0, 398) Head {h00=0x003c, h01=0x0050, text=»* SOUND SOUND ALARM ON VDU * «, t00=0x003c, t01=0x0004}
0x5df2…5e32 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x003c, t01=0x0044}
0x5e32…5e72 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x003c, t01=0x0084}
0x5e72…5e86 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x003c, t01=0x00c4}
0x5e86…5e90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00d8}
0x5e90…5eaa Head {h00=0x0016, h01=0x0050, text=»* A1= RETURN CODE «, t00=0x003c, t01=0x00e2}
0x5eaa…5ebe Head {h00=0x0010, h01=0x0050, text=»* A8= ECBVDU«, t00=0x003c, t01=0x00fc}
0x5ebe…5ede Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x003c, t01=0x0110}
0x5ede…5ef6 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x003c, t01=0x0130}
0x5ef6…5f00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0148}
0x5f00…5f40 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x003c, t01=0x0152}
0x5f40…5f54 (61, 0, 400) Head {h00=0x0010, h01=0x0050, text=»SOUND EQU * «, t00=0x003d, t01=0x0004}
0x5f54…5f6e Head {h00=0x0016, h01=0x0050, text=» LD A8,ECBVDU,A11 «, t00=0x003d, t01=0x0018}
0x5f6e…5f86 Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBBA,A8 «, t00=0x003d, t01=0x0032}
0x5f86…5fa8 Head {h00=0x001e, h01=0x0050, text=» LDK A2,/2B CONTROL CHAR. «, t00=0x003d, t01=0x004a}
0x5fa8…5fbc Head {h00=0x0010, h01=0x0050, text=» SC A2,1,A1 «, t00=0x003d, t01=0x006c}
0x5fbc…5fda Head {h00=0x001a, h01=0x0050, text=» LDK A2,/07 BELL CHAR.«, t00=0x003d, t01=0x0080}
0x5fda…5fee Head {h00=0x0010, h01=0x0050, text=» SC A2,2,A1 «, t00=0x003d, t01=0x009e}
0x5fee…600c Head {h00=0x001a, h01=0x0050, text=» LDK A2,3 REQ. LENGTH «, t00=0x003d, t01=0x00b2}
0x600c…6024 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBRL,A8 «, t00=0x003d, t01=0x00d0}
0x6024…6038 Head {h00=0x0010, h01=0x0050, text=» LDK A7,/86 «, t00=0x003d, t01=0x00e8}
0x6038…6044 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x003d, t01=0x00fc}
0x6044…6054 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x003d, t01=0x0108}
0x6054…607c Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRC,A8 GET RETURN CODE «, t00=0x003d, t01=0x0118}
0x607c…608c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x003d, t01=0x0140}
0x608c…609a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003d, t01=0x0150}
0x609a…60d8 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x003d, t01=0x015e}
0x60d8…6116 Head {h00=0x003a, h01=0x0050, text=»* * «, t00=0x003e, t01=0x000c}
0x6116…6154 Head {h00=0x003a, h01=0x0050, text=»* WRAP CHECK IF WRAP AROUND * «, t00=0x003e, t01=0x004a}
0x6154…6192 Head {h00=0x003a, h01=0x0050, text=»* * «, t00=0x003e, t01=0x0088}
0x6192…61d0 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x003e, t01=0x00c6}
0x61d0…61e4 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x003e, t01=0x0104}
0x61e4…61ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0118}
0x61ee…6204 Head {h00=0x0012, h01=0x0050, text=»* A2= RESERVED«, t00=0x003e, t01=0x0122}
0x6204…6228 Head {h00=0x0020, h01=0x0050, text=»* A3= ADDRESS IN VDU BUFFER «, t00=0x003e, t01=0x0138}
0x6228…6246 Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x003e, t01=0x015c}
0x6246…625c Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x003e, t01=0x017a}
0x625c…6272 Head {h00=0x0012, h01=0x0050, text=»* A6= RESERVED«, t00=0x003e, t01=0x0190}
0x6272…6288 Head {h00=0x0012, h01=0x0050, text=»* A7= RESERVED«, t00=0x003f, t01=0x0016}
0x6288…629e Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x003f, t01=0x002c}
0x629e…62b4 Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x003f, t01=0x0042}
0x62b4…62cc Head {h00=0x0014, h01=0x0050, text=»* A10= RESERVED «, t00=0x003f, t01=0x0058}
0x62cc…62ec Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x003f, t01=0x0070}
0x62ec…6304 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x003f, t01=0x0090}
0x6304…630e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00a8}
0x630e…634c Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x003f, t01=0x00b2}
0x634c…635e Head {h00=0x000e, h01=0x0050, text=»WRAP EQU *«, t00=0x003f, t01=0x00f0}
0x635e…6380 Head {h00=0x001e, h01=0x0050, text=» CWK A4,LBVDU WRAP AROUND «, t00=0x003f, t01=0x0102}
0x6380…6398 Head {h00=0x0014, h01=0x0050, text=» RF(L) WRAP90 NO«, t00=0x003f, t01=0x0124}
0x6398…63bc Head {h00=0x0020, h01=0x0050, text=» LDK A4,0 FIRST SCREEN POS. «, t00=0x003f, t01=0x013c}
0x63bc…63d2 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,BVDU «, t00=0x003f, t01=0x0160}
0x63d2…63e6 Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x003f, t01=0x0176}
0x63e6…63fa Head {h00=0x0010, h01=0x0050, text=»WRAP90 EQU *«, t00=0x003f, t01=0x018a}
0x63fa…640a Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0040, t01=0x000e}
0x640a…6418 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0040, t01=0x001e}
0x6418…645c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0040, t01=0x002c}
0x645c…64a0 Head {h00=0x0040, h01=0x0050, text=»* *«, t00=0x0040, t01=0x0070}
0x64a0…64e6 Head {h00=0x0042, h01=0x0050, text=»* LINWRP CHECK LINE WRAP * «, t00=0x0040, t01=0x00b4}
0x64e6…652a Head {h00=0x0040, h01=0x0050, text=»* *«, t00=0x0040, t01=0x00fa}
0x652a…656e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0040, t01=0x013e}
0x656e…6582 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0040, t01=0x0182}
0x6582…658c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0008}
0x658c…65a2 Head {h00=0x0012, h01=0x0050, text=»* A3= RESERVED«, t00=0x0041, t01=0x0012}
0x65a2…65be Head {h00=0x0018, h01=0x0050, text=»* A4= REL CURSOR POS«, t00=0x0041, t01=0x0028}
0x65be…65e0 Head {h00=0x001e, h01=0x0050, text=»* A5= LAST IN ROW REL POS «, t00=0x0041, t01=0x0044}
0x65e0…65f6 Head {h00=0x0012, h01=0x0050, text=»* A6= RESERVED«, t00=0x0041, t01=0x0066}
0x65f6…660c Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x0041, t01=0x007c}
0x660c…6622 Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x0041, t01=0x0092}
0x6622…663a Head {h00=0x0014, h01=0x0050, text=»* A10= RESERVED «, t00=0x0041, t01=0x00a8}
0x663a…6652 Head {h00=0x0014, h01=0x0050, text=»* A11= RESERVED «, t00=0x0041, t01=0x00c0}
0x6652…666a Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0041, t01=0x00d8}
0x666a…6674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00f0}
0x6674…66b8 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0041, t01=0x00fa}
0x66b8…66cc Head {h00=0x0010, h01=0x0050, text=»LINWRP EQU *«, t00=0x0041, t01=0x013e}
0x66cc…66ec Head {h00=0x001c, h01=0x0050, text=» CWR A5,A4 END OF LINE? «, t00=0x0041, t01=0x0152}
0x66ec…6704 Head {h00=0x0014, h01=0x0050, text=» RF(G) LINW10 NO«, t00=0x0041, t01=0x0172}
0x6704…672a Head {h00=0x0022, h01=0x0050, text=» CF A14,LINE UPDATE LINE FLAG «, t00=0x0041, t01=0x018a}
0x672a…673e Head {h00=0x0010, h01=0x0050, text=»LINW10 EQU *«, t00=0x0042, t01=0x0020}
0x673e…674e Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0042, t01=0x0034}
0x674e…675c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0044}
0x675c…67a0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0042, t01=0x0052}
0x67a0…67e4 Head {h00=0x0040, h01=0x0050, text=»* *«, t00=0x0042, t01=0x0096}
0x67e4…6828 Head {h00=0x0040, h01=0x0050, text=»* LINE UPDATE LINE FLAG *«, t00=0x0042, t01=0x00da}
0x6828…686c Head {h00=0x0040, h01=0x0050, text=»* *«, t00=0x0042, t01=0x011e}
0x686c…68b2 Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0042, t01=0x0162}
0x68b2…68c6 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0043, t01=0x0018}
0x68c6…68d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x002c}
0x68d0…68f4 Head {h00=0x0020, h01=0x0050, text=»* A3= ADDRESS IN VDU BUFFER «, t00=0x0043, t01=0x0036}
0x68f4…6910 Head {h00=0x0018, h01=0x0050, text=»* A4= REL CURSOR POS«, t00=0x0043, t01=0x005a}
0x6910…6932 Head {h00=0x001e, h01=0x0050, text=»* A5= LAST IN ROW REL POS «, t00=0x0043, t01=0x0076}
0x6932…695a Head {h00=0x0024, h01=0x0050, text=»* A6= INTERNAL LINE FLAG ADDRESS«, t00=0x0043, t01=0x0098}
0x695a…6970 Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x0043, t01=0x00c0}
0x6970…6986 Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x0043, t01=0x00d6}
0x6986…699e Head {h00=0x0014, h01=0x0050, text=»* A10= RESERFED «, t00=0x0043, t01=0x00ec}
0x699e…69be Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0043, t01=0x0104}
0x69be…69d6 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0043, t01=0x0124}
0x69d6…69e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x013c}
0x69e0…6a24 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0043, t01=0x0146}
0x6a24…6a36 Head {h00=0x000e, h01=0x0050, text=»LINE EQU *«, t00=0x0043, t01=0x018a}
0x6a36…6a54 Head {h00=0x001a, h01=0x0050, text=» CWR A5,A4 THIS LINE? «, t00=0x0044, t01=0x000c}
0x6a54…6a74 Head {h00=0x001c, h01=0x0050, text=» RF(G) LIN400 YES,MAYBE «, t00=0x0044, t01=0x002a}
0x6a74…6a88 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A10 «, t00=0x0044, t01=0x004a}
0x6a88…6ab2 Head {h00=0x0026, h01=0x0050, text=» ANK A1,ATTREC ATTRIBUTE RECEIVED?«, t00=0x0044, t01=0x005e}
0x6ab2…6aca Head {h00=0x0014, h01=0x0050, text=» RF(Z) LIN100 NO«, t00=0x0044, t01=0x0088}
0x6aca…6ae2 Head {h00=0x0014, h01=0x0050, text=» LC A1,LINFLG,A6«, t00=0x0044, t01=0x00a0}
0x6ae2…6af4 Head {h00=0x000e, h01=0x0050, text=» ORK A1,2 «, t00=0x0044, t01=0x00b8}
0x6af4…6b0c Head {h00=0x0014, h01=0x0050, text=» SC A1,LINFLG,A6«, t00=0x0044, t01=0x00ca}
0x6b0c…6b20 Head {h00=0x0010, h01=0x0050, text=»LIN100 EQU *«, t00=0x0044, t01=0x00e2}
0x6b20…6b34 Head {h00=0x0010, h01=0x0050, text=» SUR A6,A11 «, t00=0x0044, t01=0x00f6}
0x6b34…6b54 Head {h00=0x001c, h01=0x0050, text=» ADK A6,1 UPDATE ADDRESS«, t00=0x0044, t01=0x010a}
0x6b54…6b74 Head {h00=0x001c, h01=0x0050, text=» CWK A6,23 WRAP SCREEN? «, t00=0x0044, t01=0x012a}
0x6b74…6b8e Head {h00=0x0016, h01=0x0050, text=» RF(G) LIN300 YES «, t00=0x0044, t01=0x014a}
0x6b8e…6ba4 Head {h00=0x0012, h01=0x0050, text=» ADK A5,LLINE «, t00=0x0044, t01=0x0164}
0x6ba4…6bb8 Head {h00=0x0010, h01=0x0050, text=» ADR A6,A11 «, t00=0x0044, t01=0x017a}
0x6bb8…6bc8 Head {h00=0x000c, h01=0x0050, text=» RB LINE«, t00=0x0044, t01=0x018e}
0x6bc8…6bdc Head {h00=0x0010, h01=0x0050, text=»LIN300 EQU *«, t00=0x0045, t01=0x000e}
0x6bdc…6c00 Head {h00=0x0020, h01=0x0050, text=» LDK A4,0 FIRST SCREEN POS. «, t00=0x0045, t01=0x0022}
0x6c00…6c16 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,BVDU «, t00=0x0045, t01=0x0046}
0x6c16…6c2a Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x0045, t01=0x005c}
0x6c2a…6c3e Head {h00=0x0010, h01=0x0050, text=» LDR A6,A11 «, t00=0x0045, t01=0x0070}
0x6c3e…6c54 Head {h00=0x0012, h01=0x0050, text=» LDK A5,LLINE «, t00=0x0045, t01=0x0084}
0x6c54…6c68 Head {h00=0x0010, h01=0x0050, text=»LIN400 EQU *«, t00=0x0045, t01=0x009a}
0x6c68…6c7c Head {h00=0x0010, h01=0x0050, text=» SUR A5,A4 «, t00=0x0045, t01=0x00ae}
0x6c7c…6c8e Head {h00=0x000e, h01=0x0050, text=» CWK A5,81«, t00=0x0045, t01=0x00c2}
0x6c8e…6cae Head {h00=0x001c, h01=0x0050, text=» RF(L) LIN500 THIS LINE «, t00=0x0045, t01=0x00d4}
0x6cae…6cc4 Head {h00=0x0012, h01=0x0050, text=» LDK A5,LLINE «, t00=0x0045, t01=0x00f4}
0x6cc4…6cd8 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A11 «, t00=0x0045, t01=0x010a}
0x6cd8…6ce8 Head {h00=0x000c, h01=0x0050, text=» RB LINE«, t00=0x0045, t01=0x011e}
0x6ce8…6cfc Head {h00=0x0010, h01=0x0050, text=»LIN500 EQU *«, t00=0x0045, t01=0x012e}
0x6cfc…6d16 Head {h00=0x0016, h01=0x0050, text=» ADR A5,A4 RESTORE«, t00=0x0045, t01=0x0142}
0x6d16…6d26 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0045, t01=0x015c}
0x6d26…6d34 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x016c}
0x6d34…6d7a Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0045, t01=0x017a}
0x6d7a…6dc0 Head {h00=0x0042, h01=0x0050, text=»* * «, t00=0x0046, t01=0x0030}
0x6dc0…6e06 Head {h00=0x0042, h01=0x0050, text=»* LINATT UPADTE LINFLG AT ATTRIBUTE CHANGE * «, t00=0x0046, t01=0x0076}
0x6e06…6e4c Head {h00=0x0042, h01=0x0050, text=»* * «, t00=0x0046, t01=0x00bc}
0x6e4c…6e92 Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0046, t01=0x0102}
0x6e92…6ea6 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0046, t01=0x0148}
0x6ea6…6eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x015c}
0x6eb0…6ed4 Head {h00=0x0020, h01=0x0050, text=»* A3= ADDRESS IN VDU BUFFER «, t00=0x0046, t01=0x0166}
0x6ed4…6ef0 Head {h00=0x0018, h01=0x0050, text=»* A4= REL CURSOR POS«, t00=0x0046, t01=0x018a}
0x6ef0…6f12 Head {h00=0x001e, h01=0x0050, text=»* A5= LAST IN ROW REL POS «, t00=0x0047, t01=0x0016}
0x6f12…6f3a Head {h00=0x0024, h01=0x0050, text=»* A6= INTERNAL LINE FLAG ADDRESS«, t00=0x0047, t01=0x0038}
0x6f3a…6f50 Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x0047, t01=0x0060}
0x6f50…6f66 Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x0047, t01=0x0076}
0x6f66…6f7e Head {h00=0x0014, h01=0x0050, text=»* A10= RESERVED «, t00=0x0047, t01=0x008c}
0x6f7e…6f9e Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0047, t01=0x00a4}
0x6f9e…6fb6 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0047, t01=0x00c4}
0x6fb6…6fc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00dc}
0x6fc0…7006 Head {h00=0x0042, h01=0x0050, text=»**************************************************************«, t00=0x0047, t01=0x00e6}
0x7006…701a Head {h00=0x0010, h01=0x0050, text=»LINATT EQU *«, t00=0x0047, t01=0x012c}
0x701a…7030 Head {h00=0x0012, h01=0x0050, text=» CF A14,SAVE1 «, t00=0x0047, t01=0x0140}
0x7030…7044 Head {h00=0x0010, h01=0x0050, text=» SUR A6,A11 «, t00=0x0047, t01=0x0156}
0x7044…7056 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0047, t01=0x016a}
0x7056…706e Head {h00=0x0014, h01=0x0050, text=» LDR A10,A4 . =1«, t00=0x0047, t01=0x017c}
0x706e…7082 (72, 0, 400) Head {h00=0x0010, h01=0x0050, text=»LINA10 EQU *«, t00=0x0048, t01=0x0004}
0x7082…7094 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0048, t01=0x0018}
0x7094…70a6 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0048, t01=0x002a}
0x70a6…70c6 Head {h00=0x001c, h01=0x0050, text=» CWR A5,A4 END OF LINE? «, t00=0x0048, t01=0x003c}
0x70c6…70de Head {h00=0x0014, h01=0x0050, text=» RF(G) LINA30 NO«, t00=0x0048, t01=0x005c}
0x70de…70f2 Head {h00=0x0010, h01=0x0050, text=» ADR A6,A11 «, t00=0x0048, t01=0x0074}
0x70f2…710a Head {h00=0x0014, h01=0x0050, text=» LC A1,LINFLG,A6«, t00=0x0048, t01=0x0088}
0x710a…711c Head {h00=0x000e, h01=0x0050, text=» ORK A1,1 «, t00=0x0048, t01=0x00a0}
0x711c…7134 Head {h00=0x0014, h01=0x0050, text=» SC A1,LINFLG,A6«, t00=0x0048, t01=0x00b2}
0x7134…7148 Head {h00=0x0010, h01=0x0050, text=» SUR A6,A11 «, t00=0x0048, t01=0x00ca}
0x7148…715a Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0048, t01=0x00de}
0x715a…717a Head {h00=0x001c, h01=0x0050, text=» CWK A6,23 WRAP AROUND? «, t00=0x0048, t01=0x00f0}
0x717a…7194 Head {h00=0x0016, h01=0x0050, text=» RF(G) LINA20 YES «, t00=0x0048, t01=0x0110}
0x7194…71aa Head {h00=0x0012, h01=0x0050, text=» ADK A5,LLINE «, t00=0x0048, t01=0x012a}
0x71aa…71bc Head {h00=0x000e, h01=0x0050, text=» RF LINA30«, t00=0x0048, t01=0x0140}
0x71bc…71d0 Head {h00=0x0010, h01=0x0050, text=»LINA20 EQU *«, t00=0x0048, t01=0x0152}
0x71d0…71e2 Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x0048, t01=0x0166}
0x71e2…71f4 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0048, t01=0x0178}
0x71f4…720a Head {h00=0x0012, h01=0x0050, text=» LDKL A3,BVDU «, t00=0x0048, t01=0x018a}
0x720a…721e Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x0049, t01=0x0010}
0x721e…7234 Head {h00=0x0012, h01=0x0050, text=» LDK A5,LLINE «, t00=0x0049, t01=0x0024}
0x7234…7248 Head {h00=0x0010, h01=0x0050, text=»LINA30 EQU *«, t00=0x0049, t01=0x003a}
0x7248…726c Head {h00=0x0020, h01=0x0050, text=» CWR A4,A10 ALL CHECKED? =1 «, t00=0x0049, t01=0x004e}
0x726c…7288 Head {h00=0x0018, h01=0x0050, text=» RF(E) LINA40 YES =1«, t00=0x0049, t01=0x0072}
0x7288…729a Head {h00=0x000e, h01=0x0050, text=» LCR A2,A3«, t00=0x0049, t01=0x008e}
0x729a…72b8 Head {h00=0x001a, h01=0x0050, text=» CWK A2,/80 ATTRIBUTE «, t00=0x0049, t01=0x00a0}
0x72b8…72d2 Head {h00=0x0016, h01=0x0050, text=» RB(NG) LINA10 YES«, t00=0x0049, t01=0x00be}
0x72d2…72ec Head {h00=0x0016, h01=0x0050, text=»LINA40 EQU * . =1 «, t00=0x0049, t01=0x00d8}
0x72ec…7302 Head {h00=0x0012, h01=0x0050, text=» CF A14,REST1 «, t00=0x0049, t01=0x00f2}
0x7302…7312 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0049, t01=0x0108}
0x7312…7320 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x0118}
0x7320…7364 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0049, t01=0x0126}
0x7364…73a8 Head {h00=0x0040, h01=0x0050, text=»* * «, t00=0x0049, t01=0x016a}
0x73a8…73ec Head {h00=0x0040, h01=0x0050, text=»* NLROUT NEW LINE ROUTINE * «, t00=0x004a, t01=0x001e}
0x73ec…7430 Head {h00=0x0040, h01=0x0050, text=»* * «, t00=0x004a, t01=0x0062}
0x7430…7474 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x004a, t01=0x00a6}
0x7474…7488 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x004a, t01=0x00ea}
0x7488…7492 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00fe}
0x7492…74b4 Head {h00=0x001e, h01=0x0050, text=»* A3= ADDRES IN VDU BUFFER«, t00=0x004a, t01=0x0108}
0x74b4…74d0 Head {h00=0x0018, h01=0x0050, text=»* A4= REL CURSOR POS«, t00=0x004a, t01=0x012a}
0x74d0…74e6 Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x004a, t01=0x0146}
0x74e6…74fc Head {h00=0x0012, h01=0x0050, text=»* A6= RESERVED«, t00=0x004a, t01=0x015c}
0x74fc…7512 Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x004a, t01=0x0172}
0x7512…7528 Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x004a, t01=0x0188}
0x7528…7540 Head {h00=0x0014, h01=0x0050, text=»* A10= RESERVED «, t00=0x004b, t01=0x000e}
0x7540…7558 Head {h00=0x0014, h01=0x0050, text=»* A11= RESERVED «, t00=0x004b, t01=0x0026}
0x7558…7570 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x004b, t01=0x003e}
0x7570…757a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0056}
0x757a…75be Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x004b, t01=0x0060}
0x75be…75d2 Head {h00=0x0010, h01=0x0050, text=»NLROUT EQU *«, t00=0x004b, t01=0x00a4}
0x75d2…75f6 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A4 SAVE CURSOR POS. «, t00=0x004b, t01=0x00b8}
0x75f6…7628 Head {h00=0x002e, h01=0x0050, text=» CF A14,CRDOWN MOVE CURSOR ON E LINE DOWN «, t00=0x004b, t01=0x00dc}
0x7628…763a Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x004b, t01=0x010e}
0x763a…764e Head {h00=0x0010, h01=0x0050, text=»NLR100 EQU *«, t00=0x004b, t01=0x0120}
0x764e…767a Head {h00=0x0028, h01=0x0050, text=» SUK A4,LLINE COMPUTE LEFTMOST POS. «, t00=0x004b, t01=0x0134}
0x767a…7690 Head {h00=0x0012, h01=0x0050, text=» RF(N) NLR200 «, t00=0x004b, t01=0x0160}
0x7690…76a6 Head {h00=0x0012, h01=0x0050, text=» ADK A7,LLINE «, t00=0x004b, t01=0x0176}
0x76a6…76b8 Head {h00=0x000e, h01=0x0050, text=» RB NLR100«, t00=0x004b, t01=0x018c}
0x76b8…76cc Head {h00=0x0010, h01=0x0050, text=»NLR200 EQU *«, t00=0x004c, t01=0x000e}
0x76cc…76de Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x004c, t01=0x0022}
0x76de…76f2 Head {h00=0x0010, h01=0x0050, text=» LDK A2,NULL«, t00=0x004c, t01=0x0034}
0x76f2…7706 Head {h00=0x0010, h01=0x0050, text=»NLR300 EQU *«, t00=0x004c, t01=0x0048}
0x7706…7724 Head {h00=0x001a, h01=0x0050, text=» CWR A7,A4 ALL NULLED?«, t00=0x004c, t01=0x005c}
0x7724…773e Head {h00=0x0016, h01=0x0050, text=» RF(E) NLR900 YES «, t00=0x004c, t01=0x007a}
0x773e…7764 Head {h00=0x0022, h01=0x0050, text=» SCR A2,A3 NULL IN VDU BUFFER «, t00=0x004c, t01=0x0094}
0x7764…777c Head {h00=0x0014, h01=0x0050, text=» LC A1,LINFLG,A6«, t00=0x004c, t01=0x00ba}
0x777c…778e Head {h00=0x000e, h01=0x0050, text=» ORKL A1,1«, t00=0x004c, t01=0x00d2}
0x778e…77a6 Head {h00=0x0014, h01=0x0050, text=» SC A1,LINFLG,A6«, t00=0x004c, t01=0x00e4}
0x77a6…77b8 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x004c, t01=0x00fc}
0x77b8…77ca Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x004c, t01=0x010e}
0x77ca…77e0 Head {h00=0x0012, h01=0x0050, text=» CF A14,LINWRP«, t00=0x004c, t01=0x0120}
0x77e0…77f2 Head {h00=0x000e, h01=0x0050, text=» RB NLR300«, t00=0x004c, t01=0x0136}
0x77f2…7806 Head {h00=0x0010, h01=0x0050, text=»NLR900 EQU *«, t00=0x004c, t01=0x0148}
0x7806…7816 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x004c, t01=0x015c}
0x7816…7824 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x016c}
0x7824…7870 Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x004c, t01=0x017a}
0x7870…78bc Head {h00=0x0048, h01=0x0050, text=»* * «, t00=0x004d, t01=0x0036}
0x78bc…7908 Head {h00=0x0048, h01=0x0050, text=»* ERASE ERASE ENTIRE SCREEN * «, t00=0x004d, t01=0x0082}
0x7908…7954 Head {h00=0x0048, h01=0x0050, text=»* * «, t00=0x004d, t01=0x00ce}
0x7954…79a0 Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x004d, t01=0x011a}
0x79a0…79b4 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x004d, t01=0x0166}
0x79b4…79be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x017a}
0x79be…79d2 Head {h00=0x0010, h01=0x0050, text=»* A2= CHAR. «, t00=0x004d, t01=0x0184}
0x79d2…79f6 Head {h00=0x0020, h01=0x0050, text=»* A3= ADDRESS IN VDU-BUFFER «, t00=0x004e, t01=0x0008}
0x79f6…7a18 Head {h00=0x001e, h01=0x0050, text=»* A4= REL. CURSOR ADDRESS «, t00=0x004e, t01=0x002c}
0x7a18…7a38 Head {h00=0x001c, h01=0x0050, text=»* A5= REL ATTRIBUTE POS «, t00=0x004e, t01=0x004e}
0x7a38…7a54 Head {h00=0x0018, h01=0x0050, text=»* A6= ATTRIBUTE CHAR«, t00=0x004e, t01=0x006e}
0x7a54…7a74 Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x004e, t01=0x008a}
0x7a74…7a8c Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x004e, t01=0x00aa}
0x7a8c…7a96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00c2}
0x7a96…7ad8 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x004e, t01=0x00cc}
0x7ad8…7aec Head {h00=0x0010, h01=0x0050, text=»ERASE EQU * «, t00=0x004e, t01=0x010e}
0x7aec…7b10 Head {h00=0x0020, h01=0x0050, text=» LDK A4,0 FIRST SCREEN POS. «, t00=0x004e, t01=0x0122}
0x7b10…7b26 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,BVDU «, t00=0x004e, t01=0x0146}
0x7b26…7b3a Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x004e, t01=0x015c}
0x7b3a…7b60 Head {h00=0x0022, h01=0x0050, text=» LDK A2,NULL STORE NULL CHAR. «, t00=0x004e, t01=0x0170}
0x7b60…7b74 Head {h00=0x0010, h01=0x0050, text=»ERAS10 EQU *«, t00=0x004f, t01=0x0008}
0x7b74…7ba2 Head {h00=0x002a, h01=0x0050, text=» CWK A4,LBVDU+24 WHOLE SCREEN NULLED? «, t00=0x004f, t01=0x001c}
0x7ba2…7bbc Head {h00=0x0016, h01=0x0050, text=» RF(NL) ERAS20 YES«, t00=0x004f, t01=0x004a}
0x7bbc…7bda Head {h00=0x001a, h01=0x0050, text=» SCR A2,A3 STORE CHAR.«, t00=0x004f, t01=0x0064}
0x7bda…7bec Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x004f, t01=0x0082}
0x7bec…7bfe Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x004f, t01=0x0094}
0x7bfe…7c10 Head {h00=0x000e, h01=0x0050, text=» RB ERAS10«, t00=0x004f, t01=0x00a6}
0x7c10…7c24 Head {h00=0x0010, h01=0x0050, text=»ERAS20 EQU *«, t00=0x004f, t01=0x00b8}
0x7c24…7c48 Head {h00=0x0020, h01=0x0050, text=» LDK A4,0 FIRST SCREEN POS. «, t00=0x004f, t01=0x00cc}
0x7c48…7c74 Head {h00=0x0028, h01=0x0050, text=» LDKL A5,LBVDU+1 UNFORMATTED SCREEN «, t00=0x004f, t01=0x00f0}
0x7c74…7c86 Head {h00=0x000e, h01=0x0050, text=» LDK A6,0 «, t00=0x004f, t01=0x011c}
0x7c86…7cb4 Head {h00=0x002a, h01=0x0050, text=» CF A14,STOINF SAVE SCREEN INFORMATION«, t00=0x004f, t01=0x012e}
0x7cb4…7ccc Head {h00=0x0014, h01=0x0050, text=» LC A1,TCT01,A11«, t00=0x004f, t01=0x015c}
0x7ccc…7cf2 Head {h00=0x0022, h01=0x0050, text=» CCK A1,VDUCOD PRINTER UNPACK?«, t00=0x004f, t01=0x0174}
0x7cf2…7d0c Head {h00=0x0016, h01=0x0050, text=» RF(NE) ERAS30 YES«, t00=0x0050, t01=0x000a}
0x7d0c…7d26 Head {h00=0x0016, h01=0x0050, text=» LD A8,ECBVDU,A11 «, t00=0x0050, t01=0x0024}
0x7d26…7d46 Head {h00=0x001c, h01=0x0050, text=» LDK A2,'1' ERASE CHAR. «, t00=0x0050, t01=0x003e}
0x7d46…7d5e Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBBA,A8 «, t00=0x0050, t01=0x005e}
0x7d5e…7d72 Head {h00=0x0010, h01=0x0050, text=» SC A2,1,A1 «, t00=0x0050, t01=0x0076}
0x7d72…7d90 Head {h00=0x001a, h01=0x0050, text=» LDK A1,2 REQ. LENGTH «, t00=0x0050, t01=0x008a}
0x7d90…7da8 Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBRL,A8 «, t00=0x0050, t01=0x00a8}
0x7da8…7dc2 Head {h00=0x0016, h01=0x0050, text=» LDK A7,/86 WRITE «, t00=0x0050, t01=0x00c0}
0x7dc2…7dce Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0050, t01=0x00da}
0x7dce…7dde Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0050, t01=0x00e6}
0x7dde…7df2 Head {h00=0x0010, h01=0x0050, text=»ERAS30 EQU *«, t00=0x0050, t01=0x00f6}
0x7df2…7e02 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0050, t01=0x010a}
0x7e02…7e10 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0050, t01=0x011a}
0x7e10…7e52 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0050, t01=0x0128}
0x7e52…7e94 Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0050, t01=0x016a}
0x7e94…7ed6 Head {h00=0x003e, h01=0x0050, text=»* ERASUP ERASE ALL UNPROTECTED * «, t00=0x0051, t01=0x001c}
0x7ed6…7f18 Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0051, t01=0x005e}
0x7f18…7f5a Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0051, t01=0x00a0}
0x7f5a…7f6e Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0051, t01=0x00e2}
0x7f6e…7f78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00f6}
0x7f78…7f8c Head {h00=0x0010, h01=0x0050, text=»* A2= CHAR. «, t00=0x0051, t01=0x0100}
0x7f8c…7fb0 Head {h00=0x0020, h01=0x0050, text=»* A3= ADDRESS IN VDU-BUFFER «, t00=0x0051, t01=0x0114}
0x7fb0…7fce Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x0051, t01=0x0138}
0x7fce…7ff0 Head {h00=0x001e, h01=0x0050, text=»* A5= REL. ATTRIBUTE POS. «, t00=0x0051, t01=0x0156}
0x7ff0…8018 Head {h00=0x0024, h01=0x0050, text=»* A6= INTERNAL LINE FLAG ADDRESS«, t00=0x0051, t01=0x0178}
0x8018…8038 Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0052, t01=0x0010}
0x8038…8050 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0052, t01=0x0030}
0x8050…805a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0048}
0x805a…809c Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0052, t01=0x0052}
0x809c…80b0 Head {h00=0x0010, h01=0x0050, text=»ERASUP EQU *«, t00=0x0052, t01=0x0094}
0x80b0…80d6 Head {h00=0x0022, h01=0x0050, text=» LDK A1,2 RESTORE KEYBOARD-BIT«, t00=0x0052, t01=0x00a8}
0x80d6…80ec Head {h00=0x0012, h01=0x0050, text=» ST A1,WCC,A11«, t00=0x0052, t01=0x00ce}
0x80ec…8110 Head {h00=0x0020, h01=0x0050, text=» LDK A4,0 FIRST SCREEN POS. «, t00=0x0052, t01=0x00e4}
0x8110…8126 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,BVDU «, t00=0x0052, t01=0x0108}
0x8126…813a Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x0052, t01=0x011e}
0x813a…8160 Head {h00=0x0022, h01=0x0050, text=» LDK A7,NULL STORE NULL CHAR. «, t00=0x0052, t01=0x0132}
0x8160…818c Head {h00=0x0028, h01=0x0050, text=» CWK A5,LBVDU+1 UNFORMATTED SCREEN? «, t00=0x0052, t01=0x0158}
0x818c…81a6 Head {h00=0x0016, h01=0x0050, text=» RF(NE) ERUP10 NO «, t00=0x0052, t01=0x0184}
0x81a6…81bc Head {h00=0x0012, h01=0x0050, text=» CF A14,ERASE «, t00=0x0053, t01=0x000e}
0x81bc…81ce Head {h00=0x000e, h01=0x0050, text=» RF ERUP90«, t00=0x0053, t01=0x0024}
0x81ce…81e2 Head {h00=0x0010, h01=0x0050, text=»ERUP10 EQU *«, t00=0x0053, t01=0x0036}
0x81e2…81fe Head {h00=0x0018, h01=0x0050, text=» LCR A2,A3 GET CHAR.«, t00=0x0053, t01=0x004a}
0x81fe…821e Head {h00=0x001c, h01=0x0050, text=» CCK A2,/8000 ATTRIBUTE?«, t00=0x0053, t01=0x0066}
0x821e…8238 Head {h00=0x0016, h01=0x0050, text=» RF(NL) ERUP20 YES«, t00=0x0053, t01=0x0086}
0x8238…824a Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0053, t01=0x00a0}
0x824a…825c Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0053, t01=0x00b2}
0x825c…826e Head {h00=0x000e, h01=0x0050, text=» RB ERUP10«, t00=0x0053, t01=0x00c4}
0x826e…8282 Head {h00=0x0010, h01=0x0050, text=»ERUP20 EQU *«, t00=0x0053, t01=0x00d6}
0x8282…82aa Head {h00=0x0024, h01=0x0050, text=» LDR A9,A4 FIRST ATTRIBUTE POS. «, t00=0x0053, t01=0x00ea}
0x82aa…82c0 Head {h00=0x0012, h01=0x0050, text=» LDK A5,LLINE «, t00=0x0053, t01=0x0112}
0x82c0…82d4 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A11 «, t00=0x0053, t01=0x0128}
0x82d4…82e8 Head {h00=0x0010, h01=0x0050, text=» SUR A10,A10«, t00=0x0053, t01=0x013c}
0x82e8…82fc Head {h00=0x0010, h01=0x0050, text=» CF A14,LINE«, t00=0x0053, t01=0x0150}
0x82fc…830e Head {h00=0x000e, h01=0x0050, text=» RF ERUP47«, t00=0x0053, t01=0x0164}
0x830e…8322 Head {h00=0x0010, h01=0x0050, text=»ERUP30 EQU *«, t00=0x0053, t01=0x0176}
0x8322…8334 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0053, t01=0x018a}
0x8334…8346 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0054, t01=0x000c}
0x8346…8374 Head {h00=0x002a, h01=0x0050, text=» CF A14,LINWRP CHECK IF LINWRP AROUND «, t00=0x0054, t01=0x001e}
0x8374…8390 Head {h00=0x0018, h01=0x0050, text=» LCR A2,A3 GET CHAR.«, t00=0x0054, t01=0x004c}
0x8390…83b0 Head {h00=0x001c, h01=0x0050, text=» CCK A2,/8000 ATTRIBUTE?«, t00=0x0054, t01=0x0068}
0x83b0…83c8 Head {h00=0x0014, h01=0x0050, text=» RB(L) ERUP30 NO«, t00=0x0054, t01=0x0088}
0x83c8…83dc Head {h00=0x0010, h01=0x0050, text=»ERUP45 EQU *«, t00=0x0054, t01=0x00a0}
0x83dc…83fc Head {h00=0x001c, h01=0x0050, text=» CWR A9,A4 ALL SCANNED? «, t00=0x0054, t01=0x00b4}
0x83fc…8416 Head {h00=0x0016, h01=0x0050, text=» RF(E) ERUP70 YES «, t00=0x0054, t01=0x00d4}
0x8416…842a Head {h00=0x0010, h01=0x0050, text=»ERUP47 EQU *«, t00=0x0054, t01=0x00ee}
0x842a…843c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0054, t01=0x0102}
0x843c…845a Head {h00=0x001a, h01=0x0050, text=» ANK A1,/20 PROTECTED?«, t00=0x0054, t01=0x0114}
0x845a…8474 Head {h00=0x0016, h01=0x0050, text=» RB(NZ) ERUP30 YES«, t00=0x0054, t01=0x0132}
0x8474…8496 Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FE RESET MDT-BIT «, t00=0x0054, t01=0x014c}
0x8496…84b8 Head {h00=0x001e, h01=0x0050, text=» SCR A2,A3 SAVE ATTRIBUTE «, t00=0x0054, t01=0x016e}
0x84b8…84d0 Head {h00=0x0014, h01=0x0050, text=» LC A1,LINFLG,A6«, t00=0x0054, t01=0x0190}
0x84d0…84e2 Head {h00=0x000e, h01=0x0050, text=» ORK A1,1 «, t00=0x0055, t01=0x0018}
0x84e2…84fa Head {h00=0x0014, h01=0x0050, text=» SC A1,LINFLG,A6«, t00=0x0055, t01=0x002a}
0x84fa…850c Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0055, t01=0x0042}
0x850c…851e Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0055, t01=0x0054}
0x851e…8532 Head {h00=0x0010, h01=0x0050, text=»ERUP50 EQU *«, t00=0x0055, t01=0x0066}
0x8532…8560 Head {h00=0x002a, h01=0x0050, text=» CF A14,LINWRP CHECK IF LINWRP AROUND «, t00=0x0055, t01=0x007a}
0x8560…857c Head {h00=0x0018, h01=0x0050, text=» LCR A2,A3 GET CHAR.«, t00=0x0055, t01=0x00a8}
0x857c…859c Head {h00=0x001c, h01=0x0050, text=» CCK A2,/8000 ATTRIBUTE?«, t00=0x0055, t01=0x00c4}
0x859c…85b6 Head {h00=0x0016, h01=0x0050, text=» RB(NL) ERUP45 YES«, t00=0x0055, t01=0x00e4}
0x85b6…85e8 Head {h00=0x002e, h01=0x0050, text=» SCR A7,A3 STORE NULL CHAR. IN VDU BUFFER «, t00=0x0055, t01=0x00fe}
0x85e8…8600 Head {h00=0x0014, h01=0x0050, text=» LC A1,LINFLG,A6«, t00=0x0055, t01=0x0130}
0x8600…8612 Head {h00=0x000e, h01=0x0050, text=» ORK A1,1 «, t00=0x0055, t01=0x0148}
0x8612…862a Head {h00=0x0014, h01=0x0050, text=» SC A1,LINFLG,A6«, t00=0x0055, t01=0x015a}
0x862a…863c Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0055, t01=0x0172}
0x863c…864e Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0055, t01=0x0184}
0x864e…8660 Head {h00=0x000e, h01=0x0050, text=» RB ERUP50«, t00=0x0056, t01=0x0008}
0x8660…8674 Head {h00=0x0010, h01=0x0050, text=»ERUP70 EQU *«, t00=0x0056, t01=0x001a}
0x8674…86ac Head {h00=0x0034, h01=0x0050, text=» CF A14,RDHOME TAB. UNPROTECTED FIRST ON SCREEN «, t00=0x0056, t01=0x002e}
0x86ac…86c0 Head {h00=0x0010, h01=0x0050, text=»ERUP90 EQU *«, t00=0x0056, t01=0x0066}
0x86c0…86d0 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0056, t01=0x007a}
0x86d0…86de Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0056, t01=0x008a}
0x86de…8726 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0056, t01=0x0098}
0x8726…8730 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00e0}
0x8730…8778 Head {h00=0x0044, h01=0x0050, text=»* ERASUA ERASE UNPROTECTED TO ADDRESS *«, t00=0x0056, t01=0x00ea}
0x8778…87c0 Head {h00=0x0044, h01=0x0050, text=»* *«, t00=0x0056, t01=0x0132}
0x87c0…8808 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0056, t01=0x017a}
0x8808…881c Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0057, t01=0x0032}
0x881c…8826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0046}
0x8826…8840 Head {h00=0x0016, h01=0x0050, text=»* A1= STOP ADDRESS«, t00=0x0057, t01=0x0050}
0x8840…8854 Head {h00=0x0010, h01=0x0050, text=»* A2= CHAR. «, t00=0x0057, t01=0x006a}
0x8854…8878 Head {h00=0x0020, h01=0x0050, text=»* A3= ADDRESS IN VDU-BUFFER «, t00=0x0057, t01=0x007e}
0x8878…8896 Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x0057, t01=0x00a2}
0x8896…88b6 Head {h00=0x001c, h01=0x0050, text=»* A5= REL ATTRIBUTE POS.«, t00=0x0057, t01=0x00c0}
0x88b6…88d4 Head {h00=0x001a, h01=0x0050, text=»* A6= ATTRIBUTE CHAR. «, t00=0x0057, t01=0x00e0}
0x88d4…88ec Head {h00=0x0014, h01=0x0050, text=»* A7= NULL CHAR.«, t00=0x0057, t01=0x00fe}
0x88ec…890c Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0057, t01=0x0116}
0x890c…8924 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0057, t01=0x0136}
0x8924…892e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x014e}
0x892e…8976 Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0057, t01=0x0158}
0x8976…898a Head {h00=0x0010, h01=0x0050, text=»ERASUA EQU *«, t00=0x0058, t01=0x0010}
0x898a…89b0 Head {h00=0x0022, h01=0x0050, text=» LDK A7,NULL STORE NULL CHAR. «, t00=0x0058, t01=0x0024}
0x89b0…89c6 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,BVDU «, t00=0x0058, t01=0x004a}
0x89c6…89da Head {h00=0x0010, h01=0x0050, text=» ADR A3,A11 «, t00=0x0058, t01=0x0060}
0x89da…89f8 Head {h00=0x001a, h01=0x0050, text=» ADR A3,A4 BUFFER POS.«, t00=0x0058, t01=0x0074}
0x89f8…8a24 Head {h00=0x0028, h01=0x0050, text=» CWK A5,LBVDU+1 UNFORMATTED SCREEN? «, t00=0x0058, t01=0x0092}
0x8a24…8a3e Head {h00=0x0016, h01=0x0050, text=» RF(E) ERUA47 YES «, t00=0x0058, t01=0x00be}
0x8a3e…8a66 Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 GET CURRENT ATTRIBUTE«, t00=0x0058, t01=0x00d8}
0x8a66…8a90 Head {h00=0x0026, h01=0x0050, text=» CWR A5,A4 STANDING ON ATTRIBUTE? «, t00=0x0058, t01=0x0100}
0x8a90…8aaa Head {h00=0x0016, h01=0x0050, text=» RF(NE) ERUA10 NO «, t00=0x0058, t01=0x012a}
0x8aaa…8abc Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0058, t01=0x0144}
0x8abc…8ace Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0058, t01=0x0156}
0x8ace…8aec Head {h00=0x001a, h01=0x0050, text=» CWR A1,A4 ALL NULLED?«, t00=0x0058, t01=0x0168}
0x8aec…8b06 Head {h00=0x0016, h01=0x0050, text=» RF(E) ERUA70 YES «, t00=0x0058, t01=0x0186}
0x8b06…8b30 Head {h00=0x0026, h01=0x0050, text=» CF A14,WRAP CHECK IF WRAP AROUND «, t00=0x0059, t01=0x0010}
0x8b30…8b44 Head {h00=0x0010, h01=0x0050, text=»ERUA10 EQU *«, t00=0x0059, t01=0x003a}
0x8b44…8b68 Head {h00=0x0020, h01=0x0050, text=» ANK A2,/20 PROTECTED FIELD?«, t00=0x0059, t01=0x004e}
0x8b68…8b80 Head {h00=0x0014, h01=0x0050, text=» RF(Z) ERUA47 NO«, t00=0x0059, t01=0x0072}
0x8b80…8b94 Head {h00=0x0010, h01=0x0050, text=»ERUA30 EQU *«, t00=0x0059, t01=0x008a}
0x8b94…8bbe Head {h00=0x0026, h01=0x0050, text=» CF A14,WRAP CHECK IF WRAP AROUND «, t00=0x0059, t01=0x009e}
0x8bbe…8bda Head {h00=0x0018, h01=0x0050, text=» LCR A2,A3 GET CHAR.«, t00=0x0059, t01=0x00c8}
0x8bda…8bec Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0059, t01=0x00e4}
0x8bec…8bfe Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0059, t01=0x00f6}
0x8bfe…8c1c Head {h00=0x001a, h01=0x0050, text=» CWR A1,A4 ALL NULLED?«, t00=0x0059, t01=0x0108}
0x8c1c…8c36 Head {h00=0x0016, h01=0x0050, text=» RF(E) ERUA70 YES «, t00=0x0059, t01=0x0126}
0x8c36…8c56 Head {h00=0x001c, h01=0x0050, text=» CCK A2,/8000 ATTRIBUTE?«, t00=0x0059, t01=0x0140}
0x8c56…8c6e Head {h00=0x0014, h01=0x0050, text=» RB(L) ERUA30 NO«, t00=0x0059, t01=0x0160}
0x8c6e…8c82 Head {h00=0x0010, h01=0x0050, text=»ERUA45 EQU *«, t00=0x0059, t01=0x0178}
0x8c82…8c94 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x0059, t01=0x018c}
0x8c94…8cb4 Head {h00=0x001c, h01=0x0050, text=» ANKL A8,/20 PROTECTED? «, t00=0x005a, t01=0x000e}
0x8cb4…8cce Head {h00=0x0016, h01=0x0050, text=» RB(NZ) ERUA30 YES«, t00=0x005a, t01=0x002e}
0x8cce…8ce2 Head {h00=0x0010, h01=0x0050, text=»ERUA47 EQU *«, t00=0x005a, t01=0x0048}
0x8ce2…8cf6 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A11 «, t00=0x005a, t01=0x005c}
0x8cf6…8d0c Head {h00=0x0012, h01=0x0050, text=» LDK A5,LLINE «, t00=0x005a, t01=0x0070}
0x8d0c…8d1e Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x005a, t01=0x0086}
0x8d1e…8d32 Head {h00=0x0010, h01=0x0050, text=» CF A14,LINE«, t00=0x005a, t01=0x0098}
0x8d32…8d44 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A8«, t00=0x005a, t01=0x00ac}
0x8d44…8d56 Head {h00=0x000e, h01=0x0050, text=» RF ERUA60«, t00=0x005a, t01=0x00be}
0x8d56…8d6a Head {h00=0x0010, h01=0x0050, text=»ERUA50 EQU *«, t00=0x005a, t01=0x00d0}
0x8d6a…8d7c Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x005a, t01=0x00e4}
0x8d7c…8d92 Head {h00=0x0012, h01=0x0050, text=» CF A14,LINWRP«, t00=0x005a, t01=0x00f6}
0x8d92…8da4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A8«, t00=0x005a, t01=0x010c}
0x8da4…8dc2 Head {h00=0x001a, h01=0x0050, text=» CWR A1,A4 ALL NULLED?«, t00=0x005a, t01=0x011e}
0x8dc2…8ddc Head {h00=0x0016, h01=0x0050, text=» RF(E) ERUA70 YES «, t00=0x005a, t01=0x013c}
0x8ddc…8df0 Head {h00=0x0010, h01=0x0050, text=»ERUA60 EQU *«, t00=0x005a, t01=0x0156}
0x8df0…8e0c Head {h00=0x0018, h01=0x0050, text=» LCR A2,A3 GET CHAR.«, t00=0x005a, t01=0x016a}
0x8e0c…8e2c Head {h00=0x001c, h01=0x0050, text=» CCK A2,/8000 ATTRIBUTE?«, t00=0x005a, t01=0x0186}
0x8e2c…8e46 Head {h00=0x0016, h01=0x0050, text=» RB(NL) ERUA45 YES«, t00=0x005b, t01=0x0016}
0x8e46…8e78 Head {h00=0x002e, h01=0x0050, text=» SCR A7,A3 STORE NULL CHAR, IN VDU-BUFFER «, t00=0x005b, t01=0x0030}
0x8e78…8e90 Head {h00=0x0014, h01=0x0050, text=» LC A8,LINFLG,A6«, t00=0x005b, t01=0x0062}
0x8e90…8ea2 Head {h00=0x000e, h01=0x0050, text=» ORKL A8,1«, t00=0x005b, t01=0x007a}
0x8ea2…8eba Head {h00=0x0014, h01=0x0050, text=» SC A8,LINFLG,A6«, t00=0x005b, t01=0x008c}
0x8eba…8ecc Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x005b, t01=0x00a4}
0x8ecc…8ede Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x005b, t01=0x00b6}
0x8ede…8ef0 Head {h00=0x000e, h01=0x0050, text=» RB ERUA50«, t00=0x005b, t01=0x00c8}
0x8ef0…8f04 Head {h00=0x0010, h01=0x0050, text=»ERUA70 EQU *«, t00=0x005b, t01=0x00da}
0x8f04…8f14 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x005b, t01=0x00ee}
0x8f14…8f22 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005b, t01=0x00fe}
0x8f22…8f64 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x005b, t01=0x010c}
0x8f64…8fa6 Head {h00=0x003e, h01=0x0050, text=»* *«, t00=0x005b, t01=0x014e}
0x8fa6…8fe8 Head {h00=0x003e, h01=0x0050, text=»* POSUNP MOVE CURSOR TO NEXT UNPR. POS. *«, t00=0x005b, t01=0x0190}
0x8fe8…902a Head {h00=0x003e, h01=0x0050, text=»* *«, t00=0x005c, t01=0x0042}
0x902a…906c Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x005c, t01=0x0084}
0x906c…9080 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x005c, t01=0x00c6}
0x9080…908a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00da}
0x908a…90a0 Head {h00=0x0012, h01=0x0050, text=»* A2= RESERVED«, t00=0x005c, t01=0x00e4}
0x90a0…90be Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x005c, t01=0x00fa}
0x90be…90e0 Head {h00=0x001e, h01=0x0050, text=»* A5= REL. ATTRIBUTE POS. «, t00=0x005c, t01=0x0118}
0x90e0…90fc Head {h00=0x0018, h01=0x0050, text=»* A6= ATTRIBUTE CHAR«, t00=0x005c, t01=0x013a}
0x90fc…911c Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x005c, t01=0x0156}
0x911c…9134 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x005c, t01=0x0176}
0x9134…913e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x018e}
0x913e…9182 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x005d, t01=0x0008}
0x9182…9196 Head {h00=0x0010, h01=0x0050, text=»POSUNP EQU *«, t00=0x005d, t01=0x004c}
0x9196…91ba Head {h00=0x0020, h01=0x0050, text=» CWK A4,LBVDU-1 WRAP AROUND?«, t00=0x005d, t01=0x0060}
0x91ba…91d4 Head {h00=0x0016, h01=0x0050, text=» RF(NG) POSU20 NO «, t00=0x005d, t01=0x0084}
0x91d4…91fa Head {h00=0x0022, h01=0x0050, text=» LDK A4,0 FIRST POS. ON SCREEN«, t00=0x005d, t01=0x009e}
0x91fa…9212 Head {h00=0x0014, h01=0x0050, text=» ST A4,PCURS,A11«, t00=0x005d, t01=0x00c4}
0x9212…9226 Head {h00=0x0010, h01=0x0050, text=»POSU20 EQU *«, t00=0x005d, t01=0x00dc}
0x9226…9238 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x005d, t01=0x00f0}
0x9238…9266 Head {h00=0x002a, h01=0x0050, text=» CF A14,GETVDU GET CHAR IN VDU BUFFER «, t00=0x005d, t01=0x0102}
0x9266…9286 Head {h00=0x001c, h01=0x0050, text=» CCK A7,/8000 ATTRIBUTE?«, t00=0x005d, t01=0x0130}
0x9286…929e Head {h00=0x0014, h01=0x0050, text=» RF(L) POSU30 NO«, t00=0x005d, t01=0x0150}
0x929e…92b0 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A7«, t00=0x005d, t01=0x0168}
0x92b0…92c4 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/30 «, t00=0x005d, t01=0x017a}
0x92c4…92ee Head {h00=0x0026, h01=0x0050, text=» CWK A7,/30 PROTECTED AND NUMERIC?«, t00=0x005d, t01=0x018e}
0x92ee…9308 Head {h00=0x0016, h01=0x0050, text=» RF(E) POSU25 YES «, t00=0x005e, t01=0x0028}
0x9308…931a Head {h00=0x000e, h01=0x0050, text=» LDR A5,A1«, t00=0x005e, t01=0x0042}
0x931a…933c Head {h00=0x001e, h01=0x0050, text=» IM PCURS,A11 MOVE CURSOR «, t00=0x005e, t01=0x0054}
0x933c…934e Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x005e, t01=0x0076}
0x934e…9372 Head {h00=0x0020, h01=0x0050, text=» CWK A4,LBVDU-1 WRAP AROUND?«, t00=0x005e, t01=0x0088}
0x9372…938c Head {h00=0x0016, h01=0x0050, text=» RF(NG) POSU23 NO «, t00=0x005e, t01=0x00ac}
0x938c…939e Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x005e, t01=0x00c6}
0x939e…93b2 Head {h00=0x0010, h01=0x0050, text=»POSU23 EQU *«, t00=0x005e, t01=0x00d8}
0x93b2…93e0 Head {h00=0x002a, h01=0x0050, text=» CF A14,STOINF SAVE SCREEN INFORMATION«, t00=0x005e, t01=0x00ec}
0x93e0…93fe Head {h00=0x001a, h01=0x0050, text=» LDK A1,2 REQ. LENGTH «, t00=0x005e, t01=0x011a}
0x93fe…9420 Head {h00=0x001e, h01=0x0050, text=» CF A14,DISCHA SET CURSOR «, t00=0x005e, t01=0x0138}
0x9420…9432 Head {h00=0x000e, h01=0x0050, text=» RF POSU30«, t00=0x005e, t01=0x015a}
0x9432…9446 Head {h00=0x0010, h01=0x0050, text=»POSU25 EQU *«, t00=0x005e, t01=0x016c}
0x9446…9474 Head {h00=0x002a, h01=0x0050, text=» CF A14,TAB TAB NEXT UNPROTECTED FIELD«, t00=0x005e, t01=0x0180}
0x9474…9488 Head {h00=0x0010, h01=0x0050, text=»POSU30 EQU *«, t00=0x005f, t01=0x001e}
0x9488…94a2 Head {h00=0x0016, h01=0x0050, text=» LD A8,ECBVDU,A11 «, t00=0x005f, t01=0x0032}
0x94a2…94ba Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBCW,A8 «, t00=0x005f, t01=0x004c}
0x94ba…94d8 Head {h00=0x001a, h01=0x0050, text=» ANK A1,/FF LINE POS. «, t00=0x005f, t01=0x0064}
0x94d8…94fe Head {h00=0x0022, h01=0x0050, text=» SUK A1,81 LAST POS. ON LINE? «, t00=0x005f, t01=0x0082}
0x94fe…9518 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) POSU90 NO «, t00=0x005f, t01=0x00a8}
0x9518…9536 Head {h00=0x001a, h01=0x0050, text=» LDK A1,2 REQ. LENGTH «, t00=0x005f, t01=0x00c2}
0x9536…9558 Head {h00=0x001e, h01=0x0050, text=» CF A14,DISCHA SET CURSOR «, t00=0x005f, t01=0x00e0}
0x9558…956c Head {h00=0x0010, h01=0x0050, text=»POSU90 EQU *«, t00=0x005f, t01=0x0102}
0x956c…957c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x005f, t01=0x0116}
0x957c…958a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x0126}
0x958a…95ce Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x005f, t01=0x0134}
0x95ce…9612 Head {h00=0x0040, h01=0x0050, text=»* *«, t00=0x005f, t01=0x0178}
0x9612…9656 Head {h00=0x0040, h01=0x0050, text=»* DISID DISPLAY HARDCOPY TASKID *«, t00=0x0060, t01=0x002c}
0x9656…969a Head {h00=0x0040, h01=0x0050, text=»* *«, t00=0x0060, t01=0x0070}
0x969a…96de Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0060, t01=0x00b4}
0x96de…96fe Head {h00=0x001c, h01=0x0050, text=»* REGISTERS«, t00=0x0060, t01=0x00f8}
0x96fe…9708 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0118}
0x9708…9712 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0122}
0x9712…9756 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0060, t01=0x012c}
0x9756…976a Head {h00=0x0010, h01=0x0050, text=»DISID EQU * «, t00=0x0060, t01=0x0170}
0x976a…9784 Head {h00=0x0016, h01=0x0050, text=» LD A8,ECBVDU,A11 «, t00=0x0060, t01=0x0184}
0x9784…97ae Head {h00=0x0026, h01=0x0050, text=» CF A14,SPACES SPACE IN ECB BUFFER«, t00=0x0061, t01=0x000e}
0x97ae…97d8 Head {h00=0x0026, h01=0x0050, text=» LD A3,6,A13 GET COMMON BLOCK BASE«, t00=0x0061, t01=0x0038}
0x97d8…97f8 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A5 SAVE TASK ID «, t00=0x0061, t01=0x0062}
0x97f8…980e Head {h00=0x0012, h01=0x0050, text=» LDK A5,IDTEXT«, t00=0x0061, t01=0x0082}
0x980e…9832 Head {h00=0x0020, h01=0x0050, text=» ADR A5,A3 POINT ON IDBUFFER«, t00=0x0061, t01=0x0098}
0x9832…9844 Head {h00=0x000e, h01=0x0050, text=» ADK A6,46«, t00=0x0061, t01=0x00bc}
0x9844…9856 Head {h00=0x000e, h01=0x0050, text=» LDK A3,6 «, t00=0x0061, t01=0x00ce}
0x9856…987a Head {h00=0x0020, h01=0x0050, text=» ANK A4,1 PRINTER OPERABLE? «, t00=0x0061, t01=0x00e0}
0x987a…9894 Head {h00=0x0016, h01=0x0050, text=» RF(Z) DISI10 YES «, t00=0x0061, t01=0x0104}
0x9894…98a6 Head {h00=0x000e, h01=0x0050, text=» ADK A3,16«, t00=0x0061, t01=0x011e}
0x98a6…98ba Head {h00=0x0010, h01=0x0050, text=»DISI10 EQU *«, t00=0x0061, t01=0x0130}
0x98ba…98e0 Head {h00=0x0022, h01=0x0050, text=» SUK A3,2 MOVE INTO ECBBUFFER «, t00=0x0061, t01=0x0144}
0x98e0…9900 Head {h00=0x001c, h01=0x0050, text=» RF(N) DISI20 COMPLETED «, t00=0x0061, t01=0x016a}
0x9900…9914 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A5 «, t00=0x0061, t01=0x018a}
0x9914…9926 Head {h00=0x000e, h01=0x0050, text=» STR A2,A6«, t00=0x0062, t01=0x000e}
0x9926…9938 Head {h00=0x000e, h01=0x0050, text=» ADK A5,2 «, t00=0x0062, t01=0x0020}
0x9938…994a Head {h00=0x000e, h01=0x0050, text=» ADK A6,2 «, t00=0x0062, t01=0x0032}
0x994a…995c Head {h00=0x000e, h01=0x0050, text=» RB DISI10«, t00=0x0062, t01=0x0044}
0x995c…9970 Head {h00=0x0010, h01=0x0050, text=»DISI20 EQU *«, t00=0x0062, t01=0x0056}
0x9970…9988 Head {h00=0x0014, h01=0x0050, text=» LD A6,ECBBA,A8 «, t00=0x0062, t01=0x006a}
0x9988…99ba Head {h00=0x002e, h01=0x0050, text=» ST A1,ECBBA+52,A6 SAVE TASK ID IN BUFFER «, t00=0x0062, t01=0x0082}
0x99ba…99e4 Head {h00=0x0026, h01=0x0050, text=» LC A2,X'1F' HIGH INTENSITY CHAR. «, t00=0x0062, t01=0x00b4}
0x99e4…99fe Head {h00=0x0016, h01=0x0050, text=» SC A2,ECBBA+45,A6«, t00=0x0062, t01=0x00de}
0x99fe…9a2a Head {h00=0x0028, h01=0x0050, text=» LDKL A10,1 INDICATE NOT ONLY SPACES«, t00=0x0062, t01=0x00f8}
0x9a2a…9a4e Head {h00=0x0020, h01=0x0050, text=» LDKL A9,1 1 INTENSITY CHAR.«, t00=0x0062, t01=0x0124}
0x9a4e…9a7a Head {h00=0x0028, h01=0x0050, text=» LDKL A2,X'1801' DISPLAY ON LAST ROW«, t00=0x0062, t01=0x0148}
0x9a7a…9a92 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0062, t01=0x0174}
0x9a92…9abc Head {h00=0x0026, h01=0x0050, text=» CF A14,DISLIN DISPLAY IDENT TEXT «, t00=0x0062, t01=0x018c}
0x9abc…9acc Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0063, t01=0x0026}
0x9acc…9ada Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x0036}
0x9ada…9b20 Head {h00=0x0042, h01=0x0050, text=»**************************************************************«, t00=0x0063, t01=0x0044}
0x9b20…9b2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x008a}
0x9b2a…9b4e Head {h00=0x0020, h01=0x0050, text=»* DISSTA DISPLAY STATISTICS «, t00=0x0063, t01=0x0094}
0x9b4e…9b58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00b8}
0x9b58…9ba0 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0063, t01=0x00c2}
0x9ba0…9bba Head {h00=0x0016, h01=0x0050, text=»* REGISTERS«, t00=0x0063, t01=0x010a}
0x9bba…9bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0124}
0x9bc4…9bce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x012e}
0x9bce…9c16 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0063, t01=0x0138}
0x9c16…9c2a Head {h00=0x0010, h01=0x0050, text=»DISSTA EQU *«, t00=0x0063, t01=0x0180}
0x9c2a…9c3e (100, 0, 398) Head {h00=0x0010, h01=0x0050, text=» IFT TEST=1 «, t00=0x0064, t01=0x0004}
0x9c3e…9c58 Head {h00=0x0016, h01=0x0050, text=» LD A8,ECBVDU,A11 «, t00=0x0064, t01=0x0018}
0x9c58…9c7e Head {h00=0x0022, h01=0x0050, text=» LDK A1,STALIN WHERE TO START «, t00=0x0064, t01=0x0032}
0x9c7e…9c90 Head {h00=0x000e, h01=0x0050, text=» SLL A1,8 «, t00=0x0064, t01=0x0058}
0x9c90…9ca2 Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0064, t01=0x006a}
0x9ca2…9ccc Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 FIRST POS. ON THAT LINE«, t00=0x0064, t01=0x007c}
0x9ccc…9ce4 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0064, t01=0x00a6}
0x9ce4…9d0c Head {h00=0x0024, h01=0x0050, text=» CF A14,SPACES CLEAN THE BUFFER «, t00=0x0064, t01=0x00be}
0x9d0c…9d2a Head {h00=0x001a, h01=0x0050, text=» LDK A5,0 RESET INDEX «, t00=0x0064, t01=0x00e6}
0x9d2a…9d3e Head {h00=0x0010, h01=0x0050, text=» LD A3,6,A13«, t00=0x0064, t01=0x0104}
0x9d3e…9d62 Head {h00=0x0020, h01=0x0050, text=» ADK A3,STATXT POINT TO TEXT«, t00=0x0064, t01=0x0118}
0x9d62…9d76 Head {h00=0x0010, h01=0x0050, text=»DISS10 EQU *«, t00=0x0064, t01=0x013c}
0x9d76…9d98 Head {h00=0x001e, h01=0x0050, text=» LDK A2,/1F HIGH INTENSITY«, t00=0x0064, t01=0x0150}
0x9d98…9daa Head {h00=0x000e, h01=0x0050, text=» SCR A2,A6«, t00=0x0064, t01=0x0172}
0x9daa…9dbc Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0064, t01=0x0184}
0x9dbc…9dce Head {h00=0x000e, h01=0x0050, text=» LDKL A9,1«, t00=0x0065, t01=0x0008}
0x9dce…9dfe Head {h00=0x002c, h01=0x0050, text=» LDK A1,TXTSIZ GET SIZE OF TEXT PER LINE«, t00=0x0065, t01=0x001a}
0x9dfe…9e2a Head {h00=0x0028, h01=0x0050, text=» CF A14,MOVTXT MOVE IT IN TO BUFFER «, t00=0x0065, t01=0x004a}
0x9e2a…9e52 Head {h00=0x0024, h01=0x0050, text=» ADK A6,5+STAPOS MAKE SOME ROOM «, t00=0x0065, t01=0x0076}
0x9e52…9e6a Head {h00=0x0014, h01=0x0050, text=» LC A1,INDEX,A5 «, t00=0x0065, t01=0x009e}
0x9e6a…9e7c Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x0065, t01=0x00b6}
0x9e7c…9ea4 Head {h00=0x0024, h01=0x0050, text=» ADR A1,A12 POINT OUT STAT VALUE«, t00=0x0065, t01=0x00c8}
0x9ea4…9eb6 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A1«, t00=0x0065, t01=0x00f0}
0x9eb6…9edc Head {h00=0x0022, h01=0x0050, text=» CF A14,CONASC MAKE IT VISABLE«, t00=0x0065, t01=0x0102}
0x9edc…9eee Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0065, t01=0x0128}
0x9eee…9f00 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A1«, t00=0x0065, t01=0x013a}
0x9f00…9f12 Head {h00=0x000e, h01=0x0050, text=» SRL A2,4 «, t00=0x0065, t01=0x014c}
0x9f12…9f28 Head {h00=0x0012, h01=0x0050, text=» CF A14,CONASC«, t00=0x0065, t01=0x015e}
0x9f28…9f3a Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0065, t01=0x0174}
0x9f3a…9f4c Head {h00=0x000e, h01=0x0050, text=» ORR A2,A4«, t00=0x0065, t01=0x0186}
0x9f4c…9f60 Head {h00=0x0010, h01=0x0050, text=» SC A2,+1,A6«, t00=0x0066, t01=0x0008}
0x9f60…9f72 Head {h00=0x000e, h01=0x0050, text=» SRL A2,8 «, t00=0x0066, t01=0x001c}
0x9f72…9f84 Head {h00=0x000e, h01=0x0050, text=» SCR A2,A6«, t00=0x0066, t01=0x002e}
0x9f84…9f96 Head {h00=0x000e, h01=0x0050, text=» ADK A6,2 «, t00=0x0066, t01=0x0040}
0x9f96…9faa Head {h00=0x0010, h01=0x0050, text=» LC A2,+1,A1«, t00=0x0066, t01=0x0052}
0x9faa…9fca Head {h00=0x001c, h01=0x0050, text=» CF A14,CONASC AS ABOVE «, t00=0x0066, t01=0x0066}
0x9fca…9fdc Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0066, t01=0x0086}
0x9fdc…9ff0 Head {h00=0x0010, h01=0x0050, text=» LC A2,+1,A1«, t00=0x0066, t01=0x0098}
0x9ff0…a002 Head {h00=0x000e, h01=0x0050, text=» SRL A2,4 «, t00=0x0066, t01=0x00ac}
0xa002…a018 Head {h00=0x0012, h01=0x0050, text=» CF A14,CONASC«, t00=0x0066, t01=0x00be}
0xa018…a02a Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0066, t01=0x00d4}
0xa02a…a03c Head {h00=0x000e, h01=0x0050, text=» ORR A2,A4«, t00=0x0066, t01=0x00e6}
0xa03c…a050 Head {h00=0x0010, h01=0x0050, text=» SC A2,+1,A6«, t00=0x0066, t01=0x00f8}
0xa050…a062 Head {h00=0x000e, h01=0x0050, text=» SRL A2,8 «, t00=0x0066, t01=0x010c}
0xa062…a074 Head {h00=0x000e, h01=0x0050, text=» SCR A2,A6«, t00=0x0066, t01=0x011e}
0xa074…a098 Head {h00=0x0020, h01=0x0050, text=» LDKL A10,1 NOT ONLY SPACES «, t00=0x0066, t01=0x0130}
0xa098…a0bc Head {h00=0x0020, h01=0x0050, text=» CF A14,DISLIN DISPLAY STAT.«, t00=0x0066, t01=0x0154}
0xa0bc…a0e2 Head {h00=0x0022, h01=0x0050, text=» CWK A5,NUMLIN LIMIT REACHED? «, t00=0x0066, t01=0x0178}
0xa0e2…a0fc Head {h00=0x0016, h01=0x0050, text=» RB(NE) DISS10 NO «, t00=0x0067, t01=0x000e}
0xa0fc…a108 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0067, t01=0x0028}
0xa108…a118 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0067, t01=0x0034}
0xa118…a12c Head {h00=0x0010, h01=0x0050, text=» IFT TEST=1 «, t00=0x0067, t01=0x0044}
0xa12c…a13a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0067, t01=0x0058}
0xa13a…a17e Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0067, t01=0x0066}
0xa17e…a188 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00aa}
0xa188…a1a2 Head {h00=0x0016, h01=0x0050, text=»* MOVTXT MOVE TEXT«, t00=0x0067, t01=0x00b4}
0xa1a2…a1ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00ce}
0xa1ac…a1f0 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0067, t01=0x00d8}
0xa1f0…a20a Head {h00=0x0016, h01=0x0050, text=»* REGISTERS «, t00=0x0067, t01=0x011c}
0xa20a…a214 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0136}
0xa214…a21e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0140}
0xa21e…a260 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0067, t01=0x014a}
0xa260…a268 Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x018c}
0xa268…a27c (104, 0, 400) Head {h00=0x0010, h01=0x0050, text=»MOVTXT EQU *«, t00=0x0068, t01=0x0004}
0xa27c…a28e Head {h00=0x000e, h01=0x0050, text=» LCR A2,A3«, t00=0x0068, t01=0x0018}
0xa28e…a2a0 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0068, t01=0x002a}
0xa2a0…a2b8 Head {h00=0x0014, h01=0x0050, text=» SC A2,STAPOS,A6«, t00=0x0068, t01=0x003c}
0xa2b8…a2ca Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0068, t01=0x0054}
0xa2ca…a2dc Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0068, t01=0x0066}
0xa2dc…a2f2 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) MOVTXT«, t00=0x0068, t01=0x0078}
0xa2f2…a302 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0068, t01=0x008e}
0xa302…a310 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x009e}
0xa310…a352 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0068, t01=0x00ac}
0xa352…a35c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00ee}
0xa35c…a37e Head {h00=0x001e, h01=0x0050, text=»* CONASC CONVERT TO ASCII «, t00=0x0068, t01=0x00f8}
0xa37e…a388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x011a}
0xa388…a3c8 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0068, t01=0x0124}
0xa3c8…a3de Head {h00=0x0012, h01=0x0050, text=»* REGISTERS«, t00=0x0068, t01=0x0164}
0xa3de…a3e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x017a}
0xa3e8…a3f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0184}
0xa3f2…a432 Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0068, t01=0x018e}
0xa432…a446 Head {h00=0x0010, h01=0x0050, text=»CONASC EQU *«, t00=0x0069, t01=0x003e}
0xa446…a45a Head {h00=0x0010, h01=0x0050, text=» ANK A2,/0F «, t00=0x0069, t01=0x0052}
0xa45a…a470 Head {h00=0x0012, h01=0x0050, text=» CCK A2,/0909 «, t00=0x0069, t01=0x0066}
0xa470…a486 Head {h00=0x0012, h01=0x0050, text=» RF(G) CONA10 «, t00=0x0069, t01=0x007c}
0xa486…a49a Head {h00=0x0010, h01=0x0050, text=» ORK A2,/30 «, t00=0x0069, t01=0x0092}
0xa49a…a4ac Head {h00=0x000e, h01=0x0050, text=» RF CONA90«, t00=0x0069, t01=0x00a6}
0xa4ac…a4c0 Head {h00=0x0010, h01=0x0050, text=»CONA10 EQU *«, t00=0x0069, t01=0x00b8}
0xa4c0…a4d4 Head {h00=0x0010, h01=0x0050, text=» ADK A2,/37 «, t00=0x0069, t01=0x00cc}
0xa4d4…a4e8 Head {h00=0x0010, h01=0x0050, text=»CONA90 EQU *«, t00=0x0069, t01=0x00e0}
0xa4e8…a4f8 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0069, t01=0x00f4}
0xa4f8…a504 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x0104}
0xa504…a512 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0069, t01=0x0110}
0xa512…a554 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0069, t01=0x011e}
0xa554…a596 Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0069, t01=0x0160}
0xa596…a5d8 Head {h00=0x003e, h01=0x0050, text=»* ATMASF SEARCH ATTRIBUTE FORWARD * «, t00=0x006a, t01=0x0012}
0xa5d8…a61a Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x006a, t01=0x0054}
0xa61a…a65c Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x006a, t01=0x0096}
0xa65c…a670 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x006a, t01=0x00d8}
0xa670…a67a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x00ec}
0xa67a…a6a6 Head {h00=0x0028, h01=0x0050, text=»* A1= AT ENTRY START SEARCH ADDRESS «, t00=0x006a, t01=0x00f6}
0xa6a6…a6bc Head {h00=0x0012, h01=0x0050, text=»* A2= RESERVED«, t00=0x006a, t01=0x0122}
0xa6bc…a6d2 Head {h00=0x0012, h01=0x0050, text=»* A3= RESERVED«, t00=0x006a, t01=0x0138}
0xa6d2…a6f0 Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x006a, t01=0x014e}
0xa6f0…a712 Head {h00=0x001e, h01=0x0050, text=»* A5= REL. ATTRIBUTE POS. «, t00=0x006a, t01=0x016c}
0xa712…a730 Head {h00=0x001a, h01=0x0050, text=»* A6= ATTRIBUTE CHAR. «, t00=0x006a, t01=0x018e}
0xa730…a746 Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x006b, t01=0x001c}
0xa746…a75c Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x006b, t01=0x0032}
0xa75c…a774 Head {h00=0x0014, h01=0x0050, text=»* A10= RESERVED «, t00=0x006b, t01=0x0048}
0xa774…a794 Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x006b, t01=0x0060}
0xa794…a7ac Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x006b, t01=0x0080}
0xa7ac…a7b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0098}
0xa7b6…a7f8 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x006b, t01=0x00a2}
0xa7f8…a80c Head {h00=0x0010, h01=0x0050, text=»ATMASF EQU *«, t00=0x006b, t01=0x00e4}
0xa80c…a824 Head {h00=0x0014, h01=0x0050, text=» ST A1,REGI,A11 «, t00=0x006b, t01=0x00f8}
0xa824…a838 Head {h00=0x0010, h01=0x0050, text=»ASF100 EQU *«, t00=0x006b, t01=0x0110}
0xa838…a84a Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x006b, t01=0x0124}
0xa84a…a86e Head {h00=0x0020, h01=0x0050, text=» CWK A1,LBVDU-1 WRAP AROUND?«, t00=0x006b, t01=0x0136}
0xa86e…a888 Head {h00=0x0016, h01=0x0050, text=» RF(NG) ASF200 NO «, t00=0x006b, t01=0x015a}
0xa888…a8ae Head {h00=0x0022, h01=0x0050, text=» LDK A1,0 FIRST POS. ON SCREEN«, t00=0x006b, t01=0x0174}
0xa8ae…a8c2 Head {h00=0x0010, h01=0x0050, text=»ASF200 EQU *«, t00=0x006c, t01=0x000a}
0xa8c2…a8f0 Head {h00=0x002a, h01=0x0050, text=» CW A1,REGI,A11 WHOLE SCREEN SEARCHED?«, t00=0x006c, t01=0x001e}
0xa8f0…a90a Head {h00=0x0016, h01=0x0050, text=» RF(E) ASF900 YES «, t00=0x006c, t01=0x004c}
0xa90a…a938 Head {h00=0x002a, h01=0x0050, text=» CF A14,GETVDU GET CHAR. IN VDU BUFFER«, t00=0x006c, t01=0x0066}
0xa938…a958 Head {h00=0x001c, h01=0x0050, text=» CCK A7,/8000 ATTRIBUTE?«, t00=0x006c, t01=0x0094}
0xa958…a970 Head {h00=0x0014, h01=0x0050, text=» RB(L) ASF100 NO«, t00=0x006c, t01=0x00b4}
0xa970…a982 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A7«, t00=0x006c, t01=0x00cc}
0xa982…a994 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A1«, t00=0x006c, t01=0x00de}
0xa994…a9c6 Head {h00=0x002e, h01=0x0050, text=» CF A14,STOINF SAVE NEW SCREEN INFORMATION«, t00=0x006c, t01=0x00f0}
0xa9c6…a9da Head {h00=0x0010, h01=0x0050, text=»ASF900 EQU *«, t00=0x006c, t01=0x0122}
0xa9da…a9ea Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x006c, t01=0x0136}
0xa9ea…a9f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006c, t01=0x0146}
0xa9f8…aa48 Head {h00=0x004c, h01=0x0050, text=»*********************************************************************** «, t00=0x006c, t01=0x0154}
0xaa48…aa98 Head {h00=0x004c, h01=0x0050, text=»* * «, t00=0x006d, t01=0x0014}
0xaa98…aae8 Head {h00=0x004c, h01=0x0050, text=»* ATMASB SEARCH ATTRIBUTE BACKWARD * «, t00=0x006d, t01=0x0064}
0xaae8…ab38 Head {h00=0x004c, h01=0x0050, text=»* * «, t00=0x006d, t01=0x00b4}
0xab38…ab88 Head {h00=0x004c, h01=0x0050, text=»*********************************************************************** «, t00=0x006d, t01=0x0104}
0xab88…ab9c Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x006d, t01=0x0154}
0xab9c…aba6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0168}
0xaba6…abce Head {h00=0x0024, h01=0x0050, text=»* A1= ATENTRY START SEARCH ADDR.«, t00=0x006d, t01=0x0172}
0xabce…abe4 Head {h00=0x0012, h01=0x0050, text=»* A2= RESERVED«, t00=0x006e, t01=0x000a}
0xabe4…abfa Head {h00=0x0012, h01=0x0050, text=»* A3= RESERVED«, t00=0x006e, t01=0x0020}
0xabfa…ac18 Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x006e, t01=0x0036}
0xac18…ac3a Head {h00=0x001e, h01=0x0050, text=»* A5= REL. ATTRIBUTE POS. «, t00=0x006e, t01=0x0054}
0xac3a…ac58 Head {h00=0x001a, h01=0x0050, text=»* A6= ATTRIBUTE CHAR. «, t00=0x006e, t01=0x0076}
0xac58…ac6e Head {h00=0x0012, h01=0x0050, text=»* A8= RESERVED«, t00=0x006e, t01=0x0094}
0xac6e…ac84 Head {h00=0x0012, h01=0x0050, text=»* A9= RESERVED«, t00=0x006e, t01=0x00aa}
0xac84…ac9c Head {h00=0x0014, h01=0x0050, text=»* A10= RESERVED «, t00=0x006e, t01=0x00c0}
0xac9c…acbc Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x006e, t01=0x00d8}
0xacbc…acd4 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x006e, t01=0x00f8}
0xacd4…acde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0110}
0xacde…ad2e Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x006e, t01=0x011a}
0xad2e…ad42 Head {h00=0x0010, h01=0x0050, text=»ATMASB EQU *«, t00=0x006e, t01=0x016a}
0xad42…ad5a Head {h00=0x0014, h01=0x0050, text=» ST A1,REGI,A11 «, t00=0x006e, t01=0x017e}
0xad5a…ad6e Head {h00=0x0010, h01=0x0050, text=»ASB100 EQU *«, t00=0x006f, t01=0x0008}
0xad6e…ad9c Head {h00=0x002a, h01=0x0050, text=» CF A14,GETVDU GET CHAR. IN VDU BUFFER«, t00=0x006f, t01=0x001c}
0xad9c…adbc Head {h00=0x001c, h01=0x0050, text=» CCK A7,/8000 ATTRIBUTE?«, t00=0x006f, t01=0x004a}
0xadbc…add6 Head {h00=0x0016, h01=0x0050, text=» RF(NL) ASB300 YES«, t00=0x006f, t01=0x006a}
0xadd6…ade8 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x006f, t01=0x0084}
0xade8…ae0e Head {h00=0x0022, h01=0x0050, text=» RF(NN) ASB200 NOT WRAP AROUND«, t00=0x006f, t01=0x0096}
0xae0e…ae3a Head {h00=0x0028, h01=0x0050, text=» LDKL A1,LBVDU-1 LAST POS. ON SCREEN«, t00=0x006f, t01=0x00bc}
0xae3a…ae4e Head {h00=0x0010, h01=0x0050, text=»ASB200 EQU *«, t00=0x006f, t01=0x00e8}
0xae4e…ae7c Head {h00=0x002a, h01=0x0050, text=» CW A1,REGI,A11 WHOLE SCREEN SEARCHED?«, t00=0x006f, t01=0x00fc}
0xae7c…ae96 Head {h00=0x0016, h01=0x0050, text=» RF(E) ASB900 YES «, t00=0x006f, t01=0x012a}
0xae96…aea8 Head {h00=0x000e, h01=0x0050, text=» RB ASB100«, t00=0x006f, t01=0x0144}
0xaea8…aebc Head {h00=0x0010, h01=0x0050, text=»ASB300 EQU *«, t00=0x006f, t01=0x0156}
0xaebc…aece Head {h00=0x000e, h01=0x0050, text=» LDR A6,A7«, t00=0x006f, t01=0x016a}
0xaece…aee0 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A1«, t00=0x006f, t01=0x017c}
0xaee0…af0e Head {h00=0x002a, h01=0x0050, text=» CF A14,STOINF SAVE SCREEN INFORMATION«, t00=0x006f, t01=0x018e}
0xaf0e…af22 Head {h00=0x0010, h01=0x0050, text=»ASB900 EQU *«, t00=0x0070, t01=0x002c}
0xaf22…af32 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0070, t01=0x0040}
0xaf32…af40 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0070, t01=0x0050}
0xaf40…af88 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0070, t01=0x005e}
0xaf88…afd0 Head {h00=0x0044, h01=0x0050, text=»* * «, t00=0x0070, t01=0x00a6}
0xafd0…b018 Head {h00=0x0044, h01=0x0050, text=»* SNULL SEARCH FIRST NULL CHAR. * «, t00=0x0070, t01=0x00ee}
0xb018…b060 Head {h00=0x0044, h01=0x0050, text=»* * «, t00=0x0070, t01=0x0136}
0xb060…b0a8 Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0070, t01=0x017e}
0xb0a8…b0bc Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0071, t01=0x0036}
0xb0bc…b0c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x004a}
0xb0c6…b0fc Head {h00=0x0032, h01=0x0050, text=»* A1= AT RETURN 1=NULL FOUND, 2=NO NULL FOUND«, t00=0x0071, t01=0x0054}
0xb0fc…b112 Head {h00=0x0012, h01=0x0050, text=»* A2= RESERVED«, t00=0x0071, t01=0x008a}
0xb112…b158 Head {h00=0x0042, h01=0x0050, text=»* A3= AT ENTRY LAST SEARCH ADDR., AT RETURN NULL ADDR. IF ANY «, t00=0x0071, t01=0x00a0}
0xb158…b176 Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x0071, t01=0x00e6}
0xb176…b18c Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x0071, t01=0x0104}
0xb18c…b1a2 Head {h00=0x0012, h01=0x0050, text=»* A6= RESERVED«, t00=0x0071, t01=0x011a}
0xb1a2…b1c2 Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0071, t01=0x0130}
0xb1c2…b1da Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0071, t01=0x0150}
0xb1da…b1e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0168}
0xb1e4…b22c Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0071, t01=0x0172}
0xb22c…b240 Head {h00=0x0010, h01=0x0050, text=»SNULL EQU * «, t00=0x0072, t01=0x002a}
0xb240…b252 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A4«, t00=0x0072, t01=0x003e}
0xb252…b266 Head {h00=0x0010, h01=0x0050, text=»SNU100 EQU *«, t00=0x0072, t01=0x0050}
0xb266…b278 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0072, t01=0x0064}
0xb278…b29c Head {h00=0x0020, h01=0x0050, text=» CWK A1,LBVDU-1 WRAP AROUND?«, t00=0x0072, t01=0x0076}
0xb29c…b2b6 Head {h00=0x0016, h01=0x0050, text=» RF(NG) SNU200 NO «, t00=0x0072, t01=0x009a}
0xb2b6…b2da Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 FIRST SCREEN POS. «, t00=0x0072, t01=0x00b4}
0xb2da…b2ee Head {h00=0x0010, h01=0x0050, text=»SNU200 EQU *«, t00=0x0072, t01=0x00d8}
0xb2ee…b30e Head {h00=0x001c, h01=0x0050, text=» CWR A1,A3 ALL SEARCHED?«, t00=0x0072, t01=0x00ec}
0xb30e…b328 Head {h00=0x0016, h01=0x0050, text=» RF(E) SNU300 YES «, t00=0x0072, t01=0x010c}
0xb328…b356 Head {h00=0x002a, h01=0x0050, text=» CF A14,GETVDU GET CHAR IN VDU BUFFER «, t00=0x0072, t01=0x0126}
0xb356…b376 Head {h00=0x001c, h01=0x0050, text=» CCK A7,NULL NULL CHAR? «, t00=0x0072, t01=0x0154}
0xb376…b390 Head {h00=0x0016, h01=0x0050, text=» RB(NE) SNU100 NO «, t00=0x0072, t01=0x0174}
0xb390…b3a2 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0072, t01=0x018e}
0xb3a2…b3c8 Head {h00=0x0022, h01=0x0050, text=» LDK A1,1 INDICATE NULL FOUND «, t00=0x0073, t01=0x0010}
0xb3c8…b3da Head {h00=0x000e, h01=0x0050, text=» RF SNU900«, t00=0x0073, t01=0x0036}
0xb3da…b3ee Head {h00=0x0010, h01=0x0050, text=»SNU300 EQU *«, t00=0x0073, t01=0x0048}
0xb3ee…b400 Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0073, t01=0x005c}
0xb400…b414 Head {h00=0x0010, h01=0x0050, text=»SNU900 EQU *«, t00=0x0073, t01=0x006e}
0xb414…b424 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0073, t01=0x0082}
0xb424…b432 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0073, t01=0x0092}
0xb432…b476 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0073, t01=0x00a0}
0xb476…b4ba Head {h00=0x0040, h01=0x0050, text=»* *«, t00=0x0073, t01=0x00e4}
0xb4ba…b4fe Head {h00=0x0040, h01=0x0050, text=»* WCHAR DISPLAY CHAR. AND CURSOR *«, t00=0x0073, t01=0x0128}
0xb4fe…b542 Head {h00=0x0040, h01=0x0050, text=»* *«, t00=0x0073, t01=0x016c}
0xb542…b586 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0074, t01=0x0020}
0xb586…b59a Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0074, t01=0x0064}
0xb59a…b5a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0078}
0xb5a4…b5ba Head {h00=0x0012, h01=0x0050, text=»* A2= KEY-CHAR«, t00=0x0074, t01=0x0082}
0xb5ba…b5d8 Head {h00=0x001a, h01=0x0050, text=»* A4= REL. CURSOR POS.«, t00=0x0074, t01=0x0098}
0xb5d8…b5fa Head {h00=0x001e, h01=0x0050, text=»* A5= REL. ATTRIBUTE POS. «, t00=0x0074, t01=0x00b6}
0xb5fa…b618 Head {h00=0x001a, h01=0x0050, text=»* A6= ATTRIBUTE CHAR. «, t00=0x0074, t01=0x00d8}
0xb618…b62e Head {h00=0x0012, h01=0x0050, text=»* A8= VDU-ECB «, t00=0x0074, t01=0x00f6}
0xb62e…b64e Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0074, t01=0x010c}
0xb64e…b666 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0074, t01=0x012c}
0xb666…b670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0144}
0xb670…b6b6 Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0074, t01=0x014e}
0xb6b6…b6ca (117, 0, 400) Head {h00=0x0010, h01=0x0050, text=»WCHAR EQU * «, t00=0x0075, t01=0x0004}
0xb6ca…b6e4 Head {h00=0x0016, h01=0x0050, text=» LD A8,ECBVDU,A11 «, t00=0x0075, t01=0x0018}
0xb6e4…b70c Head {h00=0x0024, h01=0x0050, text=» LDK A1,/1E LOW INTENSITY CHAR. «, t00=0x0075, t01=0x0032}
0xb70c…b71e Head {h00=0x000e, h01=0x0050, text=» LDR A7,A6«, t00=0x0075, t01=0x005a}
0xb71e…b742 Head {h00=0x0020, h01=0x0050, text=» ANK A7,/8 STANDARD DISPLAY?«, t00=0x0075, t01=0x006c}
0xb742…b75c Head {h00=0x0016, h01=0x0050, text=» RF(Z) WCH300 YES «, t00=0x0075, t01=0x0090}
0xb75c…b76e Head {h00=0x000e, h01=0x0050, text=» LDR A7,A6«, t00=0x0075, t01=0x00aa}
0xb76e…b796 Head {h00=0x0024, h01=0x0050, text=» ANK A7,/4 INTENSIFIED DISPLAY? «, t00=0x0075, t01=0x00bc}
0xb796…b7b0 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WCH200 NO «, t00=0x0075, t01=0x00e4}
0xb7b0…b7d8 Head {h00=0x0024, h01=0x0050, text=» LDK A1,/1F HIGH INTENSITY CHAR.«, t00=0x0075, t01=0x00fe}
0xb7d8…b7ea Head {h00=0x000e, h01=0x0050, text=» RF WCH300«, t00=0x0075, t01=0x0126}
0xb7ea…b7fe Head {h00=0x0010, h01=0x0050, text=»WCH200 EQU *«, t00=0x0075, t01=0x0138}
0xb7fe…b81c Head {h00=0x001a, h01=0x0050, text=» LDK A2,/20 NONDISPLAY«, t00=0x0075, t01=0x014c}
0xb81c…b830 Head {h00=0x0010, h01=0x0050, text=»WCH300 EQU *«, t00=0x0075, t01=0x016a}
0xb830…b85a Head {h00=0x0026, h01=0x0050, text=» LD A7,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0075, t01=0x017e}
0xb85a…b882 Head {h00=0x0024, h01=0x0050, text=» SC A1,2,A7 SAVE INTENSITY CHAR.«, t00=0x0076, t01=0x0018}
0xb882…b8b0 Head {h00=0x002a, h01=0x0050, text=» CF A14,RFMDUP REPLACE FM OR DUP CHAR.«, t00=0x0076, t01=0x0040}
0xb8b0…b8de Head {h00=0x002a, h01=0x0050, text=» SC A2,3,A7 STORE CHAR. IN VDU BUFFER «, t00=0x0076, t01=0x006e}
0xb8de…b8fc Head {h00=0x001a, h01=0x0050, text=» LDK A1,4 REQ. LENGTH «, t00=0x0076, t01=0x009c}
0xb8fc…b91a Head {h00=0x001a, h01=0x0050, text=» CF A14,DISCHA DISPLAY«, t00=0x0076, t01=0x00ba}
0xb91a…b92c Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0076, t01=0x00d8}
0xb92c…b942 Head {h00=0x0012, h01=0x0050, text=» IM PCURS,A11 «, t00=0x0076, t01=0x00ea}
0xb942…b96e Head {h00=0x0028, h01=0x0050, text=» CWK A5,LBVDU+1 UNFORMATTED SCREEN? «, t00=0x0076, t01=0x0100}
0xb96e…b988 Head {h00=0x0016, h01=0x0050, text=» RF(E) WCH900 YES «, t00=0x0076, t01=0x012c}
0xb988…b9b4 Head {h00=0x0028, h01=0x0050, text=» ORK A6,1 SET MDT-BITS IN ATTRIBUTE «, t00=0x0076, t01=0x0146}
0xb9b4…b9ce Head {h00=0x0016, h01=0x0050, text=» ST A6,ATTRIB,A11 «, t00=0x0076, t01=0x0172}
0xb9ce…b9e0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A5«, t00=0x0076, t01=0x018c}
0xb9e0…b9f2 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A6«, t00=0x0077, t01=0x000e}
0xb9f2…ba22 Head {h00=0x002c, h01=0x0050, text=» CF A14,STOVDU STORE CHAR. IN VDU BUFFER«, t00=0x0077, t01=0x0020}
0xba22…ba36 Head {h00=0x0010, h01=0x0050, text=»WCH900 EQU *«, t00=0x0077, t01=0x0050}
0xba36…ba46 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0077, t01=0x0064}
0xba46…ba54 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0077, t01=0x0074}
0xba54…ba96 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0077, t01=0x0082}
0xba96…bad8 Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0077, t01=0x00c4}
0xbad8…bb1a Head {h00=0x003e, h01=0x0050, text=»* RFMDUP REPLACE FM OR DUP CHAR IF PRESENT * «, t00=0x0077, t01=0x0106}
0xbb1a…bb5c Head {h00=0x003e, h01=0x0050, text=»* * «, t00=0x0077, t01=0x0148}
0xbb5c…bb9e Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0077, t01=0x018a}
0xbb9e…bbb2 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x0078, t01=0x003c}
0xbbb2…bbc8 Head {h00=0x0012, h01=0x0050, text=»* A2= KEY-CHAR«, t00=0x0078, t01=0x0050}
0xbbc8…bbde Head {h00=0x0012, h01=0x0050, text=»* A4= RESERVED«, t00=0x0078, t01=0x0066}
0xbbde…bbf4 Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x0078, t01=0x007c}
0xbbf4…bc0a Head {h00=0x0012, h01=0x0050, text=»* A6= RESERVED«, t00=0x0078, t01=0x0092}
0xbc0a…bc2a Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x0078, t01=0x00a8}
0xbc2a…bc42 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x0078, t01=0x00c8}
0xbc42…bc4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x00e0}
0xbc4c…bc84 Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0078, t01=0x00ea}
0xbc84…bc98 Head {h00=0x0010, h01=0x0050, text=»RFMDUP EQU *«, t00=0x0078, t01=0x0122}
0xbc98…bcb8 Head {h00=0x001c, h01=0x0050, text=» CWK A2,DUPCH DUP CHAR? «, t00=0x0078, t01=0x0136}
0xbcb8…bcd2 Head {h00=0x0016, h01=0x0050, text=» RF(NE) RFMD10 NO «, t00=0x0078, t01=0x0156}
0xbcd2…bcee Head {h00=0x0018, h01=0x0050, text=» LDK A2,/2A REPLACE «, t00=0x0078, t01=0x0170}
0xbcee…bd00 Head {h00=0x000e, h01=0x0050, text=» RF RFMD90«, t00=0x0078, t01=0x018c}
0xbd00…bd14 Head {h00=0x0010, h01=0x0050, text=»RFMD10 EQU *«, t00=0x0079, t01=0x000e}
0xbd14…bd32 Head {h00=0x001a, h01=0x0050, text=» CWK A2,FMCH FM CHAR? «, t00=0x0079, t01=0x0022}
0xbd32…bd4c Head {h00=0x0016, h01=0x0050, text=» RF(NE) RFMD90 NO «, t00=0x0079, t01=0x0040}
0xbd4c…bd68 Head {h00=0x0018, h01=0x0050, text=» LDK A2,/3B REPLACE «, t00=0x0079, t01=0x005a}
0xbd68…bd7c Head {h00=0x0010, h01=0x0050, text=»RFMD90 EQU *«, t00=0x0079, t01=0x0076}
0xbd7c…bd8c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0079, t01=0x008a}
0xbd8c…bd9a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0079, t01=0x009a}
0xbd9a…bdd2 Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0079, t01=0x00a8}
0xbdd2…be0a Head {h00=0x0034, h01=0x0050, text=»* *«, t00=0x0079, t01=0x00e0}
0xbe0a…be42 Head {h00=0x0034, h01=0x0050, text=»* DISCHA DISPLAY CHAR *«, t00=0x0079, t01=0x0118}
0xbe42…be7a Head {h00=0x0034, h01=0x0050, text=»* *«, t00=0x0079, t01=0x0150}
0xbe7a…beb2 Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0079, t01=0x0188}
0xbeb2…bec6 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS«, t00=0x007a, t01=0x0030}
0xbec6…bed0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0044}
0xbed0…beea Head {h00=0x0016, h01=0x0050, text=»* A1= REQ. LENGTH «, t00=0x007a, t01=0x004e}
0xbeea…bf00 Head {h00=0x0012, h01=0x0050, text=»* A2= RESERVED«, t00=0x007a, t01=0x0068}
0xbf00…bf16 Head {h00=0x0012, h01=0x0050, text=»* A4= RESERVED«, t00=0x007a, t01=0x007e}
0xbf16…bf2c Head {h00=0x0012, h01=0x0050, text=»* A5= RESERVED«, t00=0x007a, t01=0x0094}
0xbf2c…bf42 Head {h00=0x0012, h01=0x0050, text=»* A6= RESERVED«, t00=0x007a, t01=0x00aa}
0xbf42…bf58 Head {h00=0x0012, h01=0x0050, text=»* A8= VDU-ECB «, t00=0x007a, t01=0x00c0}
0xbf58…bf78 Head {h00=0x001c, h01=0x0050, text=»* A11= CREDIT WORK AREA «, t00=0x007a, t01=0x00d6}
0xbf78…bf90 Head {h00=0x0014, h01=0x0050, text=»* A13= RESERVED «, t00=0x007a, t01=0x00f6}
0xbf90…bf9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x010e}
0xbf9a…bfd4 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x007a, t01=0x0118}
0xbfd4…bfe8 Head {h00=0x0010, h01=0x0050, text=»DISCHA EQU *«, t00=0x007a, t01=0x0152}
0xbfe8…c000 Head {h00=0x0014, h01=0x0050, text=» LC A2,TCT01,A11«, t00=0x007a, t01=0x0166}
0xc000…c026 Head {h00=0x0022, h01=0x0050, text=» CCK A2,VDUCOD PRINTER UNPACK?«, t00=0x007a, t01=0x017e}
0xc026…c040 Head {h00=0x0016, h01=0x0050, text=» RF(NE) DISC95 YES«, t00=0x007b, t01=0x0014}
0xc040…c05a Head {h00=0x0016, h01=0x0050, text=» LD A8,ECBVDU,A11 «, t00=0x007b, t01=0x002e}
0xc05a…c072 Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBRL,A8 «, t00=0x007b, t01=0x0048}
0xc072…c09e Head {h00=0x0028, h01=0x0050, text=» LDKL A1,/101 START AT LINE 1 POS. 1«, t00=0x007b, t01=0x0060}
0xc09e…c0b6 Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW,A8 «, t00=0x007b, t01=0x008c}
0xc0b6…c0cc Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/100 «, t00=0x007b, t01=0x00a4}
0xc0cc…c0ea Head {h00=0x001a, h01=0x0050, text=» LDR A7,A4 CURSOR POS.«, t00=0x007b, t01=0x00ba}
0xc0ea…c0fe Head {h00=0x0010, h01=0x0050, text=»DISC10 EQU *«, t00=0x007b, t01=0x00d8}
0xc0fe…c11e Head {h00=0x001c, h01=0x0050, text=» CWK A7,LLINE NEXT LINE?«, t00=0x007b, t01=0x00ec}
0xc11e…c136 Head {h00=0x0014, h01=0x0050, text=» RF(L) DISC90 NO«, t00=0x007b, t01=0x010c}
0xc136…c160 Head {h00=0x0026, h01=0x0050, text=» ADS A1,ECBCW,A8 MOVE TO NEXT LINE«, t00=0x007b, t01=0x0124}
0xc160…c176 Head {h00=0x0012, h01=0x0050, text=» SUKL A7,LLINE«, t00=0x007b, t01=0x014e}
0xc176…c188 Head {h00=0x000e, h01=0x0050, text=» RB DISC10«, t00=0x007b, t01=0x0164}
0xc188…c19c Head {h00=0x0010, h01=0x0050, text=»DISC90 EQU *«, t00=0x007b, t01=0x0176}
0xc19c…c1c6 Head {h00=0x0026, h01=0x0050, text=» ADS A7,ECBCW,A8 POSITION IN LINE «, t00=0x007b, t01=0x018a}
0xc1c6…c1ee Head {h00=0x0024, h01=0x0050, text=» LDK A7,/8B SET CURSOR AND WRITE«, t00=0x007c, t01=0x0024}
0xc1ee…c1fa Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x007c, t01=0x004c}
0xc1fa…c20a Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x007c, t01=0x0058}
0xc20a…c21e Head {h00=0x0010, h01=0x0050, text=»DISC95 EQU *«, t00=0x007c, t01=0x0068}
0xc21e…c22e Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x007c, t01=0x007c}
0xc22e…c236 Head {h00=0x0004, h01=0x0050, t00=0x007c, t01=0x008c}
0xc236…c242 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x007c, t01=0x0094}
0xc242…c246 Head {h00=0x4004, h01=0x0000}
0xc246…c24a 00 7c 00 a0 ┆ | ┆
0xc24a…c252 (125, 1, 8) 20 04 00 00 00 7d 00 04 ┆ } ┆
0xc252…c2a2 (126, 0, 400) 03 26 8a 20 04 90 84 41 08 f2 84 08 9c 20 03 2a 3c 61 84 50 03 6a 84 41 0d 8a 84 04 f0 a1 0c e4 84 20 00 00 03 01 83 29 f0 22 98 41 03 98 88 20 04 9a f7 a1 0b 0a f7 a1 0b 84 05 48 8f 20 03 b6 98 41 03 98 8c 20 04 9a 81 40 02 a4 f0 a1 0b d0 ┆ & A *<a P j A ) " A H A @ ┆
0xc2a2…c2f2 03 26 8a 20 04 90 84 40 04 bc 85 40 04 ba 54 02 04 01 84 41 03 96 81 41 03 94 8f 20 08 18 50 40 81 40 04 b6 50 42 f0 a1 0d c2 e2 04 f0 a1 0d c2 a9 08 f0 a1 0b d0 09 90 8a 20 04 90 81 40 04 b8 8f 0c 21 0f 91 04 54 02 01 e6 91 20 02 a4 81 41 ┆ & @ @ T A A P@ @ PB @ ! T A┆
0xc2f2…c342 03 9e 81 40 04 bc 81 41 03 9a 23 01 13 01 82 0c 82 41 03 a0 8f 20 04 24 84 20 03 9c 8f 20 07 88 00 04 00 00 52 45 09 62 52 4e 09 63 4d 45 09 6e 4d 4e 09 6f 84 20 57 00 11 02 86 0c 52 2c ee 20 28 04 54 04 28 04 57 dc a6 20 f0 01 ee 20 50 00 ┆ @ A # A $ RE bRN cME nMN o W R, ( T ( W P ┆
0xc342…c392 54 96 84 0c 24 ff 3b c4 56 02 9c 11 94 04 3b e4 a3 20 07 00 ab 20 88 20 57 7e 26 7e ee 20 00 20 50 08 26 60 50 14 36 20 50 10 84 40 03 8a 24 01 50 04 d4 24 57 02 84 24 11 02 86 0c a6 20 f8 01 ee 20 f0 01 54 52 86 0c a6 20 07 80 50 4a 23 7e ┆T $ ; V ; W~&~ P &`P 6 P @ $ P $W $ TR PJ#~┆
0xc392…c3e2 ab 20 8f 00 3e e8 56 02 2e 08 3e 41 ee 20 00 1e 50 0e 82 20 ff fc 92 59 02 a4 86 58 02 a4 57 0c 87 5e 00 04 87 3f 87 3f 86 1e 16 18 82 40 03 8a 87 08 27 01 50 0a d2 59 a9 29 02 a9 55 aa 2a 49 35 02 a8 55 15 40 00 00 00 02 00 00 00 0a 01 00 ┆ > V . >A P Y X W ^ ? ? @ ' P Y ) U *I5 U @ ┆
0xc3e2…c432 (127, 0, 400) 00 02 d1 59 00 04 57 08 82 59 00 02 81 59 00 04 82 40 03 8a 22 01 50 24 87 40 0e d0 87 5c ff fe 87 5c 00 0e 1f 0a d3 3d d4 5d 00 02 82 20 8f 20 d2 5d 00 04 d1 5d 00 06 81 1c 57 10 81 41 0a 9c 83 41 0a 96 84 41 0a 98 81 20 0a 96 57 b0 20 7f ┆ Y W Y Y @ " P$ @ = ] ] ] W A A A W ┆
0xc432…c482 20 7f 8f 20 00 00 82 04 81 20 03 ac e9 5e 00 14 50 08 01 00 f0 a1 0d ba 5f 12 81 08 f0 22 81 5e 00 14 e9 20 03 ac 54 1a 81 40 03 8c 39 4a 98 41 03 8e 54 08 81 5f 00 12 8f 20 0d dc 31 40 81 5f 00 12 81 5e 00 12 39 e7 56 06 f7 a1 0b 0a f0 3e ┆ ^ P _ " ^ T @ 9J A T _ 1@ _ ^ 9 V >┆
0xc482…c4d2 21 06 82 44 0b 00 82 41 0b 08 f7 a1 0b 0a 97 a0 00 04 90 41 0b 08 8f 3e ff ff 00 00 ff fe 7f ff 00 00 97 a0 00 04 80 be 87 3e 86 3e 85 3e 84 3e 83 3e 82 3e 81 3e 8f 5e ff f0 82 5f 00 02 82 5e 00 04 81 5f 00 04 83 3f 84 3f 85 3f 86 3f 87 3f ┆! D A A > > > > > > > > ^ _ ^ _ ? ? ? ? ?┆
0xc4d2…c522 80 bf 82 41 0b 44 82 5e 00 0e 8f 20 00 00 82 40 03 8a 97 a0 00 18 81 3f 82 3f 87 c1 0b 7c 87 a0 02 a4 81 3e 82 3e 83 3e 84 3e 85 3e 86 3e 87 3e 80 be 81 be 82 be 83 be 84 be 85 be 86 be b8 40 03 06 87 a0 00 00 f7 a1 0b 22 8f 3e 87 c1 02 c2 ┆ A D ^ @ ? ? | > > > > > > > @ " > ┆
0xc522…c572 87 a0 02 c0 86 bf 85 bf 84 bf 83 bf 82 bf 81 bf 80 bf 87 3f 86 3f 85 3f 84 3f 83 3f 82 3f 81 3f b8 41 03 06 87 c0 02 c2 97 a0 00 04 84 3e 84 41 03 8a 81 3e 81 41 02 a4 00 44 00 01 54 04 10 24 84 02 2a 20 00 00 00 20 82 80 00 89 40 00 50 90 ┆ ? ? ? ? ? ? ? A > A > A D T $ * @ P ┆
0xc572…c5c2 (128, 0, 400) 81 41 02 a4 87 c1 02 c2 9f a0 00 14 8f 5e 00 10 90 a0 00 04 83 22 83 2c 82 2c 82 41 0c 02 98 41 0c 02 3a 42 92 0c 90 41 0c 02 51 08 e9 28 50 04 1a 04 5f 0e 90 23 90 23 83 48 00 02 98 41 0c 02 8f 22 00 00 f0 a1 0d c2 82 20 ff ff 82 41 0c 46 ┆ A ^ " , , A A :B A Q (P _ # # H A " A F┆
0xc5c2…c612 02 00 e9 20 00 30 52 24 e9 20 00 39 55 0e e9 20 00 41 52 18 e9 20 00 46 51 12 19 07 19 30 3a 44 92 04 90 41 0c 46 f0 a1 0d c2 5f 2a 90 a0 00 04 f8 41 0c 46 8f 22 00 00 81 20 ff f8 81 41 0c 70 a0 41 0c 72 f0 a1 0c ce f0 a1 0d 98 f0 a1 0c 92 ┆ 0R$ 9U AR FQ 0:D A F _* A F " A p A r ┆
0xc612…c662 14 02 54 04 90 41 0c 72 90 41 0c 70 5c 1a f0 22 00 00 00 00 f0 a1 0c ac e9 20 00 20 52 06 e9 20 00 5f 55 02 01 2e f0 a1 0d ba 13 01 1a 01 5c 1c f0 22 81 20 ff fc 81 41 0c aa 3a c4 81 08 f0 a1 0d 8c 90 41 0c aa 5c 0e f0 22 00 00 82 41 0c c6 ┆ T A r A p " R _U . " A : A " A ┆
0xc662…c6b2 84 41 0c ca 84 0c f0 a1 0c ce 24 01 54 02 e2 08 81 08 21 ff 82 20 00 00 84 20 00 00 f0 22 81 41 0c fe 81 40 0d 8a 54 04 82 30 57 20 f0 a1 0d 02 d2 30 57 14 81 41 0c fe 81 40 0d 8a 54 04 83 31 57 0a f0 a1 0d 02 d3 31 b8 40 0d 6a 81 20 00 00 ┆ A $ T ! " A @ T 0W 0W A @ T 1W 1 @ j ┆
0xc6b2…c702 f0 22 82 41 0d 46 b8 41 0d 6a 81 04 50 36 52 0c e9 20 3a 55 54 20 b8 40 03 06 57 28 02 1e 39 44 29 0f 39 e6 81 49 0d 4a 39 c6 19 01 1a 02 5e 0e b8 40 0d 4a 57 0e 87 3f 50 02 88 01 11 00 00 28 41 55 14 10 08 08 a1 48 00 a1 14 24 28 08 10 40 ┆ " A F A j P6R :UT @ W( 9D) 9 I J9 ^ @ JW ?P (AU H $( @┆
0xc702…c752 (129, 0, 400) 87 04 f7 a1 12 3c b8 48 ff d8 87 3e 82 20 00 00 f0 22 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ < H > " ┆
0xc752…c7a2 00 00 00 00 21 0f 19 0a 52 02 11 07 11 3a 57 22 01 20 f0 a1 0d ba 01 20 57 18 01 0d f0 a1 0d ba 01 0a 57 0e 01 0d 57 0a 01 3f 57 06 01 2f 57 02 01 3a 81 41 0e 0a 01 00 57 02 01 21 81 41 0e 04 41 d0 50 4c f0 a1 0e 16 5f 0e f7 a1 0b 22 01 40 ┆ ! R :W" W W W ?W /W : A W ! A A PL _ " @┆
0xc7a2…c7f2 a9 5f 00 12 82 20 00 00 83 20 00 00 84 20 00 00 85 20 00 00 86 20 00 00 87 20 00 00 80 a0 00 00 49 d0 54 06 81 20 00 00 f0 22 81 20 00 00 54 08 81 20 00 00 41 10 50 06 49 10 54 24 21 7f 41 90 81 41 0d fe 82 41 0d de 83 41 0d e2 84 41 0d e6 ┆ _ I T " T A P I T$! A A A A A ┆
0xc7f2…c842 85 41 0d ea 86 41 0d ee 87 41 0d f2 80 c1 0d f6 8f 20 0a b6 81 41 0e 46 01 01 41 d0 81 20 00 00 8f 40 03 a2 98 41 03 92 8c 40 03 a4 20 f7 f0 3e 20 df f7 a1 0b 22 01 40 a9 5f 00 12 8f 20 04 24 f7 a1 0b 84 80 a0 02 86 05 49 f0 a1 0b d0 03 26 ┆ A A A A F A @ A @ > " @ _ $ I &┆
0xc842…c892 52 3e 05 4d 98 41 03 98 50 36 05 54 e9 40 03 94 54 2e 86 40 03 96 50 08 1e 01 86 41 03 96 57 18 87 60 03 9e a7 40 03 9c b7 40 03 9a 50 02 07 01 97 40 03 a0 1f 02 54 08 20 00 00 00 00 00 21 00 21 12 00 00 00 00 55 55 50 54 21 53 11 22 54 40 ┆R> M A P6 T @ T. @ P A W ` @ @ P @ T ! ! UUPT!S "T@┆
0xc892…c8e2 (130, 0, 400) f7 a1 09 a4 8f 20 0a b6 98 41 03 90 50 0c a0 41 03 8e 3c e7 56 04 90 41 03 8e 8f 20 03 b6 00 00 00 00 bc 3e f0 3e f7 a1 11 22 20 bf 85 40 0e d0 a0 41 0e d0 f7 a1 11 a0 57 0e f7 a1 11 58 57 08 81 20 80 00 f7 a1 17 0c 20 bf e1 5e 00 12 21 fc ┆ A P A < V A > > " @ A W XW ^ ! ┆
0xc8e2…c932 19 c4 5a 32 82 20 0e ce 83 28 58 3a 85 40 0e d0 50 0a 84 54 00 05 ec 4d 00 05 5d 4a 86 2c 86 29 83 41 0e d0 15 00 50 2a 16 00 50 0c ec 59 00 05 55 06 82 18 86 28 5c 0c 85 29 86 35 86 d5 00 26 86 94 bc 3e be db 00 0c b9 3e 81 5b 00 0a 82 5b ┆ Z2 (X: @ P T M ]J , ) A P* P Y U ( ) 5 & > > [ [┆
0xc932…c982 00 08 86 c0 0e d0 b8 5a ff d8 81 5a 00 0a 82 5a 00 08 b9 3f bf 5a 00 0c f0 3e 80 41 12 a4 20 fb 87 c1 0f 82 87 c0 0e d0 bf 5f 00 0c 85 40 0e d0 87 a0 00 00 83 3e 82 3e 83 55 00 08 23 01 54 04 b8 40 13 38 d3 48 ff fe d6 28 eb 20 28 04 50 0a ┆ Z Z Z ? Z > A _ @ > > U # T @ 8 H ( ( P ┆
0xc982…c9d2 eb 20 63 00 50 04 01 07 57 36 12 02 ee 20 00 09 88 20 2a 5e a0 41 0e d0 f7 a1 12 80 04 00 83 18 56 06 d4 28 12 02 9b 0d 82 55 00 0a 93 0c 50 1c eb 40 2a cc 56 0e 20 bf 83 4c 2a cc 8c 0c 01 0f f7 a1 12 ae 82 20 ff ff 82 55 00 18 f7 a1 11 22 ┆ c P W6 *^ A V ( U P @* V L* U "┆
0xc9d2…ca22 8f 20 0e f8 00 00 00 00 00 00 23 50 00 00 00 00 00 c0 10 3e 00 01 00 01 00 00 80 41 12 a4 20 ef f8 41 10 04 51 08 bf 3f 87 c1 0f fe 20 7f 87 c0 0f fe bf 3e bc 3f 81 40 54 8a 09 52 10 11 00 40 00 00 20 02 51 00 40 00 54 00 44 41 40 42 44 80 ┆ #P > A A Q ? > ? @T R @ Q @ T DA@BD ┆
0xca22…ca72 (131, 0, 400) 0e ce 82 20 0f f8 e9 08 58 42 81 29 82 41 0e ce 90 41 10 08 5f 4e a0 41 10 08 a0 41 10 06 f7 a1 12 68 a0 41 0e d0 5f 60 80 41 12 a4 20 f7 90 41 10 f8 51 02 f0 3e bc 3f 84 20 ff fc 84 41 10 f8 82 20 10 b0 f7 a1 11 46 90 41 10 ae 51 06 f7 a1 ┆ XB ) A A _N A A h A _` A A Q > ? A F A Q ┆
0xca72…cac2 12 8e 5f 8c 84 20 ff f7 84 41 10 ae 04 04 03 3c 90 51 10 a8 b3 50 10 a8 5c 1c a0 51 10 a8 1c 02 52 06 59 16 03 18 5f 18 90 41 10 a6 5f 30 00 00 00 00 00 00 00 00 00 00 20 bf 84 20 10 fa 86 10 84 38 88 20 0e da 90 51 00 04 5a 0e 50 10 83 30 ┆ _ A < Q P Q R Y _ A _0 8 Q Z P 0┆
0xcac2…cb12 83 39 f7 a1 11 e4 84 08 f7 a1 11 e4 5f 1e f7 a1 10 e2 f7 a1 12 80 20 bf 5f 2c bc 3f 81 20 c4 c0 81 5f 00 12 82 50 00 02 81 48 00 04 8f 48 00 02 00 00 00 00 20 bf 83 3f 84 3f 85 3f 86 3f 87 3f 80 bf 83 5e 00 10 83 41 11 20 82 5f 00 0e 81 5f ┆ 9 _ _, ? _ P H H ? ? ? ? ? ^ A _ _┆
0xcb12…cb62 00 10 83 5e 00 0c 8f 20 00 00 20 bf b9 bf 81 20 0e ce 82 24 50 10 83 54 00 05 eb 49 00 05 52 06 81 08 82 24 5c 0c 82 35 85 25 b9 be f0 3e 20 bf bc 3f 85 20 12 e4 57 0c 20 bf bc 3f 06 01 57 06 20 bf bc 3f 06 00 87 54 00 0a 54 18 82 55 00 0a ┆ ^ $P T I R $ 5 % > ? W ? W ? T T U ┆
0xcb62…cbb2 82 54 00 02 ba 55 00 0c a0 55 ff fc f7 a1 11 22 bc 3e f0 3e 87 10 f7 a1 11 c0 81 1c 82 10 f7 a1 11 c0 95 20 00 06 83 14 85 34 16 00 54 04 15 00 5c 0c 84 2d 85 31 5f 28 a1 4a a4 81 54 84 52 04 02 20 24 a0 00 00 08 00 80 00 20 00 01 08 80 00 ┆ T U U " > > 4 T - 1_( J T R $ ┆
0xcbb2…cc02 (132, 0, 400) a0 55 00 0a 84 54 00 06 50 bc 83 30 83 55 00 06 f7 a1 11 e4 87 04 84 08 f7 a1 11 e4 84 1c 5f 68 20 bf 85 3f 84 40 70 6c 54 06 01 0b f7 a1 12 ae 85 30 85 41 70 6c 83 31 82 51 00 02 81 51 00 04 85 3e f0 3e 20 bf 83 30 81 40 70 6c 81 31 84 41 ┆ U T P 0 U _h ? @plT 0 Apl 1 Q Q > > 0 @pl 1 A┆
0xcc02…cc52 70 6c 82 50 00 02 81 50 00 04 f0 3e d2 22 81 3f 86 20 00 2a 96 14 81 58 ff fe 19 04 52 0c ea 59 00 01 50 20 16 04 5f 0e 81 3f 86 40 00 b6 81 38 16 02 19 04 52 0a ea 59 00 01 50 08 16 04 5f 0e 06 00 57 30 e2 38 86 58 00 02 57 28 81 3f 81 60 ┆pl P P > " ? * X R Y P _ ? @ 8 R Y P _ W0 8 X W( ? `┆
0xcc52…cca2 00 b4 91 40 00 b4 19 02 e9 40 00 b4 50 0a 82 24 ef 48 00 02 5c 10 57 0c 02 00 57 08 bc 3e f0 3e b9 3e f0 3e 81 3e f0 3e 01 02 e9 40 2a f2 56 0e 81 3f 20 bf f7 c5 2a f2 81 3e 11 02 5f 14 f0 3e 81 3f 81 20 c0 c0 81 5f 00 04 81 3e f0 3e 81 3f ┆ @ @ P $ H W W > > > > > > @* V ? * > _ > ? _ > > ?┆
0xcca2…ccf2 e1 5e 00 18 21 fc 19 bc 59 18 81 5e 00 18 a1 20 ff fe 5f 1e 00 00 00 00 01 05 f7 a1 12 ae bf 3f 87 c1 12 a6 41 2e 20 7f 8f 20 0f de 00 00 04 00 08 00 0c 00 10 00 14 00 18 00 1c 00 20 00 24 00 28 00 2c 00 30 00 34 00 38 00 3c 00 00 00 00 00 ┆ ^ ! Y ^ _ ? A. $ ( , 0 4 8 < ┆
0xccf2…cd42 00 00 00 00 00 00 23 4d 00 31 00 00 c4 c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 14 e8 14 fa 15 1a 15 3a 14 f8 15 1a 00 44 11 20 04 80 00 02 00 00 a4 00 02 10 00 00 02 44 00 00 00 00 03 f0 ┆ #M 1 : D D ┆