|
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: 30354 (0x7692)
Notes: pts_type(SC)
Names: »DRGP02.SC«
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
└─⟦this⟧ »M:LP/DRGP02.SC«
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
└─⟦this⟧ »M:LP/DRGP02.SC«
IDENT DRGP02 REL 10.0 80-03-14 870105041000 =1,IMPROVEMENT OF FORM LENGTH CON- TROL & FORM FEED FUNCTION ON CONT. STATIONARY. PRR 10.0 79-12-07 =2,XIF MOVED TO RIGHT PLACE PRR 10.0 80-01-25 * ******************************************************* * * * PHILIPS TERMINAL SYSTEM PTS * * * * DRGP02 = DRIVER GENERAL PRINTER * * * * * * * ******************************************************* * * THIS DRIVER HANDLES GENERAL PRINTER PTS 8081 * * THE DRIVER CONSISTS OF THE FOLLOWING PARTS : * * A C T P : ACTIVATION PART * * I H T P : INTERRUPT HANDLER * * R C T P : RECOVERY ROUTINE * * EJECT * * THE FOLLOWING ORDERS ARE TREATED: * * ORDER 00 : TEST STATUS * ORDER 06 : WRITE * ORDER 0B : POSITION DOCUMENT * ORDER 24 : SET PRINTER PARAMETERS * ORDER 38 : RELEASE DOCUMENT * * THE FOLLOWING RETURN CODES ARE USED: * * BIT 0 : REQUEST ERROR * BIT 2 : END OF JOURNAL TAPE, DOCUMENT OUT * BIT 13 : CODE CHECK ERROR * BIT 15 : NOT OPERABLE * * * NORMAL REGISTER USAGE: * * REGISTER A1: WORK REGISTER * A2: INPUT/OUTPUT * A3: BUFFER POINTER * A4: WORK REGISTER * A5: STACK POINTER * A6: DWT-ADDRESS * A7: ORDER * A8: ECB-ADDRESS * * EJECT * * ******************************************* * * ENTRIES * ******************************************* * * ENTRY GPAD8 ADDRESS BLOCK * * * ******************************************* * * EXTERNALS * ******************************************* * * EXTRN TDISP DISPATCHING FROM INTERRUPT EXTRN DISIOE DISPATCH I/O ERROR EXTRN DISEND END I/O AND DISPATCH EXTRN OUTPUT OUTPUT ONE CHARACTER EXTRN LDREG RESTORE REGISTERS EXTRN SAVE8 SAVE REG. A1-A8 EXTRN GETCHR GET CHARACTER FROM ECB BUFFER EXTRN DWTST DWT STATUS DISPLACEMENT EXTRN DWTECB DWT ECB DISPLACEMENT EXTRN DWTOR DWT ORDER DISPLACEMENT EXTRN STREG STORE REG = GET STATUS INPUT CHAR EXTRN INIFLG SYSTEM START INDICATOR EJECT * * ****************************************** * * CONSTANTS * ****************************************** * * STB EQU /82 START OF TEXT BLOCK ETB EQU /97 END OF TEXT BLOCK SPEC EQU /2E SPECIAL CHARACTER STX EQU /02 START OF TEXT ETX EQU /03 END OF TEXT LF EQU /0A LINE FEED FF EQU /0C FORM FEED CR EQU /0D CARRIAGE RETURN SO EQU /0E SHIFT OUT SI EQU /0F SHIFT IN ESC EQU /1B ESCAPE CSI EQU /5B CONTROL SEQUENCE INTRODUCER REP EQU /62 REPEAT VPR EQU /65 VERTICAL POSITION RELATIVE INFF EQU /74 INPUT FRONT FEED VPFF EQU /71 VERTICAL POSITION FRONT FEED EJFF EQU /38 EJECT FRONT FEED SNV EQU /77 SELECT NATIONAL VERSION SLPL EQU /76 SELECT PAGE LENGTH RIS EQU /63 RESET TO INITIAL STATE DSR EQU /6E DEVICE STATUS REPORT DCS EQU /50 DEVICE CONTROL STRING ST EQU /5C STRING TERMINATOR DEL EQU /7F DELETE ZERO EQU /30 ZERO NEG EQU /FF EJECT * * ********************************************************* * * CONTROL SEQUENCES * ********************************************************* * * BYTE FORM 8,8 * * CSREP EQU * REPEAT BYTE ESC,CSI BYTE ZERO,ZERO BYTE ZERO,REP BYTE NEG,NEG CSVPR EQU * VERTICAL POSITION RELATIVE BYTE ESC,CSI BYTE ZERO,ZERO BYTE ZERO,VPR BYTE NEG,NEG CSINFF EQU * INPUT FRONT FEED BYTE ESC,CSI BYTE ZERO,ZERO BYTE INFF,NEG CSVPFF EQU * VERTICAL POSITION FRONT FEED BYTE ESC,CSI BYTE ZERO,ZERO BYTE VPFF,NEG CSEJFF EQU * EJECT FRONT FEED BYTE ESC,EJFF BYTE NEG,NEG EJECT CSSNV EQU * SELECT NATIONAL VERSION BYTE ESC,CSI BYTE ZERO,ZERO BYTE SNV,NEG CSSLPL EQU * SELECT PAGELENGTH BYTE ESC,CSI BYTE ZERO,ZERO BYTE SLPL,NEG * BYTE NEG,NEG CSRIS EQU * RESET TO INITIAL STATE BYTE ESC,RIS BYTE NEG,NEG CSDSR EQU * DEVICE STATUS REPORT BYTE ESC,CSI BYTE /35,DSR BYTE NEG,NEG EJECT * * ******************************************************* * * CONDITIONAL ASSEMBLY * ******************************************************* * * * * THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN * BY SETTING X:A TO 1-15 ACCORDING TO THE LIST BELOW * * * NCV=1 GERMANY,AUSTRIA,LUXEMBOURG,SWITZERLAND =2 GREAT BRITAIN,NETHERLANDS,BELGIUM,NEW ZEELAND,SOUTH AFRICA =3 FRANCE,SWITZERLAND,BELGIUM,LUXEMBOURG =4 SPAIN,MEXICO,ARGENTINA,VENEZUELA =5 ITALY,SWITZERLAND =6 SWEDEN,FINLAND =7 DENMARK,NORWAY =8 PORTUGAL,BRAZIL =9 YUGOSLAVIA =10 USA,CANADA,AUSTRALIA =11 SWEDEN (SPECIAL VERSION) =13 GREEK =14 JAPAN (KATAKANA VERSION) =15 ISRAEL (HEBREW VERSION) * * X:A EQU 02 GREAT BRITAIN AS STANDARD STDNCV EQU 07 EJECT * * * THE FRONT FEED DEVICE CAN BE EXCLUDED * BY SETTING X:B = 0 * * X:B EQU 1 FFDEV EQU 0 FRONT FEED DEVICE * * * * THE STANDARD PAGELENGTH IS DEFINED * BY SETTING X:C = NUMBER OF LINES * * X:C EQU 48 PAGLEN EQU 51 * * * THE STANDARD NUMBER OF LINES IS DEFINED * BY SETTING X:D = NUMBER OF LINES * * X:D EQU 36 * DOCLEN EQU 48 EJECT * * * * MMU BUFFER SIZE * * X:E EQU 132 DVBLEN EQU 000 * * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1 * * MMUPAG EQU 0 * * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0 * * CPU852 EQU 0 EJECT * * ******************************************* * * DWT - DISPLACEMENTS * ******************************************* * * * DWTDRD EQU /10 START OF DRIVER DEFINED PART * IFT MMUPAG=0 START EQU DWTDRD XIF * IFT MMUPAG=1 START EQU DWTDRD+4 XIF * DWTDCS EQU START+/12 DOCUMENT CHARACTER SET DWTPCS EQU START+/14 PRINTER CHARACTER SET DWTPL EQU START+/16 PRINTER PAPER LENGTH DWTDL EQU START+/18 DOCUMENT PAPER LENGTH DWTALN EQU START+/1A ACTUAL LINE ON DOCUMENT DWTRLN EQU START+/1C REQUESTED LINE ON DOCUMENT DWTRC EQU START+/1F RETURN CODE (ACKUMULATED) DWTSTR EQU START+/20 CONTROL SEQUENCE ADRESS DWTDISP EQU START+/22 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. DWTACD EQU START+/24 ACTUAL COLUMN DOCUMENT DWTACP EQU START+/27 ACTUAL COLUMN PAPER DWTCO1 EQU START+/2A COLUMN COUNTER 1 DWTCO2 EQU START+/2B COLUMN COUNTER 2 DWTSYST EQU START+/30 SYSTEM START IND. DWTLFD EQU START+/32 LINE/FORM FEED INDICATOR EJECT * * ******************************************* * * ECB - DISPLACEMENTS * ******************************************* * ECBBA EQU 2 BUFFER ADDRESS IN ECB ECBRL EQU 4 REQUESTED LENGTH IN ECB ECBEL EQU 6 EFFECTIVE LENGTH IN ECB ECBRC EQU 8 RETURN CODE IN ECB ECBCW EQU 10 CONTROL WORD IN ECB EJECT * ******************************************* * * TABLES * ******************************************* * * DATA DVBLEN MMU BUFFER SIZE DATA 2 DEVICE INDEX GPAD8 EQU * ADDRESS BLOCK DATA ACTP ACTIVATION DRIVER DATA 0 ABORT ROUTINE ADDRESS DATA IHTP INTERRUPT HANDLER DATA RCTP RECOVERY ROUTINE TPTAB EQU * IFT FFDEV=1 DATA /0107,/0C25,/3939 XIF DATA /0006,/2424 TPLEN EQU *-TPTAB EJECT * * * A C T P * * THIS IS THE ACTIVATION PART OF THE DRIVER * CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR * * * ACTP EQU * ACTIVATION ENTRY * * * GET DWT INDEX: 0=CONTINUOUS STATIONARY, 1=DOCUMENT * LC A2,DWTOR,A6 GET DWT INDEX ANK A2,1 MASK LC A3,DWTST+1,A6 GET OLD DEVICE VALUE ANK A3,/FE ORR A3,A2 SC A3,DWTST+1,A6 STORE INDEX ADR A7,A2 ADD DWT INDEX TO ORDER SC A7,DWTOR+1,A6 STORE MODIFIED ORDER ACT005 LDK A3,TPLEN-1 ACT010 CC A7,TPTAB,A3 CHECK IF LEGAL ORDER RF(E) ACT020 VALID ORDER SUK A3,1 RB(NN) ACT010 TRY NEXT * ABL DISIOE ILLEGAL ORDER * * ACT020 EQU * ADR A3,A3 GET INDEX ABI TPFUC,A3 EXECUTE ORDER EJECT TPFUC EQU * IFT FFDEV=1 DATA TSTSTA,WRTDOC,POSDOC,DOCPAR,RELDOC,RELDOC XIF DATA TSTSTA,WRTCON,CSTPAR,CSTPAR EJECT * * * ORDER 00 : TEST STATUS * * TSTSTA EQU * TEST STATUS CF A5,RESREC CF A5,GTSTAT GET STATUS FROM PRINTER ABL DISEND END REQUEST EJECT IFT FFDEV=1 * * * ORDER 06: WRITE DOCUMENT * * WRTDOC EQU * CF A5,GTSTAT LD A4,DWTST,A6 DEVICE STATUS ANKL A4,/200 HAS POWER OFF OCCURED ? RF(NZ) WRDO05 YES LDKL A3,/2000 * TM A1,A3 DOCUMENT OUT ? RF(Z) WRDO06 NO LDKL A3,/8000 YES SET BIT 0 (REQ ERROR) ORS A3,ECBRC,A8 ABL DISEND END REQUEST WRDO05 EQU * * WRDO06 LDK A3,1 TM A1,A3 NOT OPERABLE? RF(Z) WRDO10 NO ABL DISEND END REQUEST WRDO10 LD A3,DWTALN,A6 GET ACTUAL LINE RF(NZ) WRDO15 LDK A3,1 SET UP ECB BUFFER POINTER CF A15,GETCHR GET CONTROL CHARACTER CWK A2,/31 CTRL CHAR=/31 ? ABL(NE) POSERR NO,DOC NOT POSITIONED LD A3,DWTDL,A6 * ST A3,DWTRLN,A6 FIRST LINE ON DOC. WRDO12 LDKL A2,CSINFF INPUT FRONT FEED LDK A3,DWTRLN REQUESTED LINE NO DISPLACEMENT CF A5,SEND SEND INPUT FRONT FEED LD A3,DWTRLN,A6 ST A3,DWTALN,A6 SET DWTALN=DWTRLN WRDO15 LDKL A2,CSSNV SELECT NATIONAL VERSION LDK A3,DWTDCS DOCUMENT CHARACTER SET DISPLACEMENT CF A5,SEND SEND SELECT NATIONAL VERSION * =1 * =1 * =1 RF WRT01 GOTO GET CONTROL CHARACTER XIF EJECT * * * ORDER 06: WRITE CONTINOUS STATIONARY * * WRTCON EQU * * CF A5,GTSTAT GET DEVICE STATUS LDKL A3,/2000 * TM A1,A3 END OF PAPER? RF(Z) WRCO05 NO. ABL ENDIO END REQUEST WRCO05 LDK A3,1 NOT OPERABLE? TM A1,A3 RF(Z) WRCO10 NO ABL ENDIO END REQUEST WRCO10 LDKL A2,CSSNV SELECT NATIONAL VERSION LDK A3,DWTPCS PRINTER CHAR. SET DISPLACEMENT CF A5,SEND SEND SELECT NATIONAL VERSION U =1 U =1 U =1 * * GET CONTROL CHARACTER * WRT01 LDK A3,1 SET UP ECB BUFFER POINTER CF A15,GETCHR GET CONTROL CHARACTER LDR A4,A1 LD A1,DWTST,A6 GET DEVICE STATUS ANKL A1,/200 HAS POWER OFF OCCURED ? RF(Z) WRT04 NO CF A5,RESREC YES CWK A2,/2B CTRL. CHAR.=/2B ? RF(NE) WRT08 NO LC A1,DWTOR+1,A6 GET DWT INDEX ANK A1,1 DOCUMENT ? RF(NZ) WRT09 YES RF WRT07 NO WRT04 CWK A2,/2B CTRL. CHAR.=/2B RF(NE) WRT02 NO LC A2,DWTOR+1,A6 GET DWT INDEX ANK A2,1 DOCUMENT? RF(NZ) WRT03 YES LD A4,DWTCO1,A6 GET ACTUAL COLUMN CF A5,KONVER CONVERT BINARY TO ASCII SC A2,DWTACP,A6 STORE THE VALUE IN ACTUAL COLUMN PAPER D ST A4,DWTACP+2,A6 STORE THE VALUE IN ACTUAL COLUMN PAPER DISPLACEMENT WRT07 LDK A2,/20 SEND SPACE CF A5,OUTPUT LDKL A2,CSREP REPEAT LDK A3,DWTACP ACTUAL COLUMN PAPER DISPLACEMENT CF A5,SEND SEND REPEAT LDK A3,2 SET UP ECB BUFFER POINTER RF WRT15 WRT03 LD A4,DWTCO2,A6 GET ACTUAL COLUMN CF A5,KONVER CONVERT BINARY TO ASCII SC A2,DWTACD,A6 STORE THE VALUE IN ACTUAL COLUMN DOC. DI SC A4,DWTACD+2,A6 STORE THE VALUE IN ACTUAL COLUMN DOC.DISPLACEMENT SRL A4,8 SC A4,DWTACD+1,A6 SHIFT FOR CORRECT DIGITS WRT09 LDK A2,/20 SEND SPACE CF A5,OUTPUT LDKL A2,CSREP REPEAT LDK A3,DWTACD ACTUAL COLUMN DOCUMENT DISPLACEMENT CF A5,SEND SEND REPEAT LDK A3,2 SET UP ECB BUFFER POINTER RF WRT15 WRT08 LC A1,DWTLFD,A6 GET INDICATOR ANK A1,/8 IS LINE/FORM FEED DONE ? RF(Z) WRT14 YES WRT02 LC A1,DWTOR+1,A6 DOCUMENT ? ANK A1,1 * RF(Z) WRT13 NO * CWK A2,/30 TWO LINE FEED ? RF(E) WRT11 YES * CWK A2,/31 FORM FEED ? RF(E) WRT12 YES RF WRT16 * WRT11 LD A1,DWTRLN,A6 GET REQ LINE NO CF A5,BINARY CONV ASCII TO BINARY SUK A3,1 INCR REQ LINE NO RF TWO TWO LINE FEED WRT16 LD A1,DWTRLN,A6 GET REQ LINE NO CF A5,BINARY CONV ASCII TO BINARY TWO SUK A3,1 INCR REQ LINE NO LDR A4,A3 * CF A5,KONVER CONV BINARY TO ASCII ST A4,DWTRLN,A6 STORE REQ LINE NO * LDKL A2,CSVPFF VERTICAL POS FRONT FEED LDK A3,DWTRLN REQ LINE NO DISPLACEMENT CF A5,SEND * * LD A4,DWTRLN,A6 * ST A4,DWTALN,A6 ACTUAL LINE =REQ LINE RF WRT12 * * WRT13 CWK A2,/30 CONTINOUS STATIONARY RF(E) WRT05 TWO LINE FEED,YES * CWK A2,/31 FORM FEED ? RF(NE) WRT10 NO * LDK A2,FF SEND FORM FEED CF A5,OUTPUT * RF WRT12 * * WRT05 LDK A2,LF SEND LINE FEED CF A5,OUTPUT WRT10 LDK A2,LF SEND LINE FEED CF A5,OUTPUT WRT12 LC A1,DWTLFD,A6 GET INDICATOR ORK A1,/4 INDICATE LINE/FORM FEED DONE SC A1,DWTLFD,A6 STORE INDICATOR WRT14 LC A2,DWTOR+1,A6 GET DWT INDEX ANK A2,1 DOCUMENT? RF(NZ) WRT45 YES CM DWTCO1,A6 CLEAR PAPER COLUMN COUNTER 1 WRT45 CM DWTCO2,A6 CLEAR DOCUMENT COLUMN COUNTER 2 LDK A2,/20 SEND ONE SPACE CF A5,OUTPUT WRT15 LDK A3,2 * RF WRT20 * WRT17 SUK A3,/02 ECB BUFFER POINTER = /02 RF(Z) WRT18 YES. LDK A2,CR NO. SEND CARRIAGE RETURN CF A5,OUTPUT WRT18 CF A5,GTSTAT GET STATUS RF ENDIO END REQUEST * WRT20 CF A15,GETCHR GET CHARACTER FRON ECB-BUFFER LDR A4,A1 RB(NP) WRT17 NO MORE CHARACTERS LDR A4,A2 * * EXAMINE CHARACTER AND SEND DEPENDING ON TYPE OF CHARACTER * SUK A4,/20 CHAR < /20? RB(N) WRT20 YES GET A NEW CHARACTER SUK A4,/5F CHAR < /7F? RF(N) WRT25 YES. SUK A4,/2F NO. CHAR = /AE? RF(Z) WRT30 YES. CONVERT /AE TO /2E LDK A4,/04 ILLEGAL CHARACTER SET BIT 13 IN R.C. ORS A4,ECBRC,A8 RB WRT20 WRT30 LDK A2,/2E WRT25 LDR A4,A1 CF A5,OUTPUT SEND CHARACTER LC A2,DWTOR+1,A6 GET DWT INDEX ANK A2,1 DOCUMENT? RF(NZ) WRT40 YES IM DWTCO1,A6 INC.COLUMN COUNTER 1 RB WRT20 WRT40 IM DWTCO2,A6 INC.COLUMN COUNTER 2 RB WRT20 ENDIO EQU * LC A2,DWTLFD,A6 * ANK A2,/8 * SC A2,DWTLFD,A6 RESET LF/FF IND. ABL DISEND END REQUEST EJECT IFT FFDEV=1 * * * ORDER 0B : POSITION DOCUMENT * CONTROL WORD CONTAINS REQUESTED LINE NO * * POSDOC EQU * POSITION DOCUMENT CF A5,RESREC CF A5,GTSTAT GET DEVICE STATUS LDK A3,1 NOT OPERABLE TM A1,A3 * RF(NZ) POS020 YES LDKL A2,CSSNV SELECT NATIONAL VERSION LDK A3,DWTDCS DOCUMENT VERSION CF A5,SEND SEND SNV * =1 * =1 * =1 LD A4,ECBCW,A8 GET REQUESTED LINE ANK A4,/FF RF(Z) POSERR ILLEGAL LINE NUMBER LD A1,DWTDL,A6 MAX. LINE CF A5,BINARY CONVERT ASCII TO BINARY CWR A4,A3 REQ. LINE>MAX. LINE RF(G) POSERR YES ADK A3,1 CORRECT POSITION SUR A4,A3 INVERT LINE NO. NGR A4,A4 GET PRINTER REQ. LINE NO. CF A5,KONVER CONVERT BINARY TO ASCII ST A4,DWTRLN,A6 SET REQUESTED LINE LD A4,DWTALN,A6 GET ACTUAL LINE RF(NZ) POS030 DOCUMENT ALREADY POSITIONED POS005 EQU * LDKL A2,CSINFF INPUT FRONT FEED LDK A3,DWTRLN REQUESTED LINE NUMBER DISPLACEMENT CF A5,SEND SEND INPUT FRONT FEED POS010 EQU * CF A5,GTSTAT GET STATUS LDR A2,A1 GET RETURN CODE ANKL A2,/2000 PAPER DOCUMENT OUT ? RB(NZ) POS005 YES WAIT FOR DOCUMENT TO BE INSERTED LD A4,DWTRLN,A6 GET REQUESTED LINE ST A4,DWTALN,A6 ACTUAL LINE = REQ LINE * =2 POS020 ABL DISEND POS030 EQU * LDKL A2,CSVPFF VERTICAL POSITION FRONT FEED LDK A3,DWTRLN REQUESTED LINE NUMBER DISPLACEMENT CF A5,SEND SEND VERTICAL POSITION FRONT FEED RB POS010 XIF =2 =2 POSERR EQU * LDKL A1,/8000 REQUEST ERROR RB ENDIO END REQUEST EJECT IFT FFDEV=1 * * * ORDER 24 : SET DOCUMENT PARAMETERS * * DOCPAR EQU * DOCUMENT PARAMETERS LDK A1,0 CLEAR A1 CF A5,RESREC LD A4,ECBCW,A8 GET NUMBER OF LINES SRL A4,8 GET LINES RF(Z) DOC010 NO CHANGE OF LINES CWK A4,/10 INDEX TO BIG RB(G) POSERR YES ADR A4,A4 ADJUST INDEX TO LINE TABLE LD A4,LINNUM,A4 GET LINE ACCORDING TO INDEX ST A4,DWTDL,A6 SET PAGE LENGTH FOR DOCUMENT DOC010 EQU * LD A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION ANK A4,/FF RF(Z) DOC020 NO CHANGE OF NATIONAL CHARACTER SET CWK A4,/F INDEX TO BIG RB(G) POSERR YES ADR A4,A4 ADJUST TABLE INDEX LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACC. TO INDEX ST A4,DWTDCS,A6 SET CHARACTER SET FOR DOCUMENT DOC020 EQU * RB ENDIO END REQUEST XIF EJECT * * * ORDER 24 : SET CONTINUOUS STATIONARY PARAMETERS * * CSTPAR EQU * SET PARAMETERS CONTINUOUS STATIONARY LDK A1,0 CLEAR A1 CF A5,RESREC LD A4,ECBCW,A8 GET NUMBER OF LINES CST. SRL A4,8 GET LINES RF(Z) CST010 NO CHANGE OF LINES CWK A4,/10 INDEX TO BIG RB(G) POSERR YES ADR A4,A4 ADJUST INDEX TO LINE TABLE LD A4,LINNUM,A4 GET LINES ACCORDING TO INDEX ST A4,DWTPL,A6 SET PAGE LENGTH FOR CONT.STAT. LDKL A2,CSSLPL SELECT PAGELENGTH =1 LDK A3,DWTPL PRINTER PAPER LENGTH DISPL. =1 CF A5,SEND SEND SELECT PAGELENGTH =1 CST010 EQU * LD A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION ANK A4,/FF RF(Z) CST020 NO CHANGE OF NAT. CHAR. SET CWK A4,/F INDEX TO BIG RB(G) POSERR YES ADR A4,A4 ADJUST INDEX TO NAT. CHAR. TABLE LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACC. TO INDEX ST A4,DWTPCS,A6 SET NAT. CHAR. SET FOR CONT.STAT. CST020 EQU * ABL ENDIO END REQUEST * * * EJECT IFT FFDEV=1 * * * ORDER 38 : RELEASE DOCUMENT * * RELDOC EQU * CF A5,RESREC LDKL A2,CSEJFF CONTROL SEQ. EJECT FRONT FEED CF A5,SEND SEND SEQUENCE CF A5,GTSTAT GET STATUS FROM PRINTER LDR A2,A1 GET RETURN CODE ANK A2,/20 DOCUMENT RELEASED RB(NZ) RELDOC NO , TRY AGAIN ANKL A1,/8000 REQUEST ERROR CM DWTALN,A6 RESET ACTUAL LINE CM DWTRLN,A6 RESET REQUESTED LINE ABL ENDIO END REQUEST XIF EJECT * * * I H T P * * * INTERRUPT HANDLER : PROCESS OF INTERRUPT * * * IHTP EQU * LD A4,DWTST,A6 I/O-REQUEST ABL(N) TDISP NO , DISPATCH ABL LDREG RETURN TO READ ROUTINE EJECT * * * R C T P * * RECOVERY ROUTINE REPEATS RUNNING REQUEST AT POWER ON * * RCTP EQU * CF A15,SAVE8 SAVE A1 - A8 LC A4,DWTLFD,A6 GET INDICATOR ANK A4,/4 IS LINE/FORM FEED DONE ? RF(NZ) RCTP05 YES ORK A4,/8 INDICATE:NO LINE/FORM FEED DONE SC A4,DWTLFD,A6 * * RF RCTP07 * * RCTP05 LDK A4,0 RESET INDICATORS ST A4,DWTLFD,A6 * RCTP07 LDKL A1,/7FFF SET DEVICE BUSY ANS A1,DWTST,A6 BUSY LDKL A2,CSRIS RESET TO INITIAL STATE CF A5,SEND SEND RESET TO INITIAL STATE LD A1,DWTSYST,A6 INTERN. SYSTEM START IND. RF(NZ) RCTP10 NO SYSTEM START * IM DWTSYST,A6 SET SYSTEM START INDICATOR * LDKL A4,STDNCV GET STANDARD NAT. CHAR. SET CF A5,KONVER CONVERT BIANARY TO ASCII ST A4,DWTDCS,A6 SET CHAR. SET DOCUMENT ST A4,DWTPCS,A6 SET CHAR. SET CONT.STAT. LDKL A4,PAGLEN STANDARD PAGE LENGTH CF A5,KONVER CONVERT BINARY TO ASCII ST A4,DWTPL,A6 SET PAGE LENGTH CONT.STAT. LDKL A2,CSSLPL SELECT PAGELENGTH =1 LDK A3,DWTPL PRINTER PAPER LENGTH DISPL. =1 CF A5,SEND SEND SELECT PAGELENGTH =1 LDKL A4,DOCLEN GET STANDARD PAGE LENGTH DOCUMENT CF A5,KONVER CONVERT BINARY TO ASCII ST A4,DWTDL,A6 SET PAGE LENGTH DOCUMENT RCTP10 EQU * CM DWTALN,A6 RESET ACTUAL LINE LDKL A1,/200 INDICATE POWER OFF OCCURED ORS A1,DWTST,A6 LD A1,DWTECB,A6 RUNNING REQUEST ABL(NZ) ACT005 YES , REPEAT THE REQUEST ABL DISEND DISPATCH EJECT * * * GTSTAT * * * THIS ROUTINE SENDS 'DEVICE STATUS REPORT TO THE PRINTER * * AND ANALYZES THE DEVICE STATUS SENT FROM THE PRINTER * * AT EXIT A1 = RETURN CODE * * GTSTAT EQU * CM DWTRC,A6 RESET RETURN CODE LDK A2,ESC ESCAPE CF A5,OUTPUT SEND ESC LDK A2,CSI CONTROL SEQUENCE INTRODUCER CF A5,OUTPUT SEND CSI LDK A2,/35 CF A5,OUTPUT SEND /35 LDK A2,DSR DEVICE STATUS REPORT CF A5,OUTPUT SEND DSR LDR* A2,A6 ANK A2,/F * CWK A2,/C PTS 8000 ? RF(L) GTST05 NO SUK A2,/F SALCUZ ? RF(Z) GTST05 YES LDK A2,ETX END OF TEXT CF A5,OUTPUT SEND ETX GTST05 LDKL A4,TAB GET TABLE ADDRESS GTST10 EQU * LDK A3,0 RESET INDEX CF A5,STREG READ STATUS FROM PRINTER ANK A2,/FF GET CHARACTER CCK A2,/5C5C STRING TERMINATOR RF(E) GTSEND YES LCR A3,A4 GET MASK RETURN CODE ANR A2,A3 LDKL A3,/3AC0 SHIFT LEFT CIRCULAR A2 LC A3,1,A4 A3 TIMES EXR A3 EXECUT SHIFT INSTRUCTION ORS A2,DWTRC,A6 SAVE RETURN CODE TEMPORARILY ADK A4,2 INCREMENT ADRESS RB GTST10 GET NEXT STATUS CHARACTER GTSEND EQU * LD A1,DWTRC,A6 GET RETURN CODE RTN A5 EJECT * * THIS ROUTINE CONVERTS A BINARY VALUE TO ASCII CODE * * REGISTERS : * A1= WORK REGISTER * A4= BINARY INPUT * A2,A4= ASCII OUTPUT * * KONVER EQU * * BINARY TO DEC. LDK A2,0 CLEAR A2 CWK A4,100 VALUE > 100 ? RF(L) KONV05 NO SUKL A4,100 LDKL A2,/100 LEFT BYTE OF A2=X=1 KONV05 CWK A4,10 ARE THERE ANY TENS ? RF(L) KONV04 NO SUK A4,10 ADK A2,/1 NUMBER OF TENS IN RIGHT B. OF A2=Y RB KONV05 NEXT KONV04 ORKL A2,/3030 XY IN A2 ORK A4,/30 Z IN A4 SRC A2,8 YX IN A2 LDR A1,A2 ANKL A1,/FF00 KEEP Y IN A1 ANK A2,/FF KEEP X IN R. BYTE OF A2. ASCII ORR A4,A1 YZ IN A1. ASCII RTN A5 EJECT * * RESET RECORVERY * RESREC EQU * LD A4,DWTST,A6 DEVICE STATUS ANKL A4,/200 RECOVERY? RF(E) RESRTN NO. XRS A4,DWTST,A6 YES. RESET RECOVERY BIT RESRTN RTN A5 RETURN EJECT * * * S E N D * * THIS ROUTINE SENDS AN CONTROL SEQUENCE * TO THE PRINTER * * * AT ENTRY : * A2 = CONTROL SEQUENCE ADRESS * A3 = DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC * * * AT EXIT : * A1,A2,A3 IS DESTROYED * * * SEND EQU * SEND CONTROL SEQUENCE ST A3,DWTDISP,A6 SAVE DWT-DISPLACEMENT ST A2,DWTSTR,A6 CONTROL SEQUENCE ADRESS SEND10 EQU * LD A3,DWTSTR,A6 GET CONTROL SEQUENCE ADRESS LCR A2,A3 GET CHARACTER ANK A2,/FF MAKE CHARACTER SLL A2,8 END OF CONTROL SEQUENCE RF(N) SENDEND YES,RETURN CWK A2,/3000 LINE NO,CHAR.SET,ETC RF(E) SEND30 YES SRL A2,8 PREPARE TO SEND CHARACTER CF A5,OUTPUT SEND CHARACTER SEND20 EQU * IM DWTSTR,A6 INC. CONTROLSEQUENCE ADRESS RB SEND10 GET NEXT SEND30 EQU * LD A3,DWTDISP,A6 GET DWT-DISPLACEMENT ADR A3,A6 GET PROPER VALUE LCR A2,A3 GET CHARACTER CF A5,OUTPUT SEND CHARACTER IM DWTDISP,A6 INC. DISPLACEMENT ADRESS RB SEND20 GET NEXT SENDEND EQU * RTN A5 EJECT * * * BINARY * * THIS ROUTINE CONVERTS ASCII CODE TO A BINARY VALUE * * REGISTERS: * A1= ASCII INPUT * A2= WORK REGISTER * A3= BINARY OUTPUT * * * BINARY SUR A3,A3 CLEAR A3 LDR A2,A1 MAX. LINE ASCII SRL A2,8 SUK A2,/30 ADR A3,A2 ADR A3,A2 SLL A2,3 ADR A3,A2 ANK A1,/F ADR A3,A1 MAX. LINE BINARY RTN A5 EJECT LINNUM EQU *-2 NUMBER OF LINES DATA /3132,/3135,/3138,/3234 DATA /3235,/3330,/3333,/3335 DATA /3336,/3438,/3530,/3531 DATA /3630,/3636,/3730,/3732 * * * * NCVTAB EQU *-2 NATIONAL CHARACTER VARIATION YABLE DATA /3031,/3032,/3033,/3034 DATA /3035,/3036,/3037,/3038 DATA /3039,/3130,/3131,/3131 DATA /3133,/3134,/3135 TAB EQU * MASK TABLE FOR STATUS REPORT FROM PRINTER DATA /C0,/C0,/C0,/2CC * DATA /2CF,/4CB,/C0,/C0 * DATA /C0,/C0,/C0,/C0 DATA /C0,/C0 END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRGP02 REL 10.0 80-03-14 870105041000 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…006c Head {h00=0x002a, h01=0x0050, text=» =1,IMPROVEMENT OF FORM LENGTH CON- «, t00=0x0000, t01=0x0042}
0x006c…009a Head {h00=0x002a, h01=0x0050, text=» TROL & FORM FEED FUNCTION ON CONT.«, t00=0x0000, t01=0x0070}
0x009a…00c4 Head {h00=0x0026, h01=0x0050, text=» STATIONARY. PRR 10.0 79-12-07 «, t00=0x0000, t01=0x009e}
0x00c4…00ea Head {h00=0x0022, h01=0x0050, text=» =2,XIF MOVED TO RIGHT PLACE«, t00=0x0000, t01=0x00c8}
0x00ea…0106 Head {h00=0x0018, h01=0x0050, text=» PRR 10.0 80-01-25«, t00=0x0000, t01=0x00ee}
0x0106…0110 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010a}
0x0110…0150 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x0114}
0x0150…0190 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0000, t01=0x0154}
0x0190…01d0 (1, 0, 400) Head {h00=0x003c, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS * «, t00=0x0001, t01=0x0004}
0x01d0…0210 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x0044}
0x0210…0248 Head {h00=0x0034, h01=0x0050, text=»* DRGP02 = DRIVER GENERAL PRINTER * «, t00=0x0001, t01=0x0084}
0x0248…0288 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x00bc}
0x0288…02c8 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x00fc}
0x02c8…0308 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x013c}
0x0308…0348 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0001, t01=0x017c}
0x0348…0352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002c}
0x0352…038a Head {h00=0x0034, h01=0x0050, text=»* THIS DRIVER HANDLES GENERAL PRINTER PTS 8081«, t00=0x0002, t01=0x0036}
0x038a…0394 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x006e}
0x0394…03cc Head {h00=0x0034, h01=0x0050, text=»* THE DRIVER CONSISTS OF THE FOLLOWING PARTS :«, t00=0x0002, t01=0x0078}
0x03cc…03d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b0}
0x03d6…03fe Head {h00=0x0024, h01=0x0050, text=»* A C T P : ACTIVATION PART «, t00=0x0002, t01=0x00ba}
0x03fe…0408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e2}
0x0408…0432 Head {h00=0x0026, h01=0x0050, text=»* I H T P : INTERRUPT HANDLER «, t00=0x0002, t01=0x00ec}
0x0432…043c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0116}
0x043c…0464 Head {h00=0x0024, h01=0x0050, text=»* R C T P : RECOVERY ROUTINE«, t00=0x0002, t01=0x0120}
0x0464…046e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0148}
0x046e…0478 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0152}
0x0478…0486 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x015c}
0x0486…0490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016a}
0x0490…04be Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED: «, t00=0x0002, t01=0x0174}
0x04be…04c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0012}
0x04c8…04f0 Head {h00=0x0024, h01=0x0050, text=»* ORDER 00 : TEST STATUS «, t00=0x0003, t01=0x001c}
0x04f0…0512 Head {h00=0x001e, h01=0x0050, text=»* ORDER 06 : WRITE «, t00=0x0003, t01=0x0044}
0x0512…0540 Head {h00=0x002a, h01=0x0050, text=»* ORDER 0B : POSITION DOCUMENT «, t00=0x0003, t01=0x0066}
0x0540…0572 Head {h00=0x002e, h01=0x0050, text=»* ORDER 24 : SET PRINTER PARAMETERS«, t00=0x0003, t01=0x0094}
0x0572…059e Head {h00=0x0028, h01=0x0050, text=»* ORDER 38 : RELEASE DOCUMENT«, t00=0x0003, t01=0x00c6}
0x059e…05a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f2}
0x05a8…05d8 Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING RETURN CODES ARE USED:«, t00=0x0003, t01=0x00fc}
0x05d8…05e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x012c}
0x05e2…060c Head {h00=0x0026, h01=0x0050, text=»* BIT 0 : REQUEST ERROR «, t00=0x0003, t01=0x0136}
0x060c…064a Head {h00=0x003a, h01=0x0050, text=»* BIT 2 : END OF JOURNAL TAPE, DOCUMENT OUT «, t00=0x0003, t01=0x0160}
0x064a…0676 Head {h00=0x0028, h01=0x0050, text=»* BIT 13 : CODE CHECK ERROR«, t00=0x0004, t01=0x000e}
0x0676…069e Head {h00=0x0024, h01=0x0050, text=»* BIT 15 : NOT OPERABLE«, t00=0x0004, t01=0x003a}
0x069e…06a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0062}
0x06a8…06b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006c}
0x06b2…06d4 Head {h00=0x001e, h01=0x0050, text=»* NORMAL REGISTER USAGE:«, t00=0x0004, t01=0x0076}
0x06d4…06de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0098}
0x06de…0704 Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1: WORK REGISTER«, t00=0x0004, t01=0x00a2}
0x0704…072a Head {h00=0x0022, h01=0x0050, text=»* A2: INPUT/OUTPUT «, t00=0x0004, t01=0x00c8}
0x072a…0752 Head {h00=0x0024, h01=0x0050, text=»* A3: BUFFER POINTER «, t00=0x0004, t01=0x00ee}
0x0752…0778 Head {h00=0x0022, h01=0x0050, text=»* A4: WORK REGISTER«, t00=0x0004, t01=0x0116}
0x0778…079e Head {h00=0x0022, h01=0x0050, text=»* A5: STACK POINTER«, t00=0x0004, t01=0x013c}
0x079e…07c2 Head {h00=0x0020, h01=0x0050, text=»* A6: DWT-ADDRESS«, t00=0x0004, t01=0x0162}
0x07c2…07e0 Head {h00=0x001a, h01=0x0050, text=»* A7: ORDER«, t00=0x0004, t01=0x0186}
0x07e0…0804 Head {h00=0x0020, h01=0x0050, text=»* A8: ECB-ADDRESS«, t00=0x0005, t01=0x0014}
0x0804…080e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0038}
0x080e…0818 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0042}
0x0818…0826 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x004c}
0x0826…0830 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x005a}
0x0830…083a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0064}
0x083a…086e Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0005, t01=0x006e}
0x086e…0878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a2}
0x0878…088a Head {h00=0x000e, h01=0x0050, text=»* ENTRIES «, t00=0x0005, t01=0x00ac}
0x088a…0894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00be}
0x0894…08c8 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0005, t01=0x00c8}
0x08c8…08d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00fc}
0x08d2…08dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0106}
0x08dc…08fe Head {h00=0x001e, h01=0x0050, text=» ENTRY GPAD8 ADDRESS BLOCK«, t00=0x0005, t01=0x0110}
0x08fe…0908 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0132}
0x0908…0912 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013c}
0x0912…091c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0146}
0x091c…0950 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0005, t01=0x0150}
0x0950…095a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0184}
0x095a…096e Head {h00=0x0010, h01=0x0050, text=»* EXTERNALS «, t00=0x0005, t01=0x018e}
0x096e…0978 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0012}
0x0978…09ac Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0006, t01=0x001c}
0x09ac…09b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0050}
0x09b6…09c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x005a}
0x09c0…09f0 Head {h00=0x002c, h01=0x0050, text=» EXTRN TDISP DISPATCHING FROM INTERRUPT «, t00=0x0006, t01=0x0064}
0x09f0…0a18 Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE DISPATCH I/O ERROR«, t00=0x0006, t01=0x0094}
0x0a18…0a42 Head {h00=0x0026, h01=0x0050, text=» EXTRN DISEND END I/O AND DISPATCH«, t00=0x0006, t01=0x00bc}
0x0a42…0a6c Head {h00=0x0026, h01=0x0050, text=» EXTRN OUTPUT OUTPUT ONE CHARACTER«, t00=0x0006, t01=0x00e6}
0x0a6c…0a92 Head {h00=0x0022, h01=0x0050, text=» EXTRN LDREG RESTORE REGISTERS«, t00=0x0006, t01=0x0110}
0x0a92…0ab6 Head {h00=0x0020, h01=0x0050, text=» EXTRN SAVE8 SAVE REG. A1-A8«, t00=0x0006, t01=0x0136}
0x0ab6…0aea Head {h00=0x0030, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER FROM ECB BUFFER «, t00=0x0006, t01=0x015a}
0x0aea…0b16 Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTST DWT STATUS DISPLACEMENT«, t00=0x0006, t01=0x018e}
0x0b16…0b40 Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTECB DWT ECB DISPLACEMENT«, t00=0x0007, t01=0x002a}
0x0b40…0b6c Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTOR DWT ORDER DISPLACEMENT «, t00=0x0007, t01=0x0054}
0x0b6c…0ba2 Head {h00=0x0032, h01=0x0050, text=» EXTRN STREG STORE REG = GET STATUS INPUT CHAR«, t00=0x0007, t01=0x0080}
0x0ba2…0bce Head {h00=0x0028, h01=0x0050, text=» EXTRN INIFLG SYSTEM START INDICATOR«, t00=0x0007, t01=0x00b6}
0x0bce…0be0 Head {h00=0x000e, h01=0x0050, text=» EJECT «, t00=0x0007, t01=0x00e2}
0x0be0…0bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00f4}
0x0bea…0bf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fe}
0x0bf4…0c26 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0007, t01=0x0108}
0x0c26…0c30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x013a}
0x0c30…0c44 Head {h00=0x0010, h01=0x0050, text=»* CONSTANTS «, t00=0x0007, t01=0x0144}
0x0c44…0c4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0158}
0x0c4e…0c80 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0007, t01=0x0162}
0x0c80…0c8a (8, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0004}
0x0c8a…0c94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x000e}
0x0c94…0cbc Head {h00=0x0024, h01=0x0050, text=»STB EQU /82 START OF TEXT BLOCK «, t00=0x0008, t01=0x0018}
0x0cbc…0ce2 Head {h00=0x0022, h01=0x0050, text=»ETB EQU /97 END OF TEXT BLOCK «, t00=0x0008, t01=0x0040}
0x0ce2…0d08 Head {h00=0x0022, h01=0x0050, text=»SPEC EQU /2E SPECIAL CHARACTER«, t00=0x0008, t01=0x0066}
0x0d08…0d2a Head {h00=0x001e, h01=0x0050, text=»STX EQU /02 START OF TEXT «, t00=0x0008, t01=0x008c}
0x0d2a…0d4a Head {h00=0x001c, h01=0x0050, text=»ETX EQU /03 END OF TEXT «, t00=0x0008, t01=0x00ae}
0x0d4a…0d66 Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x0008, t01=0x00ce}
0x0d66…0d82 Head {h00=0x0018, h01=0x0050, text=»FF EQU /0C FORM FEED«, t00=0x0008, t01=0x00ea}
0x0d82…0da4 Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x0008, t01=0x0106}
0x0da4…0dc0 Head {h00=0x0018, h01=0x0050, text=»SO EQU /0E SHIFT OUT«, t00=0x0008, t01=0x0128}
0x0dc0…0ddc Head {h00=0x0018, h01=0x0050, text=»SI EQU /0F SHIFT IN «, t00=0x0008, t01=0x0144}
0x0ddc…0df6 Head {h00=0x0016, h01=0x0050, text=»ESC EQU /1B ESCAPE«, t00=0x0008, t01=0x0160}
0x0df6…0e26 Head {h00=0x002c, h01=0x0050, text=»CSI EQU /5B CONTROL SEQUENCE INTRODUCER «, t00=0x0008, t01=0x017a}
0x0e26…0e40 Head {h00=0x0016, h01=0x0050, text=»REP EQU /62 REPEAT«, t00=0x0009, t01=0x001a}
0x0e40…0e6e Head {h00=0x002a, h01=0x0050, text=»VPR EQU /65 VERTICAL POSITION RELATIVE«, t00=0x0009, t01=0x0034}
0x0e6e…0e94 Head {h00=0x0022, h01=0x0050, text=»INFF EQU /74 INPUT FRONT FEED «, t00=0x0009, t01=0x0062}
0x0e94…0ec6 Head {h00=0x002e, h01=0x0050, text=»VPFF EQU /71 VERTICAL POSITION FRONT FEED «, t00=0x0009, t01=0x0088}
0x0ec6…0eec Head {h00=0x0022, h01=0x0050, text=»EJFF EQU /38 EJECT FRONT FEED «, t00=0x0009, t01=0x00ba}
0x0eec…0f18 Head {h00=0x0028, h01=0x0050, text=»SNV EQU /77 SELECT NATIONAL VERSION «, t00=0x0009, t01=0x00e0}
0x0f18…0f40 Head {h00=0x0024, h01=0x0050, text=»SLPL EQU /76 SELECT PAGE LENGTH «, t00=0x0009, t01=0x010c}
0x0f40…0f6a Head {h00=0x0026, h01=0x0050, text=»RIS EQU /63 RESET TO INITIAL STATE«, t00=0x0009, t01=0x0134}
0x0f6a…0f92 Head {h00=0x0024, h01=0x0050, text=»DSR EQU /6E DEVICE STATUS REPORT«, t00=0x0009, t01=0x015e}
0x0f92…0fbc Head {h00=0x0026, h01=0x0050, text=»DCS EQU /50 DEVICE CONTROL STRING «, t00=0x0009, t01=0x0186}
0x0fbc…0fe0 Head {h00=0x0020, h01=0x0050, text=»ST EQU /5C STRING TERMINATOR«, t00=0x000a, t01=0x0020}
0x0fe0…0ffa Head {h00=0x0016, h01=0x0050, text=»DEL EQU /7F DELETE«, t00=0x000a, t01=0x0044}
0x0ffa…1014 Head {h00=0x0016, h01=0x0050, text=»ZERO EQU /30 ZERO «, t00=0x000a, t01=0x005e}
0x1014…1028 Head {h00=0x0010, h01=0x0050, text=»NEG EQU /FF «, t00=0x000a, t01=0x0078}
0x1028…103a Head {h00=0x000e, h01=0x0050, text=» EJECT «, t00=0x000a, t01=0x008c}
0x103a…1044 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x009e}
0x1044…104e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a8}
0x104e…1090 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x000a, t01=0x00b2}
0x1090…109a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00f4}
0x109a…10b6 Head {h00=0x0018, h01=0x0050, text=»* CONTROL SEQUENCES «, t00=0x000a, t01=0x00fe}
0x10b6…10c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x011a}
0x10c0…1102 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x000a, t01=0x0124}
0x1102…110c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0166}
0x110c…1116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0170}
0x1116…112c Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x000a, t01=0x017a}
0x112c…1136 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0190}
0x1136…1140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x000a}
0x1140…115a Head {h00=0x0016, h01=0x0050, text=»CSREP EQU * REPEAT«, t00=0x000b, t01=0x0014}
0x115a…1170 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000b, t01=0x002e}
0x1170…1188 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000b, t01=0x0044}
0x1188…119e Head {h00=0x0012, h01=0x0050, text=» BYTE ZERO,REP«, t00=0x000b, t01=0x005c}
0x119e…11b4 Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000b, t01=0x0072}
0x11b4…11e2 Head {h00=0x002a, h01=0x0050, text=»CSVPR EQU * VERTICAL POSITION RELATIVE«, t00=0x000b, t01=0x0088}
0x11e2…11f8 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000b, t01=0x00b6}
0x11f8…1210 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000b, t01=0x00cc}
0x1210…1226 Head {h00=0x0012, h01=0x0050, text=» BYTE ZERO,VPR«, t00=0x000b, t01=0x00e4}
0x1226…123c Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000b, t01=0x00fa}
0x123c…1262 Head {h00=0x0022, h01=0x0050, text=»CSINFF EQU * INPUT FRONT FEED «, t00=0x000b, t01=0x0110}
0x1262…1278 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000b, t01=0x0136}
0x1278…1290 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000b, t01=0x014c}
0x1290…12a6 Head {h00=0x0012, h01=0x0050, text=» BYTE INFF,NEG«, t00=0x000b, t01=0x0164}
0x12a6…12d8 Head {h00=0x002e, h01=0x0050, text=»CSVPFF EQU * VERTICAL POSITION FRONT FEED «, t00=0x000b, t01=0x017a}
0x12d8…12ee Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000c, t01=0x001c}
0x12ee…1306 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000c, t01=0x0032}
0x1306…131c Head {h00=0x0012, h01=0x0050, text=» BYTE VPFF,NEG«, t00=0x000c, t01=0x004a}
0x131c…1342 Head {h00=0x0022, h01=0x0050, text=»CSEJFF EQU * EJECT FRONT FEED «, t00=0x000c, t01=0x0060}
0x1342…1358 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,EJFF«, t00=0x000c, t01=0x0086}
0x1358…136e Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000c, t01=0x009c}
0x136e…137c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x00b2}
0x137c…1390 Head {h00=0x0010, h01=0x0050, text=»CSSNV EQU * «, t00=0x000c, t01=0x00c0}
0x1390…13b2 Head {h00=0x001e, h01=0x0050, text=» SELECT NATIONAL VERSION«, t00=0x000c, t01=0x00d4}
0x13b2…13c8 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000c, t01=0x00f6}
0x13c8…13e0 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000c, t01=0x010c}
0x13e0…13f6 Head {h00=0x0012, h01=0x0050, text=» BYTE SNV,NEG «, t00=0x000c, t01=0x0124}
0x13f6…141c Head {h00=0x0022, h01=0x0050, text=»CSSLPL EQU * SELECT PAGELENGTH«, t00=0x000c, t01=0x013a}
0x141c…1432 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000c, t01=0x0160}
0x1432…144a Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000c, t01=0x0176}
0x144a…1464 Head {h00=0x0016, h01=0x0050, text=» BYTE SLPL,NEG * «, t00=0x000c, t01=0x018e}
0x1464…147a Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000d, t01=0x0018}
0x147a…14a4 Head {h00=0x0026, h01=0x0050, text=»CSRIS EQU * RESET TO INITIAL STATE«, t00=0x000d, t01=0x002e}
0x14a4…14ba Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,RIS «, t00=0x000d, t01=0x0058}
0x14ba…14d0 Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000d, t01=0x006e}
0x14d0…14f8 Head {h00=0x0024, h01=0x0050, text=»CSDSR EQU * DEVICE STATUS REPORT«, t00=0x000d, t01=0x0084}
0x14f8…150e Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000d, t01=0x00ac}
0x150e…1524 Head {h00=0x0012, h01=0x0050, text=» BYTE /35,DSR «, t00=0x000d, t01=0x00c2}
0x1524…153a Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000d, t01=0x00d8}
0x153a…1548 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x00ee}
0x1548…1552 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00fc}
0x1552…155c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0106}
0x155c…159c Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000d, t01=0x0110}
0x159c…15a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0150}
0x15a6…15c4 Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000d, t01=0x015a}
0x15c4…15ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0178}
0x15ce…160e Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000d, t01=0x0182}
0x160e…1618 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0032}
0x1618…1622 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003c}
0x1622…162c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0046}
0x162c…1664 Head {h00=0x0034, h01=0x0050, text=»* THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN«, t00=0x000e, t01=0x0050}
0x1664…16a0 Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:A TO 1-15 ACCORDING TO THE LIST BELOW«, t00=0x000e, t01=0x0088}
0x16a0…16aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00c4}
0x16aa…16b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ce}
0x16b4…16ec Head {h00=0x0034, h01=0x0050, text=»* NCV=1 GERMANY,AUSTRIA,LUXEMBOURG,SWITZERLAND «, t00=0x000e, t01=0x00d8}
0x16ec…1736 Head {h00=0x0046, h01=0x0050, text=» =2 GREAT BRITAIN,NETHERLANDS,BELGIUM,NEW ZEELAND,SOUTH AFRICA «, t00=0x000e, t01=0x0110}
0x1736…176a Head {h00=0x0030, h01=0x0050, text=» =3 FRANCE,SWITZERLAND,BELGIUM,LUXEMBOURG«, t00=0x000e, t01=0x015a}
0x176a…179a Head {h00=0x002c, h01=0x0050, text=» =4 SPAIN,MEXICO,ARGENTINA,VENEZUELA «, t00=0x000e, t01=0x018e}
0x179a…17ba Head {h00=0x001c, h01=0x0050, text=» =5 ITALY,SWITZERLAND«, t00=0x000f, t01=0x002e}
0x17ba…17d8 Head {h00=0x001a, h01=0x0050, text=» =6 SWEDEN,FINLAND «, t00=0x000f, t01=0x004e}
0x17d8…17f6 Head {h00=0x001a, h01=0x0050, text=» =7 DENMARK,NORWAY «, t00=0x000f, t01=0x006c}
0x17f6…1814 Head {h00=0x001a, h01=0x0050, text=» =8 PORTUGAL,BRAZIL«, t00=0x000f, t01=0x008a}
0x1814…182e Head {h00=0x0016, h01=0x0050, text=» =9 YUGOSLAVIA «, t00=0x000f, t01=0x00a8}
0x182e…1852 Head {h00=0x0020, h01=0x0050, text=» =10 USA,CANADA,AUSTRALIA«, t00=0x000f, t01=0x00c2}
0x1852…187a Head {h00=0x0024, h01=0x0050, text=» =11 SWEDEN (SPECIAL VERSION)«, t00=0x000f, t01=0x00e6}
0x187a…1890 Head {h00=0x0012, h01=0x0050, text=» =13 GREEK «, t00=0x000f, t01=0x010e}
0x1890…18b8 Head {h00=0x0024, h01=0x0050, text=» =14 JAPAN (KATAKANA VERSION)«, t00=0x000f, t01=0x0124}
0x18b8…18e0 Head {h00=0x0024, h01=0x0050, text=» =15 ISRAEL (HEBREW VERSION)«, t00=0x000f, t01=0x014c}
0x18e0…18ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0174}
0x18ea…18f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x017e}
0x18f4…1920 Head {h00=0x0028, h01=0x0050, text=»X:A EQU 02 GREAT BRITAIN AS STANDARD«, t00=0x000f, t01=0x0188}
0x1920…1936 Head {h00=0x0012, h01=0x0050, text=»STDNCV EQU 07 «, t00=0x0010, t01=0x0024}
0x1936…1944 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x003a}
0x1944…194e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0048}
0x194e…1958 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0052}
0x1958…1988 Head {h00=0x002c, h01=0x0050, text=»* THE FRONT FEED DEVICE CAN BE EXCLUDED «, t00=0x0010, t01=0x005c}
0x1988…19a4 Head {h00=0x0018, h01=0x0050, text=»* BY SETTING X:B = 0«, t00=0x0010, t01=0x008c}
0x19a4…19ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a8}
0x19ae…19b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b2}
0x19b8…19ca Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x0010, t01=0x00bc}
0x19ca…19f0 Head {h00=0x0022, h01=0x0050, text=»FFDEV EQU 0 FRONT FEED DEVICE «, t00=0x0010, t01=0x00ce}
0x19f0…19fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f4}
0x19fa…1a04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00fe}
0x1a04…1a0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0108}
0x1a0e…1a3a Head {h00=0x0028, h01=0x0050, text=»* THE STANDARD PAGELENGTH IS DEFINED«, t00=0x0010, t01=0x0112}
0x1a3a…1a64 Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:C = NUMBER OF LINES«, t00=0x0010, t01=0x013e}
0x1a64…1a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0168}
0x1a6e…1a78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0172}
0x1a78…1a8a Head {h00=0x000e, h01=0x0050, text=»X:C EQU 48«, t00=0x0010, t01=0x017c}
0x1a8a…1aa0 Head {h00=0x0012, h01=0x0050, text=»PAGLEN EQU 51 «, t00=0x0010, t01=0x018e}
0x1aa0…1aaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0014}
0x1aaa…1ab4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x001e}
0x1ab4…1ae6 Head {h00=0x002e, h01=0x0050, text=»* THE STANDARD NUMBER OF LINES IS DEFINED «, t00=0x0011, t01=0x0028}
0x1ae6…1b10 Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:D = NUMBER OF LINES«, t00=0x0011, t01=0x005a}
0x1b10…1b1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0084}
0x1b1a…1b24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x008e}
0x1b24…1b3a Head {h00=0x0012, h01=0x0050, text=»X:D EQU 36 * «, t00=0x0011, t01=0x0098}
0x1b3a…1b50 Head {h00=0x0012, h01=0x0050, text=»DOCLEN EQU 48 «, t00=0x0011, t01=0x00ae}
0x1b50…1b5e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00c4}
0x1b5e…1b68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00d2}
0x1b68…1b72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00dc}
0x1b72…1b7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00e6}
0x1b7c…1b96 Head {h00=0x0016, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x0011, t01=0x00f0}
0x1b96…1ba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x010a}
0x1ba0…1baa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0114}
0x1baa…1bbe Head {h00=0x0010, h01=0x0050, text=»X:E EQU 132 «, t00=0x0011, t01=0x011e}
0x1bbe…1bd4 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU 000«, t00=0x0011, t01=0x0132}
0x1bd4…1bde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0148}
0x1bde…1be8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0152}
0x1be8…1bf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x015c}
0x1bf2…1c24 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0011, t01=0x0166}
0x1c24…1c52 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1 «, t00=0x0012, t01=0x0008}
0x1c52…1c5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0036}
0x1c5c…1c66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0040}
0x1c66…1c7a Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0012, t01=0x004a}
0x1c7a…1c84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x005e}
0x1c84…1c8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0068}
0x1c8e…1c98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0072}
0x1c98…1cd2 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0012, t01=0x007c}
0x1cd2…1d04 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0 «, t00=0x0012, t01=0x00b6}
0x1d04…1d0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e8}
0x1d0e…1d18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f2}
0x1d18…1d2c Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0012, t01=0x00fc}
0x1d2c…1d3a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0110}
0x1d3a…1d44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x011e}
0x1d44…1d4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0128}
0x1d4e…1d82 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0012, t01=0x0132}
0x1d82…1d8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0166}
0x1d8c…1daa Head {h00=0x001a, h01=0x0050, text=»* DWT - DISPLACEMENTS «, t00=0x0012, t01=0x0170}
0x1daa…1db4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x018e}
0x1db4…1de8 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0013, t01=0x0008}
0x1de8…1df2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x003c}
0x1df2…1dfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0046}
0x1dfc…1e06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0050}
0x1e06…1e3a Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x0013, t01=0x005a}
0x1e3a…1e44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x008e}
0x1e44…1e5a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0013, t01=0x0098}
0x1e5a…1e72 Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0013, t01=0x00ae}
0x1e72…1e7e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00c6}
0x1e7e…1e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d2}
0x1e88…1e9e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0013, t01=0x00dc}
0x1e9e…1eb8 Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0013, t01=0x00f2}
0x1eb8…1ec4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x010c}
0x1ec4…1ece Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0118}
0x1ece…1f02 Head {h00=0x0030, h01=0x0050, text=»DWTDCS EQU START+/12 DOCUMENT CHARACTER SET «, t00=0x0013, t01=0x0122}
0x1f02…1f34 Head {h00=0x002e, h01=0x0050, text=»DWTPCS EQU START+/14 PRINTER CHARACTER SET«, t00=0x0013, t01=0x0156}
0x1f34…1f64 Head {h00=0x002c, h01=0x0050, text=»DWTPL EQU START+/16 PRINTER PAPER LENGTH«, t00=0x0013, t01=0x0188}
0x1f64…1f96 Head {h00=0x002e, h01=0x0050, text=»DWTDL EQU START+/18 DOCUMENT PAPER LENGTH «, t00=0x0014, t01=0x0028}
0x1f96…1fca Head {h00=0x0030, h01=0x0050, text=»DWTALN EQU START+/1A ACTUAL LINE ON DOCUMENT«, t00=0x0014, t01=0x005a}
0x1fca…2002 Head {h00=0x0034, h01=0x0050, text=»DWTRLN EQU START+/1C REQUESTED LINE ON DOCUMENT «, t00=0x0014, t01=0x008e}
0x2002…2038 Head {h00=0x0032, h01=0x0050, text=»DWTRC EQU START+/1F RETURN CODE (ACKUMULATED) «, t00=0x0014, t01=0x00c6}
0x2038…206c Head {h00=0x0030, h01=0x0050, text=»DWTSTR EQU START+/20 CONTROL SEQUENCE ADRESS«, t00=0x0014, t01=0x00fc}
0x206c…20b4 Head {h00=0x0044, h01=0x0050, text=»DWTDISP EQU START+/22 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. «, t00=0x0014, t01=0x0130}
0x20b4…20e8 Head {h00=0x0030, h01=0x0050, text=»DWTACD EQU START+/24 ACTUAL COLUMN DOCUMENT «, t00=0x0014, t01=0x0178}
0x20e8…2118 Head {h00=0x002c, h01=0x0050, text=»DWTACP EQU START+/27 ACTUAL COLUMN PAPER«, t00=0x0015, t01=0x001c}
0x2118…2146 Head {h00=0x002a, h01=0x0050, text=»DWTCO1 EQU START+/2A COLUMN COUNTER 1 «, t00=0x0015, t01=0x004c}
0x2146…2174 Head {h00=0x002a, h01=0x0050, text=»DWTCO2 EQU START+/2B COLUMN COUNTER 2 «, t00=0x0015, t01=0x007a}
0x2174…21a4 Head {h00=0x002c, h01=0x0050, text=»DWTSYST EQU START+/30 SYSTEM START IND. «, t00=0x0015, t01=0x00a8}
0x21a4…21da Head {h00=0x0032, h01=0x0050, text=»DWTLFD EQU START+/32 LINE/FORM FEED INDICATOR «, t00=0x0015, t01=0x00d8}
0x21da…21e8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x010e}
0x21e8…21f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x011c}
0x21f2…21fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0126}
0x21fc…2230 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0015, t01=0x0130}
0x2230…223a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0164}
0x223a…2258 Head {h00=0x001a, h01=0x0050, text=»* ECB - DISPLACEMENTS «, t00=0x0015, t01=0x016e}
0x2258…2262 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x018c}
0x2262…2296 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0016, t01=0x0008}
0x2296…22a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x003c}
0x22a0…22ca Head {h00=0x0026, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS IN ECB «, t00=0x0016, t01=0x0046}
0x22ca…22f6 Head {h00=0x0028, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH IN ECB «, t00=0x0016, t01=0x0070}
0x22f6…2322 Head {h00=0x0028, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH IN ECB «, t00=0x0016, t01=0x009c}
0x2322…2348 Head {h00=0x0022, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE IN ECB«, t00=0x0016, t01=0x00c8}
0x2348…2370 Head {h00=0x0024, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD IN ECB«, t00=0x0016, t01=0x00ee}
0x2370…237e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0116}
0x237e…2388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0124}
0x2388…23bc Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0016, t01=0x012e}
0x23bc…23c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0162}
0x23c6…23d6 Head {h00=0x000c, h01=0x0050, text=»* TABLES«, t00=0x0016, t01=0x016c}
0x23d6…23e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x017c}
0x23e0…2414 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0016, t01=0x0186}
0x2414…241e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x002a}
0x241e…2428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0034}
0x2428…244c Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x0017, t01=0x003e}
0x244c…2468 Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x0017, t01=0x0062}
0x2468…248a Head {h00=0x001e, h01=0x0050, text=»GPAD8 EQU * ADDRESS BLOCK «, t00=0x0017, t01=0x007e}
0x248a…24ae Head {h00=0x0020, h01=0x0050, text=» DATA ACTP ACTIVATION DRIVER«, t00=0x0017, t01=0x00a0}
0x24ae…24d4 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0017, t01=0x00c4}
0x24d4…24f8 Head {h00=0x0020, h01=0x0050, text=» DATA IHTP INTERRUPT HANDLER«, t00=0x0017, t01=0x00ea}
0x24f8…251c Head {h00=0x0020, h01=0x0050, text=» DATA RCTP RECOVERY ROUTINE «, t00=0x0017, t01=0x010e}
0x251c…2530 Head {h00=0x0010, h01=0x0050, text=»TPTAB EQU * «, t00=0x0017, t01=0x0132}
0x2530…2544 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x0017, t01=0x0146}
0x2544…2564 Head {h00=0x001c, h01=0x0050, text=» DATA /0107,/0C25,/3939 «, t00=0x0017, t01=0x015a}
0x2564…2570 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x017a}
0x2570…258a Head {h00=0x0016, h01=0x0050, text=» DATA /0006,/2424 «, t00=0x0017, t01=0x0186}
0x258a…25a4 Head {h00=0x0016, h01=0x0050, text=»TPLEN EQU *-TPTAB «, t00=0x0018, t01=0x0010}
0x25a4…25ac Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x002a}
0x25ac…25b4 Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0032}
0x25b4…25c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x003a}
0x25c2…25cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0048}
0x25cc…25d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0052}
0x25d6…25ea Head {h00=0x0010, h01=0x0050, text=»* A C T P «, t00=0x0018, t01=0x005c}
0x25ea…25f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0070}
0x25f4…262a Head {h00=0x0032, h01=0x0050, text=»* THIS IS THE ACTIVATION PART OF THE DRIVER «, t00=0x0018, t01=0x007a}
0x262a…266c Head {h00=0x003e, h01=0x0050, text=»* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR«, t00=0x0018, t01=0x00b0}
0x266c…2676 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f2}
0x2676…2680 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00fc}
0x2680…268a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0106}
0x268a…26ae Head {h00=0x0020, h01=0x0050, text=»ACTP EQU * ACTIVATION ENTRY «, t00=0x0018, t01=0x0110}
0x26ae…26b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0134}
0x26b8…26c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x013e}
0x26c2…2700 Head {h00=0x003a, h01=0x0050, text=»* GET DWT INDEX: 0=CONTINUOUS STATIONARY, 1=DOCUMENT«, t00=0x0018, t01=0x0148}
0x2700…270a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0186}
0x270a…2730 Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOR,A6 GET DWT INDEX «, t00=0x0018, t01=0x0190}
0x2730…2746 Head {h00=0x0012, h01=0x0050, text=» ANK A2,1 MASK«, t00=0x0019, t01=0x0026}
0x2746…2774 Head {h00=0x002a, h01=0x0050, text=» LC A3,DWTST+1,A6 GET OLD DEVICE VALUE«, t00=0x0019, t01=0x003c}
0x2774…2788 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FE «, t00=0x0019, t01=0x006a}
0x2788…279a Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x0019, t01=0x007e}
0x279a…27c0 Head {h00=0x0022, h01=0x0050, text=» SC A3,DWTST+1,A6 STORE INDEX «, t00=0x0019, t01=0x0090}
0x27c0…27ea Head {h00=0x0026, h01=0x0050, text=» ADR A7,A2 ADD DWT INDEX TO ORDER «, t00=0x0019, t01=0x00b6}
0x27ea…2818 Head {h00=0x002a, h01=0x0050, text=» SC A7,DWTOR+1,A6 STORE MODIFIED ORDER«, t00=0x0019, t01=0x00e0}
0x2818…2836 Head {h00=0x001a, h01=0x0050, text=»ACT005 LDK A3,TPLEN-1 «, t00=0x0019, t01=0x010e}
0x2836…2868 Head {h00=0x002e, h01=0x0050, text=»ACT010 CC A7,TPTAB,A3 CHECK IF LEGAL ORDER«, t00=0x0019, t01=0x012c}
0x2868…288a Head {h00=0x001e, h01=0x0050, text=» RF(E) ACT020 VALID ORDER «, t00=0x0019, t01=0x015e}
0x288a…289c Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0019, t01=0x0180}
0x289c…28bc (26, 0, 400) Head {h00=0x001c, h01=0x0050, text=» RB(NN) ACT010 TRY NEXT «, t00=0x001a, t01=0x0004}
0x28bc…28c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0024}
0x28c6…28e8 Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE ILLEGAL ORDER «, t00=0x001a, t01=0x002e}
0x28e8…28f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0050}
0x28f2…28fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x005a}
0x28fc…2910 Head {h00=0x0010, h01=0x0050, text=»ACT020 EQU *«, t00=0x001a, t01=0x0064}
0x2910…292c Head {h00=0x0018, h01=0x0050, text=» ADR A3,A3 GET INDEX«, t00=0x001a, t01=0x0078}
0x292c…2950 Head {h00=0x0020, h01=0x0050, text=» ABI TPFUC,A3 EXECUTE ORDER «, t00=0x001a, t01=0x0094}
0x2950…295e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x00b8}
0x295e…2972 Head {h00=0x0010, h01=0x0050, text=»TPFUC EQU * «, t00=0x001a, t01=0x00c6}
0x2972…2986 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x001a, t01=0x00da}
0x2986…29be Head {h00=0x0034, h01=0x0050, text=» DATA TSTSTA,WRTDOC,POSDOC,DOCPAR,RELDOC,RELDOC «, t00=0x001a, t01=0x00ee}
0x29be…29ca Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0126}
0x29ca…29f4 Head {h00=0x0026, h01=0x0050, text=» DATA TSTSTA,WRTCON,CSTPAR,CSTPAR «, t00=0x001a, t01=0x0132}
0x29f4…2a02 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x015c}
0x2a02…2a0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x016a}
0x2a0c…2a16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0174}
0x2a16…2a38 Head {h00=0x001e, h01=0x0050, text=»* ORDER 00 : TEST STATUS«, t00=0x001a, t01=0x017e}
0x2a38…2a42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0010}
0x2a42…2a4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x001a}
0x2a4c…2a6c Head {h00=0x001c, h01=0x0050, text=»TSTSTA EQU * TEST STATUS«, t00=0x001b, t01=0x0024}
0x2a6c…2a82 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x001b, t01=0x0044}
0x2a82…2ab0 Head {h00=0x002a, h01=0x0050, text=» CF A5,GTSTAT GET STATUS FROM PRINTER «, t00=0x001b, t01=0x005a}
0x2ab0…2ad0 Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x001b, t01=0x0088}
0x2ad0…2ade Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x00a8}
0x2ade…2af2 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x001b, t01=0x00b6}
0x2af2…2afc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ca}
0x2afc…2b06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00d4}
0x2b06…2b2a Head {h00=0x0020, h01=0x0050, text=»* ORDER 06: WRITE DOCUMENT«, t00=0x001b, t01=0x00de}
0x2b2a…2b34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0102}
0x2b34…2b3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x010c}
0x2b3e…2b52 Head {h00=0x0010, h01=0x0050, text=»WRTDOC EQU *«, t00=0x001b, t01=0x0116}
0x2b52…2b68 Head {h00=0x0012, h01=0x0050, text=» CF A5,GTSTAT «, t00=0x001b, t01=0x012a}
0x2b68…2b8e Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTST,A6 DEVICE STATUS «, t00=0x001b, t01=0x0140}
0x2b8e…2bbc Head {h00=0x002a, h01=0x0050, text=» ANKL A4,/200 HAS POWER OFF OCCURED ? «, t00=0x001b, t01=0x0166}
0x2bbc…2bd6 (28, 0, 400) Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRDO05 YES«, t00=0x001c, t01=0x0004}
0x2bd6…2bf0 Head {h00=0x0016, h01=0x0050, text=» LDKL A3,/2000 * «, t00=0x001c, t01=0x001e}
0x2bf0…2c10 Head {h00=0x001c, h01=0x0050, text=» TM A1,A3 DOCUMENT OUT ?«, t00=0x001c, t01=0x0038}
0x2c10…2c28 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRDO06 NO«, t00=0x001c, t01=0x0058}
0x2c28…2c58 Head {h00=0x002c, h01=0x0050, text=» LDKL A3,/8000 YES SET BIT 0 (REQ ERROR)«, t00=0x001c, t01=0x0070}
0x2c58…2c72 Head {h00=0x0016, h01=0x0050, text=» ORS A3,ECBRC,A8 «, t00=0x001c, t01=0x00a0}
0x2c72…2c92 Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x001c, t01=0x00ba}
0x2c92…2caa Head {h00=0x0014, h01=0x0050, text=»WRDO05 EQU * * «, t00=0x001c, t01=0x00da}
0x2caa…2cc2 Head {h00=0x0014, h01=0x0050, text=»WRDO06 LDK A3,1 «, t00=0x001c, t01=0x00f2}
0x2cc2…2ce2 Head {h00=0x001c, h01=0x0050, text=» TM A1,A3 NOT OPERABLE? «, t00=0x001c, t01=0x010a}
0x2ce2…2cfa Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRDO10 NO«, t00=0x001c, t01=0x012a}
0x2cfa…2d1a Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x001c, t01=0x0142}
0x2d1a…2d48 Head {h00=0x002a, h01=0x0050, text=»WRDO10 LD A3,DWTALN,A6 GET ACTUAL LINE«, t00=0x001c, t01=0x0162}
0x2d48…2d5e Head {h00=0x0012, h01=0x0050, text=» RF(NZ) WRDO15«, t00=0x001c, t01=0x0190}
0x2d5e…2d8a Head {h00=0x0028, h01=0x0050, text=» LDK A3,1 SET UP ECB BUFFER POINTER «, t00=0x001d, t01=0x0016}
0x2d8a…2db8 Head {h00=0x002a, h01=0x0050, text=» CF A15,GETCHR GET CONTROL CHARACTER «, t00=0x001d, t01=0x0042}
0x2db8…2ddc Head {h00=0x0020, h01=0x0050, text=» CWK A2,/31 CTRL CHAR=/31 ? «, t00=0x001d, t01=0x0070}
0x2ddc…2e0a Head {h00=0x002a, h01=0x0050, text=» ABL(NE) POSERR NO,DOC NOT POSITIONED «, t00=0x001d, t01=0x0094}
0x2e0a…2e24 Head {h00=0x0016, h01=0x0050, text=» LD A3,DWTDL,A6 * «, t00=0x001d, t01=0x00c2}
0x2e24…2e50 Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTRLN,A6 FIRST LINE ON DOC. «, t00=0x001d, t01=0x00dc}
0x2e50…2e80 Head {h00=0x002c, h01=0x0050, text=»WRDO12 LDKL A2,CSINFF INPUT FRONT FEED «, t00=0x001d, t01=0x0108}
0x2e80…2eb6 Head {h00=0x0032, h01=0x0050, text=» LDK A3,DWTRLN REQUESTED LINE NO DISPLACEMENT «, t00=0x001d, t01=0x0138}
0x2eb6…2ee0 Head {h00=0x0026, h01=0x0050, text=» CF A5,SEND SEND INPUT FRONT FEED «, t00=0x001d, t01=0x016e}
0x2ee0…2ef8 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTRLN,A6«, t00=0x001e, t01=0x0008}
0x2ef8…2f22 Head {h00=0x0026, h01=0x0050, text=» ST A3,DWTALN,A6 SET DWTALN=DWTRLN«, t00=0x001e, t01=0x0020}
0x2f22…2f2a Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x004a}
0x2f2a…2f5e Head {h00=0x0030, h01=0x0050, text=»WRDO15 LDKL A2,CSSNV SELECT NATIONAL VERSION«, t00=0x001e, t01=0x0052}
0x2f5e…2f98 Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTDCS DOCUMENT CHARACTER SET DISPLACEMENT«, t00=0x001e, t01=0x0086}
0x2f98…2fc8 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND SELECT NATIONAL VERSION«, t00=0x001e, t01=0x00c0}
0x2fc8…2fd8 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x001e, t01=0x00f0}
0x2fd8…2fe8 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x001e, t01=0x0100}
0x2fe8…2ff8 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x001e, t01=0x0110}
0x2ff8…3024 Head {h00=0x0028, h01=0x0050, text=» RF WRT01 GOTO GET CONTROL CHARACTER«, t00=0x001e, t01=0x0120}
0x3024…3030 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x014c}
0x3030…303e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0158}
0x303e…3048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0166}
0x3048…3052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0170}
0x3052…3082 Head {h00=0x002c, h01=0x0050, text=»* ORDER 06: WRITE CONTINOUS STATIONARY«, t00=0x001e, t01=0x017a}
0x3082…308c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x001a}
0x308c…3096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0024}
0x3096…30aa Head {h00=0x0010, h01=0x0050, text=»WRTCON EQU *«, t00=0x001f, t01=0x002e}
0x30aa…30b8 Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x001f, t01=0x0042}
0x30b8…30e0 Head {h00=0x0024, h01=0x0050, text=» CF A5,GTSTAT GET DEVICE STATUS «, t00=0x001f, t01=0x0050}
0x30e0…30fa Head {h00=0x0016, h01=0x0050, text=» LDKL A3,/2000 * «, t00=0x001f, t01=0x0078}
0x30fa…311a Head {h00=0x001c, h01=0x0050, text=» TM A1,A3 END OF PAPER? «, t00=0x001f, t01=0x0092}
0x311a…3134 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRCO05 NO. «, t00=0x001f, t01=0x00b2}
0x3134…3152 Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x001f, t01=0x00cc}
0x3152…3178 Head {h00=0x0022, h01=0x0050, text=»WRCO05 LDK A3,1 NOT OPERABLE? «, t00=0x001f, t01=0x00ea}
0x3178…318a Head {h00=0x000e, h01=0x0050, text=» TM A1,A3 «, t00=0x001f, t01=0x0110}
0x318a…31a2 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRCO10 NO«, t00=0x001f, t01=0x0122}
0x31a2…31c0 Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x001f, t01=0x013a}
0x31c0…31c8 Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0158}
0x31c8…31fc Head {h00=0x0030, h01=0x0050, text=»WRCO10 LDKL A2,CSSNV SELECT NATIONAL VERSION«, t00=0x001f, t01=0x0160}
0x31fc…3232 (32, 0, 400) Head {h00=0x0032, h01=0x0050, text=» LDK A3,DWTPCS PRINTER CHAR. SET DISPLACEMENT «, t00=0x0020, t01=0x0004}
0x3232…3262 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND SELECT NATIONAL VERSION«, t00=0x0020, t01=0x003a}
0x3262…3272 Head {h00=0x000c, h01=0x0050, text=» U =1 «, t00=0x0020, t01=0x006a}
0x3272…3282 Head {h00=0x000c, h01=0x0050, text=» U =1 «, t00=0x0020, t01=0x007a}
0x3282…3292 Head {h00=0x000c, h01=0x0050, text=» U =1 «, t00=0x0020, t01=0x008a}
0x3292…329c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x009a}
0x329c…32bc Head {h00=0x001c, h01=0x0050, text=»* GET CONTROL CHARACTER «, t00=0x0020, t01=0x00a4}
0x32bc…32c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00c4}
0x32c6…32f6 Head {h00=0x002c, h01=0x0050, text=»WRT01 LDK A3,1 SET UP ECB BUFFER POINTER«, t00=0x0020, t01=0x00ce}
0x32f6…3322 Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CONTROL CHARACTER«, t00=0x0020, t01=0x00fe}
0x3322…332a Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x012a}
0x332a…333c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0020, t01=0x0132}
0x333c…3366 Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTST,A6 GET DEVICE STATUS «, t00=0x0020, t01=0x0144}
0x3366…3394 Head {h00=0x002a, h01=0x0050, text=» ANKL A1,/200 HAS POWER OFF OCCURED ? «, t00=0x0020, t01=0x016e}
0x3394…33ac Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRT04 NO «, t00=0x0021, t01=0x000c}
0x33ac…33c6 Head {h00=0x0016, h01=0x0050, text=» CF A5,RESREC YES «, t00=0x0021, t01=0x0024}
0x33c6…33ec Head {h00=0x0022, h01=0x0050, text=» CWK A2,/2B CTRL. CHAR.=/2B ? «, t00=0x0021, t01=0x003e}
0x33ec…3406 Head {h00=0x0016, h01=0x0050, text=» RF(NE) WRT08 NO «, t00=0x0021, t01=0x0064}
0x3406…342e Head {h00=0x0024, h01=0x0050, text=» LC A1,DWTOR+1,A6 GET DWT INDEX «, t00=0x0021, t01=0x007e}
0x342e…344c Head {h00=0x001a, h01=0x0050, text=» ANK A1,1 DOCUMENT ? «, t00=0x0021, t01=0x00a6}
0x344c…3466 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT09 YES «, t00=0x0021, t01=0x00c4}
0x3466…347c Head {h00=0x0012, h01=0x0050, text=» RF WRT07 NO «, t00=0x0021, t01=0x00de}
0x347c…34a6 Head {h00=0x0026, h01=0x0050, text=»WRT04 CWK A2,/2B CTRL. CHAR.=/2B «, t00=0x0021, t01=0x00f4}
0x34a6…34c0 Head {h00=0x0016, h01=0x0050, text=» RF(NE) WRT02 NO «, t00=0x0021, t01=0x011e}
0x34c0…34e8 Head {h00=0x0024, h01=0x0050, text=» LC A2,DWTOR+1,A6 GET DWT INDEX «, t00=0x0021, t01=0x0138}
0x34e8…3504 Head {h00=0x0018, h01=0x0050, text=» ANK A2,1 DOCUMENT? «, t00=0x0021, t01=0x0160}
0x3504…351e Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT03 YES «, t00=0x0021, t01=0x017c}
0x351e…3548 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTCO1,A6 GET ACTUAL COLUMN«, t00=0x0022, t01=0x0008}
0x3548…3576 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x0022, t01=0x0032}
0x3576…357e Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0060}
0x357e…35c0 Head {h00=0x003e, h01=0x0050, text=» SC A2,DWTACP,A6 STORE THE VALUE IN ACTUAL COLUMN PAPER D«, t00=0x0022, t01=0x0068}
0x35c0…360e Head {h00=0x004a, h01=0x0050, text=» ST A4,DWTACP+2,A6 STORE THE VALUE IN ACTUAL COLUMN PAPER DISPLACEMENT«, t00=0x0022, t01=0x00aa}
0x360e…3632 Head {h00=0x0020, h01=0x0050, text=»WRT07 LDK A2,/20 SEND SPACE «, t00=0x0022, t01=0x00f8}
0x3632…3648 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0022, t01=0x011c}
0x3648…3666 Head {h00=0x001a, h01=0x0050, text=» LDKL A2,CSREP REPEAT «, t00=0x0022, t01=0x0132}
0x3666…369e Head {h00=0x0034, h01=0x0050, text=» LDK A3,DWTACP ACTUAL COLUMN PAPER DISPLACEMENT «, t00=0x0022, t01=0x0150}
0x369e…36be Head {h00=0x001c, h01=0x0050, text=» CF A5,SEND SEND REPEAT «, t00=0x0022, t01=0x0188}
0x36be…36ea Head {h00=0x0028, h01=0x0050, text=» LDK A3,2 SET UP ECB BUFFER POINTER «, t00=0x0023, t01=0x0018}
0x36ea…36fc Head {h00=0x000e, h01=0x0050, text=» RF WRT15 «, t00=0x0023, t01=0x0044}
0x36fc…372c Head {h00=0x002c, h01=0x0050, text=»WRT03 LD A4,DWTCO2,A6 GET ACTUAL COLUMN«, t00=0x0023, t01=0x0056}
0x372c…375a Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x0023, t01=0x0086}
0x375a…379c Head {h00=0x003e, h01=0x0050, text=» SC A2,DWTACD,A6 STORE THE VALUE IN ACTUAL COLUMN DOC. DI «, t00=0x0023, t01=0x00b4}
0x379c…37ea Head {h00=0x004a, h01=0x0050, text=» SC A4,DWTACD+2,A6 STORE THE VALUE IN ACTUAL COLUMN DOC.DISPLACEMENT «, t00=0x0023, t01=0x00f6}
0x37ea…37fc Head {h00=0x000e, h01=0x0050, text=» SRL A4,8 «, t00=0x0023, t01=0x0144}
0x37fc…3830 Head {h00=0x0030, h01=0x0050, text=» SC A4,DWTACD+1,A6 SHIFT FOR CORRECT DIGITS «, t00=0x0023, t01=0x0156}
0x3830…3854 Head {h00=0x0020, h01=0x0050, text=»WRT09 LDK A2,/20 SEND SPACE «, t00=0x0023, t01=0x018a}
0x3854…386a Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0024, t01=0x001e}
0x386a…3888 Head {h00=0x001a, h01=0x0050, text=» LDKL A2,CSREP REPEAT «, t00=0x0024, t01=0x0034}
0x3888…38c2 Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTACD ACTUAL COLUMN DOCUMENT DISPLACEMENT«, t00=0x0024, t01=0x0052}
0x38c2…38e2 Head {h00=0x001c, h01=0x0050, text=» CF A5,SEND SEND REPEAT «, t00=0x0024, t01=0x008c}
0x38e2…390e Head {h00=0x0028, h01=0x0050, text=» LDK A3,2 SET UP ECB BUFFER POINTER «, t00=0x0024, t01=0x00ac}
0x390e…3920 Head {h00=0x000e, h01=0x0050, text=» RF WRT15 «, t00=0x0024, t01=0x00d8}
0x3920…394c Head {h00=0x0028, h01=0x0050, text=»WRT08 LC A1,DWTLFD,A6 GET INDICATOR «, t00=0x0024, t01=0x00ea}
0x394c…3978 Head {h00=0x0028, h01=0x0050, text=» ANK A1,/8 IS LINE/FORM FEED DONE ? «, t00=0x0024, t01=0x0116}
0x3978…3992 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRT14 YES «, t00=0x0024, t01=0x0142}
0x3992…39bc Head {h00=0x0026, h01=0x0050, text=»WRT02 LC A1,DWTOR+1,A6 DOCUMENT ? «, t00=0x0024, t01=0x015c}
0x39bc…39d0 Head {h00=0x0010, h01=0x0050, text=» ANK A1,1 * «, t00=0x0024, t01=0x0186}
0x39d0…39e8 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRT13 NO «, t00=0x0025, t01=0x000a}
0x39e8…39f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0022}
0x39f2…3a16 Head {h00=0x0020, h01=0x0050, text=» CWK A2,/30 TWO LINE FEED ? «, t00=0x0025, t01=0x002c}
0x3a16…3a30 Head {h00=0x0016, h01=0x0050, text=» RF(E) WRT11 YES «, t00=0x0025, t01=0x0050}
0x3a30…3a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006a}
0x3a3a…3a5a Head {h00=0x001c, h01=0x0050, text=» CWK A2,/31 FORM FEED ? «, t00=0x0025, t01=0x0074}
0x3a5a…3a74 Head {h00=0x0016, h01=0x0050, text=» RF(E) WRT12 YES «, t00=0x0025, t01=0x0094}
0x3a74…3a88 Head {h00=0x0010, h01=0x0050, text=» RF WRT16 * «, t00=0x0025, t01=0x00ae}
0x3a88…3ab6 Head {h00=0x002a, h01=0x0050, text=»WRT11 LD A1,DWTRLN,A6 GET REQ LINE NO «, t00=0x0025, t01=0x00c2}
0x3ab6…3ae2 Head {h00=0x0028, h01=0x0050, text=» CF A5,BINARY CONV ASCII TO BINARY «, t00=0x0025, t01=0x00f0}
0x3ae2…3b06 Head {h00=0x0020, h01=0x0050, text=» SUK A3,1 INCR REQ LINE NO «, t00=0x0025, t01=0x011c}
0x3b06…3b24 Head {h00=0x001a, h01=0x0050, text=» RF TWO TWO LINE FEED «, t00=0x0025, t01=0x0140}
0x3b24…3b52 Head {h00=0x002a, h01=0x0050, text=»WRT16 LD A1,DWTRLN,A6 GET REQ LINE NO «, t00=0x0025, t01=0x015e}
0x3b52…3b7e Head {h00=0x0028, h01=0x0050, text=» CF A5,BINARY CONV ASCII TO BINARY «, t00=0x0025, t01=0x018c}
0x3b7e…3ba4 Head {h00=0x0022, h01=0x0050, text=»TWO SUK A3,1 INCR REQ LINE NO «, t00=0x0026, t01=0x0028}
0x3ba4…3bba Head {h00=0x0012, h01=0x0050, text=» LDR A4,A3 * «, t00=0x0026, t01=0x004e}
0x3bba…3be6 Head {h00=0x0028, h01=0x0050, text=» CF A5,KONVER CONV BINARY TO ASCII «, t00=0x0026, t01=0x0064}
0x3be6…3c12 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTRLN,A6 STORE REQ LINE NO «, t00=0x0026, t01=0x0090}
0x3c12…3c1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00bc}
0x3c1c…3c4c Head {h00=0x002c, h01=0x0050, text=» LDKL A2,CSVPFF VERTICAL POS FRONT FEED «, t00=0x0026, t01=0x00c6}
0x3c4c…3c7c Head {h00=0x002c, h01=0x0050, text=» LDK A3,DWTRLN REQ LINE NO DISPLACEMENT «, t00=0x0026, t01=0x00f6}
0x3c7c…3c92 Head {h00=0x0012, h01=0x0050, text=» CF A5,SEND * «, t00=0x0026, t01=0x0126}
0x3c92…3c9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x013c}
0x3c9c…3cb8 Head {h00=0x0018, h01=0x0050, text=» LD A4,DWTRLN,A6 * «, t00=0x0026, t01=0x0146}
0x3cb8…3ce8 Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTALN,A6 ACTUAL LINE =REQ LINE «, t00=0x0026, t01=0x0162}
0x3ce8…3cfa (39, 0, 400) Head {h00=0x000e, h01=0x0050, text=» RF WRT12 «, t00=0x0027, t01=0x0004}
0x3cfa…3d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0016}
0x3d04…3d0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0020}
0x3d0e…3d3c Head {h00=0x002a, h01=0x0050, text=»WRT13 CWK A2,/30 CONTINOUS STATIONARY «, t00=0x0027, t01=0x002a}
0x3d3c…3d64 Head {h00=0x0024, h01=0x0050, text=» RF(E) WRT05 TWO LINE FEED,YES «, t00=0x0027, t01=0x0058}
0x3d64…3d6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0080}
0x3d6e…3d8e Head {h00=0x001c, h01=0x0050, text=» CWK A2,/31 FORM FEED ? «, t00=0x0027, t01=0x008a}
0x3d8e…3da8 Head {h00=0x0016, h01=0x0050, text=» RF(NE) WRT10 NO «, t00=0x0027, t01=0x00aa}
0x3da8…3db2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c4}
0x3db2…3dd4 Head {h00=0x001e, h01=0x0050, text=» LDK A2,FF SEND FORM FEED «, t00=0x0027, t01=0x00ce}
0x3dd4…3dec Head {h00=0x0014, h01=0x0050, text=» CF A5,OUTPUT * «, t00=0x0027, t01=0x00f0}
0x3dec…3e00 Head {h00=0x0010, h01=0x0050, text=» RF WRT12 * «, t00=0x0027, t01=0x0108}
0x3e00…3e0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x011c}
0x3e0a…3e30 Head {h00=0x0022, h01=0x0050, text=»WRT05 LDK A2,LF SEND LINE FEED«, t00=0x0027, t01=0x0126}
0x3e30…3e46 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0027, t01=0x014c}
0x3e46…3e6c Head {h00=0x0022, h01=0x0050, text=»WRT10 LDK A2,LF SEND LINE FEED«, t00=0x0027, t01=0x0162}
0x3e6c…3e82 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0027, t01=0x0188}
0x3e82…3eae Head {h00=0x0028, h01=0x0050, text=»WRT12 LC A1,DWTLFD,A6 GET INDICATOR «, t00=0x0028, t01=0x000e}
0x3eae…3ede Head {h00=0x002c, h01=0x0050, text=» ORK A1,/4 INDICATE LINE/FORM FEED DONE «, t00=0x0028, t01=0x003a}
0x3ede…3f08 Head {h00=0x0026, h01=0x0050, text=» SC A1,DWTLFD,A6 STORE INDICATOR «, t00=0x0028, t01=0x006a}
0x3f08…3f34 Head {h00=0x0028, h01=0x0050, text=»WRT14 LC A2,DWTOR+1,A6 GET DWT INDEX«, t00=0x0028, t01=0x0094}
0x3f34…3f50 Head {h00=0x0018, h01=0x0050, text=» ANK A2,1 DOCUMENT? «, t00=0x0028, t01=0x00c0}
0x3f50…3f6a Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT45 YES «, t00=0x0028, t01=0x00dc}
0x3f6a…3f9c Head {h00=0x002e, h01=0x0050, text=» CM DWTCO1,A6 CLEAR PAPER COLUMN COUNTER 1«, t00=0x0028, t01=0x00f6}
0x3f9c…3fd6 Head {h00=0x0036, h01=0x0050, text=»WRT45 CM DWTCO2,A6 CLEAR DOCUMENT COLUMN COUNTER 2«, t00=0x0028, t01=0x0128}
0x3fd6…3ff8 Head {h00=0x001e, h01=0x0050, text=» LDK A2,/20 SEND ONE SPACE«, t00=0x0028, t01=0x0162}
0x3ff8…400e Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0028, t01=0x0184}
0x400e…4016 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x000a}
0x4016…4030 Head {h00=0x0016, h01=0x0050, text=»WRT15 LDK A3,2 * «, t00=0x0029, t01=0x0012}
0x4030…4044 Head {h00=0x0010, h01=0x0050, text=» RF WRT20 * «, t00=0x0029, t01=0x002c}
0x4044…4076 Head {h00=0x002e, h01=0x0050, text=»WRT17 SUK A3,/02 ECB BUFFER POINTER = /02 «, t00=0x0029, t01=0x0040}
0x4076…4090 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRT18 YES. «, t00=0x0029, t01=0x0072}
0x4090…40bc Head {h00=0x0028, h01=0x0050, text=» LDK A2,CR NO. SEND CARRIAGE RETURN «, t00=0x0029, t01=0x008c}
0x40bc…40d2 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0029, t01=0x00b8}
0x40d2…40f8 Head {h00=0x0022, h01=0x0050, text=»WRT18 CF A5,GTSTAT GET STATUS «, t00=0x0029, t01=0x00ce}
0x40f8…4116 Head {h00=0x001a, h01=0x0050, text=» RF ENDIO END REQUEST «, t00=0x0029, t01=0x00f4}
0x4116…4120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0112}
0x4120…415a Head {h00=0x0036, h01=0x0050, text=»WRT20 CF A15,GETCHR GET CHARACTER FRON ECB-BUFFER «, t00=0x0029, t01=0x011c}
0x415a…416c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0029, t01=0x0156}
0x416c…4194 Head {h00=0x0024, h01=0x0050, text=» RB(NP) WRT17 NO MORE CHARACTERS«, t00=0x0029, t01=0x0168}
0x4194…41a6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0029, t01=0x0190}
0x41a6…41b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0012}
0x41b0…41f4 Head {h00=0x0040, h01=0x0050, text=»* EXAMINE CHARACTER AND SEND DEPENDING ON TYPE OF CHARACTER «, t00=0x002a, t01=0x001c}
0x41f4…41fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0060}
0x41fe…4206 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x006a}
0x4206…4226 Head {h00=0x001c, h01=0x0050, text=» SUK A4,/20 CHAR < /20? «, t00=0x002a, t01=0x0072}
0x4226…4252 Head {h00=0x0028, h01=0x0050, text=» RB(N) WRT20 YES GET A NEW CHARACTER«, t00=0x002a, t01=0x0092}
0x4252…4272 Head {h00=0x001c, h01=0x0050, text=» SUK A4,/5F CHAR < /7F? «, t00=0x002a, t01=0x00be}
0x4272…428c Head {h00=0x0016, h01=0x0050, text=» RF(N) WRT25 YES. «, t00=0x002a, t01=0x00de}
0x428c…42b0 Head {h00=0x0020, h01=0x0050, text=» SUK A4,/2F NO. CHAR = /AE? «, t00=0x002a, t01=0x00f8}
0x42b0…42dc Head {h00=0x0028, h01=0x0050, text=» RF(Z) WRT30 YES. CONVERT /AE TO /2E«, t00=0x002a, t01=0x011c}
0x42dc…4314 Head {h00=0x0034, h01=0x0050, text=» LDK A4,/04 ILLEGAL CHARACTER SET BIT 13 IN R.C.«, t00=0x002a, t01=0x0148}
0x4314…432c Head {h00=0x0014, h01=0x0050, text=» ORS A4,ECBRC,A8«, t00=0x002a, t01=0x0180}
0x432c…433e Head {h00=0x000e, h01=0x0050, text=» RB WRT20 «, t00=0x002b, t01=0x0008}
0x433e…4356 Head {h00=0x0014, h01=0x0050, text=»WRT30 LDK A2,/2E«, t00=0x002b, t01=0x001a}
0x4356…436e Head {h00=0x0014, h01=0x0050, text=»WRT25 LDR A4,A1 «, t00=0x002b, t01=0x0032}
0x436e…4392 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x002b, t01=0x004a}
0x4392…43ba Head {h00=0x0024, h01=0x0050, text=» LC A2,DWTOR+1,A6 GET DWT INDEX «, t00=0x002b, t01=0x006e}
0x43ba…43d6 Head {h00=0x0018, h01=0x0050, text=» ANK A2,1 DOCUMENT? «, t00=0x002b, t01=0x0096}
0x43d6…43f0 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT40 YES «, t00=0x002b, t01=0x00b2}
0x43f0…441a Head {h00=0x0026, h01=0x0050, text=» IM DWTCO1,A6 INC.COLUMN COUNTER 1«, t00=0x002b, t01=0x00cc}
0x441a…442c Head {h00=0x000e, h01=0x0050, text=» RB WRT20 «, t00=0x002b, t01=0x00f6}
0x442c…445c Head {h00=0x002c, h01=0x0050, text=»WRT40 IM DWTCO2,A6 INC.COLUMN COUNTER 2 «, t00=0x002b, t01=0x0108}
0x445c…446e Head {h00=0x000e, h01=0x0050, text=» RB WRT20 «, t00=0x002b, t01=0x0138}
0x446e…4482 Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x002b, t01=0x014a}
0x4482…449e Head {h00=0x0018, h01=0x0050, text=» LC A2,DWTLFD,A6 * «, t00=0x002b, t01=0x015e}
0x449e…44b4 Head {h00=0x0012, h01=0x0050, text=» ANK A2,/8 * «, t00=0x002b, t01=0x017a}
0x44b4…44de Head {h00=0x0026, h01=0x0050, text=» SC A2,DWTLFD,A6 RESET LF/FF IND. «, t00=0x002b, t01=0x0190}
0x44de…44fe Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x002c, t01=0x002a}
0x44fe…4506 Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x004a}
0x4506…4514 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x0052}
0x4514…4528 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x002c, t01=0x0060}
0x4528…4532 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0074}
0x4532…453c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x007e}
0x453c…4564 Head {h00=0x0024, h01=0x0050, text=»* ORDER 0B : POSITION DOCUMENT«, t00=0x002c, t01=0x0088}
0x4564…4598 Head {h00=0x0030, h01=0x0050, text=»* CONTROL WORD CONTAINS REQUESTED LINE NO «, t00=0x002c, t01=0x00b0}
0x4598…45a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00e4}
0x45a2…45ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00ee}
0x45ac…45d2 Head {h00=0x0022, h01=0x0050, text=»POSDOC EQU * POSITION DOCUMENT«, t00=0x002c, t01=0x00f8}
0x45d2…45e8 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x002c, t01=0x011e}
0x45e8…4610 Head {h00=0x0024, h01=0x0050, text=» CF A5,GTSTAT GET DEVICE STATUS «, t00=0x002c, t01=0x0134}
0x4610…4630 Head {h00=0x001c, h01=0x0050, text=» LDK A3,1 NOT OPERABLE «, t00=0x002c, t01=0x015c}
0x4630…4644 Head {h00=0x0010, h01=0x0050, text=» TM A1,A3 * «, t00=0x002c, t01=0x017c}
0x4644…4660 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) POS020 YES «, t00=0x002c, t01=0x0190}
0x4660…468e Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CSSNV SELECT NATIONAL VERSION«, t00=0x002d, t01=0x001c}
0x468e…46b6 Head {h00=0x0024, h01=0x0050, text=» LDK A3,DWTDCS DOCUMENT VERSION «, t00=0x002d, t01=0x004a}
0x46b6…46d2 Head {h00=0x0018, h01=0x0050, text=» CF A5,SEND SEND SNV«, t00=0x002d, t01=0x0072}
0x46d2…46e2 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x002d, t01=0x008e}
0x46e2…46f2 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x002d, t01=0x009e}
0x46f2…4702 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x002d, t01=0x00ae}
0x4702…472c Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBCW,A8 GET REQUESTED LINE«, t00=0x002d, t01=0x00be}
0x472c…4740 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x002d, t01=0x00e8}
0x4740…476a Head {h00=0x0026, h01=0x0050, text=» RF(Z) POSERR ILLEGAL LINE NUMBER «, t00=0x002d, t01=0x00fc}
0x476a…478c Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTDL,A6 MAX. LINE «, t00=0x002d, t01=0x0126}
0x478c…47ba Head {h00=0x002a, h01=0x0050, text=» CF A5,BINARY CONVERT ASCII TO BINARY «, t00=0x002d, t01=0x0148}
0x47ba…47e0 Head {h00=0x0022, h01=0x0050, text=» CWR A4,A3 REQ. LINE>MAX. LINE«, t00=0x002d, t01=0x0176}
0x47e0…47fa Head {h00=0x0016, h01=0x0050, text=» RF(G) POSERR YES «, t00=0x002e, t01=0x000c}
0x47fa…481c Head {h00=0x001e, h01=0x0050, text=» ADK A3,1 CORRECT POSITION«, t00=0x002e, t01=0x0026}
0x481c…483e Head {h00=0x001e, h01=0x0050, text=» SUR A4,A3 INVERT LINE NO.«, t00=0x002e, t01=0x0048}
0x483e…486a Head {h00=0x0028, h01=0x0050, text=» NGR A4,A4 GET PRINTER REQ. LINE NO.«, t00=0x002e, t01=0x006a}
0x486a…4898 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x002e, t01=0x0096}
0x4898…48c4 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTRLN,A6 SET REQUESTED LINE «, t00=0x002e, t01=0x00c4}
0x48c4…48ec Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTALN,A6 GET ACTUAL LINE«, t00=0x002e, t01=0x00f0}
0x48ec…491e Head {h00=0x002e, h01=0x0050, text=» RF(NZ) POS030 DOCUMENT ALREADY POSITIONED«, t00=0x002e, t01=0x0118}
0x491e…4932 Head {h00=0x0010, h01=0x0050, text=»POS005 EQU *«, t00=0x002e, t01=0x014a}
0x4932…495a Head {h00=0x0024, h01=0x0050, text=» LDKL A2,CSINFF INPUT FRONT FEED«, t00=0x002e, t01=0x015e}
0x495a…4994 Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTRLN REQUESTED LINE NUMBER DISPLACEMENT «, t00=0x002e, t01=0x0186}
0x4994…49be Head {h00=0x0026, h01=0x0050, text=» CF A5,SEND SEND INPUT FRONT FEED «, t00=0x002f, t01=0x0030}
0x49be…49d2 Head {h00=0x0010, h01=0x0050, text=»POS010 EQU *«, t00=0x002f, t01=0x005a}
0x49d2…49f2 Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x002f, t01=0x006e}
0x49f2…4a14 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x002f, t01=0x008e}
0x4a14…4a40 Head {h00=0x0028, h01=0x0050, text=» ANKL A2,/2000 PAPER DOCUMENT OUT ? «, t00=0x002f, t01=0x00b0}
0x4a40…4a7c Head {h00=0x0038, h01=0x0050, text=» RB(NZ) POS005 YES WAIT FOR DOCUMENT TO BE INSERTED «, t00=0x002f, t01=0x00dc}
0x4a7c…4aa8 Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTRLN,A6 GET REQUESTED LINE «, t00=0x002f, t01=0x0118}
0x4aa8…4ad8 Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTALN,A6 ACTUAL LINE = REQ LINE «, t00=0x002f, t01=0x0144}
0x4ad8…4ae8 Head {h00=0x000c, h01=0x0050, text=» * =2 «, t00=0x002f, t01=0x0174}
0x4ae8…4b02 Head {h00=0x0016, h01=0x0050, text=»POS020 ABL DISEND «, t00=0x002f, t01=0x0184}
0x4b02…4b16 Head {h00=0x0010, h01=0x0050, text=»POS030 EQU *«, t00=0x0030, t01=0x000e}
0x4b16…4b4a Head {h00=0x0030, h01=0x0050, text=» LDKL A2,CSVPFF VERTICAL POSITION FRONT FEED«, t00=0x0030, t01=0x0022}
0x4b4a…4b84 Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTRLN REQUESTED LINE NUMBER DISPLACEMENT «, t00=0x0030, t01=0x0056}
0x4b84…4bba Head {h00=0x0032, h01=0x0050, text=» CF A5,SEND SEND VERTICAL POSITION FRONT FEED «, t00=0x0030, t01=0x0090}
0x4bba…4bcc Head {h00=0x000e, h01=0x0050, text=» RB POS010«, t00=0x0030, t01=0x00c6}
0x4bcc…4be0 Head {h00=0x0010, h01=0x0050, text=» XIF =2 =2 «, t00=0x0030, t01=0x00d8}
0x4be0…4bf4 Head {h00=0x0010, h01=0x0050, text=»POSERR EQU *«, t00=0x0030, t01=0x00ec}
0x4bf4…4c18 Head {h00=0x0020, h01=0x0050, text=» LDKL A1,/8000 REQUEST ERROR«, t00=0x0030, t01=0x0100}
0x4c18…4c36 Head {h00=0x001a, h01=0x0050, text=» RB ENDIO END REQUEST «, t00=0x0030, t01=0x0124}
0x4c36…4c44 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0142}
0x4c44…4c58 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x0030, t01=0x0150}
0x4c58…4c62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0164}
0x4c62…4c6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x016e}
0x4c6c…4c98 Head {h00=0x0028, h01=0x0050, text=»* ORDER 24 : SET DOCUMENT PARAMETERS«, t00=0x0030, t01=0x0178}
0x4c98…4ca2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0014}
0x4ca2…4cac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x001e}
0x4cac…4cd4 Head {h00=0x0024, h01=0x0050, text=»DOCPAR EQU * DOCUMENT PARAMETERS«, t00=0x0031, t01=0x0028}
0x4cd4…4cf0 Head {h00=0x0018, h01=0x0050, text=» LDK A1,0 CLEAR A1 «, t00=0x0031, t01=0x0050}
0x4cf0…4d06 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x0031, t01=0x006c}
0x4d06…4d32 Head {h00=0x0028, h01=0x0050, text=» LD A4,ECBCW,A8 GET NUMBER OF LINES «, t00=0x0031, t01=0x0082}
0x4d32…4d4e Head {h00=0x0018, h01=0x0050, text=» SRL A4,8 GET LINES «, t00=0x0031, t01=0x00ae}
0x4d4e…4d76 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DOC010 NO CHANGE OF LINES«, t00=0x0031, t01=0x00ca}
0x4d76…4d96 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/10 INDEX TO BIG«, t00=0x0031, t01=0x00f2}
0x4d96…4db0 Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0031, t01=0x0112}
0x4db0…4dde Head {h00=0x002a, h01=0x0050, text=» ADR A4,A4 ADJUST INDEX TO LINE TABLE «, t00=0x0031, t01=0x012c}
0x4dde…4e12 Head {h00=0x0030, h01=0x0050, text=» LD A4,LINNUM,A4 GET LINE ACCORDING TO INDEX«, t00=0x0031, t01=0x015a}
0x4e12…4e46 Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTDL,A6 SET PAGE LENGTH FOR DOCUMENT«, t00=0x0031, t01=0x018e}
0x4e46…4e5a Head {h00=0x0010, h01=0x0050, text=»DOC010 EQU *«, t00=0x0032, t01=0x0032}
0x4e5a…4e92 Head {h00=0x0034, h01=0x0050, text=» LD A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION«, t00=0x0032, t01=0x0046}
0x4e92…4ea6 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0032, t01=0x007e}
0x4ea6…4ee0 Head {h00=0x0036, h01=0x0050, text=» RF(Z) DOC020 NO CHANGE OF NATIONAL CHARACTER SET «, t00=0x0032, t01=0x0092}
0x4ee0…4f00 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/F INDEX TO BIG «, t00=0x0032, t01=0x00cc}
0x4f00…4f1a Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0032, t01=0x00ec}
0x4f1a…4f40 Head {h00=0x0022, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE INDEX «, t00=0x0032, t01=0x0106}
0x4f40…4f7a Head {h00=0x0036, h01=0x0050, text=» LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACC. TO INDEX «, t00=0x0032, t01=0x012c}
0x4f7a…4fb2 Head {h00=0x0034, h01=0x0050, text=» ST A4,DWTDCS,A6 SET CHARACTER SET FOR DOCUMENT «, t00=0x0032, t01=0x0166}
0x4fb2…4fc6 Head {h00=0x0010, h01=0x0050, text=»DOC020 EQU *«, t00=0x0033, t01=0x000e}
0x4fc6…4fe4 Head {h00=0x001a, h01=0x0050, text=» RB ENDIO END REQUEST «, t00=0x0033, t01=0x0022}
0x4fe4…4ff0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0040}
0x4ff0…4ffe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x004c}
0x4ffe…5008 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x005a}
0x5008…5012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0064}
0x5012…504c Head {h00=0x0036, h01=0x0050, text=»* ORDER 24 : SET CONTINUOUS STATIONARY PARAMETERS «, t00=0x0033, t01=0x006e}
0x504c…5056 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00a8}
0x5056…5060 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00b2}
0x5060…509a Head {h00=0x0036, h01=0x0050, text=»CSTPAR EQU * SET PARAMETERS CONTINUOUS STATIONARY «, t00=0x0033, t01=0x00bc}
0x509a…50b6 Head {h00=0x0018, h01=0x0050, text=» LDK A1,0 CLEAR A1 «, t00=0x0033, t01=0x00f6}
0x50b6…50cc Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x0033, t01=0x0112}
0x50cc…50fc Head {h00=0x002c, h01=0x0050, text=» LD A4,ECBCW,A8 GET NUMBER OF LINES CST.«, t00=0x0033, t01=0x0128}
0x50fc…5118 Head {h00=0x0018, h01=0x0050, text=» SRL A4,8 GET LINES «, t00=0x0033, t01=0x0158}
0x5118…5140 Head {h00=0x0024, h01=0x0050, text=» RF(Z) CST010 NO CHANGE OF LINES«, t00=0x0033, t01=0x0174}
0x5140…5160 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/10 INDEX TO BIG«, t00=0x0034, t01=0x000c}
0x5160…517a Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0034, t01=0x002c}
0x517a…51a8 Head {h00=0x002a, h01=0x0050, text=» ADR A4,A4 ADJUST INDEX TO LINE TABLE «, t00=0x0034, t01=0x0046}
0x51a8…51de Head {h00=0x0032, h01=0x0050, text=» LD A4,LINNUM,A4 GET LINES ACCORDING TO INDEX «, t00=0x0034, t01=0x0074}
0x51de…5214 Head {h00=0x0032, h01=0x0050, text=» ST A4,DWTPL,A6 SET PAGE LENGTH FOR CONT.STAT.«, t00=0x0034, t01=0x00aa}
0x5214…5240 Head {h00=0x0028, h01=0x0050, text=» LDKL A2,CSSLPL SELECT PAGELENGTH =1«, t00=0x0034, t01=0x00e0}
0x5240…5274 Head {h00=0x0030, h01=0x0050, text=» LDK A3,DWTPL PRINTER PAPER LENGTH DISPL. =1«, t00=0x0034, t01=0x010c}
0x5274…52a2 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND SELECT PAGELENGTH =1 «, t00=0x0034, t01=0x0140}
0x52a2…52b6 Head {h00=0x0010, h01=0x0050, text=»CST010 EQU *«, t00=0x0034, t01=0x016e}
0x52b6…52ee Head {h00=0x0034, h01=0x0050, text=» LD A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION«, t00=0x0034, t01=0x0182}
0x52ee…5302 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0035, t01=0x002a}
0x5302…5334 Head {h00=0x002e, h01=0x0050, text=» RF(Z) CST020 NO CHANGE OF NAT. CHAR. SET «, t00=0x0035, t01=0x003e}
0x5334…5354 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/F INDEX TO BIG «, t00=0x0035, t01=0x0070}
0x5354…536e Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0035, t01=0x0090}
0x536e…53a2 Head {h00=0x0030, h01=0x0050, text=» ADR A4,A4 ADJUST INDEX TO NAT. CHAR. TABLE «, t00=0x0035, t01=0x00aa}
0x53a2…53dc Head {h00=0x0036, h01=0x0050, text=» LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACC. TO INDEX «, t00=0x0035, t01=0x00de}
0x53dc…5416 Head {h00=0x0036, h01=0x0050, text=» ST A4,DWTPCS,A6 SET NAT. CHAR. SET FOR CONT.STAT.«, t00=0x0035, t01=0x0118}
0x5416…542a Head {h00=0x0010, h01=0x0050, text=»CST020 EQU *«, t00=0x0035, t01=0x0152}
0x542a…5448 Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x0035, t01=0x0166}
0x5448…5452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0184}
0x5452…545c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x018e}
0x545c…5466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0008}
0x5466…5474 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x0012}
0x5474…5488 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x0036, t01=0x0020}
0x5488…5492 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0034}
0x5492…549c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x003e}
0x549c…54c2 Head {h00=0x0022, h01=0x0050, text=»* ORDER 38 : RELEASE DOCUMENT «, t00=0x0036, t01=0x0048}
0x54c2…54cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x006e}
0x54cc…54d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0078}
0x54d6…54ea Head {h00=0x0010, h01=0x0050, text=»RELDOC EQU *«, t00=0x0036, t01=0x0082}
0x54ea…5500 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x0036, t01=0x0096}
0x5500…5536 Head {h00=0x0032, h01=0x0050, text=» LDKL A2,CSEJFF CONTROL SEQ. EJECT FRONT FEED «, t00=0x0036, t01=0x00ac}
0x5536…5558 Head {h00=0x001e, h01=0x0050, text=» CF A5,SEND SEND SEQUENCE «, t00=0x0036, t01=0x00e2}
0x5558…5586 Head {h00=0x002a, h01=0x0050, text=» CF A5,GTSTAT GET STATUS FROM PRINTER «, t00=0x0036, t01=0x0104}
0x5586…55a8 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x0036, t01=0x0132}
0x55a8…55ce Head {h00=0x0022, h01=0x0050, text=» ANK A2,/20 DOCUMENT RELEASED «, t00=0x0036, t01=0x0154}
0x55ce…55f4 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RELDOC NO , TRY AGAIN «, t00=0x0036, t01=0x017a}
0x55f4…5618 Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/8000 REQUEST ERROR«, t00=0x0037, t01=0x0010}
0x5618…5640 Head {h00=0x0024, h01=0x0050, text=» CM DWTALN,A6 RESET ACTUAL LINE «, t00=0x0037, t01=0x0034}
0x5640…566a Head {h00=0x0026, h01=0x0050, text=» CM DWTRLN,A6 RESET REQUESTED LINE«, t00=0x0037, t01=0x005c}
0x566a…5688 Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x0037, t01=0x0086}
0x5688…5694 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x00a4}
0x5694…56a2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x00b0}
0x56a2…56ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00be}
0x56ac…56b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00c8}
0x56b6…56c8 Head {h00=0x000e, h01=0x0050, text=»* I H T P «, t00=0x0037, t01=0x00d2}
0x56c8…56d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00e4}
0x56d2…56dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00ee}
0x56dc…570e Head {h00=0x002e, h01=0x0050, text=»* INTERRUPT HANDLER : PROCESS OF INTERRUPT«, t00=0x0037, t01=0x00f8}
0x570e…5718 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x012a}
0x5718…5722 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0134}
0x5722…572c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x013e}
0x572c…573e Head {h00=0x000e, h01=0x0050, text=»IHTP EQU *«, t00=0x0037, t01=0x0148}
0x573e…5762 Head {h00=0x0020, h01=0x0050, text=» LD A4,DWTST,A6 I/O-REQUEST «, t00=0x0037, t01=0x015a}
0x5762…5786 Head {h00=0x0020, h01=0x0050, text=» ABL(N) TDISP NO , DISPATCH «, t00=0x0037, t01=0x017e}
0x5786…57b0 Head {h00=0x0026, h01=0x0050, text=» ABL LDREG RETURN TO READ ROUTINE «, t00=0x0038, t01=0x0012}
0x57b0…57be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x003c}
0x57be…57c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x004a}
0x57c8…57d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0054}
0x57d2…57e4 Head {h00=0x000e, h01=0x0050, text=»* R C T P«, t00=0x0038, t01=0x005e}
0x57e4…57ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0070}
0x57ee…582c Head {h00=0x003a, h01=0x0050, text=»* RECOVERY ROUTINE REPEATS RUNNING REQUEST AT POWER ON«, t00=0x0038, t01=0x007a}
0x582c…5836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00b8}
0x5836…5840 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00c2}
0x5840…5852 Head {h00=0x000e, h01=0x0050, text=»RCTP EQU *«, t00=0x0038, t01=0x00cc}
0x5852…5874 Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0038, t01=0x00de}
0x5874…589c Head {h00=0x0024, h01=0x0050, text=» LC A4,DWTLFD,A6 GET INDICATOR «, t00=0x0038, t01=0x0100}
0x589c…58a4 Head {h00=0x0004, h01=0x0050, t00=0x0038, t01=0x0128}
0x58a4…58d0 Head {h00=0x0028, h01=0x0050, text=» ANK A4,/4 IS LINE/FORM FEED DONE ? «, t00=0x0038, t01=0x0130}
0x58d0…58ec Head {h00=0x0018, h01=0x0050, text=» RF(NZ) RCTP05 YES «, t00=0x0038, t01=0x015c}
0x58ec…5920 Head {h00=0x0030, h01=0x0050, text=» ORK A4,/8 INDICATE:NO LINE/FORM FEED DONE «, t00=0x0038, t01=0x0178}
0x5920…5966 Head {h00=0x0042, h01=0x0050, text=» SC A4,DWTLFD,A6 * * «, t00=0x0039, t01=0x001c}
0x5966…59a6 Head {h00=0x003c, h01=0x0050, text=» RF RCTP07 * * «, t00=0x0039, t01=0x0062}
0x59a6…59d0 Head {h00=0x0026, h01=0x0050, text=»RCTP05 LDK A4,0 RESET INDICATORS «, t00=0x0039, t01=0x00a2}
0x59d0…59ec Head {h00=0x0018, h01=0x0050, text=» ST A4,DWTLFD,A6 * «, t00=0x0039, t01=0x00cc}
0x59ec…5a1a Head {h00=0x002a, h01=0x0050, text=»RCTP07 LDKL A1,/7FFF SET DEVICE BUSY «, t00=0x0039, t01=0x00e8}
0x5a1a…5a38 Head {h00=0x001a, h01=0x0050, text=» ANS A1,DWTST,A6 BUSY «, t00=0x0039, t01=0x0116}
0x5a38…5a66 Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CSRIS RESET TO INITIAL STATE «, t00=0x0039, t01=0x0134}
0x5a66…5a96 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND RESET TO INITIAL STATE «, t00=0x0039, t01=0x0162}
0x5a96…5aca (58, 0, 400) Head {h00=0x0030, h01=0x0050, text=» LD A1,DWTSYST,A6 INTERN. SYSTEM START IND. «, t00=0x003a, t01=0x0004}
0x5aca…5af2 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RCTP10 NO SYSTEM START «, t00=0x003a, t01=0x0038}
0x5af2…5b00 Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x003a, t01=0x0060}
0x5b00…5b32 Head {h00=0x002e, h01=0x0050, text=» IM DWTSYST,A6 SET SYSTEM START INDICATOR «, t00=0x003a, t01=0x006e}
0x5b32…5b40 Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x003a, t01=0x00a0}
0x5b40…5b74 Head {h00=0x0030, h01=0x0050, text=» LDKL A4,STDNCV GET STANDARD NAT. CHAR. SET «, t00=0x003a, t01=0x00ae}
0x5b74…5ba2 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BIANARY TO ASCII«, t00=0x003a, t01=0x00e2}
0x5ba2…5bd2 Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTDCS,A6 SET CHAR. SET DOCUMENT «, t00=0x003a, t01=0x0110}
0x5bd2…5c04 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTPCS,A6 SET CHAR. SET CONT.STAT. «, t00=0x003a, t01=0x0140}
0x5c04…5c30 Head {h00=0x0028, h01=0x0050, text=» LDKL A4,PAGLEN STANDARD PAGE LENGTH«, t00=0x003a, t01=0x0172}
0x5c30…5c5e Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x003b, t01=0x000e}
0x5c5e…5c90 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTPL,A6 SET PAGE LENGTH CONT.STAT.«, t00=0x003b, t01=0x003c}
0x5c90…5cbc Head {h00=0x0028, h01=0x0050, text=» LDKL A2,CSSLPL SELECT PAGELENGTH =1«, t00=0x003b, t01=0x006e}
0x5cbc…5cf0 Head {h00=0x0030, h01=0x0050, text=» LDK A3,DWTPL PRINTER PAPER LENGTH DISPL. =1«, t00=0x003b, t01=0x009a}
0x5cf0…5d1e Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND SELECT PAGELENGTH =1 «, t00=0x003b, t01=0x00ce}
0x5d1e…5d58 Head {h00=0x0036, h01=0x0050, text=» LDKL A4,DOCLEN GET STANDARD PAGE LENGTH DOCUMENT «, t00=0x003b, t01=0x00fc}
0x5d58…5d86 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x003b, t01=0x0136}
0x5d86…5db6 Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTDL,A6 SET PAGE LENGTH DOCUMENT«, t00=0x003b, t01=0x0164}
0x5db6…5dca (60, 0, 400) Head {h00=0x0010, h01=0x0050, text=»RCTP10 EQU *«, t00=0x003c, t01=0x0004}
0x5dca…5df2 Head {h00=0x0024, h01=0x0050, text=» CM DWTALN,A6 RESET ACTUAL LINE «, t00=0x003c, t01=0x0018}
0x5df2…5e22 Head {h00=0x002c, h01=0x0050, text=» LDKL A1,/200 INDICATE POWER OFF OCCURED«, t00=0x003c, t01=0x0040}
0x5e22…5e3c Head {h00=0x0016, h01=0x0050, text=» ORS A1,DWTST,A6 «, t00=0x003c, t01=0x0070}
0x5e3c…5e64 Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTECB,A6 RUNNING REQUEST«, t00=0x003c, t01=0x008a}
0x5e64…5e94 Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) ACT005 YES , REPEAT THE REQUEST«, t00=0x003c, t01=0x00b2}
0x5e94…5eb0 Head {h00=0x0018, h01=0x0050, text=» ABL DISEND DISPATCH«, t00=0x003c, t01=0x00e2}
0x5eb0…5ebe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x00fe}
0x5ebe…5ec8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x010c}
0x5ec8…5ed2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0116}
0x5ed2…5ee2 Head {h00=0x000c, h01=0x0050, text=»* GTSTAT«, t00=0x003c, t01=0x0120}
0x5ee2…5eec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0130}
0x5eec…5ef6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x013a}
0x5ef6…5f38 Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE SENDS 'DEVICE STATUS REPORT TO THE PRINTER «, t00=0x003c, t01=0x0144}
0x5f38…5f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0186}
0x5f42…5f80 Head {h00=0x003a, h01=0x0050, text=»* AND ANALYZES THE DEVICE STATUS SENT FROM THE PRINTER«, t00=0x003c, t01=0x0190}
0x5f80…5f8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x003e}
0x5f8a…5fac Head {h00=0x001e, h01=0x0050, text=»* AT EXIT A1 = RETURN CODE«, t00=0x003d, t01=0x0048}
0x5fac…5fb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x006a}
0x5fb6…5fc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0074}
0x5fc0…5fd4 Head {h00=0x0010, h01=0x0050, text=»GTSTAT EQU *«, t00=0x003d, t01=0x007e}
0x5fd4…5ffa Head {h00=0x0022, h01=0x0050, text=» CM DWTRC,A6 RESET RETURN CODE«, t00=0x003d, t01=0x0092}
0x5ffa…6016 Head {h00=0x0018, h01=0x0050, text=» LDK A2,ESC ESCAPE «, t00=0x003d, t01=0x00b8}
0x6016…6034 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND ESC«, t00=0x003d, t01=0x00d4}
0x6034…6064 Head {h00=0x002c, h01=0x0050, text=» LDK A2,CSI CONTROL SEQUENCE INTRODUCER «, t00=0x003d, t01=0x00f2}
0x6064…6082 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND CSI«, t00=0x003d, t01=0x0122}
0x6082…6096 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/35 «, t00=0x003d, t01=0x0140}
0x6096…60b4 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND /35«, t00=0x003d, t01=0x0154}
0x60b4…60dc Head {h00=0x0024, h01=0x0050, text=» LDK A2,DSR DEVICE STATUS REPORT«, t00=0x003d, t01=0x0172}
0x60dc…60fa Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND DSR«, t00=0x003e, t01=0x000a}
0x60fa…610e Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x003e, t01=0x0028}
0x610e…6124 Head {h00=0x0012, h01=0x0050, text=» ANK A2,/F * «, t00=0x003e, t01=0x003c}
0x6124…6142 Head {h00=0x001a, h01=0x0050, text=» CWK A2,/C PTS 8000 ? «, t00=0x003e, t01=0x0052}
0x6142…615a Head {h00=0x0014, h01=0x0050, text=» RF(L) GTST05 NO«, t00=0x003e, t01=0x0070}
0x615a…6176 Head {h00=0x0018, h01=0x0050, text=» SUK A2,/F SALCUZ ? «, t00=0x003e, t01=0x0088}
0x6176…6190 Head {h00=0x0016, h01=0x0050, text=» RF(Z) GTST05 YES «, t00=0x003e, t01=0x00a4}
0x6190…61b0 Head {h00=0x001c, h01=0x0050, text=» LDK A2,ETX END OF TEXT «, t00=0x003e, t01=0x00be}
0x61b0…61ce Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND ETX«, t00=0x003e, t01=0x00de}
0x61ce…61fa Head {h00=0x0028, h01=0x0050, text=»GTST05 LDKL A4,TAB GET TABLE ADDRESS«, t00=0x003e, t01=0x00fc}
0x61fa…620e Head {h00=0x0010, h01=0x0050, text=»GTST10 EQU *«, t00=0x003e, t01=0x0128}
0x620e…622c Head {h00=0x001a, h01=0x0050, text=» LDK A3,0 RESET INDEX «, t00=0x003e, t01=0x013c}
0x622c…625a Head {h00=0x002a, h01=0x0050, text=» CF A5,STREG READ STATUS FROM PRINTER «, t00=0x003e, t01=0x015a}
0x625a…627c Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FF GET CHARACTER «, t00=0x003e, t01=0x0188}
0x627c…62a4 Head {h00=0x0024, h01=0x0050, text=» CCK A2,/5C5C STRING TERMINATOR «, t00=0x003f, t01=0x001a}
0x62a4…62be Head {h00=0x0016, h01=0x0050, text=» RF(E) GTSEND YES «, t00=0x003f, t01=0x0042}
0x62be…62e6 Head {h00=0x0024, h01=0x0050, text=» LCR A3,A4 GET MASK RETURN CODE «, t00=0x003f, t01=0x005c}
0x62e6…62f8 Head {h00=0x000e, h01=0x0050, text=» ANR A2,A3«, t00=0x003f, t01=0x0084}
0x62f8…6326 Head {h00=0x002a, h01=0x0050, text=» LDKL A3,/3AC0 SHIFT LEFT CIRCULAR A2 «, t00=0x003f, t01=0x0096}
0x6326…6342 Head {h00=0x0018, h01=0x0050, text=» LC A3,1,A4 A3 TIMES«, t00=0x003f, t01=0x00c4}
0x6342…636a Head {h00=0x0024, h01=0x0050, text=» EXR A3 EXECUT SHIFT INSTRUCTION«, t00=0x003f, t01=0x00e0}
0x636a…63a0 Head {h00=0x0032, h01=0x0050, text=» ORS A2,DWTRC,A6 SAVE RETURN CODE TEMPORARILY «, t00=0x003f, t01=0x0108}
0x63a0…63c2 Head {h00=0x001e, h01=0x0050, text=» ADK A4,2 INCREMENT ADRESS«, t00=0x003f, t01=0x013e}
0x63c2…63ee Head {h00=0x0028, h01=0x0050, text=» RB GTST10 GET NEXT STATUS CHARACTER«, t00=0x003f, t01=0x0160}
0x63ee…6402 Head {h00=0x0010, h01=0x0050, text=»GTSEND EQU *«, t00=0x003f, t01=0x018c}
0x6402…642a Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTRC,A6 GET RETURN CODE «, t00=0x0040, t01=0x0010}
0x642a…643a Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0040, t01=0x0038}
0x643a…6448 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0040, t01=0x0048}
0x6448…6452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0056}
0x6452…6490 Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE CONVERTS A BINARY VALUE TO ASCII CODE«, t00=0x0040, t01=0x0060}
0x6490…649a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x009e}
0x649a…64b0 Head {h00=0x0012, h01=0x0050, text=»* REGISTERS : «, t00=0x0040, t01=0x00a8}
0x64b0…64ce Head {h00=0x001a, h01=0x0050, text=»* A1= WORK REGISTER «, t00=0x0040, t01=0x00be}
0x64ce…64ea Head {h00=0x0018, h01=0x0050, text=»* A4= BINARY INPUT«, t00=0x0040, t01=0x00dc}
0x64ea…650a Head {h00=0x001c, h01=0x0050, text=»* A2,A4= ASCII OUTPUT «, t00=0x0040, t01=0x00f8}
0x650a…6514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0118}
0x6514…651e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0122}
0x651e…6532 Head {h00=0x0010, h01=0x0050, text=»KONVER EQU *«, t00=0x0040, t01=0x012c}
0x6532…654a Head {h00=0x0014, h01=0x0050, text=»* BINARY TO DEC.«, t00=0x0040, t01=0x0140}
0x654a…6564 Head {h00=0x0016, h01=0x0050, text=» LDK A2,0 CLEAR A2«, t00=0x0040, t01=0x0158}
0x6564…6586 Head {h00=0x001e, h01=0x0050, text=» CWK A4,100 VALUE > 100 ? «, t00=0x0040, t01=0x0172}
0x6586…659e (65, 0, 398) Head {h00=0x0014, h01=0x0050, text=» RF(L) KONV05 NO«, t00=0x0041, t01=0x0004}
0x659e…65b2 Head {h00=0x0010, h01=0x0050, text=» SUKL A4,100«, t00=0x0041, t01=0x001c}
0x65b2…65dc Head {h00=0x0026, h01=0x0050, text=» LDKL A2,/100 LEFT BYTE OF A2=X=1 «, t00=0x0041, t01=0x0030}
0x65dc…660a Head {h00=0x002a, h01=0x0050, text=»KONV05 CWK A4,10 ARE THERE ANY TENS ? «, t00=0x0041, t01=0x005a}
0x660a…6622 Head {h00=0x0014, h01=0x0050, text=» RF(L) KONV04 NO«, t00=0x0041, t01=0x0088}
0x6622…6634 Head {h00=0x000e, h01=0x0050, text=» SUK A4,10«, t00=0x0041, t01=0x00a0}
0x6634…666a Head {h00=0x0032, h01=0x0050, text=» ADK A2,/1 NUMBER OF TENS IN RIGHT B. OF A2=Y «, t00=0x0041, t01=0x00b2}
0x666a…6682 Head {h00=0x0014, h01=0x0050, text=» RB KONV05 NEXT «, t00=0x0041, t01=0x00e8}
0x6682…66a8 Head {h00=0x0022, h01=0x0050, text=»KONV04 ORKL A2,/3030 XY IN A2 «, t00=0x0041, t01=0x0100}
0x66a8…66c4 Head {h00=0x0018, h01=0x0050, text=» ORK A4,/30 Z IN A4 «, t00=0x0041, t01=0x0126}
0x66c4…66de Head {h00=0x0016, h01=0x0050, text=» SRC A2,8 YX IN A2«, t00=0x0041, t01=0x0142}
0x66de…66f0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0041, t01=0x015c}
0x66f0…6714 Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/FF00 KEEP Y IN A1 «, t00=0x0041, t01=0x016e}
0x6714…6746 (66, 0, 400) Head {h00=0x002e, h01=0x0050, text=» ANK A2,/FF KEEP X IN R. BYTE OF A2. ASCII«, t00=0x0042, t01=0x0004}
0x6746…6768 Head {h00=0x001e, h01=0x0050, text=» ORR A4,A1 YZ IN A1. ASCII«, t00=0x0042, t01=0x0036}
0x6768…6778 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0042, t01=0x0058}
0x6778…6786 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0068}
0x6786…6790 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0076}
0x6790…67aa Head {h00=0x0016, h01=0x0050, text=»* RESET RECORVERY «, t00=0x0042, t01=0x0080}
0x67aa…67b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x009a}
0x67b4…67c8 Head {h00=0x0010, h01=0x0050, text=»RESREC EQU *«, t00=0x0042, t01=0x00a4}
0x67c8…67ee Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTST,A6 DEVICE STATUS «, t00=0x0042, t01=0x00b8}
0x67ee…680e Head {h00=0x001c, h01=0x0050, text=» ANKL A4,/200 RECOVERY? «, t00=0x0042, t01=0x00de}
0x680e…6828 Head {h00=0x0016, h01=0x0050, text=» RF(E) RESRTN NO. «, t00=0x0042, t01=0x00fe}
0x6828…6858 Head {h00=0x002c, h01=0x0050, text=» XRS A4,DWTST,A6 YES. RESET RECOVERY BIT«, t00=0x0042, t01=0x0118}
0x6858…6874 Head {h00=0x0018, h01=0x0050, text=»RESRTN RTN A5 RETURN«, t00=0x0042, t01=0x0148}
0x6874…6882 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0164}
0x6882…688c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0172}
0x688c…6896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x017c}
0x6896…68a8 Head {h00=0x000e, h01=0x0050, text=»* S E N D «, t00=0x0042, t01=0x0186}
0x68a8…68b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0008}
0x68b2…68e2 Head {h00=0x002c, h01=0x0050, text=»* THIS ROUTINE SENDS AN CONTROL SEQUENCE«, t00=0x0043, t01=0x0012}
0x68e2…68fa Head {h00=0x0014, h01=0x0050, text=»* TO THE PRINTER«, t00=0x0043, t01=0x0042}
0x68fa…6904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x005a}
0x6904…690e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0064}
0x690e…6922 Head {h00=0x0010, h01=0x0050, text=»* AT ENTRY :«, t00=0x0043, t01=0x006e}
0x6922…6948 Head {h00=0x0022, h01=0x0050, text=»* A2 = CONTROL SEQUENCE ADRESS«, t00=0x0043, t01=0x0082}
0x6948…6980 Head {h00=0x0034, h01=0x0050, text=»* A3 = DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC «, t00=0x0043, t01=0x00a8}
0x6980…698a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00e0}
0x698a…6994 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00ea}
0x6994…69a8 Head {h00=0x0010, h01=0x0050, text=»* AT EXIT : «, t00=0x0043, t01=0x00f4}
0x69a8…69c8 Head {h00=0x001c, h01=0x0050, text=»* A1,A2,A3 IS DESTROYED «, t00=0x0043, t01=0x0108}
0x69c8…69d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0128}
0x69d2…69dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0132}
0x69dc…69e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x013c}
0x69e6…6a0e Head {h00=0x0024, h01=0x0050, text=»SEND EQU * SEND CONTROL SEQUENCE«, t00=0x0043, t01=0x0146}
0x6a0e…6a3e Head {h00=0x002c, h01=0x0050, text=» ST A3,DWTDISP,A6 SAVE DWT-DISPLACEMENT «, t00=0x0043, t01=0x016e}
0x6a3e…6a6e Head {h00=0x002c, h01=0x0050, text=» ST A2,DWTSTR,A6 CONTROL SEQUENCE ADRESS«, t00=0x0044, t01=0x000e}
0x6a6e…6a82 Head {h00=0x0010, h01=0x0050, text=»SEND10 EQU *«, t00=0x0044, t01=0x003e}
0x6a82…6ab6 Head {h00=0x0030, h01=0x0050, text=» LD A3,DWTSTR,A6 GET CONTROL SEQUENCE ADRESS«, t00=0x0044, t01=0x0052}
0x6ab6…6ad6 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x0044, t01=0x0086}
0x6ad6…6af8 Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FF MAKE CHARACTER«, t00=0x0044, t01=0x00a6}
0x6af8…6b22 Head {h00=0x0026, h01=0x0050, text=» SLL A2,8 END OF CONTROL SEQUENCE «, t00=0x0044, t01=0x00c8}
0x6b22…6b44 Head {h00=0x001e, h01=0x0050, text=» RF(N) SENDEND YES,RETURN «, t00=0x0044, t01=0x00f2}
0x6b44…6b6e Head {h00=0x0026, h01=0x0050, text=» CWK A2,/3000 LINE NO,CHAR.SET,ETC«, t00=0x0044, t01=0x0114}
0x6b6e…6b88 Head {h00=0x0016, h01=0x0050, text=» RF(E) SEND30 YES «, t00=0x0044, t01=0x013e}
0x6b88…6bb4 Head {h00=0x0028, h01=0x0050, text=» SRL A2,8 PREPARE TO SEND CHARACTER «, t00=0x0044, t01=0x0158}
0x6bb4…6bd8 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0044, t01=0x0184}
0x6bd8…6bec Head {h00=0x0010, h01=0x0050, text=»SEND20 EQU *«, t00=0x0045, t01=0x0018}
0x6bec…6c1e Head {h00=0x002e, h01=0x0050, text=» IM DWTSTR,A6 INC. CONTROLSEQUENCE ADRESS «, t00=0x0045, t01=0x002c}
0x6c1e…6c3a Head {h00=0x0018, h01=0x0050, text=» RB SEND10 GET NEXT «, t00=0x0045, t01=0x005e}
0x6c3a…6c4e Head {h00=0x0010, h01=0x0050, text=»SEND30 EQU *«, t00=0x0045, t01=0x007a}
0x6c4e…6c7c Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTDISP,A6 GET DWT-DISPLACEMENT«, t00=0x0045, t01=0x008e}
0x6c7c…6ca0 Head {h00=0x0020, h01=0x0050, text=» ADR A3,A6 GET PROPER VALUE «, t00=0x0045, t01=0x00bc}
0x6ca0…6cc0 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x0045, t01=0x00e0}
0x6cc0…6ce4 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0045, t01=0x0100}
0x6ce4…6d14 Head {h00=0x002c, h01=0x0050, text=» IM DWTDISP,A6 INC. DISPLACEMENT ADRESS «, t00=0x0045, t01=0x0124}
0x6d14…6d30 Head {h00=0x0018, h01=0x0050, text=» RB SEND20 GET NEXT «, t00=0x0045, t01=0x0154}
0x6d30…6d46 Head {h00=0x0012, h01=0x0050, text=»SENDEND EQU * «, t00=0x0045, t01=0x0170}
0x6d46…6d56 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0045, t01=0x0186}
0x6d56…6d64 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0046, t01=0x0008}
0x6d64…6d6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0016}
0x6d6e…6d78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0020}
0x6d78…6d88 Head {h00=0x000c, h01=0x0050, text=»* BINARY«, t00=0x0046, t01=0x002a}
0x6d88…6d92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x003a}
0x6d92…6dce Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CONVERTS ASCII CODE TO A BINARY VALUE«, t00=0x0046, t01=0x0044}
0x6dce…6dd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0080}
0x6dd8…6dec Head {h00=0x0010, h01=0x0050, text=»* REGISTERS:«, t00=0x0046, t01=0x008a}
0x6dec…6e06 Head {h00=0x0016, h01=0x0050, text=»* A1= ASCII INPUT «, t00=0x0046, t01=0x009e}
0x6e06…6e22 Head {h00=0x0018, h01=0x0050, text=»* A2= WORK REGISTER «, t00=0x0046, t01=0x00b8}
0x6e22…6e3e Head {h00=0x0018, h01=0x0050, text=»* A3= BINARY OUTPUT «, t00=0x0046, t01=0x00d4}
0x6e3e…6e48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00f0}
0x6e48…6e52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00fa}
0x6e52…6e5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0104}
0x6e5c…6e7e Head {h00=0x001e, h01=0x0050, text=»BINARY SUR A3,A3 CLEAR A3 «, t00=0x0046, t01=0x010e}
0x6e7e…6ea0 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 MAX. LINE ASCII«, t00=0x0046, t01=0x0130}
0x6ea0…6eb2 Head {h00=0x000e, h01=0x0050, text=» SRL A2,8 «, t00=0x0046, t01=0x0152}
0x6eb2…6ec6 Head {h00=0x0010, h01=0x0050, text=» SUK A2,/30 «, t00=0x0046, t01=0x0164}
0x6ec6…6ed8 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0046, t01=0x0178}
0x6ed8…6eea Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0046, t01=0x018a}
0x6eea…6efc Head {h00=0x000e, h01=0x0050, text=» SLL A2,3 «, t00=0x0047, t01=0x000c}
0x6efc…6f0e Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0047, t01=0x001e}
0x6f0e…6f20 Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0047, t01=0x0030}
0x6f20…6f44 Head {h00=0x0020, h01=0x0050, text=» ADR A3,A1 MAX. LINE BINARY «, t00=0x0047, t01=0x0042}
0x6f44…6f54 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0047, t01=0x0066}
0x6f54…6f62 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x0076}
0x6f62…6f88 Head {h00=0x0022, h01=0x0050, text=»LINNUM EQU *-2 NUMBER OF LINES«, t00=0x0047, t01=0x0084}
0x6f88…6fae Head {h00=0x0022, h01=0x0050, text=» DATA /3132,/3135,/3138,/3234 «, t00=0x0047, t01=0x00aa}
0x6fae…6fd4 Head {h00=0x0022, h01=0x0050, text=» DATA /3235,/3330,/3333,/3335 «, t00=0x0047, t01=0x00d0}
0x6fd4…6ffa Head {h00=0x0022, h01=0x0050, text=» DATA /3336,/3438,/3530,/3531 «, t00=0x0047, t01=0x00f6}
0x6ffa…7020 Head {h00=0x0022, h01=0x0050, text=» DATA /3630,/3636,/3730,/3732 «, t00=0x0047, t01=0x011c}
0x7020…702a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0142}
0x702a…7034 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x014c}
0x7034…703e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0156}
0x703e…7048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0160}
0x7048…7082 Head {h00=0x0036, h01=0x0050, text=»NCVTAB EQU *-2 NATIONAL CHARACTER VARIATION YABLE «, t00=0x0047, t01=0x016a}
0x7082…70a8 Head {h00=0x0022, h01=0x0050, text=» DATA /3031,/3032,/3033,/3034 «, t00=0x0048, t01=0x0014}
0x70a8…70ce Head {h00=0x0022, h01=0x0050, text=» DATA /3035,/3036,/3037,/3038 «, t00=0x0048, t01=0x003a}
0x70ce…70f4 Head {h00=0x0022, h01=0x0050, text=» DATA /3039,/3130,/3131,/3131 «, t00=0x0048, t01=0x0060}
0x70f4…7114 Head {h00=0x001c, h01=0x0050, text=» DATA /3133,/3134,/3135 «, t00=0x0048, t01=0x0086}
0x7114…7150 Head {h00=0x0038, h01=0x0050, text=»TAB EQU * MASK TABLE FOR STATUS REPORT FROM PRINTER «, t00=0x0048, t01=0x00a6}
0x7150…7172 Head {h00=0x001e, h01=0x0050, text=» DATA /C0,/C0,/C0,/2CC * «, t00=0x0048, t01=0x00e2}
0x7172…7194 Head {h00=0x001e, h01=0x0050, text=» DATA /2CF,/4CB,/C0,/C0 * «, t00=0x0048, t01=0x0104}
0x7194…71b2 Head {h00=0x001a, h01=0x0050, text=» DATA /C0,/C0,/C0,/C0 «, t00=0x0048, t01=0x0126}
0x71b2…71c8 Head {h00=0x0012, h01=0x0050, text=» DATA /C0,/C0 «, t00=0x0048, t01=0x0144}
0x71c8…71d4 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0048, t01=0x015a}
0x71d4…71d8 Head {h00=0x4004, h01=0x0000}
0x71d8…71dc 00 48 01 66 ┆ H f┆
0x71dc…71e4 (73, 1, 8) 20 04 00 00 00 49 00 04 ┆ I ┆
0x71e4…7234 (74, 0, 400) 20 4c 20 4f 20 4f 20 50 20 2d 20 54 20 45 20 53 20 54 20 20 20 53 20 45 20 43 20 54 20 49 20 4f 20 4e 00 49 01 8c 00 06 00 50 2a 20 00 4a 00 2a 00 06 00 50 2a 20 00 4a 00 34 00 32 00 50 2a 20 20 20 20 4f 52 44 45 52 20 2f 30 30 3a 20 54 45 ┆ L O O P - T E S T S E C T I O N I P* J * P* J 4 2 P* ORDER /00: TE┆
0x7234…7284 53 54 20 52 45 4d 4f 54 45 20 43 48 41 4e 4e 45 4c 20 43 4f 4e 4e 45 43 54 49 4f 4e 00 4a 00 3e 00 06 00 50 2a 20 00 4a 00 74 00 3a 00 50 2a 20 20 20 20 43 48 41 4e 4e 45 4c 20 54 4f 20 54 45 53 54 20 49 53 20 47 49 56 45 4e 20 49 4e 20 43 ┆ST REMOTE CHANNEL CONNECTION J > P* J t : P* CHANNEL TO TEST IS GIVEN IN C┆
0x7284…72d4 4f 4e 54 52 4f 4c 20 57 4f 52 44 20 4f 46 20 45 43 42 2e 20 00 4a 00 7e 00 36 00 50 2a 20 20 20 20 54 48 45 20 52 45 51 55 45 53 54 20 49 53 20 43 4f 4d 50 4c 45 54 45 44 20 57 49 54 48 20 46 4f 4c 4c 4f 57 49 4e 47 20 42 49 54 53 20 00 4a ┆ONTROL WORD OF ECB. J ~ 6 P* THE REQUEST IS COMPLETED WITH FOLLOWING BITS J┆
0x72d4…7324 00 bc 00 20 00 50 2a 20 20 20 20 49 4e 20 52 45 54 55 52 4e 20 43 4f 44 45 20 4f 46 20 45 43 42 3a 20 00 4a 00 f6 00 06 00 50 2a 20 00 4a 01 1a 00 32 00 50 2a 20 20 20 20 42 49 54 20 39 3a 20 20 43 48 41 4e 4e 45 4c 20 55 4e 49 54 20 4e 4f ┆ P* IN RETURN CODE OF ECB: J P* J 2 P* BIT 9: CHANNEL UNIT NO┆
0x7324…7374 54 20 49 4e 20 41 43 54 49 56 45 20 53 54 41 54 55 53 00 4a 01 24 00 06 00 50 2a 20 00 4a 01 5a 00 06 00 50 2a 20 00 4a 01 64 00 2e 00 50 2a 20 20 20 20 42 49 54 20 31 34 3a 20 41 43 4b 20 4e 4f 54 20 52 45 43 45 49 56 45 44 20 41 46 54 45 ┆T IN ACTIVE STATUS J $ P* J Z P* J d . P* BIT 14: ACK NOT RECEIVED AFTE┆
0x7374…73c4 (75, 0, 400) 52 20 4f 55 54 50 55 54 00 4a 01 6e 00 06 00 50 2a 20 00 4b 00 10 00 30 00 50 2a 20 20 20 20 42 49 54 20 31 35 3a 20 53 59 4e 43 20 4e 4f 54 20 52 45 43 45 49 56 45 44 20 41 46 54 45 52 20 4f 55 54 50 55 54 20 00 4b 00 1a 00 14 00 50 41 52 ┆R OUTPUT J n P* K 0 P* BIT 15: SYNC NOT RECEIVED AFTER OUTPUT K PAR┆
0x73c4…7414 45 4d 5c 44 41 54 41 5c 4c 4f 50 54 53 54 00 4b 00 4e 00 22 00 50 5c 44 41 54 41 5c 30 5c 41 42 4f 52 54 20 52 4f 55 54 49 4e 45 20 41 44 44 52 45 53 53 20 00 4b 00 66 00 22 00 50 5c 44 41 54 41 5c 49 48 4c 4f 50 5c 49 4e 54 45 52 52 55 50 ┆EM DATA LOPTST K N " P DATA 0 ABORT ROUTINE ADDRESS K f " P DATA IHLOP INTERRUP┆
0x7414…7464 54 20 48 41 4e 44 4c 45 52 20 00 4b 00 8c 00 10 00 50 4c 4f 50 54 53 54 5c 45 51 55 5c 2a 00 4b 00 b2 00 24 00 50 5c 4c 44 5c 41 32 2c 31 30 2c 41 38 5c 47 45 54 20 43 48 41 4e 4e 45 4c 20 4e 55 4d 42 45 52 20 00 4b 00 c6 00 10 00 50 5c 41 ┆T HANDLER K PLOPTST EQU * K $ P LD A2,10,A8 GET CHANNEL NUMBER K P A┆
0x7464…74b4 4e 4b 5c 41 32 2c 2f 46 46 20 00 4b 00 ee 00 12 00 50 5c 52 46 28 45 29 5c 44 49 53 49 49 45 20 00 4b 01 02 00 2a 00 50 5c 43 57 4b 5c 41 32 2c 52 45 43 48 41 4e 2b 52 45 43 48 41 4e 5c 43 48 41 4e 4e 45 4c 20 31 2d 38 20 3f 5c 3d 32 00 4b ┆NK A2,/FF K P RF(E) DISIIE K * P CWK A2,RECHAN+RECHAN CHANNEL 1-8 ? =2 K┆
0x74b4…7504 01 18 00 12 00 50 5c 52 46 28 47 29 5c 44 49 53 49 49 45 20 00 4b 01 46 00 0e 00 50 5c 53 4c 4c 5c 41 32 2c 31 20 00 4b 01 5c 00 26 00 50 5c 4c 44 5c 41 32 2c 43 48 54 41 42 2b 38 2c 41 32 5c 47 45 54 20 43 57 54 2d 41 44 44 52 45 53 53 20 ┆ P RF(G) DISIIE K F P SLL A2,1 K & P LD A2,CHTAB+8,A2 GET CWT-ADDRESS ┆
0x7504…7554 (76, 0, 398) 00 4b 01 6e 00 12 00 50 5c 52 46 28 45 29 5c 44 49 53 49 49 45 20 00 4c 00 08 00 1c 00 50 5c 4c 44 52 5c 41 37 2c 41 37 5c 57 52 4f 4e 47 20 4f 52 44 45 52 20 3f 00 4c 00 1e 00 14 00 50 5c 52 46 28 45 29 5c 4c 4f 50 54 31 30 5c 4e 4f 00 4c ┆ K n P RF(E) DISIIE L P LDR A7,A7 WRONG ORDER ? L P RF(E) LOPT10 NO L┆
0x7554…75a4 00 3e 00 28 00 50 44 49 53 49 49 45 5c 41 42 4c 5c 44 49 53 49 4f 45 5c 49 2f 4f 20 52 45 51 55 45 53 54 20 45 52 52 4f 52 20 00 4c 00 56 00 10 00 50 4c 4f 50 54 31 30 5c 45 51 55 5c 2a 00 4c 00 82 00 2c 00 50 5c 4c 44 5c 41 31 2c 43 57 54 ┆ > ( PDISIIE ABL DISIOE I/O REQUEST ERROR L V PLOPT10 EQU * L , P LD A1,CWT┆
0x75a4…75f4 52 53 54 2c 41 32 5c 47 45 54 20 43 48 41 4e 4e 45 4c 20 4c 4f 4f 50 20 53 54 41 54 55 53 00 4c 00 96 00 10 00 50 5c 41 4e 4b 5c 41 31 2c 2f 34 30 20 00 4c 00 c6 00 28 00 50 5c 52 46 28 4e 45 29 5c 49 48 4c 50 31 30 5c 43 48 41 4e 4e 45 4c ┆RST,A2 GET CHANNEL LOOP STATUS L P ANK A1,/40 L ( P RF(NE) IHLP10 CHANNEL┆
0x75f4…7644 20 55 4e 49 54 20 4e 4f 54 20 42 55 53 59 00 4c 00 da 00 26 00 50 5c 4c 44 4b 5c 41 35 2c 2f 45 30 5c 49 4e 44 49 43 41 54 45 20 52 45 51 55 45 53 54 20 47 4f 49 4e 47 00 4c 01 06 00 2a 00 50 5c 53 54 5c 41 35 2c 43 57 54 52 53 54 2c 41 32 ┆ UNIT NOT BUSY L & P LDK A5,/E0 INDICATE REQUEST GOING L * P ST A5,CWTRST,A2┆
0x7644…7692 5c 49 4e 44 49 43 41 54 45 20 4c 4f 4f 50 2d 54 45 53 54 49 4e 47 00 4c 01 30 00 0e 00 50 5c 41 42 4c 5c 54 44 49 53 50 00 4c 01 5e 00 0a 00 50 5c 45 4a 45 43 54 00 4c 01 70 00 06 00 50 2a 20 00 4c 01 7e 00 06 00 50 2a 20 00 4c 01 88 ┆ INDICATE LOOP-TESTING L 0 P ABL TDISP L ^ P EJECT L p P* L ~ P* L ┆