|
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: 30358 (0x7696)
Notes: pts_type(SC)
Names: »DRGP02.SC«
└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
└─⟦this⟧ »TOSSWORK/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 X:A EJECT * * * THE FRONT FEED DEVICE CAN BE EXCLUDED * BY SETTING X:B = 0 * * X:B EQU 1 FFDEV EQU X:B FRONT FEED DEVICE * * * * THE STANDARD PAGELENGTH IS DEFINED * BY SETTING X:C = NUMBER OF LINES * * X:C EQU 48 PAGLEN EQU X:C * * * THE STANDARD NUMBER OF LINES IS DEFINED * BY SETTING X:D = NUMBER OF LINES * * X:D EQU 36 * DOCLEN EQU X:D EJECT * * * * MMU BUFFER SIZE * * X:E EQU 132 DVBLEN EQU X:E * * * * 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 1 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 X:A«, 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…19f2 Head {h00=0x0024, h01=0x0050, text=»FFDEV EQU X:B FRONT FEED DEVICE «, t00=0x0010, t01=0x00ce}
0x19f2…19fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f6}
0x19fc…1a06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0100}
0x1a06…1a10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x010a}
0x1a10…1a3c Head {h00=0x0028, h01=0x0050, text=»* THE STANDARD PAGELENGTH IS DEFINED«, t00=0x0010, t01=0x0114}
0x1a3c…1a66 Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:C = NUMBER OF LINES«, t00=0x0010, t01=0x0140}
0x1a66…1a70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x016a}
0x1a70…1a7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0174}
0x1a7a…1a8c Head {h00=0x000e, h01=0x0050, text=»X:C EQU 48«, t00=0x0010, t01=0x017e}
0x1a8c…1aa2 Head {h00=0x0012, h01=0x0050, text=»PAGLEN EQU X:C«, t00=0x0010, t01=0x0190}
0x1aa2…1aac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0016}
0x1aac…1ab6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0020}
0x1ab6…1ae8 Head {h00=0x002e, h01=0x0050, text=»* THE STANDARD NUMBER OF LINES IS DEFINED «, t00=0x0011, t01=0x002a}
0x1ae8…1b12 Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:D = NUMBER OF LINES«, t00=0x0011, t01=0x005c}
0x1b12…1b1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0086}
0x1b1c…1b26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0090}
0x1b26…1b3c Head {h00=0x0012, h01=0x0050, text=»X:D EQU 36 * «, t00=0x0011, t01=0x009a}
0x1b3c…1b52 Head {h00=0x0012, h01=0x0050, text=»DOCLEN EQU X:D«, t00=0x0011, t01=0x00b0}
0x1b52…1b60 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00c6}
0x1b60…1b6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00d4}
0x1b6a…1b74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00de}
0x1b74…1b7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00e8}
0x1b7e…1b98 Head {h00=0x0016, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x0011, t01=0x00f2}
0x1b98…1ba2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x010c}
0x1ba2…1bac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0116}
0x1bac…1bc0 Head {h00=0x0010, h01=0x0050, text=»X:E EQU 132 «, t00=0x0011, t01=0x0120}
0x1bc0…1bd6 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:E«, t00=0x0011, t01=0x0134}
0x1bd6…1be0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x014a}
0x1be0…1bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0154}
0x1bea…1bf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x015e}
0x1bf4…1c26 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0011, t01=0x0168}
0x1c26…1c54 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1 «, t00=0x0012, t01=0x000a}
0x1c54…1c5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0038}
0x1c5e…1c68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0042}
0x1c68…1c7c Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0012, t01=0x004c}
0x1c7c…1c86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0060}
0x1c86…1c90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x006a}
0x1c90…1c9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0074}
0x1c9a…1cd4 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0012, t01=0x007e}
0x1cd4…1d06 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0 «, t00=0x0012, t01=0x00b8}
0x1d06…1d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ea}
0x1d10…1d1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f4}
0x1d1a…1d2e Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0012, t01=0x00fe}
0x1d2e…1d3c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0112}
0x1d3c…1d46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0120}
0x1d46…1d50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x012a}
0x1d50…1d84 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0012, t01=0x0134}
0x1d84…1d8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0168}
0x1d8e…1dac Head {h00=0x001a, h01=0x0050, text=»* DWT - DISPLACEMENTS «, t00=0x0012, t01=0x0172}
0x1dac…1db6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0190}
0x1db6…1dea Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0013, t01=0x000a}
0x1dea…1df4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x003e}
0x1df4…1dfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0048}
0x1dfe…1e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0052}
0x1e08…1e3c Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x0013, t01=0x005c}
0x1e3c…1e46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0090}
0x1e46…1e5c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0013, t01=0x009a}
0x1e5c…1e74 Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0013, t01=0x00b0}
0x1e74…1e80 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00c8}
0x1e80…1e8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d4}
0x1e8a…1ea0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0013, t01=0x00de}
0x1ea0…1eba Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0013, t01=0x00f4}
0x1eba…1ec6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x010e}
0x1ec6…1ed0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x011a}
0x1ed0…1f04 Head {h00=0x0030, h01=0x0050, text=»DWTDCS EQU START+/12 DOCUMENT CHARACTER SET «, t00=0x0013, t01=0x0124}
0x1f04…1f36 Head {h00=0x002e, h01=0x0050, text=»DWTPCS EQU START+/14 PRINTER CHARACTER SET«, t00=0x0013, t01=0x0158}
0x1f36…1f66 Head {h00=0x002c, h01=0x0050, text=»DWTPL EQU START+/16 PRINTER PAPER LENGTH«, t00=0x0013, t01=0x018a}
0x1f66…1f98 Head {h00=0x002e, h01=0x0050, text=»DWTDL EQU START+/18 DOCUMENT PAPER LENGTH «, t00=0x0014, t01=0x002a}
0x1f98…1fcc Head {h00=0x0030, h01=0x0050, text=»DWTALN EQU START+/1A ACTUAL LINE ON DOCUMENT«, t00=0x0014, t01=0x005c}
0x1fcc…2004 Head {h00=0x0034, h01=0x0050, text=»DWTRLN EQU START+/1C REQUESTED LINE ON DOCUMENT «, t00=0x0014, t01=0x0090}
0x2004…203a Head {h00=0x0032, h01=0x0050, text=»DWTRC EQU START+/1F RETURN CODE (ACKUMULATED) «, t00=0x0014, t01=0x00c8}
0x203a…206e Head {h00=0x0030, h01=0x0050, text=»DWTSTR EQU START+/20 CONTROL SEQUENCE ADRESS«, t00=0x0014, t01=0x00fe}
0x206e…20b6 Head {h00=0x0044, h01=0x0050, text=»DWTDISP EQU START+/22 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. «, t00=0x0014, t01=0x0132}
0x20b6…20ea Head {h00=0x0030, h01=0x0050, text=»DWTACD EQU START+/24 ACTUAL COLUMN DOCUMENT «, t00=0x0014, t01=0x017a}
0x20ea…211a Head {h00=0x002c, h01=0x0050, text=»DWTACP EQU START+/27 ACTUAL COLUMN PAPER«, t00=0x0015, t01=0x001e}
0x211a…2148 Head {h00=0x002a, h01=0x0050, text=»DWTCO1 EQU START+/2A COLUMN COUNTER 1 «, t00=0x0015, t01=0x004e}
0x2148…2176 Head {h00=0x002a, h01=0x0050, text=»DWTCO2 EQU START+/2B COLUMN COUNTER 2 «, t00=0x0015, t01=0x007c}
0x2176…21a6 Head {h00=0x002c, h01=0x0050, text=»DWTSYST EQU START+/30 SYSTEM START IND. «, t00=0x0015, t01=0x00aa}
0x21a6…21dc Head {h00=0x0032, h01=0x0050, text=»DWTLFD EQU START+/32 LINE/FORM FEED INDICATOR «, t00=0x0015, t01=0x00da}
0x21dc…21ea Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0110}
0x21ea…21f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x011e}
0x21f4…21fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0128}
0x21fe…2232 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0015, t01=0x0132}
0x2232…223c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0166}
0x223c…225a Head {h00=0x001a, h01=0x0050, text=»* ECB - DISPLACEMENTS «, t00=0x0015, t01=0x0170}
0x225a…2264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x018e}
0x2264…2298 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0016, t01=0x0008}
0x2298…22a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x003c}
0x22a2…22cc Head {h00=0x0026, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS IN ECB «, t00=0x0016, t01=0x0046}
0x22cc…22f8 Head {h00=0x0028, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH IN ECB «, t00=0x0016, t01=0x0070}
0x22f8…2324 Head {h00=0x0028, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH IN ECB «, t00=0x0016, t01=0x009c}
0x2324…234a Head {h00=0x0022, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE IN ECB«, t00=0x0016, t01=0x00c8}
0x234a…2372 Head {h00=0x0024, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD IN ECB«, t00=0x0016, t01=0x00ee}
0x2372…2380 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0116}
0x2380…238a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0124}
0x238a…23be Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0016, t01=0x012e}
0x23be…23c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0162}
0x23c8…23d8 Head {h00=0x000c, h01=0x0050, text=»* TABLES«, t00=0x0016, t01=0x016c}
0x23d8…23e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x017c}
0x23e2…2416 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0016, t01=0x0186}
0x2416…2420 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x002a}
0x2420…242a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0034}
0x242a…244e Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x0017, t01=0x003e}
0x244e…246a Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x0017, t01=0x0062}
0x246a…248c Head {h00=0x001e, h01=0x0050, text=»GPAD8 EQU * ADDRESS BLOCK «, t00=0x0017, t01=0x007e}
0x248c…24b0 Head {h00=0x0020, h01=0x0050, text=» DATA ACTP ACTIVATION DRIVER«, t00=0x0017, t01=0x00a0}
0x24b0…24d6 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0017, t01=0x00c4}
0x24d6…24fa Head {h00=0x0020, h01=0x0050, text=» DATA IHTP INTERRUPT HANDLER«, t00=0x0017, t01=0x00ea}
0x24fa…251e Head {h00=0x0020, h01=0x0050, text=» DATA RCTP RECOVERY ROUTINE «, t00=0x0017, t01=0x010e}
0x251e…2532 Head {h00=0x0010, h01=0x0050, text=»TPTAB EQU * «, t00=0x0017, t01=0x0132}
0x2532…2546 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x0017, t01=0x0146}
0x2546…2566 Head {h00=0x001c, h01=0x0050, text=» DATA /0107,/0C25,/3939 «, t00=0x0017, t01=0x015a}
0x2566…2572 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x017a}
0x2572…258c Head {h00=0x0016, h01=0x0050, text=» DATA /0006,/2424 «, t00=0x0017, t01=0x0186}
0x258c…25a6 Head {h00=0x0016, h01=0x0050, text=»TPLEN EQU *-TPTAB «, t00=0x0018, t01=0x0010}
0x25a6…25ae Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x002a}
0x25ae…25b6 Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0032}
0x25b6…25c4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x003a}
0x25c4…25ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0048}
0x25ce…25d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0052}
0x25d8…25ec Head {h00=0x0010, h01=0x0050, text=»* A C T P «, t00=0x0018, t01=0x005c}
0x25ec…25f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0070}
0x25f6…262c Head {h00=0x0032, h01=0x0050, text=»* THIS IS THE ACTIVATION PART OF THE DRIVER «, t00=0x0018, t01=0x007a}
0x262c…266e Head {h00=0x003e, h01=0x0050, text=»* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR«, t00=0x0018, t01=0x00b0}
0x266e…2678 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f2}
0x2678…2682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00fc}
0x2682…268c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0106}
0x268c…26b0 Head {h00=0x0020, h01=0x0050, text=»ACTP EQU * ACTIVATION ENTRY «, t00=0x0018, t01=0x0110}
0x26b0…26ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0134}
0x26ba…26c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x013e}
0x26c4…2702 Head {h00=0x003a, h01=0x0050, text=»* GET DWT INDEX: 0=CONTINUOUS STATIONARY, 1=DOCUMENT«, t00=0x0018, t01=0x0148}
0x2702…270c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0186}
0x270c…2732 Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOR,A6 GET DWT INDEX «, t00=0x0018, t01=0x0190}
0x2732…2748 Head {h00=0x0012, h01=0x0050, text=» ANK A2,1 MASK«, t00=0x0019, t01=0x0026}
0x2748…2776 Head {h00=0x002a, h01=0x0050, text=» LC A3,DWTST+1,A6 GET OLD DEVICE VALUE«, t00=0x0019, t01=0x003c}
0x2776…278a Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FE «, t00=0x0019, t01=0x006a}
0x278a…279c Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x0019, t01=0x007e}
0x279c…27c2 Head {h00=0x0022, h01=0x0050, text=» SC A3,DWTST+1,A6 STORE INDEX «, t00=0x0019, t01=0x0090}
0x27c2…27ec Head {h00=0x0026, h01=0x0050, text=» ADR A7,A2 ADD DWT INDEX TO ORDER «, t00=0x0019, t01=0x00b6}
0x27ec…281a Head {h00=0x002a, h01=0x0050, text=» SC A7,DWTOR+1,A6 STORE MODIFIED ORDER«, t00=0x0019, t01=0x00e0}
0x281a…2838 Head {h00=0x001a, h01=0x0050, text=»ACT005 LDK A3,TPLEN-1 «, t00=0x0019, t01=0x010e}
0x2838…286a Head {h00=0x002e, h01=0x0050, text=»ACT010 CC A7,TPTAB,A3 CHECK IF LEGAL ORDER«, t00=0x0019, t01=0x012c}
0x286a…288c Head {h00=0x001e, h01=0x0050, text=» RF(E) ACT020 VALID ORDER «, t00=0x0019, t01=0x015e}
0x288c…289e Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0019, t01=0x0180}
0x289e…28be (26, 0, 400) Head {h00=0x001c, h01=0x0050, text=» RB(NN) ACT010 TRY NEXT «, t00=0x001a, t01=0x0004}
0x28be…28c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0024}
0x28c8…28ea Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE ILLEGAL ORDER «, t00=0x001a, t01=0x002e}
0x28ea…28f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0050}
0x28f4…28fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x005a}
0x28fe…2912 Head {h00=0x0010, h01=0x0050, text=»ACT020 EQU *«, t00=0x001a, t01=0x0064}
0x2912…292e Head {h00=0x0018, h01=0x0050, text=» ADR A3,A3 GET INDEX«, t00=0x001a, t01=0x0078}
0x292e…2952 Head {h00=0x0020, h01=0x0050, text=» ABI TPFUC,A3 EXECUTE ORDER «, t00=0x001a, t01=0x0094}
0x2952…2960 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x00b8}
0x2960…2974 Head {h00=0x0010, h01=0x0050, text=»TPFUC EQU * «, t00=0x001a, t01=0x00c6}
0x2974…2988 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x001a, t01=0x00da}
0x2988…29c0 Head {h00=0x0034, h01=0x0050, text=» DATA TSTSTA,WRTDOC,POSDOC,DOCPAR,RELDOC,RELDOC «, t00=0x001a, t01=0x00ee}
0x29c0…29cc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0126}
0x29cc…29f6 Head {h00=0x0026, h01=0x0050, text=» DATA TSTSTA,WRTCON,CSTPAR,CSTPAR «, t00=0x001a, t01=0x0132}
0x29f6…2a04 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x015c}
0x2a04…2a0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x016a}
0x2a0e…2a18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0174}
0x2a18…2a3a Head {h00=0x001e, h01=0x0050, text=»* ORDER 00 : TEST STATUS«, t00=0x001a, t01=0x017e}
0x2a3a…2a44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0010}
0x2a44…2a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x001a}
0x2a4e…2a6e Head {h00=0x001c, h01=0x0050, text=»TSTSTA EQU * TEST STATUS«, t00=0x001b, t01=0x0024}
0x2a6e…2a84 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x001b, t01=0x0044}
0x2a84…2ab2 Head {h00=0x002a, h01=0x0050, text=» CF A5,GTSTAT GET STATUS FROM PRINTER «, t00=0x001b, t01=0x005a}
0x2ab2…2ad2 Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x001b, t01=0x0088}
0x2ad2…2ae0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x00a8}
0x2ae0…2af4 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x001b, t01=0x00b6}
0x2af4…2afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ca}
0x2afe…2b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00d4}
0x2b08…2b2c Head {h00=0x0020, h01=0x0050, text=»* ORDER 06: WRITE DOCUMENT«, t00=0x001b, t01=0x00de}
0x2b2c…2b36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0102}
0x2b36…2b40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x010c}
0x2b40…2b54 Head {h00=0x0010, h01=0x0050, text=»WRTDOC EQU *«, t00=0x001b, t01=0x0116}
0x2b54…2b6a Head {h00=0x0012, h01=0x0050, text=» CF A5,GTSTAT «, t00=0x001b, t01=0x012a}
0x2b6a…2b90 Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTST,A6 DEVICE STATUS «, t00=0x001b, t01=0x0140}
0x2b90…2bbe Head {h00=0x002a, h01=0x0050, text=» ANKL A4,/200 HAS POWER OFF OCCURED ? «, t00=0x001b, t01=0x0166}
0x2bbe…2bd8 (28, 0, 400) Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRDO05 YES«, t00=0x001c, t01=0x0004}
0x2bd8…2bf2 Head {h00=0x0016, h01=0x0050, text=» LDKL A3,/2000 * «, t00=0x001c, t01=0x001e}
0x2bf2…2c12 Head {h00=0x001c, h01=0x0050, text=» TM A1,A3 DOCUMENT OUT ?«, t00=0x001c, t01=0x0038}
0x2c12…2c2a Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRDO06 NO«, t00=0x001c, t01=0x0058}
0x2c2a…2c5a Head {h00=0x002c, h01=0x0050, text=» LDKL A3,/8000 YES SET BIT 0 (REQ ERROR)«, t00=0x001c, t01=0x0070}
0x2c5a…2c74 Head {h00=0x0016, h01=0x0050, text=» ORS A3,ECBRC,A8 «, t00=0x001c, t01=0x00a0}
0x2c74…2c94 Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x001c, t01=0x00ba}
0x2c94…2cac Head {h00=0x0014, h01=0x0050, text=»WRDO05 EQU * * «, t00=0x001c, t01=0x00da}
0x2cac…2cc4 Head {h00=0x0014, h01=0x0050, text=»WRDO06 LDK A3,1 «, t00=0x001c, t01=0x00f2}
0x2cc4…2ce4 Head {h00=0x001c, h01=0x0050, text=» TM A1,A3 NOT OPERABLE? «, t00=0x001c, t01=0x010a}
0x2ce4…2cfc Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRDO10 NO«, t00=0x001c, t01=0x012a}
0x2cfc…2d1c Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x001c, t01=0x0142}
0x2d1c…2d4a Head {h00=0x002a, h01=0x0050, text=»WRDO10 LD A3,DWTALN,A6 GET ACTUAL LINE«, t00=0x001c, t01=0x0162}
0x2d4a…2d60 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) WRDO15«, t00=0x001c, t01=0x0190}
0x2d60…2d8c Head {h00=0x0028, h01=0x0050, text=» LDK A3,1 SET UP ECB BUFFER POINTER «, t00=0x001d, t01=0x0016}
0x2d8c…2dba Head {h00=0x002a, h01=0x0050, text=» CF A15,GETCHR GET CONTROL CHARACTER «, t00=0x001d, t01=0x0042}
0x2dba…2dde Head {h00=0x0020, h01=0x0050, text=» CWK A2,/31 CTRL CHAR=/31 ? «, t00=0x001d, t01=0x0070}
0x2dde…2e0c Head {h00=0x002a, h01=0x0050, text=» ABL(NE) POSERR NO,DOC NOT POSITIONED «, t00=0x001d, t01=0x0094}
0x2e0c…2e26 Head {h00=0x0016, h01=0x0050, text=» LD A3,DWTDL,A6 * «, t00=0x001d, t01=0x00c2}
0x2e26…2e52 Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTRLN,A6 FIRST LINE ON DOC. «, t00=0x001d, t01=0x00dc}
0x2e52…2e82 Head {h00=0x002c, h01=0x0050, text=»WRDO12 LDKL A2,CSINFF INPUT FRONT FEED «, t00=0x001d, t01=0x0108}
0x2e82…2eb8 Head {h00=0x0032, h01=0x0050, text=» LDK A3,DWTRLN REQUESTED LINE NO DISPLACEMENT «, t00=0x001d, t01=0x0138}
0x2eb8…2ee2 Head {h00=0x0026, h01=0x0050, text=» CF A5,SEND SEND INPUT FRONT FEED «, t00=0x001d, t01=0x016e}
0x2ee2…2efa Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTRLN,A6«, t00=0x001e, t01=0x0008}
0x2efa…2f24 Head {h00=0x0026, h01=0x0050, text=» ST A3,DWTALN,A6 SET DWTALN=DWTRLN«, t00=0x001e, t01=0x0020}
0x2f24…2f2c Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x004a}
0x2f2c…2f60 Head {h00=0x0030, h01=0x0050, text=»WRDO15 LDKL A2,CSSNV SELECT NATIONAL VERSION«, t00=0x001e, t01=0x0052}
0x2f60…2f9a Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTDCS DOCUMENT CHARACTER SET DISPLACEMENT«, t00=0x001e, t01=0x0086}
0x2f9a…2fca Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND SELECT NATIONAL VERSION«, t00=0x001e, t01=0x00c0}
0x2fca…2fda Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x001e, t01=0x00f0}
0x2fda…2fea Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x001e, t01=0x0100}
0x2fea…2ffa Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x001e, t01=0x0110}
0x2ffa…3026 Head {h00=0x0028, h01=0x0050, text=» RF WRT01 GOTO GET CONTROL CHARACTER«, t00=0x001e, t01=0x0120}
0x3026…3032 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x014c}
0x3032…3040 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0158}
0x3040…304a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0166}
0x304a…3054 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0170}
0x3054…3084 Head {h00=0x002c, h01=0x0050, text=»* ORDER 06: WRITE CONTINOUS STATIONARY«, t00=0x001e, t01=0x017a}
0x3084…308e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x001a}
0x308e…3098 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0024}
0x3098…30ac Head {h00=0x0010, h01=0x0050, text=»WRTCON EQU *«, t00=0x001f, t01=0x002e}
0x30ac…30ba Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x001f, t01=0x0042}
0x30ba…30e2 Head {h00=0x0024, h01=0x0050, text=» CF A5,GTSTAT GET DEVICE STATUS «, t00=0x001f, t01=0x0050}
0x30e2…30fc Head {h00=0x0016, h01=0x0050, text=» LDKL A3,/2000 * «, t00=0x001f, t01=0x0078}
0x30fc…311c Head {h00=0x001c, h01=0x0050, text=» TM A1,A3 END OF PAPER? «, t00=0x001f, t01=0x0092}
0x311c…3136 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRCO05 NO. «, t00=0x001f, t01=0x00b2}
0x3136…3154 Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x001f, t01=0x00cc}
0x3154…317a Head {h00=0x0022, h01=0x0050, text=»WRCO05 LDK A3,1 NOT OPERABLE? «, t00=0x001f, t01=0x00ea}
0x317a…318c Head {h00=0x000e, h01=0x0050, text=» TM A1,A3 «, t00=0x001f, t01=0x0110}
0x318c…31a4 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRCO10 NO«, t00=0x001f, t01=0x0122}
0x31a4…31c2 Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x001f, t01=0x013a}
0x31c2…31ca Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0158}
0x31ca…31fe Head {h00=0x0030, h01=0x0050, text=»WRCO10 LDKL A2,CSSNV SELECT NATIONAL VERSION«, t00=0x001f, t01=0x0160}
0x31fe…3234 (32, 0, 400) Head {h00=0x0032, h01=0x0050, text=» LDK A3,DWTPCS PRINTER CHAR. SET DISPLACEMENT «, t00=0x0020, t01=0x0004}
0x3234…3264 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND SELECT NATIONAL VERSION«, t00=0x0020, t01=0x003a}
0x3264…3274 Head {h00=0x000c, h01=0x0050, text=» U =1 «, t00=0x0020, t01=0x006a}
0x3274…3284 Head {h00=0x000c, h01=0x0050, text=» U =1 «, t00=0x0020, t01=0x007a}
0x3284…3294 Head {h00=0x000c, h01=0x0050, text=» U =1 «, t00=0x0020, t01=0x008a}
0x3294…329e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x009a}
0x329e…32be Head {h00=0x001c, h01=0x0050, text=»* GET CONTROL CHARACTER «, t00=0x0020, t01=0x00a4}
0x32be…32c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00c4}
0x32c8…32f8 Head {h00=0x002c, h01=0x0050, text=»WRT01 LDK A3,1 SET UP ECB BUFFER POINTER«, t00=0x0020, t01=0x00ce}
0x32f8…3324 Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CONTROL CHARACTER«, t00=0x0020, t01=0x00fe}
0x3324…332c Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x012a}
0x332c…333e Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0020, t01=0x0132}
0x333e…3368 Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTST,A6 GET DEVICE STATUS «, t00=0x0020, t01=0x0144}
0x3368…3396 Head {h00=0x002a, h01=0x0050, text=» ANKL A1,/200 HAS POWER OFF OCCURED ? «, t00=0x0020, t01=0x016e}
0x3396…33ae Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRT04 NO «, t00=0x0021, t01=0x000c}
0x33ae…33c8 Head {h00=0x0016, h01=0x0050, text=» CF A5,RESREC YES «, t00=0x0021, t01=0x0024}
0x33c8…33ee Head {h00=0x0022, h01=0x0050, text=» CWK A2,/2B CTRL. CHAR.=/2B ? «, t00=0x0021, t01=0x003e}
0x33ee…3408 Head {h00=0x0016, h01=0x0050, text=» RF(NE) WRT08 NO «, t00=0x0021, t01=0x0064}
0x3408…3430 Head {h00=0x0024, h01=0x0050, text=» LC A1,DWTOR+1,A6 GET DWT INDEX «, t00=0x0021, t01=0x007e}
0x3430…344e Head {h00=0x001a, h01=0x0050, text=» ANK A1,1 DOCUMENT ? «, t00=0x0021, t01=0x00a6}
0x344e…3468 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT09 YES «, t00=0x0021, t01=0x00c4}
0x3468…347e Head {h00=0x0012, h01=0x0050, text=» RF WRT07 NO «, t00=0x0021, t01=0x00de}
0x347e…34a8 Head {h00=0x0026, h01=0x0050, text=»WRT04 CWK A2,/2B CTRL. CHAR.=/2B «, t00=0x0021, t01=0x00f4}
0x34a8…34c2 Head {h00=0x0016, h01=0x0050, text=» RF(NE) WRT02 NO «, t00=0x0021, t01=0x011e}
0x34c2…34ea Head {h00=0x0024, h01=0x0050, text=» LC A2,DWTOR+1,A6 GET DWT INDEX «, t00=0x0021, t01=0x0138}
0x34ea…3506 Head {h00=0x0018, h01=0x0050, text=» ANK A2,1 DOCUMENT? «, t00=0x0021, t01=0x0160}
0x3506…3520 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT03 YES «, t00=0x0021, t01=0x017c}
0x3520…354a Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTCO1,A6 GET ACTUAL COLUMN«, t00=0x0022, t01=0x0008}
0x354a…3578 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x0022, t01=0x0032}
0x3578…3580 Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0060}
0x3580…35c2 Head {h00=0x003e, h01=0x0050, text=» SC A2,DWTACP,A6 STORE THE VALUE IN ACTUAL COLUMN PAPER D«, t00=0x0022, t01=0x0068}
0x35c2…3610 Head {h00=0x004a, h01=0x0050, text=» ST A4,DWTACP+2,A6 STORE THE VALUE IN ACTUAL COLUMN PAPER DISPLACEMENT«, t00=0x0022, t01=0x00aa}
0x3610…3634 Head {h00=0x0020, h01=0x0050, text=»WRT07 LDK A2,/20 SEND SPACE «, t00=0x0022, t01=0x00f8}
0x3634…364a Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0022, t01=0x011c}
0x364a…3668 Head {h00=0x001a, h01=0x0050, text=» LDKL A2,CSREP REPEAT «, t00=0x0022, t01=0x0132}
0x3668…36a0 Head {h00=0x0034, h01=0x0050, text=» LDK A3,DWTACP ACTUAL COLUMN PAPER DISPLACEMENT «, t00=0x0022, t01=0x0150}
0x36a0…36c0 Head {h00=0x001c, h01=0x0050, text=» CF A5,SEND SEND REPEAT «, t00=0x0022, t01=0x0188}
0x36c0…36ec Head {h00=0x0028, h01=0x0050, text=» LDK A3,2 SET UP ECB BUFFER POINTER «, t00=0x0023, t01=0x0018}
0x36ec…36fe Head {h00=0x000e, h01=0x0050, text=» RF WRT15 «, t00=0x0023, t01=0x0044}
0x36fe…372e Head {h00=0x002c, h01=0x0050, text=»WRT03 LD A4,DWTCO2,A6 GET ACTUAL COLUMN«, t00=0x0023, t01=0x0056}
0x372e…375c Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x0023, t01=0x0086}
0x375c…379e Head {h00=0x003e, h01=0x0050, text=» SC A2,DWTACD,A6 STORE THE VALUE IN ACTUAL COLUMN DOC. DI «, t00=0x0023, t01=0x00b4}
0x379e…37ec Head {h00=0x004a, h01=0x0050, text=» SC A4,DWTACD+2,A6 STORE THE VALUE IN ACTUAL COLUMN DOC.DISPLACEMENT «, t00=0x0023, t01=0x00f6}
0x37ec…37fe Head {h00=0x000e, h01=0x0050, text=» SRL A4,8 «, t00=0x0023, t01=0x0144}
0x37fe…3832 Head {h00=0x0030, h01=0x0050, text=» SC A4,DWTACD+1,A6 SHIFT FOR CORRECT DIGITS «, t00=0x0023, t01=0x0156}
0x3832…3856 Head {h00=0x0020, h01=0x0050, text=»WRT09 LDK A2,/20 SEND SPACE «, t00=0x0023, t01=0x018a}
0x3856…386c Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0024, t01=0x001e}
0x386c…388a Head {h00=0x001a, h01=0x0050, text=» LDKL A2,CSREP REPEAT «, t00=0x0024, t01=0x0034}
0x388a…38c4 Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTACD ACTUAL COLUMN DOCUMENT DISPLACEMENT«, t00=0x0024, t01=0x0052}
0x38c4…38e4 Head {h00=0x001c, h01=0x0050, text=» CF A5,SEND SEND REPEAT «, t00=0x0024, t01=0x008c}
0x38e4…3910 Head {h00=0x0028, h01=0x0050, text=» LDK A3,2 SET UP ECB BUFFER POINTER «, t00=0x0024, t01=0x00ac}
0x3910…3922 Head {h00=0x000e, h01=0x0050, text=» RF WRT15 «, t00=0x0024, t01=0x00d8}
0x3922…394e Head {h00=0x0028, h01=0x0050, text=»WRT08 LC A1,DWTLFD,A6 GET INDICATOR «, t00=0x0024, t01=0x00ea}
0x394e…397a Head {h00=0x0028, h01=0x0050, text=» ANK A1,/8 IS LINE/FORM FEED DONE ? «, t00=0x0024, t01=0x0116}
0x397a…3994 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRT14 YES «, t00=0x0024, t01=0x0142}
0x3994…39be Head {h00=0x0026, h01=0x0050, text=»WRT02 LC A1,DWTOR+1,A6 DOCUMENT ? «, t00=0x0024, t01=0x015c}
0x39be…39d2 Head {h00=0x0010, h01=0x0050, text=» ANK A1,1 * «, t00=0x0024, t01=0x0186}
0x39d2…39ea Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRT13 NO «, t00=0x0025, t01=0x000a}
0x39ea…39f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0022}
0x39f4…3a18 Head {h00=0x0020, h01=0x0050, text=» CWK A2,/30 TWO LINE FEED ? «, t00=0x0025, t01=0x002c}
0x3a18…3a32 Head {h00=0x0016, h01=0x0050, text=» RF(E) WRT11 YES «, t00=0x0025, t01=0x0050}
0x3a32…3a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006a}
0x3a3c…3a5c Head {h00=0x001c, h01=0x0050, text=» CWK A2,/31 FORM FEED ? «, t00=0x0025, t01=0x0074}
0x3a5c…3a76 Head {h00=0x0016, h01=0x0050, text=» RF(E) WRT12 YES «, t00=0x0025, t01=0x0094}
0x3a76…3a8a Head {h00=0x0010, h01=0x0050, text=» RF WRT16 * «, t00=0x0025, t01=0x00ae}
0x3a8a…3ab8 Head {h00=0x002a, h01=0x0050, text=»WRT11 LD A1,DWTRLN,A6 GET REQ LINE NO «, t00=0x0025, t01=0x00c2}
0x3ab8…3ae4 Head {h00=0x0028, h01=0x0050, text=» CF A5,BINARY CONV ASCII TO BINARY «, t00=0x0025, t01=0x00f0}
0x3ae4…3b08 Head {h00=0x0020, h01=0x0050, text=» SUK A3,1 INCR REQ LINE NO «, t00=0x0025, t01=0x011c}
0x3b08…3b26 Head {h00=0x001a, h01=0x0050, text=» RF TWO TWO LINE FEED «, t00=0x0025, t01=0x0140}
0x3b26…3b54 Head {h00=0x002a, h01=0x0050, text=»WRT16 LD A1,DWTRLN,A6 GET REQ LINE NO «, t00=0x0025, t01=0x015e}
0x3b54…3b80 Head {h00=0x0028, h01=0x0050, text=» CF A5,BINARY CONV ASCII TO BINARY «, t00=0x0025, t01=0x018c}
0x3b80…3ba6 Head {h00=0x0022, h01=0x0050, text=»TWO SUK A3,1 INCR REQ LINE NO «, t00=0x0026, t01=0x0028}
0x3ba6…3bbc Head {h00=0x0012, h01=0x0050, text=» LDR A4,A3 * «, t00=0x0026, t01=0x004e}
0x3bbc…3be8 Head {h00=0x0028, h01=0x0050, text=» CF A5,KONVER CONV BINARY TO ASCII «, t00=0x0026, t01=0x0064}
0x3be8…3c14 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTRLN,A6 STORE REQ LINE NO «, t00=0x0026, t01=0x0090}
0x3c14…3c1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00bc}
0x3c1e…3c4e Head {h00=0x002c, h01=0x0050, text=» LDKL A2,CSVPFF VERTICAL POS FRONT FEED «, t00=0x0026, t01=0x00c6}
0x3c4e…3c7e Head {h00=0x002c, h01=0x0050, text=» LDK A3,DWTRLN REQ LINE NO DISPLACEMENT «, t00=0x0026, t01=0x00f6}
0x3c7e…3c94 Head {h00=0x0012, h01=0x0050, text=» CF A5,SEND * «, t00=0x0026, t01=0x0126}
0x3c94…3c9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x013c}
0x3c9e…3cba Head {h00=0x0018, h01=0x0050, text=» LD A4,DWTRLN,A6 * «, t00=0x0026, t01=0x0146}
0x3cba…3cea Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTALN,A6 ACTUAL LINE =REQ LINE «, t00=0x0026, t01=0x0162}
0x3cea…3cfc (39, 0, 400) Head {h00=0x000e, h01=0x0050, text=» RF WRT12 «, t00=0x0027, t01=0x0004}
0x3cfc…3d06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0016}
0x3d06…3d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0020}
0x3d10…3d3e Head {h00=0x002a, h01=0x0050, text=»WRT13 CWK A2,/30 CONTINOUS STATIONARY «, t00=0x0027, t01=0x002a}
0x3d3e…3d66 Head {h00=0x0024, h01=0x0050, text=» RF(E) WRT05 TWO LINE FEED,YES «, t00=0x0027, t01=0x0058}
0x3d66…3d70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0080}
0x3d70…3d90 Head {h00=0x001c, h01=0x0050, text=» CWK A2,/31 FORM FEED ? «, t00=0x0027, t01=0x008a}
0x3d90…3daa Head {h00=0x0016, h01=0x0050, text=» RF(NE) WRT10 NO «, t00=0x0027, t01=0x00aa}
0x3daa…3db4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c4}
0x3db4…3dd6 Head {h00=0x001e, h01=0x0050, text=» LDK A2,FF SEND FORM FEED «, t00=0x0027, t01=0x00ce}
0x3dd6…3dee Head {h00=0x0014, h01=0x0050, text=» CF A5,OUTPUT * «, t00=0x0027, t01=0x00f0}
0x3dee…3e02 Head {h00=0x0010, h01=0x0050, text=» RF WRT12 * «, t00=0x0027, t01=0x0108}
0x3e02…3e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x011c}
0x3e0c…3e32 Head {h00=0x0022, h01=0x0050, text=»WRT05 LDK A2,LF SEND LINE FEED«, t00=0x0027, t01=0x0126}
0x3e32…3e48 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0027, t01=0x014c}
0x3e48…3e6e Head {h00=0x0022, h01=0x0050, text=»WRT10 LDK A2,LF SEND LINE FEED«, t00=0x0027, t01=0x0162}
0x3e6e…3e84 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0027, t01=0x0188}
0x3e84…3eb0 Head {h00=0x0028, h01=0x0050, text=»WRT12 LC A1,DWTLFD,A6 GET INDICATOR «, t00=0x0028, t01=0x000e}
0x3eb0…3ee0 Head {h00=0x002c, h01=0x0050, text=» ORK A1,/4 INDICATE LINE/FORM FEED DONE «, t00=0x0028, t01=0x003a}
0x3ee0…3f0a Head {h00=0x0026, h01=0x0050, text=» SC A1,DWTLFD,A6 STORE INDICATOR «, t00=0x0028, t01=0x006a}
0x3f0a…3f36 Head {h00=0x0028, h01=0x0050, text=»WRT14 LC A2,DWTOR+1,A6 GET DWT INDEX«, t00=0x0028, t01=0x0094}
0x3f36…3f52 Head {h00=0x0018, h01=0x0050, text=» ANK A2,1 DOCUMENT? «, t00=0x0028, t01=0x00c0}
0x3f52…3f6c Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT45 YES «, t00=0x0028, t01=0x00dc}
0x3f6c…3f9e Head {h00=0x002e, h01=0x0050, text=» CM DWTCO1,A6 CLEAR PAPER COLUMN COUNTER 1«, t00=0x0028, t01=0x00f6}
0x3f9e…3fd8 Head {h00=0x0036, h01=0x0050, text=»WRT45 CM DWTCO2,A6 CLEAR DOCUMENT COLUMN COUNTER 2«, t00=0x0028, t01=0x0128}
0x3fd8…3ffa Head {h00=0x001e, h01=0x0050, text=» LDK A2,/20 SEND ONE SPACE«, t00=0x0028, t01=0x0162}
0x3ffa…4010 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0028, t01=0x0184}
0x4010…4018 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x000a}
0x4018…4032 Head {h00=0x0016, h01=0x0050, text=»WRT15 LDK A3,2 * «, t00=0x0029, t01=0x0012}
0x4032…4046 Head {h00=0x0010, h01=0x0050, text=» RF WRT20 * «, t00=0x0029, t01=0x002c}
0x4046…4078 Head {h00=0x002e, h01=0x0050, text=»WRT17 SUK A3,/02 ECB BUFFER POINTER = /02 «, t00=0x0029, t01=0x0040}
0x4078…4092 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRT18 YES. «, t00=0x0029, t01=0x0072}
0x4092…40be Head {h00=0x0028, h01=0x0050, text=» LDK A2,CR NO. SEND CARRIAGE RETURN «, t00=0x0029, t01=0x008c}
0x40be…40d4 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0029, t01=0x00b8}
0x40d4…40fa Head {h00=0x0022, h01=0x0050, text=»WRT18 CF A5,GTSTAT GET STATUS «, t00=0x0029, t01=0x00ce}
0x40fa…4118 Head {h00=0x001a, h01=0x0050, text=» RF ENDIO END REQUEST «, t00=0x0029, t01=0x00f4}
0x4118…4122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0112}
0x4122…415c Head {h00=0x0036, h01=0x0050, text=»WRT20 CF A15,GETCHR GET CHARACTER FRON ECB-BUFFER «, t00=0x0029, t01=0x011c}
0x415c…416e Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0029, t01=0x0156}
0x416e…4196 Head {h00=0x0024, h01=0x0050, text=» RB(NP) WRT17 NO MORE CHARACTERS«, t00=0x0029, t01=0x0168}
0x4196…41a8 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0029, t01=0x0190}
0x41a8…41b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0012}
0x41b2…41f6 Head {h00=0x0040, h01=0x0050, text=»* EXAMINE CHARACTER AND SEND DEPENDING ON TYPE OF CHARACTER «, t00=0x002a, t01=0x001c}
0x41f6…4200 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0060}
0x4200…4208 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x006a}
0x4208…4228 Head {h00=0x001c, h01=0x0050, text=» SUK A4,/20 CHAR < /20? «, t00=0x002a, t01=0x0072}
0x4228…4254 Head {h00=0x0028, h01=0x0050, text=» RB(N) WRT20 YES GET A NEW CHARACTER«, t00=0x002a, t01=0x0092}
0x4254…4274 Head {h00=0x001c, h01=0x0050, text=» SUK A4,/5F CHAR < /7F? «, t00=0x002a, t01=0x00be}
0x4274…428e Head {h00=0x0016, h01=0x0050, text=» RF(N) WRT25 YES. «, t00=0x002a, t01=0x00de}
0x428e…42b2 Head {h00=0x0020, h01=0x0050, text=» SUK A4,/2F NO. CHAR = /AE? «, t00=0x002a, t01=0x00f8}
0x42b2…42de Head {h00=0x0028, h01=0x0050, text=» RF(Z) WRT30 YES. CONVERT /AE TO /2E«, t00=0x002a, t01=0x011c}
0x42de…4316 Head {h00=0x0034, h01=0x0050, text=» LDK A4,/04 ILLEGAL CHARACTER SET BIT 13 IN R.C.«, t00=0x002a, t01=0x0148}
0x4316…432e Head {h00=0x0014, h01=0x0050, text=» ORS A4,ECBRC,A8«, t00=0x002a, t01=0x0180}
0x432e…4340 Head {h00=0x000e, h01=0x0050, text=» RB WRT20 «, t00=0x002b, t01=0x0008}
0x4340…4358 Head {h00=0x0014, h01=0x0050, text=»WRT30 LDK A2,/2E«, t00=0x002b, t01=0x001a}
0x4358…4370 Head {h00=0x0014, h01=0x0050, text=»WRT25 LDR A4,A1 «, t00=0x002b, t01=0x0032}
0x4370…4394 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x002b, t01=0x004a}
0x4394…43bc Head {h00=0x0024, h01=0x0050, text=» LC A2,DWTOR+1,A6 GET DWT INDEX «, t00=0x002b, t01=0x006e}
0x43bc…43d8 Head {h00=0x0018, h01=0x0050, text=» ANK A2,1 DOCUMENT? «, t00=0x002b, t01=0x0096}
0x43d8…43f2 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT40 YES «, t00=0x002b, t01=0x00b2}
0x43f2…441c Head {h00=0x0026, h01=0x0050, text=» IM DWTCO1,A6 INC.COLUMN COUNTER 1«, t00=0x002b, t01=0x00cc}
0x441c…442e Head {h00=0x000e, h01=0x0050, text=» RB WRT20 «, t00=0x002b, t01=0x00f6}
0x442e…445e Head {h00=0x002c, h01=0x0050, text=»WRT40 IM DWTCO2,A6 INC.COLUMN COUNTER 2 «, t00=0x002b, t01=0x0108}
0x445e…4470 Head {h00=0x000e, h01=0x0050, text=» RB WRT20 «, t00=0x002b, t01=0x0138}
0x4470…4484 Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x002b, t01=0x014a}
0x4484…44a0 Head {h00=0x0018, h01=0x0050, text=» LC A2,DWTLFD,A6 * «, t00=0x002b, t01=0x015e}
0x44a0…44b6 Head {h00=0x0012, h01=0x0050, text=» ANK A2,/8 * «, t00=0x002b, t01=0x017a}
0x44b6…44e0 Head {h00=0x0026, h01=0x0050, text=» SC A2,DWTLFD,A6 RESET LF/FF IND. «, t00=0x002b, t01=0x0190}
0x44e0…4500 Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x002c, t01=0x002a}
0x4500…4508 Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x004a}
0x4508…4516 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x0052}
0x4516…452a Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x002c, t01=0x0060}
0x452a…4534 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0074}
0x4534…453e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x007e}
0x453e…4566 Head {h00=0x0024, h01=0x0050, text=»* ORDER 0B : POSITION DOCUMENT«, t00=0x002c, t01=0x0088}
0x4566…459a Head {h00=0x0030, h01=0x0050, text=»* CONTROL WORD CONTAINS REQUESTED LINE NO «, t00=0x002c, t01=0x00b0}
0x459a…45a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00e4}
0x45a4…45ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00ee}
0x45ae…45d4 Head {h00=0x0022, h01=0x0050, text=»POSDOC EQU * POSITION DOCUMENT«, t00=0x002c, t01=0x00f8}
0x45d4…45ea Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x002c, t01=0x011e}
0x45ea…4612 Head {h00=0x0024, h01=0x0050, text=» CF A5,GTSTAT GET DEVICE STATUS «, t00=0x002c, t01=0x0134}
0x4612…4632 Head {h00=0x001c, h01=0x0050, text=» LDK A3,1 NOT OPERABLE «, t00=0x002c, t01=0x015c}
0x4632…4646 Head {h00=0x0010, h01=0x0050, text=» TM A1,A3 * «, t00=0x002c, t01=0x017c}
0x4646…4662 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) POS020 YES «, t00=0x002c, t01=0x0190}
0x4662…4690 Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CSSNV SELECT NATIONAL VERSION«, t00=0x002d, t01=0x001c}
0x4690…46b8 Head {h00=0x0024, h01=0x0050, text=» LDK A3,DWTDCS DOCUMENT VERSION «, t00=0x002d, t01=0x004a}
0x46b8…46d4 Head {h00=0x0018, h01=0x0050, text=» CF A5,SEND SEND SNV«, t00=0x002d, t01=0x0072}
0x46d4…46e4 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x002d, t01=0x008e}
0x46e4…46f4 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x002d, t01=0x009e}
0x46f4…4704 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x002d, t01=0x00ae}
0x4704…472e Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBCW,A8 GET REQUESTED LINE«, t00=0x002d, t01=0x00be}
0x472e…4742 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x002d, t01=0x00e8}
0x4742…476c Head {h00=0x0026, h01=0x0050, text=» RF(Z) POSERR ILLEGAL LINE NUMBER «, t00=0x002d, t01=0x00fc}
0x476c…478e Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTDL,A6 MAX. LINE «, t00=0x002d, t01=0x0126}
0x478e…47bc Head {h00=0x002a, h01=0x0050, text=» CF A5,BINARY CONVERT ASCII TO BINARY «, t00=0x002d, t01=0x0148}
0x47bc…47e2 Head {h00=0x0022, h01=0x0050, text=» CWR A4,A3 REQ. LINE>MAX. LINE«, t00=0x002d, t01=0x0176}
0x47e2…47fc Head {h00=0x0016, h01=0x0050, text=» RF(G) POSERR YES «, t00=0x002e, t01=0x000c}
0x47fc…481e Head {h00=0x001e, h01=0x0050, text=» ADK A3,1 CORRECT POSITION«, t00=0x002e, t01=0x0026}
0x481e…4840 Head {h00=0x001e, h01=0x0050, text=» SUR A4,A3 INVERT LINE NO.«, t00=0x002e, t01=0x0048}
0x4840…486c Head {h00=0x0028, h01=0x0050, text=» NGR A4,A4 GET PRINTER REQ. LINE NO.«, t00=0x002e, t01=0x006a}
0x486c…489a Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x002e, t01=0x0096}
0x489a…48c6 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTRLN,A6 SET REQUESTED LINE «, t00=0x002e, t01=0x00c4}
0x48c6…48ee Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTALN,A6 GET ACTUAL LINE«, t00=0x002e, t01=0x00f0}
0x48ee…4920 Head {h00=0x002e, h01=0x0050, text=» RF(NZ) POS030 DOCUMENT ALREADY POSITIONED«, t00=0x002e, t01=0x0118}
0x4920…4934 Head {h00=0x0010, h01=0x0050, text=»POS005 EQU *«, t00=0x002e, t01=0x014a}
0x4934…495c Head {h00=0x0024, h01=0x0050, text=» LDKL A2,CSINFF INPUT FRONT FEED«, t00=0x002e, t01=0x015e}
0x495c…4996 Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTRLN REQUESTED LINE NUMBER DISPLACEMENT «, t00=0x002e, t01=0x0186}
0x4996…49c0 Head {h00=0x0026, h01=0x0050, text=» CF A5,SEND SEND INPUT FRONT FEED «, t00=0x002f, t01=0x0030}
0x49c0…49d4 Head {h00=0x0010, h01=0x0050, text=»POS010 EQU *«, t00=0x002f, t01=0x005a}
0x49d4…49f4 Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x002f, t01=0x006e}
0x49f4…4a16 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x002f, t01=0x008e}
0x4a16…4a42 Head {h00=0x0028, h01=0x0050, text=» ANKL A2,/2000 PAPER DOCUMENT OUT ? «, t00=0x002f, t01=0x00b0}
0x4a42…4a7e Head {h00=0x0038, h01=0x0050, text=» RB(NZ) POS005 YES WAIT FOR DOCUMENT TO BE INSERTED «, t00=0x002f, t01=0x00dc}
0x4a7e…4aaa Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTRLN,A6 GET REQUESTED LINE «, t00=0x002f, t01=0x0118}
0x4aaa…4ada Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTALN,A6 ACTUAL LINE = REQ LINE «, t00=0x002f, t01=0x0144}
0x4ada…4aea Head {h00=0x000c, h01=0x0050, text=» * =2 «, t00=0x002f, t01=0x0174}
0x4aea…4b04 Head {h00=0x0016, h01=0x0050, text=»POS020 ABL DISEND «, t00=0x002f, t01=0x0184}
0x4b04…4b18 Head {h00=0x0010, h01=0x0050, text=»POS030 EQU *«, t00=0x0030, t01=0x000e}
0x4b18…4b4c Head {h00=0x0030, h01=0x0050, text=» LDKL A2,CSVPFF VERTICAL POSITION FRONT FEED«, t00=0x0030, t01=0x0022}
0x4b4c…4b86 Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTRLN REQUESTED LINE NUMBER DISPLACEMENT «, t00=0x0030, t01=0x0056}
0x4b86…4bbc Head {h00=0x0032, h01=0x0050, text=» CF A5,SEND SEND VERTICAL POSITION FRONT FEED «, t00=0x0030, t01=0x0090}
0x4bbc…4bce Head {h00=0x000e, h01=0x0050, text=» RB POS010«, t00=0x0030, t01=0x00c6}
0x4bce…4be2 Head {h00=0x0010, h01=0x0050, text=» XIF =2 =2 «, t00=0x0030, t01=0x00d8}
0x4be2…4bf6 Head {h00=0x0010, h01=0x0050, text=»POSERR EQU *«, t00=0x0030, t01=0x00ec}
0x4bf6…4c1a Head {h00=0x0020, h01=0x0050, text=» LDKL A1,/8000 REQUEST ERROR«, t00=0x0030, t01=0x0100}
0x4c1a…4c38 Head {h00=0x001a, h01=0x0050, text=» RB ENDIO END REQUEST «, t00=0x0030, t01=0x0124}
0x4c38…4c46 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0142}
0x4c46…4c5a Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x0030, t01=0x0150}
0x4c5a…4c64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0164}
0x4c64…4c6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x016e}
0x4c6e…4c9a Head {h00=0x0028, h01=0x0050, text=»* ORDER 24 : SET DOCUMENT PARAMETERS«, t00=0x0030, t01=0x0178}
0x4c9a…4ca4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0014}
0x4ca4…4cae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x001e}
0x4cae…4cd6 Head {h00=0x0024, h01=0x0050, text=»DOCPAR EQU * DOCUMENT PARAMETERS«, t00=0x0031, t01=0x0028}
0x4cd6…4cf2 Head {h00=0x0018, h01=0x0050, text=» LDK A1,0 CLEAR A1 «, t00=0x0031, t01=0x0050}
0x4cf2…4d08 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x0031, t01=0x006c}
0x4d08…4d34 Head {h00=0x0028, h01=0x0050, text=» LD A4,ECBCW,A8 GET NUMBER OF LINES «, t00=0x0031, t01=0x0082}
0x4d34…4d50 Head {h00=0x0018, h01=0x0050, text=» SRL A4,8 GET LINES «, t00=0x0031, t01=0x00ae}
0x4d50…4d78 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DOC010 NO CHANGE OF LINES«, t00=0x0031, t01=0x00ca}
0x4d78…4d98 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/10 INDEX TO BIG«, t00=0x0031, t01=0x00f2}
0x4d98…4db2 Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0031, t01=0x0112}
0x4db2…4de0 Head {h00=0x002a, h01=0x0050, text=» ADR A4,A4 ADJUST INDEX TO LINE TABLE «, t00=0x0031, t01=0x012c}
0x4de0…4e14 Head {h00=0x0030, h01=0x0050, text=» LD A4,LINNUM,A4 GET LINE ACCORDING TO INDEX«, t00=0x0031, t01=0x015a}
0x4e14…4e48 Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTDL,A6 SET PAGE LENGTH FOR DOCUMENT«, t00=0x0031, t01=0x018e}
0x4e48…4e5c Head {h00=0x0010, h01=0x0050, text=»DOC010 EQU *«, t00=0x0032, t01=0x0032}
0x4e5c…4e94 Head {h00=0x0034, h01=0x0050, text=» LD A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION«, t00=0x0032, t01=0x0046}
0x4e94…4ea8 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0032, t01=0x007e}
0x4ea8…4ee2 Head {h00=0x0036, h01=0x0050, text=» RF(Z) DOC020 NO CHANGE OF NATIONAL CHARACTER SET «, t00=0x0032, t01=0x0092}
0x4ee2…4f02 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/F INDEX TO BIG «, t00=0x0032, t01=0x00cc}
0x4f02…4f1c Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0032, t01=0x00ec}
0x4f1c…4f42 Head {h00=0x0022, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE INDEX «, t00=0x0032, t01=0x0106}
0x4f42…4f7c Head {h00=0x0036, h01=0x0050, text=» LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACC. TO INDEX «, t00=0x0032, t01=0x012c}
0x4f7c…4fb4 Head {h00=0x0034, h01=0x0050, text=» ST A4,DWTDCS,A6 SET CHARACTER SET FOR DOCUMENT «, t00=0x0032, t01=0x0166}
0x4fb4…4fc8 Head {h00=0x0010, h01=0x0050, text=»DOC020 EQU *«, t00=0x0033, t01=0x000e}
0x4fc8…4fe6 Head {h00=0x001a, h01=0x0050, text=» RB ENDIO END REQUEST «, t00=0x0033, t01=0x0022}
0x4fe6…4ff2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0040}
0x4ff2…5000 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x004c}
0x5000…500a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x005a}
0x500a…5014 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0064}
0x5014…504e Head {h00=0x0036, h01=0x0050, text=»* ORDER 24 : SET CONTINUOUS STATIONARY PARAMETERS «, t00=0x0033, t01=0x006e}
0x504e…5058 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00a8}
0x5058…5062 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00b2}
0x5062…509c Head {h00=0x0036, h01=0x0050, text=»CSTPAR EQU * SET PARAMETERS CONTINUOUS STATIONARY «, t00=0x0033, t01=0x00bc}
0x509c…50b8 Head {h00=0x0018, h01=0x0050, text=» LDK A1,0 CLEAR A1 «, t00=0x0033, t01=0x00f6}
0x50b8…50ce Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x0033, t01=0x0112}
0x50ce…50fe Head {h00=0x002c, h01=0x0050, text=» LD A4,ECBCW,A8 GET NUMBER OF LINES CST.«, t00=0x0033, t01=0x0128}
0x50fe…511a Head {h00=0x0018, h01=0x0050, text=» SRL A4,8 GET LINES «, t00=0x0033, t01=0x0158}
0x511a…5142 Head {h00=0x0024, h01=0x0050, text=» RF(Z) CST010 NO CHANGE OF LINES«, t00=0x0033, t01=0x0174}
0x5142…5162 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/10 INDEX TO BIG«, t00=0x0034, t01=0x000c}
0x5162…517c Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0034, t01=0x002c}
0x517c…51aa Head {h00=0x002a, h01=0x0050, text=» ADR A4,A4 ADJUST INDEX TO LINE TABLE «, t00=0x0034, t01=0x0046}
0x51aa…51e0 Head {h00=0x0032, h01=0x0050, text=» LD A4,LINNUM,A4 GET LINES ACCORDING TO INDEX «, t00=0x0034, t01=0x0074}
0x51e0…5216 Head {h00=0x0032, h01=0x0050, text=» ST A4,DWTPL,A6 SET PAGE LENGTH FOR CONT.STAT.«, t00=0x0034, t01=0x00aa}
0x5216…5242 Head {h00=0x0028, h01=0x0050, text=» LDKL A2,CSSLPL SELECT PAGELENGTH =1«, t00=0x0034, t01=0x00e0}
0x5242…5276 Head {h00=0x0030, h01=0x0050, text=» LDK A3,DWTPL PRINTER PAPER LENGTH DISPL. =1«, t00=0x0034, t01=0x010c}
0x5276…52a4 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND SELECT PAGELENGTH =1 «, t00=0x0034, t01=0x0140}
0x52a4…52b8 Head {h00=0x0010, h01=0x0050, text=»CST010 EQU *«, t00=0x0034, t01=0x016e}
0x52b8…52f0 Head {h00=0x0034, h01=0x0050, text=» LD A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION«, t00=0x0034, t01=0x0182}
0x52f0…5304 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0035, t01=0x002a}
0x5304…5336 Head {h00=0x002e, h01=0x0050, text=» RF(Z) CST020 NO CHANGE OF NAT. CHAR. SET «, t00=0x0035, t01=0x003e}
0x5336…5356 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/F INDEX TO BIG «, t00=0x0035, t01=0x0070}
0x5356…5370 Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0035, t01=0x0090}
0x5370…53a4 Head {h00=0x0030, h01=0x0050, text=» ADR A4,A4 ADJUST INDEX TO NAT. CHAR. TABLE «, t00=0x0035, t01=0x00aa}
0x53a4…53de Head {h00=0x0036, h01=0x0050, text=» LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACC. TO INDEX «, t00=0x0035, t01=0x00de}
0x53de…5418 Head {h00=0x0036, h01=0x0050, text=» ST A4,DWTPCS,A6 SET NAT. CHAR. SET FOR CONT.STAT.«, t00=0x0035, t01=0x0118}
0x5418…542c Head {h00=0x0010, h01=0x0050, text=»CST020 EQU *«, t00=0x0035, t01=0x0152}
0x542c…544a Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x0035, t01=0x0166}
0x544a…5454 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0184}
0x5454…545e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x018e}
0x545e…5468 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0008}
0x5468…5476 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x0012}
0x5476…548a Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x0036, t01=0x0020}
0x548a…5494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0034}
0x5494…549e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x003e}
0x549e…54c4 Head {h00=0x0022, h01=0x0050, text=»* ORDER 38 : RELEASE DOCUMENT «, t00=0x0036, t01=0x0048}
0x54c4…54ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x006e}
0x54ce…54d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0078}
0x54d8…54ec Head {h00=0x0010, h01=0x0050, text=»RELDOC EQU *«, t00=0x0036, t01=0x0082}
0x54ec…5502 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x0036, t01=0x0096}
0x5502…5538 Head {h00=0x0032, h01=0x0050, text=» LDKL A2,CSEJFF CONTROL SEQ. EJECT FRONT FEED «, t00=0x0036, t01=0x00ac}
0x5538…555a Head {h00=0x001e, h01=0x0050, text=» CF A5,SEND SEND SEQUENCE «, t00=0x0036, t01=0x00e2}
0x555a…5588 Head {h00=0x002a, h01=0x0050, text=» CF A5,GTSTAT GET STATUS FROM PRINTER «, t00=0x0036, t01=0x0104}
0x5588…55aa Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x0036, t01=0x0132}
0x55aa…55d0 Head {h00=0x0022, h01=0x0050, text=» ANK A2,/20 DOCUMENT RELEASED «, t00=0x0036, t01=0x0154}
0x55d0…55f6 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RELDOC NO , TRY AGAIN «, t00=0x0036, t01=0x017a}
0x55f6…561a Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/8000 REQUEST ERROR«, t00=0x0037, t01=0x0010}
0x561a…5642 Head {h00=0x0024, h01=0x0050, text=» CM DWTALN,A6 RESET ACTUAL LINE «, t00=0x0037, t01=0x0034}
0x5642…566c Head {h00=0x0026, h01=0x0050, text=» CM DWTRLN,A6 RESET REQUESTED LINE«, t00=0x0037, t01=0x005c}
0x566c…568a Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x0037, t01=0x0086}
0x568a…5696 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x00a4}
0x5696…56a4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x00b0}
0x56a4…56ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00be}
0x56ae…56b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00c8}
0x56b8…56ca Head {h00=0x000e, h01=0x0050, text=»* I H T P «, t00=0x0037, t01=0x00d2}
0x56ca…56d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00e4}
0x56d4…56de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00ee}
0x56de…5710 Head {h00=0x002e, h01=0x0050, text=»* INTERRUPT HANDLER : PROCESS OF INTERRUPT«, t00=0x0037, t01=0x00f8}
0x5710…571a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x012a}
0x571a…5724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0134}
0x5724…572e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x013e}
0x572e…5740 Head {h00=0x000e, h01=0x0050, text=»IHTP EQU *«, t00=0x0037, t01=0x0148}
0x5740…5764 Head {h00=0x0020, h01=0x0050, text=» LD A4,DWTST,A6 I/O-REQUEST «, t00=0x0037, t01=0x015a}
0x5764…5788 Head {h00=0x0020, h01=0x0050, text=» ABL(N) TDISP NO , DISPATCH «, t00=0x0037, t01=0x017e}
0x5788…57b2 Head {h00=0x0026, h01=0x0050, text=» ABL LDREG RETURN TO READ ROUTINE «, t00=0x0038, t01=0x0012}
0x57b2…57c0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x003c}
0x57c0…57ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x004a}
0x57ca…57d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0054}
0x57d4…57e6 Head {h00=0x000e, h01=0x0050, text=»* R C T P«, t00=0x0038, t01=0x005e}
0x57e6…57f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0070}
0x57f0…582e Head {h00=0x003a, h01=0x0050, text=»* RECOVERY ROUTINE REPEATS RUNNING REQUEST AT POWER ON«, t00=0x0038, t01=0x007a}
0x582e…5838 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00b8}
0x5838…5842 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00c2}
0x5842…5854 Head {h00=0x000e, h01=0x0050, text=»RCTP EQU *«, t00=0x0038, t01=0x00cc}
0x5854…5876 Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0038, t01=0x00de}
0x5876…589e Head {h00=0x0024, h01=0x0050, text=» LC A4,DWTLFD,A6 GET INDICATOR «, t00=0x0038, t01=0x0100}
0x589e…58a6 Head {h00=0x0004, h01=0x0050, t00=0x0038, t01=0x0128}
0x58a6…58d2 Head {h00=0x0028, h01=0x0050, text=» ANK A4,/4 IS LINE/FORM FEED DONE ? «, t00=0x0038, t01=0x0130}
0x58d2…58ee Head {h00=0x0018, h01=0x0050, text=» RF(NZ) RCTP05 YES «, t00=0x0038, t01=0x015c}
0x58ee…5922 Head {h00=0x0030, h01=0x0050, text=» ORK A4,/8 INDICATE:NO LINE/FORM FEED DONE «, t00=0x0038, t01=0x0178}
0x5922…5968 Head {h00=0x0042, h01=0x0050, text=» SC A4,DWTLFD,A6 * * «, t00=0x0039, t01=0x001c}
0x5968…59a8 Head {h00=0x003c, h01=0x0050, text=» RF RCTP07 * * «, t00=0x0039, t01=0x0062}
0x59a8…59d2 Head {h00=0x0026, h01=0x0050, text=»RCTP05 LDK A4,0 RESET INDICATORS «, t00=0x0039, t01=0x00a2}
0x59d2…59ee Head {h00=0x0018, h01=0x0050, text=» ST A4,DWTLFD,A6 * «, t00=0x0039, t01=0x00cc}
0x59ee…5a1c Head {h00=0x002a, h01=0x0050, text=»RCTP07 LDKL A1,/7FFF SET DEVICE BUSY «, t00=0x0039, t01=0x00e8}
0x5a1c…5a3a Head {h00=0x001a, h01=0x0050, text=» ANS A1,DWTST,A6 BUSY «, t00=0x0039, t01=0x0116}
0x5a3a…5a68 Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CSRIS RESET TO INITIAL STATE «, t00=0x0039, t01=0x0134}
0x5a68…5a98 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND RESET TO INITIAL STATE «, t00=0x0039, t01=0x0162}
0x5a98…5acc (58, 0, 400) Head {h00=0x0030, h01=0x0050, text=» LD A1,DWTSYST,A6 INTERN. SYSTEM START IND. «, t00=0x003a, t01=0x0004}
0x5acc…5af4 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RCTP10 NO SYSTEM START «, t00=0x003a, t01=0x0038}
0x5af4…5b02 Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x003a, t01=0x0060}
0x5b02…5b34 Head {h00=0x002e, h01=0x0050, text=» IM DWTSYST,A6 SET SYSTEM START INDICATOR «, t00=0x003a, t01=0x006e}
0x5b34…5b42 Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x003a, t01=0x00a0}
0x5b42…5b76 Head {h00=0x0030, h01=0x0050, text=» LDKL A4,STDNCV GET STANDARD NAT. CHAR. SET «, t00=0x003a, t01=0x00ae}
0x5b76…5ba4 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BIANARY TO ASCII«, t00=0x003a, t01=0x00e2}
0x5ba4…5bd4 Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTDCS,A6 SET CHAR. SET DOCUMENT «, t00=0x003a, t01=0x0110}
0x5bd4…5c06 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTPCS,A6 SET CHAR. SET CONT.STAT. «, t00=0x003a, t01=0x0140}
0x5c06…5c32 Head {h00=0x0028, h01=0x0050, text=» LDKL A4,PAGLEN STANDARD PAGE LENGTH«, t00=0x003a, t01=0x0172}
0x5c32…5c60 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x003b, t01=0x000e}
0x5c60…5c92 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTPL,A6 SET PAGE LENGTH CONT.STAT.«, t00=0x003b, t01=0x003c}
0x5c92…5cbe Head {h00=0x0028, h01=0x0050, text=» LDKL A2,CSSLPL SELECT PAGELENGTH =1«, t00=0x003b, t01=0x006e}
0x5cbe…5cf2 Head {h00=0x0030, h01=0x0050, text=» LDK A3,DWTPL PRINTER PAPER LENGTH DISPL. =1«, t00=0x003b, t01=0x009a}
0x5cf2…5d20 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND SELECT PAGELENGTH =1 «, t00=0x003b, t01=0x00ce}
0x5d20…5d5a Head {h00=0x0036, h01=0x0050, text=» LDKL A4,DOCLEN GET STANDARD PAGE LENGTH DOCUMENT «, t00=0x003b, t01=0x00fc}
0x5d5a…5d88 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x003b, t01=0x0136}
0x5d88…5db8 Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTDL,A6 SET PAGE LENGTH DOCUMENT«, t00=0x003b, t01=0x0164}
0x5db8…5dcc (60, 0, 400) Head {h00=0x0010, h01=0x0050, text=»RCTP10 EQU *«, t00=0x003c, t01=0x0004}
0x5dcc…5df4 Head {h00=0x0024, h01=0x0050, text=» CM DWTALN,A6 RESET ACTUAL LINE «, t00=0x003c, t01=0x0018}
0x5df4…5e24 Head {h00=0x002c, h01=0x0050, text=» LDKL A1,/200 INDICATE POWER OFF OCCURED«, t00=0x003c, t01=0x0040}
0x5e24…5e3e Head {h00=0x0016, h01=0x0050, text=» ORS A1,DWTST,A6 «, t00=0x003c, t01=0x0070}
0x5e3e…5e66 Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTECB,A6 RUNNING REQUEST«, t00=0x003c, t01=0x008a}
0x5e66…5e96 Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) ACT005 YES , REPEAT THE REQUEST«, t00=0x003c, t01=0x00b2}
0x5e96…5eb2 Head {h00=0x0018, h01=0x0050, text=» ABL DISEND DISPATCH«, t00=0x003c, t01=0x00e2}
0x5eb2…5ec0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x00fe}
0x5ec0…5eca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x010c}
0x5eca…5ed4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0116}
0x5ed4…5ee4 Head {h00=0x000c, h01=0x0050, text=»* GTSTAT«, t00=0x003c, t01=0x0120}
0x5ee4…5eee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0130}
0x5eee…5ef8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x013a}
0x5ef8…5f3a Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE SENDS 'DEVICE STATUS REPORT TO THE PRINTER «, t00=0x003c, t01=0x0144}
0x5f3a…5f44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0186}
0x5f44…5f82 Head {h00=0x003a, h01=0x0050, text=»* AND ANALYZES THE DEVICE STATUS SENT FROM THE PRINTER«, t00=0x003c, t01=0x0190}
0x5f82…5f8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x003e}
0x5f8c…5fae Head {h00=0x001e, h01=0x0050, text=»* AT EXIT A1 = RETURN CODE«, t00=0x003d, t01=0x0048}
0x5fae…5fb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x006a}
0x5fb8…5fc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0074}
0x5fc2…5fd6 Head {h00=0x0010, h01=0x0050, text=»GTSTAT EQU *«, t00=0x003d, t01=0x007e}
0x5fd6…5ffc Head {h00=0x0022, h01=0x0050, text=» CM DWTRC,A6 RESET RETURN CODE«, t00=0x003d, t01=0x0092}
0x5ffc…6018 Head {h00=0x0018, h01=0x0050, text=» LDK A2,ESC ESCAPE «, t00=0x003d, t01=0x00b8}
0x6018…6036 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND ESC«, t00=0x003d, t01=0x00d4}
0x6036…6066 Head {h00=0x002c, h01=0x0050, text=» LDK A2,CSI CONTROL SEQUENCE INTRODUCER «, t00=0x003d, t01=0x00f2}
0x6066…6084 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND CSI«, t00=0x003d, t01=0x0122}
0x6084…6098 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/35 «, t00=0x003d, t01=0x0140}
0x6098…60b6 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND /35«, t00=0x003d, t01=0x0154}
0x60b6…60de Head {h00=0x0024, h01=0x0050, text=» LDK A2,DSR DEVICE STATUS REPORT«, t00=0x003d, t01=0x0172}
0x60de…60fc Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND DSR«, t00=0x003e, t01=0x000a}
0x60fc…6110 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x003e, t01=0x0028}
0x6110…6126 Head {h00=0x0012, h01=0x0050, text=» ANK A2,/F * «, t00=0x003e, t01=0x003c}
0x6126…6144 Head {h00=0x001a, h01=0x0050, text=» CWK A2,/C PTS 8000 ? «, t00=0x003e, t01=0x0052}
0x6144…615c Head {h00=0x0014, h01=0x0050, text=» RF(L) GTST05 NO«, t00=0x003e, t01=0x0070}
0x615c…6178 Head {h00=0x0018, h01=0x0050, text=» SUK A2,/F SALCUZ ? «, t00=0x003e, t01=0x0088}
0x6178…6192 Head {h00=0x0016, h01=0x0050, text=» RF(Z) GTST05 YES «, t00=0x003e, t01=0x00a4}
0x6192…61b2 Head {h00=0x001c, h01=0x0050, text=» LDK A2,ETX END OF TEXT «, t00=0x003e, t01=0x00be}
0x61b2…61d0 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND ETX«, t00=0x003e, t01=0x00de}
0x61d0…61fc Head {h00=0x0028, h01=0x0050, text=»GTST05 LDKL A4,TAB GET TABLE ADDRESS«, t00=0x003e, t01=0x00fc}
0x61fc…6210 Head {h00=0x0010, h01=0x0050, text=»GTST10 EQU *«, t00=0x003e, t01=0x0128}
0x6210…622e Head {h00=0x001a, h01=0x0050, text=» LDK A3,0 RESET INDEX «, t00=0x003e, t01=0x013c}
0x622e…625c Head {h00=0x002a, h01=0x0050, text=» CF A5,STREG READ STATUS FROM PRINTER «, t00=0x003e, t01=0x015a}
0x625c…627e Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FF GET CHARACTER «, t00=0x003e, t01=0x0188}
0x627e…62a6 Head {h00=0x0024, h01=0x0050, text=» CCK A2,/5C5C STRING TERMINATOR «, t00=0x003f, t01=0x001a}
0x62a6…62c0 Head {h00=0x0016, h01=0x0050, text=» RF(E) GTSEND YES «, t00=0x003f, t01=0x0042}
0x62c0…62e8 Head {h00=0x0024, h01=0x0050, text=» LCR A3,A4 GET MASK RETURN CODE «, t00=0x003f, t01=0x005c}
0x62e8…62fa Head {h00=0x000e, h01=0x0050, text=» ANR A2,A3«, t00=0x003f, t01=0x0084}
0x62fa…6328 Head {h00=0x002a, h01=0x0050, text=» LDKL A3,/3AC0 SHIFT LEFT CIRCULAR A2 «, t00=0x003f, t01=0x0096}
0x6328…6344 Head {h00=0x0018, h01=0x0050, text=» LC A3,1,A4 A3 TIMES«, t00=0x003f, t01=0x00c4}
0x6344…636c Head {h00=0x0024, h01=0x0050, text=» EXR A3 EXECUT SHIFT INSTRUCTION«, t00=0x003f, t01=0x00e0}
0x636c…63a2 Head {h00=0x0032, h01=0x0050, text=» ORS A2,DWTRC,A6 SAVE RETURN CODE TEMPORARILY «, t00=0x003f, t01=0x0108}
0x63a2…63c4 Head {h00=0x001e, h01=0x0050, text=» ADK A4,2 INCREMENT ADRESS«, t00=0x003f, t01=0x013e}
0x63c4…63f0 Head {h00=0x0028, h01=0x0050, text=» RB GTST10 GET NEXT STATUS CHARACTER«, t00=0x003f, t01=0x0160}
0x63f0…6404 Head {h00=0x0010, h01=0x0050, text=»GTSEND EQU *«, t00=0x003f, t01=0x018c}
0x6404…642c Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTRC,A6 GET RETURN CODE «, t00=0x0040, t01=0x0010}
0x642c…643c Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0040, t01=0x0038}
0x643c…644a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0040, t01=0x0048}
0x644a…6454 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0056}
0x6454…6492 Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE CONVERTS A BINARY VALUE TO ASCII CODE«, t00=0x0040, t01=0x0060}
0x6492…649c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x009e}
0x649c…64b2 Head {h00=0x0012, h01=0x0050, text=»* REGISTERS : «, t00=0x0040, t01=0x00a8}
0x64b2…64d0 Head {h00=0x001a, h01=0x0050, text=»* A1= WORK REGISTER «, t00=0x0040, t01=0x00be}
0x64d0…64ec Head {h00=0x0018, h01=0x0050, text=»* A4= BINARY INPUT«, t00=0x0040, t01=0x00dc}
0x64ec…650c Head {h00=0x001c, h01=0x0050, text=»* A2,A4= ASCII OUTPUT «, t00=0x0040, t01=0x00f8}
0x650c…6516 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0118}
0x6516…6520 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0122}
0x6520…6534 Head {h00=0x0010, h01=0x0050, text=»KONVER EQU *«, t00=0x0040, t01=0x012c}
0x6534…654c Head {h00=0x0014, h01=0x0050, text=»* BINARY TO DEC.«, t00=0x0040, t01=0x0140}
0x654c…6566 Head {h00=0x0016, h01=0x0050, text=» LDK A2,0 CLEAR A2«, t00=0x0040, t01=0x0158}
0x6566…6588 Head {h00=0x001e, h01=0x0050, text=» CWK A4,100 VALUE > 100 ? «, t00=0x0040, t01=0x0172}
0x6588…65a0 (65, 0, 398) Head {h00=0x0014, h01=0x0050, text=» RF(L) KONV05 NO«, t00=0x0041, t01=0x0004}
0x65a0…65b4 Head {h00=0x0010, h01=0x0050, text=» SUKL A4,100«, t00=0x0041, t01=0x001c}
0x65b4…65de Head {h00=0x0026, h01=0x0050, text=» LDKL A2,/100 LEFT BYTE OF A2=X=1 «, t00=0x0041, t01=0x0030}
0x65de…660c Head {h00=0x002a, h01=0x0050, text=»KONV05 CWK A4,10 ARE THERE ANY TENS ? «, t00=0x0041, t01=0x005a}
0x660c…6624 Head {h00=0x0014, h01=0x0050, text=» RF(L) KONV04 NO«, t00=0x0041, t01=0x0088}
0x6624…6636 Head {h00=0x000e, h01=0x0050, text=» SUK A4,10«, t00=0x0041, t01=0x00a0}
0x6636…666c Head {h00=0x0032, h01=0x0050, text=» ADK A2,/1 NUMBER OF TENS IN RIGHT B. OF A2=Y «, t00=0x0041, t01=0x00b2}
0x666c…6684 Head {h00=0x0014, h01=0x0050, text=» RB KONV05 NEXT «, t00=0x0041, t01=0x00e8}
0x6684…66aa Head {h00=0x0022, h01=0x0050, text=»KONV04 ORKL A2,/3030 XY IN A2 «, t00=0x0041, t01=0x0100}
0x66aa…66c6 Head {h00=0x0018, h01=0x0050, text=» ORK A4,/30 Z IN A4 «, t00=0x0041, t01=0x0126}
0x66c6…66e0 Head {h00=0x0016, h01=0x0050, text=» SRC A2,8 YX IN A2«, t00=0x0041, t01=0x0142}
0x66e0…66f2 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0041, t01=0x015c}
0x66f2…6716 Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/FF00 KEEP Y IN A1 «, t00=0x0041, t01=0x016e}
0x6716…6748 (66, 0, 400) Head {h00=0x002e, h01=0x0050, text=» ANK A2,/FF KEEP X IN R. BYTE OF A2. ASCII«, t00=0x0042, t01=0x0004}
0x6748…676a Head {h00=0x001e, h01=0x0050, text=» ORR A4,A1 YZ IN A1. ASCII«, t00=0x0042, t01=0x0036}
0x676a…677a Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0042, t01=0x0058}
0x677a…6788 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0068}
0x6788…6792 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0076}
0x6792…67ac Head {h00=0x0016, h01=0x0050, text=»* RESET RECORVERY «, t00=0x0042, t01=0x0080}
0x67ac…67b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x009a}
0x67b6…67ca Head {h00=0x0010, h01=0x0050, text=»RESREC EQU *«, t00=0x0042, t01=0x00a4}
0x67ca…67f0 Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTST,A6 DEVICE STATUS «, t00=0x0042, t01=0x00b8}
0x67f0…6810 Head {h00=0x001c, h01=0x0050, text=» ANKL A4,/200 RECOVERY? «, t00=0x0042, t01=0x00de}
0x6810…682a Head {h00=0x0016, h01=0x0050, text=» RF(E) RESRTN NO. «, t00=0x0042, t01=0x00fe}
0x682a…685a Head {h00=0x002c, h01=0x0050, text=» XRS A4,DWTST,A6 YES. RESET RECOVERY BIT«, t00=0x0042, t01=0x0118}
0x685a…6876 Head {h00=0x0018, h01=0x0050, text=»RESRTN RTN A5 RETURN«, t00=0x0042, t01=0x0148}
0x6876…6884 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0164}
0x6884…688e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0172}
0x688e…6898 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x017c}
0x6898…68aa Head {h00=0x000e, h01=0x0050, text=»* S E N D «, t00=0x0042, t01=0x0186}
0x68aa…68b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0008}
0x68b4…68e4 Head {h00=0x002c, h01=0x0050, text=»* THIS ROUTINE SENDS AN CONTROL SEQUENCE«, t00=0x0043, t01=0x0012}
0x68e4…68fc Head {h00=0x0014, h01=0x0050, text=»* TO THE PRINTER«, t00=0x0043, t01=0x0042}
0x68fc…6906 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x005a}
0x6906…6910 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0064}
0x6910…6924 Head {h00=0x0010, h01=0x0050, text=»* AT ENTRY :«, t00=0x0043, t01=0x006e}
0x6924…694a Head {h00=0x0022, h01=0x0050, text=»* A2 = CONTROL SEQUENCE ADRESS«, t00=0x0043, t01=0x0082}
0x694a…6982 Head {h00=0x0034, h01=0x0050, text=»* A3 = DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC «, t00=0x0043, t01=0x00a8}
0x6982…698c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00e0}
0x698c…6996 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00ea}
0x6996…69aa Head {h00=0x0010, h01=0x0050, text=»* AT EXIT : «, t00=0x0043, t01=0x00f4}
0x69aa…69ca Head {h00=0x001c, h01=0x0050, text=»* A1,A2,A3 IS DESTROYED «, t00=0x0043, t01=0x0108}
0x69ca…69d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0128}
0x69d4…69de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0132}
0x69de…69e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x013c}
0x69e8…6a10 Head {h00=0x0024, h01=0x0050, text=»SEND EQU * SEND CONTROL SEQUENCE«, t00=0x0043, t01=0x0146}
0x6a10…6a40 Head {h00=0x002c, h01=0x0050, text=» ST A3,DWTDISP,A6 SAVE DWT-DISPLACEMENT «, t00=0x0043, t01=0x016e}
0x6a40…6a70 Head {h00=0x002c, h01=0x0050, text=» ST A2,DWTSTR,A6 CONTROL SEQUENCE ADRESS«, t00=0x0044, t01=0x000e}
0x6a70…6a84 Head {h00=0x0010, h01=0x0050, text=»SEND10 EQU *«, t00=0x0044, t01=0x003e}
0x6a84…6ab8 Head {h00=0x0030, h01=0x0050, text=» LD A3,DWTSTR,A6 GET CONTROL SEQUENCE ADRESS«, t00=0x0044, t01=0x0052}
0x6ab8…6ad8 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x0044, t01=0x0086}
0x6ad8…6afa Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FF MAKE CHARACTER«, t00=0x0044, t01=0x00a6}
0x6afa…6b24 Head {h00=0x0026, h01=0x0050, text=» SLL A2,8 END OF CONTROL SEQUENCE «, t00=0x0044, t01=0x00c8}
0x6b24…6b46 Head {h00=0x001e, h01=0x0050, text=» RF(N) SENDEND YES,RETURN «, t00=0x0044, t01=0x00f2}
0x6b46…6b70 Head {h00=0x0026, h01=0x0050, text=» CWK A2,/3000 LINE NO,CHAR.SET,ETC«, t00=0x0044, t01=0x0114}
0x6b70…6b8a Head {h00=0x0016, h01=0x0050, text=» RF(E) SEND30 YES «, t00=0x0044, t01=0x013e}
0x6b8a…6bb6 Head {h00=0x0028, h01=0x0050, text=» SRL A2,8 PREPARE TO SEND CHARACTER «, t00=0x0044, t01=0x0158}
0x6bb6…6bda Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0044, t01=0x0184}
0x6bda…6bee Head {h00=0x0010, h01=0x0050, text=»SEND20 EQU *«, t00=0x0045, t01=0x0018}
0x6bee…6c20 Head {h00=0x002e, h01=0x0050, text=» IM DWTSTR,A6 INC. CONTROLSEQUENCE ADRESS «, t00=0x0045, t01=0x002c}
0x6c20…6c3c Head {h00=0x0018, h01=0x0050, text=» RB SEND10 GET NEXT «, t00=0x0045, t01=0x005e}
0x6c3c…6c50 Head {h00=0x0010, h01=0x0050, text=»SEND30 EQU *«, t00=0x0045, t01=0x007a}
0x6c50…6c7e Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTDISP,A6 GET DWT-DISPLACEMENT«, t00=0x0045, t01=0x008e}
0x6c7e…6ca2 Head {h00=0x0020, h01=0x0050, text=» ADR A3,A6 GET PROPER VALUE «, t00=0x0045, t01=0x00bc}
0x6ca2…6cc2 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x0045, t01=0x00e0}
0x6cc2…6ce6 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0045, t01=0x0100}
0x6ce6…6d16 Head {h00=0x002c, h01=0x0050, text=» IM DWTDISP,A6 INC. DISPLACEMENT ADRESS «, t00=0x0045, t01=0x0124}
0x6d16…6d32 Head {h00=0x0018, h01=0x0050, text=» RB SEND20 GET NEXT «, t00=0x0045, t01=0x0154}
0x6d32…6d48 Head {h00=0x0012, h01=0x0050, text=»SENDEND EQU * «, t00=0x0045, t01=0x0170}
0x6d48…6d58 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0045, t01=0x0186}
0x6d58…6d66 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0046, t01=0x0008}
0x6d66…6d70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0016}
0x6d70…6d7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0020}
0x6d7a…6d8a Head {h00=0x000c, h01=0x0050, text=»* BINARY«, t00=0x0046, t01=0x002a}
0x6d8a…6d94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x003a}
0x6d94…6dd0 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CONVERTS ASCII CODE TO A BINARY VALUE«, t00=0x0046, t01=0x0044}
0x6dd0…6dda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0080}
0x6dda…6dee Head {h00=0x0010, h01=0x0050, text=»* REGISTERS:«, t00=0x0046, t01=0x008a}
0x6dee…6e08 Head {h00=0x0016, h01=0x0050, text=»* A1= ASCII INPUT «, t00=0x0046, t01=0x009e}
0x6e08…6e24 Head {h00=0x0018, h01=0x0050, text=»* A2= WORK REGISTER «, t00=0x0046, t01=0x00b8}
0x6e24…6e40 Head {h00=0x0018, h01=0x0050, text=»* A3= BINARY OUTPUT «, t00=0x0046, t01=0x00d4}
0x6e40…6e4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00f0}
0x6e4a…6e54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00fa}
0x6e54…6e5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0104}
0x6e5e…6e80 Head {h00=0x001e, h01=0x0050, text=»BINARY SUR A3,A3 CLEAR A3 «, t00=0x0046, t01=0x010e}
0x6e80…6ea2 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 MAX. LINE ASCII«, t00=0x0046, t01=0x0130}
0x6ea2…6eb4 Head {h00=0x000e, h01=0x0050, text=» SRL A2,8 «, t00=0x0046, t01=0x0152}
0x6eb4…6ec8 Head {h00=0x0010, h01=0x0050, text=» SUK A2,/30 «, t00=0x0046, t01=0x0164}
0x6ec8…6eda Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0046, t01=0x0178}
0x6eda…6eec Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0046, t01=0x018a}
0x6eec…6efe Head {h00=0x000e, h01=0x0050, text=» SLL A2,3 «, t00=0x0047, t01=0x000c}
0x6efe…6f10 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0047, t01=0x001e}
0x6f10…6f22 Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0047, t01=0x0030}
0x6f22…6f46 Head {h00=0x0020, h01=0x0050, text=» ADR A3,A1 MAX. LINE BINARY «, t00=0x0047, t01=0x0042}
0x6f46…6f56 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0047, t01=0x0066}
0x6f56…6f64 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x0076}
0x6f64…6f8a Head {h00=0x0022, h01=0x0050, text=»LINNUM EQU *-2 NUMBER OF LINES«, t00=0x0047, t01=0x0084}
0x6f8a…6fb0 Head {h00=0x0022, h01=0x0050, text=» DATA /3132,/3135,/3138,/3234 «, t00=0x0047, t01=0x00aa}
0x6fb0…6fd6 Head {h00=0x0022, h01=0x0050, text=» DATA /3235,/3330,/3333,/3335 «, t00=0x0047, t01=0x00d0}
0x6fd6…6ffc Head {h00=0x0022, h01=0x0050, text=» DATA /3336,/3438,/3530,/3531 «, t00=0x0047, t01=0x00f6}
0x6ffc…7022 Head {h00=0x0022, h01=0x0050, text=» DATA /3630,/3636,/3730,/3732 «, t00=0x0047, t01=0x011c}
0x7022…702c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0142}
0x702c…7036 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x014c}
0x7036…7040 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0156}
0x7040…704a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0160}
0x704a…7084 Head {h00=0x0036, h01=0x0050, text=»NCVTAB EQU *-2 NATIONAL CHARACTER VARIATION YABLE «, t00=0x0047, t01=0x016a}
0x7084…70aa Head {h00=0x0022, h01=0x0050, text=» DATA /3031,/3032,/3033,/3034 «, t00=0x0048, t01=0x0014}
0x70aa…70d0 Head {h00=0x0022, h01=0x0050, text=» DATA /3035,/3036,/3037,/3038 «, t00=0x0048, t01=0x003a}
0x70d0…70f6 Head {h00=0x0022, h01=0x0050, text=» DATA /3039,/3130,/3131,/3131 «, t00=0x0048, t01=0x0060}
0x70f6…7116 Head {h00=0x001c, h01=0x0050, text=» DATA /3133,/3134,/3135 «, t00=0x0048, t01=0x0086}
0x7116…7152 Head {h00=0x0038, h01=0x0050, text=»TAB EQU * MASK TABLE FOR STATUS REPORT FROM PRINTER «, t00=0x0048, t01=0x00a6}
0x7152…7174 Head {h00=0x001e, h01=0x0050, text=» DATA /C0,/C0,/C0,/2CC * «, t00=0x0048, t01=0x00e2}
0x7174…7196 Head {h00=0x001e, h01=0x0050, text=» DATA /2CF,/4CB,/C0,/C0 * «, t00=0x0048, t01=0x0104}
0x7196…71b4 Head {h00=0x001a, h01=0x0050, text=» DATA /C0,/C0,/C0,/C0 «, t00=0x0048, t01=0x0126}
0x71b4…71ca Head {h00=0x0012, h01=0x0050, text=» DATA /C0,/C0 «, t00=0x0048, t01=0x0144}
0x71ca…71d6 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0048, t01=0x015a}
0x71d6…71da Head {h00=0x4004, h01=0x0000}
0x71da…71de 00 48 01 66 ┆ H f┆
0x71de…71e6 (73, 1, 8) 20 04 00 00 00 49 00 04 ┆ I ┆
0x71e6…7236 (74, 0, 400) 55 4e 54 45 52 20 00 71 01 74 00 20 00 50 5c 4c 44 5c 41 31 2c 46 42 41 58 5c 47 45 54 20 42 55 46 46 45 52 20 49 4e 44 45 58 00 72 00 0e 00 22 00 50 5c 52 46 28 4e 5a 29 5c 54 52 54 31 30 30 5c 4e 4f 54 20 46 49 52 53 54 20 42 4c 4f 43 4b ┆UNTER q t P LD A1,FBAX GET BUFFER INDEX r " P RF(NZ) TRT100 NOT FIRST BLOCK┆
0x7236…7286 00 72 00 32 00 1c 00 50 5c 4c 43 5c 41 32 2c 44 57 31 35 30 30 2b 31 5c 47 45 54 20 54 43 41 20 00 72 00 58 00 1a 00 50 5c 43 46 5c 41 35 2c 57 52 49 54 45 50 5c 53 45 4e 44 20 54 43 41 00 72 00 78 00 18 00 50 5c 4c 44 52 2a 5c 41 32 2c 41 ┆ r 2 P LC A2,DW1500+1 GET TCA r X P CF A5,WRITEP SEND TCA r x P LDR* A2,A┆
0x7286…72d6 36 5c 47 45 54 20 53 54 41 20 00 72 00 96 00 1a 00 50 5c 43 46 5c 41 35 2c 57 52 49 54 45 50 5c 53 45 4e 44 20 53 54 41 00 72 00 b2 00 12 00 50 5c 49 46 54 5c 49 42 4d 43 48 52 3d 31 20 00 72 00 d0 00 10 00 50 5c 49 46 46 5c 52 43 4f 4d 3d ┆6 GET STA r P CF A5,WRITEP SEND STA r P IFT IBMCHR=1 r P IFF RCOM=┆
0x72d6…7326 31 20 00 72 00 e6 00 22 00 50 5c 4c 44 4b 5c 41 32 2c 2f 32 37 5c 53 45 4e 44 20 45 4e 54 45 52 20 41 53 20 41 49 44 20 00 72 00 fa 00 12 00 50 5c 43 46 5c 41 35 2c 57 52 49 54 45 50 20 00 72 01 20 00 22 00 50 5c 4c 44 4b 5c 41 32 2c 2f 32 ┆1 r " P LDK A2,/27 SEND ENTER AS AID r P CF A5,WRITEP r " P LDK A2,/2┆
0x7326…7376 30 5c 41 4e 44 20 43 55 52 53 4f 52 20 41 44 44 52 45 53 53 00 72 01 36 00 12 00 50 5c 43 46 5c 41 35 2c 57 52 49 54 45 50 20 00 72 01 5c 00 10 00 50 5c 4c 44 4b 5c 41 32 2c 2f 32 30 20 00 72 01 72 00 12 00 50 5c 43 46 5c 41 35 2c 57 52 49 ┆0 AND CURSOR ADDRESS r 6 P CF A5,WRITEP r P LDK A2,/20 r r P CF A5,WRI┆
0x7376…73c6 (75, 0, 400) 54 45 50 20 00 72 01 86 00 08 00 50 5c 58 49 46 00 73 00 0c 00 10 00 50 5c 49 46 54 5c 52 43 4f 4d 3d 31 20 00 73 00 18 00 04 00 50 00 73 00 2c 00 26 00 50 5c 4c 44 5c 41 31 2c 58 52 42 5c 52 45 41 44 20 42 55 46 46 45 52 20 43 4f 4d 4d 41 ┆TEP r P XIF s P IFT RCOM=1 s P s , & P LD A1,XRB READ BUFFER COMMA┆
0x73c6…7416 4e 44 20 3f 3f 3f 00 73 00 34 00 16 00 50 5c 52 46 28 5a 29 5c 54 52 54 30 37 30 5c 4e 4f 21 21 00 73 00 5e 00 04 00 50 00 73 00 78 00 1c 00 50 5c 5c 5c 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 73 00 80 00 22 00 50 ┆ND ??? s 4 P RF(Z) TRT070 NO!! s ^ P s x P ******************** s " P┆
0x7416…7466 5c 4c 44 4b 5c 41 32 2c 58 27 32 44 27 5c 41 49 44 20 46 4f 52 20 44 49 53 50 4c 41 59 20 00 73 00 a0 00 20 00 50 54 52 54 30 36 30 5c 43 46 5c 41 35 2c 57 52 49 54 45 50 5c 53 45 4e 44 20 41 49 44 00 73 00 c6 00 04 00 50 00 73 00 ea 00 24 ┆ LDK A2,X'2D' AID FOR DISPLAY s PTRT060 CF A5,WRITEP SEND AID s P s $┆
0x7466…74b6 00 50 5c 4c 44 2a 5c 41 33 2c 44 57 54 43 55 52 2c 41 36 5c 43 55 52 53 4f 52 20 41 44 44 52 45 53 53 00 73 00 f2 00 2e 00 50 5c 43 46 5c 41 35 2c 4c 49 4e 43 4f 4c 5c 53 45 4e 44 20 4c 49 4e 45 20 41 4e 44 20 43 4f 4c 55 4d 4e 20 4e 55 4d ┆ P LD* A3,DWTCUR,A6 CURSOR ADDRESS s . P CF A5,LINCOL SEND LINE AND COLUMN NUM┆
0x74b6…7506 42 45 52 20 00 73 01 1a 00 1e 00 50 5c 4c 44 4b 5c 41 33 2c 35 5c 53 45 54 20 42 4c 4f 43 4b 20 43 4f 55 4e 54 20 00 73 01 4c 00 0e 00 50 5c 52 46 5c 54 52 54 31 30 30 00 73 01 6e 00 10 00 50 54 52 54 30 37 30 5c 45 51 55 5c 2a 00 73 01 80 ┆BER s P LDK A3,5 SET BLOCK COUNT s L P RF TRT100 s n PTRT070 EQU * s ┆
0x7506…7556 (76, 0, 400) 00 08 00 50 5c 58 49 46 00 74 00 04 00 04 00 50 00 74 00 10 00 0e 00 50 5c 4c 44 4b 5c 41 33 2c 32 20 00 74 00 18 00 10 00 50 54 52 54 31 30 30 5c 45 51 55 5c 2a 00 74 00 2a 00 20 00 50 5c 4c 43 52 5c 41 32 2c 41 34 5c 47 45 54 20 4f 4e 45 ┆ P XIF t P t P LDK A3,2 t PTRT100 EQU * t * P LCR A2,A4 GET ONE┆
0x7556…75a6 20 43 48 41 52 41 43 54 45 52 00 74 00 3e 00 20 00 50 5c 41 44 4b 5c 41 34 2c 31 5c 49 4e 43 52 45 4d 45 4e 54 20 50 4f 49 4e 54 45 52 20 00 74 00 62 00 10 00 50 5c 41 4e 4b 5c 41 32 2c 2f 37 46 20 00 74 00 86 00 10 00 50 5c 49 46 54 5c 52 ┆ CHARACTER t > P ADK A4,1 INCREMENT POINTER t b P ANK A2,/7F t P IFT R┆
0x75a6…75f6 43 4f 4d 3d 31 20 00 74 00 9a 00 26 00 50 5c 4c 44 5c 41 31 2c 58 52 42 5c 52 45 41 44 20 42 55 46 46 45 52 20 43 4f 4d 4d 41 4e 44 20 3f 3f 3f 00 74 00 ae 00 16 00 50 5c 52 46 28 5a 29 5c 54 52 54 31 30 35 5c 4e 4f 21 21 00 74 00 d8 00 04 ┆COM=1 t & P LD A1,XRB READ BUFFER COMMAND ??? t P RF(Z) TRT105 NO!! t ┆
0x75f6…7646 00 50 00 74 00 f2 00 40 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 74 00 fa 00 06 00 50 2a 20 ┆ P t @ P************************************************************ t P* ┆
0x7646…7696 00 74 01 3e 00 2c 00 50 2a 20 20 20 43 48 45 43 4b 20 49 46 20 41 54 54 52 49 42 55 54 45 20 43 48 41 52 41 43 54 45 52 20 4f 52 20 4e 55 4c 4c 00 74 01 48 00 06 00 50 2a 20 00 74 01 78 00 34 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ t > , P* CHECK IF ATTRIBUTE CHARACTER OR NULL t H P* t x 4 P**************┆