|
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: 30176 (0x75e0)
Notes: pts_type(SC)
Names: »DRGP01.SC«
└─⟦245262b9f⟧ Bits:30009679 Philips computer tape "600220"
└─⟦this⟧ »LP100/DRGP01.SC«
└─⟦726a6c4ca⟧ Bits:30009685 Philips computer tape "600309"
└─⟦this⟧ »M:PTB/DRGP01.SC«
└─⟦this⟧ »PTAID/DRGP01.SC«
IDENT DRGP01 AUSTRIA DRIVER FOR 8081 800624 =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 =3A,TIME-OUT FUER DRUCKERSTATUS * * ******************************************************* * * * PHILIPS TERMINAL SYSTEM PTS * * * * DRGP01 = 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 * * * * 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 * * * * ******************************************* * * ENTRIES * ******************************************* * * ENTRY GPAD 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 EXTRN DWTTP EXTRN SETIMP EXTRN DWTSB1 * * ****************************************** * * 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 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 * * ZEIT EQU 15 1,5 SEC. FUER TIME-OUT * * * * ********************************************************* * * 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 * FRONT FEED BYTE ESC,EJFF BYTE NEG,NEG 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 * * ******************************************************* * * CONDITIONAL ASSEMBLY * ******************************************************* * * * * THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN * BY SETTING X:A TO 1-15 ACCORDING TO THE LIST BELOW * * * NCV=1 GERMANY,AUSTRIA,LUXEMBOURG,SWITZERLAND =2 GREAT BRITAIN,NETHERLANDS,BELGIUM,NEW ZEELAND,SOUTH AFRICA =3 FRANCE,SWITZERLAND,BELGIUM,LUXEMBOURG =4 SPAIN,MEXICO,ARGENTINA,VENEZUELA =5 ITALY,SWITZERLAND =6 SWEDEN,FINLAND =7 DENMARK,NORWAY =8 PORTUGAL,BRAZIL =9 YUGOSLAVIA =10 USA,CANADA,AUSTRALIA =11 SWEDEN (SPECIAL VERSION) =13 GREEK =14 JAPAN (KATAKANA VERSION) =15 ISRAEL (HEBREW VERSION) * * X:A EQU 02 GREAT BRITAIN AS STANDARD STDNCV EQU 07 * * * THE FRONT FEED DEVICE CAN BE EXCLUDED * BY SETTING X:B = 0 * * X:B EQU 1 FFDEV EQU 0 FRONT FEED DEVICE * * * * THE STANDARD PAGELENGTH IS DEFINED * BY SETTING X:C = NUMBER OF LINES * * X:C EQU 48 PAGLEN EQU 51 * * * THE STANDARD NUMBER OF LINES IS DEFINED * BY SETTING X:D = NUMBER OF LINES * * X:D EQU 36 * DOCLEN EQU 48 * * * * MMU BUFFER SIZE * * X:E EQU 132 DVBLEN EQU 000 * * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1 * * MMUPAG EQU 0 * * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0 * * CPU852 EQU 0 * * ******************************************* * * 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 * * ******************************************* * * 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 * ******************************************* * * TABLES * ******************************************* * * DATA DVBLEN MMU BUFFER SIZE DATA 2 DEVICE INDEX GPAD 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 * * * 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 TPFUC EQU * IFT FFDEV=1 DATA TSTSTA,WRTDOC,POSDOC,DOCPAR,RELDOC,RELDOC XIF DATA TSTSTA,WRTCON,CSTPAR,CSTPAR * * * ORDER 00 : TEST STATUS * * TSTSTA EQU * TEST STATUS CF A5,RESREC CF A5,GTSTAT GET STATUS FROM PRINTER ABL DISEND END REQUEST 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 * * * 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 * * 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 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 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 * * * 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 * * * IFT FFDEV=1 * * * ORDER 38 : RELEASE DOCUMENT * * RELDOC EQU * CF A5,RESREC LDKL A2,CSEJFF CONTROL SEQ. 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 * * * 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 * * * 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 * * * 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 * LDR A3,A4 A4 WIRD NOCH GEBRAUCHT LD A4,DWTTP,A6 UHR LAUEFT ??? RF(E) ZEIT01 NEIN ! LDKL A4,-ZEIT ST* A4,DWTTP,A6 RF ZEIT02 ZEIT01 EQU * LDKL A4,DWTTP ADR A4,A6 LDR A1,A6 CF A15,SETIMP DATA ZAUS,ZEIT ST A4,DWTTP,A6 * ZEIT02 LDR A4,A3 DANKE FUERS AUFHEBEN ! LDK A3,0 CF A5,STREG READ STATUS FROM PRINTER LD A3,DWTTP,A6 RF(E) ZEIT03 ES LAUEFT KEINE UHR !!! LDKL A3,-ZEIT ST* A3,DWTTP,A6 ZIEH DIE UHR WIEDER AUF * ZEIT03 EQU * 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,DWTTP,A6 RF(E) ZEIT04 ES LAUEFT KEINE UHR CM* DWTTP,A6 CM DWTTP,A6 ZEIT04 EQU * * * LD A1,DWTRC,A6 GET RETURN CODE RTN A5 * * * TIME OUT ROUTINE FUER LP 100 * * ZAUS EQU * * LDR A6,A1 A6 WIEDERHERSTELLEN CM DWTTP,A6 LDKL A5,DWTSB1 ADR A5,A6 RB GTSTAT MIT VIEL BAUCHWEH !!!!!!!!!!!!!!!!! * * * * * 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 * * 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 * * * 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 * * * 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 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…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT DRGP01 AUSTRIA DRIVER FOR 8081 800624«, t00=0x0000, t01=0x0004}
0x0034…003c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x003c…006a Head {h00=0x002a, h01=0x0050, text=» =1,IMPROVEMENT OF FORM LENGTH CON- «, t00=0x0000, t01=0x0040}
0x006a…0098 Head {h00=0x002a, h01=0x0050, text=» TROL & FORM FEED FUNCTION ON CONT.«, t00=0x0000, t01=0x006e}
0x0098…00c2 Head {h00=0x0026, h01=0x0050, text=» STATIONARY. PRR 10.0 79-12-07 «, t00=0x0000, t01=0x009c}
0x00c2…00e8 Head {h00=0x0022, h01=0x0050, text=» =2,XIF MOVED TO RIGHT PLACE«, t00=0x0000, t01=0x00c6}
0x00e8…0104 Head {h00=0x0018, h01=0x0050, text=» PRR 10.0 80-01-25«, t00=0x0000, t01=0x00ec}
0x0104…012e Head {h00=0x0026, h01=0x0050, text=» =3A,TIME-OUT FUER DRUCKERSTATUS«, t00=0x0000, t01=0x0108}
0x012e…013a Head {h00=0x0008, h01=0x0050, text=» *«, t00=0x0000, t01=0x0132}
0x013a…0144 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013e}
0x0144…0184 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x0148}
0x0184…01c4 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0000, t01=0x0188}
0x01c4…0204 Head {h00=0x003c, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS * «, t00=0x0001, t01=0x0038}
0x0204…0244 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x0078}
0x0244…027c Head {h00=0x0034, h01=0x0050, text=»* DRGP01 = DRIVER GENERAL PRINTER * «, t00=0x0001, t01=0x00b8}
0x027c…02bc Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x00f0}
0x02bc…02fc Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x0130}
0x02fc…033c Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x0170}
0x033c…037c Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0002, t01=0x0020}
0x037c…0386 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0060}
0x0386…03be Head {h00=0x0034, h01=0x0050, text=»* THIS DRIVER HANDLES GENERAL PRINTER PTS 8081«, t00=0x0002, t01=0x006a}
0x03be…03c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a2}
0x03c8…0400 Head {h00=0x0034, h01=0x0050, text=»* THE DRIVER CONSISTS OF THE FOLLOWING PARTS :«, t00=0x0002, t01=0x00ac}
0x0400…040a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e4}
0x040a…0432 Head {h00=0x0024, h01=0x0050, text=»* A C T P : ACTIVATION PART «, t00=0x0002, t01=0x00ee}
0x0432…043c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0116}
0x043c…0466 Head {h00=0x0026, h01=0x0050, text=»* I H T P : INTERRUPT HANDLER «, t00=0x0002, t01=0x0120}
0x0466…0470 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014a}
0x0470…0498 Head {h00=0x0024, h01=0x0050, text=»* R C T P : RECOVERY ROUTINE«, t00=0x0002, t01=0x0154}
0x0498…04a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x017c}
0x04a2…04ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0186}
0x04ac…04b6 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0002, t01=0x0190}
0x04b6…04c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x000a}
0x04c0…04ee Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED: «, t00=0x0003, t01=0x0014}
0x04ee…04f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0042}
0x04f8…0520 Head {h00=0x0024, h01=0x0050, text=»* ORDER 00 : TEST STATUS «, t00=0x0003, t01=0x004c}
0x0520…0542 Head {h00=0x001e, h01=0x0050, text=»* ORDER 06 : WRITE «, t00=0x0003, t01=0x0074}
0x0542…0570 Head {h00=0x002a, h01=0x0050, text=»* ORDER 0B : POSITION DOCUMENT «, t00=0x0003, t01=0x0096}
0x0570…05a2 Head {h00=0x002e, h01=0x0050, text=»* ORDER 24 : SET PRINTER PARAMETERS«, t00=0x0003, t01=0x00c4}
0x05a2…05ce Head {h00=0x0028, h01=0x0050, text=»* ORDER 38 : RELEASE DOCUMENT«, t00=0x0003, t01=0x00f6}
0x05ce…05d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0122}
0x05d8…0608 Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING RETURN CODES ARE USED:«, t00=0x0003, t01=0x012c}
0x0608…0612 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x015c}
0x0612…063c Head {h00=0x0026, h01=0x0050, text=»* BIT 0 : REQUEST ERROR «, t00=0x0003, t01=0x0166}
0x063c…067a Head {h00=0x003a, h01=0x0050, text=»* BIT 2 : END OF JOURNAL TAPE, DOCUMENT OUT «, t00=0x0003, t01=0x0190}
0x067a…06a6 Head {h00=0x0028, h01=0x0050, text=»* BIT 13 : CODE CHECK ERROR«, t00=0x0004, t01=0x003e}
0x06a6…06ce Head {h00=0x0024, h01=0x0050, text=»* BIT 15 : NOT OPERABLE«, t00=0x0004, t01=0x006a}
0x06ce…06d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0092}
0x06d8…06e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x009c}
0x06e2…0704 Head {h00=0x001e, h01=0x0050, text=»* NORMAL REGISTER USAGE:«, t00=0x0004, t01=0x00a6}
0x0704…070e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00c8}
0x070e…0734 Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1: WORK REGISTER«, t00=0x0004, t01=0x00d2}
0x0734…075a Head {h00=0x0022, h01=0x0050, text=»* A2: INPUT/OUTPUT «, t00=0x0004, t01=0x00f8}
0x075a…0782 Head {h00=0x0024, h01=0x0050, text=»* A3: BUFFER POINTER «, t00=0x0004, t01=0x011e}
0x0782…07a8 Head {h00=0x0022, h01=0x0050, text=»* A4: WORK REGISTER«, t00=0x0004, t01=0x0146}
0x07a8…07ce Head {h00=0x0022, h01=0x0050, text=»* A5: STACK POINTER«, t00=0x0004, t01=0x016c}
0x07ce…07f2 (5, 0, 400) Head {h00=0x0020, h01=0x0050, text=»* A6: DWT-ADDRESS«, t00=0x0005, t01=0x0004}
0x07f2…0810 Head {h00=0x001a, h01=0x0050, text=»* A7: ORDER«, t00=0x0005, t01=0x0028}
0x0810…0834 Head {h00=0x0020, h01=0x0050, text=»* A8: ECB-ADDRESS«, t00=0x0005, t01=0x0046}
0x0834…083e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x006a}
0x083e…0848 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0074}
0x0848…0852 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0005, t01=0x007e}
0x0852…085c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0088}
0x085c…0866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0092}
0x0866…089a Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0005, t01=0x009c}
0x089a…08a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d0}
0x08a4…08b6 Head {h00=0x000e, h01=0x0050, text=»* ENTRIES «, t00=0x0005, t01=0x00da}
0x08b6…08c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ec}
0x08c0…08f4 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0005, t01=0x00f6}
0x08f4…08fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x012a}
0x08fe…0908 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0134}
0x0908…092a Head {h00=0x001e, h01=0x0050, text=» ENTRY GPAD ADDRESS BLOCK «, t00=0x0005, t01=0x013e}
0x092a…0934 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0160}
0x0934…093e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016a}
0x093e…0948 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0174}
0x0948…097c Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0005, t01=0x017e}
0x097c…0986 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0022}
0x0986…099a Head {h00=0x0010, h01=0x0050, text=»* EXTERNALS «, t00=0x0006, t01=0x002c}
0x099a…09a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0040}
0x09a4…09d8 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0006, t01=0x004a}
0x09d8…09e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007e}
0x09e2…09ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0088}
0x09ec…0a1c Head {h00=0x002c, h01=0x0050, text=» EXTRN TDISP DISPATCHING FROM INTERRUPT «, t00=0x0006, t01=0x0092}
0x0a1c…0a44 Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE DISPATCH I/O ERROR«, t00=0x0006, t01=0x00c2}
0x0a44…0a6e Head {h00=0x0026, h01=0x0050, text=» EXTRN DISEND END I/O AND DISPATCH«, t00=0x0006, t01=0x00ea}
0x0a6e…0a98 Head {h00=0x0026, h01=0x0050, text=» EXTRN OUTPUT OUTPUT ONE CHARACTER«, t00=0x0006, t01=0x0114}
0x0a98…0abe Head {h00=0x0022, h01=0x0050, text=» EXTRN LDREG RESTORE REGISTERS«, t00=0x0006, t01=0x013e}
0x0abe…0ae2 Head {h00=0x0020, h01=0x0050, text=» EXTRN SAVE8 SAVE REG. A1-A8«, t00=0x0006, t01=0x0164}
0x0ae2…0b16 Head {h00=0x0030, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER FROM ECB BUFFER «, t00=0x0006, t01=0x0188}
0x0b16…0b42 Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTST DWT STATUS DISPLACEMENT«, t00=0x0007, t01=0x002c}
0x0b42…0b6c Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTECB DWT ECB DISPLACEMENT«, t00=0x0007, t01=0x0058}
0x0b6c…0b98 Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTOR DWT ORDER DISPLACEMENT «, t00=0x0007, t01=0x0082}
0x0b98…0bce Head {h00=0x0032, h01=0x0050, text=» EXTRN STREG STORE REG = GET STATUS INPUT CHAR«, t00=0x0007, t01=0x00ae}
0x0bce…0bfa Head {h00=0x0028, h01=0x0050, text=» EXTRN INIFLG SYSTEM START INDICATOR«, t00=0x0007, t01=0x00e4}
0x0bfa…0c0e Head {h00=0x0010, h01=0x0050, text=» EXTRN DWTTP«, t00=0x0007, t01=0x0110}
0x0c0e…0c24 Head {h00=0x0012, h01=0x0050, text=» EXTRN SETIMP «, t00=0x0007, t01=0x0124}
0x0c24…0c3a Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTSB1 «, t00=0x0007, t01=0x013a}
0x0c3a…0c48 Head {h00=0x000a, h01=0x0050, text=» «, t00=0x0007, t01=0x0150}
0x0c48…0c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x015e}
0x0c52…0c5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0168}
0x0c5c…0c8e Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0007, t01=0x0172}
0x0c8e…0c98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0014}
0x0c98…0cac Head {h00=0x0010, h01=0x0050, text=»* CONSTANTS «, t00=0x0008, t01=0x001e}
0x0cac…0cb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0032}
0x0cb6…0ce8 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0008, t01=0x003c}
0x0ce8…0cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x006e}
0x0cf2…0cfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0078}
0x0cfc…0d24 Head {h00=0x0024, h01=0x0050, text=»STB EQU /82 START OF TEXT BLOCK «, t00=0x0008, t01=0x0082}
0x0d24…0d4a Head {h00=0x0022, h01=0x0050, text=»ETB EQU /97 END OF TEXT BLOCK «, t00=0x0008, t01=0x00aa}
0x0d4a…0d70 Head {h00=0x0022, h01=0x0050, text=»SPEC EQU /2E SPECIAL CHARACTER«, t00=0x0008, t01=0x00d0}
0x0d70…0d92 Head {h00=0x001e, h01=0x0050, text=»STX EQU /02 START OF TEXT «, t00=0x0008, t01=0x00f6}
0x0d92…0db2 Head {h00=0x001c, h01=0x0050, text=»ETX EQU /03 END OF TEXT «, t00=0x0008, t01=0x0118}
0x0db2…0dce Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x0008, t01=0x0138}
0x0dce…0dea Head {h00=0x0018, h01=0x0050, text=»FF EQU /0C FORM FEED«, t00=0x0008, t01=0x0154}
0x0dea…0e0c Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x0008, t01=0x0170}
0x0e0c…0e28 (9, 0, 400) Head {h00=0x0018, h01=0x0050, text=»SO EQU /0E SHIFT OUT«, t00=0x0009, t01=0x0004}
0x0e28…0e44 Head {h00=0x0018, h01=0x0050, text=»SI EQU /0F SHIFT IN «, t00=0x0009, t01=0x0020}
0x0e44…0e5e Head {h00=0x0016, h01=0x0050, text=»ESC EQU /1B ESCAPE«, t00=0x0009, t01=0x003c}
0x0e5e…0e8e Head {h00=0x002c, h01=0x0050, text=»CSI EQU /5B CONTROL SEQUENCE INTRODUCER «, t00=0x0009, t01=0x0056}
0x0e8e…0ea8 Head {h00=0x0016, h01=0x0050, text=»REP EQU /62 REPEAT«, t00=0x0009, t01=0x0086}
0x0ea8…0ed6 Head {h00=0x002a, h01=0x0050, text=»VPR EQU /65 VERTICAL POSITION RELATIVE«, t00=0x0009, t01=0x00a0}
0x0ed6…0efc Head {h00=0x0022, h01=0x0050, text=»INFF EQU /74 INPUT FRONT FEED «, t00=0x0009, t01=0x00ce}
0x0efc…0f2e Head {h00=0x002e, h01=0x0050, text=»VPFF EQU /71 VERTICAL POSITION FRONT FEED «, t00=0x0009, t01=0x00f4}
0x0f2e…0f50 Head {h00=0x001e, h01=0x0050, text=»EJFF EQU /38 FRONT FEED «, t00=0x0009, t01=0x0126}
0x0f50…0f7c Head {h00=0x0028, h01=0x0050, text=»SNV EQU /77 SELECT NATIONAL VERSION «, t00=0x0009, t01=0x0148}
0x0f7c…0fa4 Head {h00=0x0024, h01=0x0050, text=»SLPL EQU /76 SELECT PAGE LENGTH «, t00=0x0009, t01=0x0174}
0x0fa4…0fce Head {h00=0x0026, h01=0x0050, text=»RIS EQU /63 RESET TO INITIAL STATE«, t00=0x000a, t01=0x000c}
0x0fce…0ff6 Head {h00=0x0024, h01=0x0050, text=»DSR EQU /6E DEVICE STATUS REPORT«, t00=0x000a, t01=0x0036}
0x0ff6…1020 Head {h00=0x0026, h01=0x0050, text=»DCS EQU /50 DEVICE CONTROL STRING «, t00=0x000a, t01=0x005e}
0x1020…1044 Head {h00=0x0020, h01=0x0050, text=»ST EQU /5C STRING TERMINATOR«, t00=0x000a, t01=0x0088}
0x1044…105e Head {h00=0x0016, h01=0x0050, text=»DEL EQU /7F DELETE«, t00=0x000a, t01=0x00ac}
0x105e…1078 Head {h00=0x0016, h01=0x0050, text=»ZERO EQU /30 ZERO «, t00=0x000a, t01=0x00c6}
0x1078…108c Head {h00=0x0010, h01=0x0050, text=»NEG EQU /FF «, t00=0x000a, t01=0x00e0}
0x108c…1096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00f4}
0x1096…10a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00fe}
0x10a0…10ca Head {h00=0x0026, h01=0x0050, text=»ZEIT EQU 15 1,5 SEC. FUER TIME-OUT«, t00=0x000a, t01=0x0108}
0x10ca…10d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0132}
0x10d4…10de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x013c}
0x10de…10ec Head {h00=0x000a, h01=0x0050, text=» «, t00=0x000a, t01=0x0146}
0x10ec…10f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0154}
0x10f6…1100 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x015e}
0x1100…1142 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x000a, t01=0x0168}
0x1142…114c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x001a}
0x114c…1168 Head {h00=0x0018, h01=0x0050, text=»* CONTROL SEQUENCES «, t00=0x000b, t01=0x0024}
0x1168…1172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0040}
0x1172…11b4 Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x000b, t01=0x004a}
0x11b4…11be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x008c}
0x11be…11c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0096}
0x11c8…11de Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x000b, t01=0x00a0}
0x11de…11e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b6}
0x11e8…11f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00c0}
0x11f2…120c Head {h00=0x0016, h01=0x0050, text=»CSREP EQU * REPEAT«, t00=0x000b, t01=0x00ca}
0x120c…1222 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000b, t01=0x00e4}
0x1222…123a Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000b, t01=0x00fa}
0x123a…1250 Head {h00=0x0012, h01=0x0050, text=» BYTE ZERO,REP«, t00=0x000b, t01=0x0112}
0x1250…1266 Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000b, t01=0x0128}
0x1266…1294 Head {h00=0x002a, h01=0x0050, text=»CSVPR EQU * VERTICAL POSITION RELATIVE«, t00=0x000b, t01=0x013e}
0x1294…12aa Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000b, t01=0x016c}
0x12aa…12c2 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000b, t01=0x0182}
0x12c2…12d8 Head {h00=0x0012, h01=0x0050, text=» BYTE ZERO,VPR«, t00=0x000c, t01=0x000a}
0x12d8…12ee Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000c, t01=0x0020}
0x12ee…1314 Head {h00=0x0022, h01=0x0050, text=»CSINFF EQU * INPUT FRONT FEED «, t00=0x000c, t01=0x0036}
0x1314…132a Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000c, t01=0x005c}
0x132a…1342 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000c, t01=0x0072}
0x1342…1358 Head {h00=0x0012, h01=0x0050, text=» BYTE INFF,NEG«, t00=0x000c, t01=0x008a}
0x1358…138a Head {h00=0x002e, h01=0x0050, text=»CSVPFF EQU * VERTICAL POSITION FRONT FEED «, t00=0x000c, t01=0x00a0}
0x138a…13a0 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000c, t01=0x00d2}
0x13a0…13b8 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000c, t01=0x00e8}
0x13b8…13ce Head {h00=0x0012, h01=0x0050, text=» BYTE VPFF,NEG«, t00=0x000c, t01=0x0100}
0x13ce…13f0 Head {h00=0x001e, h01=0x0050, text=»CSEJFF EQU * FRONT FEED «, t00=0x000c, t01=0x0116}
0x13f0…1406 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,EJFF«, t00=0x000c, t01=0x0138}
0x1406…141c Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000c, t01=0x014e}
0x141c…1426 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x000c, t01=0x0164}
0x1426…143a Head {h00=0x0010, h01=0x0050, text=»CSSNV EQU * «, t00=0x000c, t01=0x016e}
0x143a…145c Head {h00=0x001e, h01=0x0050, text=» SELECT NATIONAL VERSION«, t00=0x000c, t01=0x0182}
0x145c…1472 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000d, t01=0x0014}
0x1472…148a Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000d, t01=0x002a}
0x148a…14a0 Head {h00=0x0012, h01=0x0050, text=» BYTE SNV,NEG «, t00=0x000d, t01=0x0042}
0x14a0…14c6 Head {h00=0x0022, h01=0x0050, text=»CSSLPL EQU * SELECT PAGELENGTH«, t00=0x000d, t01=0x0058}
0x14c6…14dc Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000d, t01=0x007e}
0x14dc…14f4 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000d, t01=0x0094}
0x14f4…150e Head {h00=0x0016, h01=0x0050, text=» BYTE SLPL,NEG * «, t00=0x000d, t01=0x00ac}
0x150e…1524 Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000d, t01=0x00c6}
0x1524…154e Head {h00=0x0026, h01=0x0050, text=»CSRIS EQU * RESET TO INITIAL STATE«, t00=0x000d, t01=0x00dc}
0x154e…1564 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,RIS «, t00=0x000d, t01=0x0106}
0x1564…157a Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000d, t01=0x011c}
0x157a…15a2 Head {h00=0x0024, h01=0x0050, text=»CSDSR EQU * DEVICE STATUS REPORT«, t00=0x000d, t01=0x0132}
0x15a2…15b8 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000d, t01=0x015a}
0x15b8…15ce Head {h00=0x0012, h01=0x0050, text=» BYTE /35,DSR «, t00=0x000d, t01=0x0170}
0x15ce…15e4 Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000d, t01=0x0186}
0x15e4…15ee Head {h00=0x0006, h01=0x0050, text=» «, t00=0x000e, t01=0x000c}
0x15ee…15f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0016}
0x15f8…1602 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0020}
0x1602…1642 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000e, t01=0x002a}
0x1642…164c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x006a}
0x164c…166a Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000e, t01=0x0074}
0x166a…1674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0092}
0x1674…16b4 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000e, t01=0x009c}
0x16b4…16be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00dc}
0x16be…16c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00e6}
0x16c8…16d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f0}
0x16d2…170a Head {h00=0x0034, h01=0x0050, text=»* THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN«, t00=0x000e, t01=0x00fa}
0x170a…1746 Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:A TO 1-15 ACCORDING TO THE LIST BELOW«, t00=0x000e, t01=0x0132}
0x1746…1750 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x016e}
0x1750…175a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0178}
0x175a…1792 Head {h00=0x0034, h01=0x0050, text=»* NCV=1 GERMANY,AUSTRIA,LUXEMBOURG,SWITZERLAND «, t00=0x000e, t01=0x0182}
0x1792…17dc Head {h00=0x0046, h01=0x0050, text=» =2 GREAT BRITAIN,NETHERLANDS,BELGIUM,NEW ZEELAND,SOUTH AFRICA «, t00=0x000f, t01=0x002a}
0x17dc…1810 Head {h00=0x0030, h01=0x0050, text=» =3 FRANCE,SWITZERLAND,BELGIUM,LUXEMBOURG«, t00=0x000f, t01=0x0074}
0x1810…1840 Head {h00=0x002c, h01=0x0050, text=» =4 SPAIN,MEXICO,ARGENTINA,VENEZUELA «, t00=0x000f, t01=0x00a8}
0x1840…1860 Head {h00=0x001c, h01=0x0050, text=» =5 ITALY,SWITZERLAND«, t00=0x000f, t01=0x00d8}
0x1860…187e Head {h00=0x001a, h01=0x0050, text=» =6 SWEDEN,FINLAND «, t00=0x000f, t01=0x00f8}
0x187e…189c Head {h00=0x001a, h01=0x0050, text=» =7 DENMARK,NORWAY «, t00=0x000f, t01=0x0116}
0x189c…18ba Head {h00=0x001a, h01=0x0050, text=» =8 PORTUGAL,BRAZIL«, t00=0x000f, t01=0x0134}
0x18ba…18d4 Head {h00=0x0016, h01=0x0050, text=» =9 YUGOSLAVIA «, t00=0x000f, t01=0x0152}
0x18d4…18f8 Head {h00=0x0020, h01=0x0050, text=» =10 USA,CANADA,AUSTRALIA«, t00=0x000f, t01=0x016c}
0x18f8…1920 Head {h00=0x0024, h01=0x0050, text=» =11 SWEDEN (SPECIAL VERSION)«, t00=0x000f, t01=0x0190}
0x1920…1936 Head {h00=0x0012, h01=0x0050, text=» =13 GREEK «, t00=0x0010, t01=0x0028}
0x1936…195e Head {h00=0x0024, h01=0x0050, text=» =14 JAPAN (KATAKANA VERSION)«, t00=0x0010, t01=0x003e}
0x195e…1986 Head {h00=0x0024, h01=0x0050, text=» =15 ISRAEL (HEBREW VERSION)«, t00=0x0010, t01=0x0066}
0x1986…1990 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x008e}
0x1990…199a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0098}
0x199a…19c6 Head {h00=0x0028, h01=0x0050, text=»X:A EQU 02 GREAT BRITAIN AS STANDARD«, t00=0x0010, t01=0x00a2}
0x19c6…19dc Head {h00=0x0012, h01=0x0050, text=»STDNCV EQU 07 «, t00=0x0010, t01=0x00ce}
0x19dc…19e6 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0010, t01=0x00e4}
0x19e6…19f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ee}
0x19f0…19fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f8}
0x19fa…1a2a Head {h00=0x002c, h01=0x0050, text=»* THE FRONT FEED DEVICE CAN BE EXCLUDED «, t00=0x0010, t01=0x0102}
0x1a2a…1a46 Head {h00=0x0018, h01=0x0050, text=»* BY SETTING X:B = 0«, t00=0x0010, t01=0x0132}
0x1a46…1a50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x014e}
0x1a50…1a5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0158}
0x1a5a…1a6c Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x0010, t01=0x0162}
0x1a6c…1a92 Head {h00=0x0022, h01=0x0050, text=»FFDEV EQU 0 FRONT FEED DEVICE «, t00=0x0010, t01=0x0174}
0x1a92…1a9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x000a}
0x1a9c…1aa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0014}
0x1aa6…1ab0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x001e}
0x1ab0…1adc Head {h00=0x0028, h01=0x0050, text=»* THE STANDARD PAGELENGTH IS DEFINED«, t00=0x0011, t01=0x0028}
0x1adc…1b06 Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:C = NUMBER OF LINES«, t00=0x0011, t01=0x0054}
0x1b06…1b10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x007e}
0x1b10…1b1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0088}
0x1b1a…1b2c Head {h00=0x000e, h01=0x0050, text=»X:C EQU 48«, t00=0x0011, t01=0x0092}
0x1b2c…1b42 Head {h00=0x0012, h01=0x0050, text=»PAGLEN EQU 51 «, t00=0x0011, t01=0x00a4}
0x1b42…1b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ba}
0x1b4c…1b56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00c4}
0x1b56…1b88 Head {h00=0x002e, h01=0x0050, text=»* THE STANDARD NUMBER OF LINES IS DEFINED «, t00=0x0011, t01=0x00ce}
0x1b88…1bb2 Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:D = NUMBER OF LINES«, t00=0x0011, t01=0x0100}
0x1bb2…1bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x012a}
0x1bbc…1bc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0134}
0x1bc6…1bdc Head {h00=0x0012, h01=0x0050, text=»X:D EQU 36 * «, t00=0x0011, t01=0x013e}
0x1bdc…1bf2 Head {h00=0x0012, h01=0x0050, text=»DOCLEN EQU 48 «, t00=0x0011, t01=0x0154}
0x1bf2…1bfc Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0011, t01=0x016a}
0x1bfc…1c06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0174}
0x1c06…1c10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x017e}
0x1c10…1c1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0188}
0x1c1a…1c34 (18, 0, 398) Head {h00=0x0016, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x0012, t01=0x0004}
0x1c34…1c3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x001e}
0x1c3e…1c48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0028}
0x1c48…1c5c Head {h00=0x0010, h01=0x0050, text=»X:E EQU 132 «, t00=0x0012, t01=0x0032}
0x1c5c…1c72 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU 000«, t00=0x0012, t01=0x0046}
0x1c72…1c7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x005c}
0x1c7c…1c86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0066}
0x1c86…1c90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0070}
0x1c90…1cc2 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0012, t01=0x007a}
0x1cc2…1cf0 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1 «, t00=0x0012, t01=0x00ac}
0x1cf0…1cfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00da}
0x1cfa…1d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e4}
0x1d04…1d18 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0012, t01=0x00ee}
0x1d18…1d22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0102}
0x1d22…1d2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x010c}
0x1d2c…1d36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0116}
0x1d36…1d70 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0012, t01=0x0120}
0x1d70…1da2 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0 «, t00=0x0012, t01=0x015a}
0x1da2…1dac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x018c}
0x1dac…1db6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0008}
0x1db6…1dca Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0013, t01=0x0012}
0x1dca…1dd4 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0013, t01=0x0026}
0x1dd4…1dde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0030}
0x1dde…1de8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x003a}
0x1de8…1e1c Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0013, t01=0x0044}
0x1e1c…1e26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0078}
0x1e26…1e44 Head {h00=0x001a, h01=0x0050, text=»* DWT - DISPLACEMENTS «, t00=0x0013, t01=0x0082}
0x1e44…1e4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a0}
0x1e4e…1e82 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0013, t01=0x00aa}
0x1e82…1e8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00de}
0x1e8c…1e96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00e8}
0x1e96…1ea0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00f2}
0x1ea0…1ed4 Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x0013, t01=0x00fc}
0x1ed4…1ede Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0130}
0x1ede…1ef4 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0013, t01=0x013a}
0x1ef4…1f0c Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0013, t01=0x0150}
0x1f0c…1f18 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0168}
0x1f18…1f22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0174}
0x1f22…1f38 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0013, t01=0x017e}
0x1f38…1f52 (20, 0, 400) Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0014, t01=0x0004}
0x1f52…1f5e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x001e}
0x1f5e…1f68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x002a}
0x1f68…1f9c Head {h00=0x0030, h01=0x0050, text=»DWTDCS EQU START+/12 DOCUMENT CHARACTER SET «, t00=0x0014, t01=0x0034}
0x1f9c…1fce Head {h00=0x002e, h01=0x0050, text=»DWTPCS EQU START+/14 PRINTER CHARACTER SET«, t00=0x0014, t01=0x0068}
0x1fce…1ffe Head {h00=0x002c, h01=0x0050, text=»DWTPL EQU START+/16 PRINTER PAPER LENGTH«, t00=0x0014, t01=0x009a}
0x1ffe…2030 Head {h00=0x002e, h01=0x0050, text=»DWTDL EQU START+/18 DOCUMENT PAPER LENGTH «, t00=0x0014, t01=0x00ca}
0x2030…2064 Head {h00=0x0030, h01=0x0050, text=»DWTALN EQU START+/1A ACTUAL LINE ON DOCUMENT«, t00=0x0014, t01=0x00fc}
0x2064…209c Head {h00=0x0034, h01=0x0050, text=»DWTRLN EQU START+/1C REQUESTED LINE ON DOCUMENT «, t00=0x0014, t01=0x0130}
0x209c…20d2 Head {h00=0x0032, h01=0x0050, text=»DWTRC EQU START+/1F RETURN CODE (ACKUMULATED) «, t00=0x0014, t01=0x0168}
0x20d2…2106 Head {h00=0x0030, h01=0x0050, text=»DWTSTR EQU START+/20 CONTROL SEQUENCE ADRESS«, t00=0x0015, t01=0x000e}
0x2106…214e Head {h00=0x0044, h01=0x0050, text=»DWTDISP EQU START+/22 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. «, t00=0x0015, t01=0x0042}
0x214e…2182 Head {h00=0x0030, h01=0x0050, text=»DWTACD EQU START+/24 ACTUAL COLUMN DOCUMENT «, t00=0x0015, t01=0x008a}
0x2182…21b2 Head {h00=0x002c, h01=0x0050, text=»DWTACP EQU START+/27 ACTUAL COLUMN PAPER«, t00=0x0015, t01=0x00be}
0x21b2…21e0 Head {h00=0x002a, h01=0x0050, text=»DWTCO1 EQU START+/2A COLUMN COUNTER 1 «, t00=0x0015, t01=0x00ee}
0x21e0…220e Head {h00=0x002a, h01=0x0050, text=»DWTCO2 EQU START+/2B COLUMN COUNTER 2 «, t00=0x0015, t01=0x011c}
0x220e…223e Head {h00=0x002c, h01=0x0050, text=»DWTSYST EQU START+/30 SYSTEM START IND. «, t00=0x0015, t01=0x014a}
0x223e…2274 Head {h00=0x0032, h01=0x0050, text=»DWTLFD EQU START+/32 LINE/FORM FEED INDICATOR «, t00=0x0015, t01=0x017a}
0x2274…227e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0016, t01=0x0020}
0x227e…2288 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x002a}
0x2288…2292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0034}
0x2292…22c6 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0016, t01=0x003e}
0x22c6…22d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0072}
0x22d0…22ee Head {h00=0x001a, h01=0x0050, text=»* ECB - DISPLACEMENTS «, t00=0x0016, t01=0x007c}
0x22ee…22f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x009a}
0x22f8…232c Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0016, t01=0x00a4}
0x232c…2336 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00d8}
0x2336…2360 Head {h00=0x0026, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS IN ECB «, t00=0x0016, t01=0x00e2}
0x2360…238c Head {h00=0x0028, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH IN ECB «, t00=0x0016, t01=0x010c}
0x238c…23b8 Head {h00=0x0028, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH IN ECB «, t00=0x0016, t01=0x0138}
0x23b8…23de Head {h00=0x0022, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE IN ECB«, t00=0x0016, t01=0x0164}
0x23de…2406 Head {h00=0x0024, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD IN ECB«, t00=0x0016, t01=0x018a}
0x2406…2410 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0017, t01=0x0022}
0x2410…241a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x002c}
0x241a…244e Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0017, t01=0x0036}
0x244e…2458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x006a}
0x2458…2468 Head {h00=0x000c, h01=0x0050, text=»* TABLES«, t00=0x0017, t01=0x0074}
0x2468…2472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0084}
0x2472…24a6 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0017, t01=0x008e}
0x24a6…24b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00c2}
0x24b0…24ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00cc}
0x24ba…24de Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x0017, t01=0x00d6}
0x24de…24fa Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x0017, t01=0x00fa}
0x24fa…251a Head {h00=0x001c, h01=0x0050, text=»GPAD EQU * ADDRESS BLOCK«, t00=0x0017, t01=0x0116}
0x251a…253e Head {h00=0x0020, h01=0x0050, text=» DATA ACTP ACTIVATION DRIVER«, t00=0x0017, t01=0x0136}
0x253e…2564 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0017, t01=0x015a}
0x2564…2588 Head {h00=0x0020, h01=0x0050, text=» DATA IHTP INTERRUPT HANDLER«, t00=0x0017, t01=0x0180}
0x2588…25ac Head {h00=0x0020, h01=0x0050, text=» DATA RCTP RECOVERY ROUTINE «, t00=0x0018, t01=0x0014}
0x25ac…25c0 Head {h00=0x0010, h01=0x0050, text=»TPTAB EQU * «, t00=0x0018, t01=0x0038}
0x25c0…25d4 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x0018, t01=0x004c}
0x25d4…25f4 Head {h00=0x001c, h01=0x0050, text=» DATA /0107,/0C25,/3939 «, t00=0x0018, t01=0x0060}
0x25f4…2600 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0080}
0x2600…261a Head {h00=0x0016, h01=0x0050, text=» DATA /0006,/2424 «, t00=0x0018, t01=0x008c}
0x261a…2634 Head {h00=0x0016, h01=0x0050, text=»TPLEN EQU *-TPTAB «, t00=0x0018, t01=0x00a6}
0x2634…263c Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x00c0}
0x263c…2644 Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x00c8}
0x2644…264e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0018, t01=0x00d0}
0x264e…2658 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00da}
0x2658…2662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e4}
0x2662…2676 Head {h00=0x0010, h01=0x0050, text=»* A C T P «, t00=0x0018, t01=0x00ee}
0x2676…2680 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0102}
0x2680…26b6 Head {h00=0x0032, h01=0x0050, text=»* THIS IS THE ACTIVATION PART OF THE DRIVER «, t00=0x0018, t01=0x010c}
0x26b6…26f8 Head {h00=0x003e, h01=0x0050, text=»* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR«, t00=0x0018, t01=0x0142}
0x26f8…2702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0184}
0x2702…270c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x018e}
0x270c…2716 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0008}
0x2716…273a Head {h00=0x0020, h01=0x0050, text=»ACTP EQU * ACTIVATION ENTRY «, t00=0x0019, t01=0x0012}
0x273a…2744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0036}
0x2744…274e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0040}
0x274e…278c Head {h00=0x003a, h01=0x0050, text=»* GET DWT INDEX: 0=CONTINUOUS STATIONARY, 1=DOCUMENT«, t00=0x0019, t01=0x004a}
0x278c…2796 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0088}
0x2796…27bc Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOR,A6 GET DWT INDEX «, t00=0x0019, t01=0x0092}
0x27bc…27d2 Head {h00=0x0012, h01=0x0050, text=» ANK A2,1 MASK«, t00=0x0019, t01=0x00b8}
0x27d2…2800 Head {h00=0x002a, h01=0x0050, text=» LC A3,DWTST+1,A6 GET OLD DEVICE VALUE«, t00=0x0019, t01=0x00ce}
0x2800…2814 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FE «, t00=0x0019, t01=0x00fc}
0x2814…2826 Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x0019, t01=0x0110}
0x2826…284c Head {h00=0x0022, h01=0x0050, text=» SC A3,DWTST+1,A6 STORE INDEX «, t00=0x0019, t01=0x0122}
0x284c…2876 Head {h00=0x0026, h01=0x0050, text=» ADR A7,A2 ADD DWT INDEX TO ORDER «, t00=0x0019, t01=0x0148}
0x2876…28a4 Head {h00=0x002a, h01=0x0050, text=» SC A7,DWTOR+1,A6 STORE MODIFIED ORDER«, t00=0x0019, t01=0x0172}
0x28a4…28c2 Head {h00=0x001a, h01=0x0050, text=»ACT005 LDK A3,TPLEN-1 «, t00=0x001a, t01=0x0010}
0x28c2…28f4 Head {h00=0x002e, h01=0x0050, text=»ACT010 CC A7,TPTAB,A3 CHECK IF LEGAL ORDER«, t00=0x001a, t01=0x002e}
0x28f4…2916 Head {h00=0x001e, h01=0x0050, text=» RF(E) ACT020 VALID ORDER «, t00=0x001a, t01=0x0060}
0x2916…2928 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x001a, t01=0x0082}
0x2928…2948 Head {h00=0x001c, h01=0x0050, text=» RB(NN) ACT010 TRY NEXT «, t00=0x001a, t01=0x0094}
0x2948…2952 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00b4}
0x2952…2974 Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE ILLEGAL ORDER «, t00=0x001a, t01=0x00be}
0x2974…297e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00e0}
0x297e…2988 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00ea}
0x2988…299c Head {h00=0x0010, h01=0x0050, text=»ACT020 EQU *«, t00=0x001a, t01=0x00f4}
0x299c…29b8 Head {h00=0x0018, h01=0x0050, text=» ADR A3,A3 GET INDEX«, t00=0x001a, t01=0x0108}
0x29b8…29dc Head {h00=0x0020, h01=0x0050, text=» ABI TPFUC,A3 EXECUTE ORDER «, t00=0x001a, t01=0x0124}
0x29dc…29e6 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x001a, t01=0x0148}
0x29e6…29fa Head {h00=0x0010, h01=0x0050, text=»TPFUC EQU * «, t00=0x001a, t01=0x0152}
0x29fa…2a0e Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x001a, t01=0x0166}
0x2a0e…2a46 Head {h00=0x0034, h01=0x0050, text=» DATA TSTSTA,WRTDOC,POSDOC,DOCPAR,RELDOC,RELDOC «, t00=0x001a, t01=0x017a}
0x2a46…2a52 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0022}
0x2a52…2a7c Head {h00=0x0026, h01=0x0050, text=» DATA TSTSTA,WRTCON,CSTPAR,CSTPAR «, t00=0x001b, t01=0x002e}
0x2a7c…2a86 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x001b, t01=0x0058}
0x2a86…2a90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0062}
0x2a90…2a9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x006c}
0x2a9a…2abc Head {h00=0x001e, h01=0x0050, text=»* ORDER 00 : TEST STATUS«, t00=0x001b, t01=0x0076}
0x2abc…2ac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0098}
0x2ac6…2ad0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00a2}
0x2ad0…2af0 Head {h00=0x001c, h01=0x0050, text=»TSTSTA EQU * TEST STATUS«, t00=0x001b, t01=0x00ac}
0x2af0…2b06 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x001b, t01=0x00cc}
0x2b06…2b34 Head {h00=0x002a, h01=0x0050, text=» CF A5,GTSTAT GET STATUS FROM PRINTER «, t00=0x001b, t01=0x00e2}
0x2b34…2b54 Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x001b, t01=0x0110}
0x2b54…2b5e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x001b, t01=0x0130}
0x2b5e…2b72 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x001b, t01=0x013a}
0x2b72…2b7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x014e}
0x2b7c…2b86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0158}
0x2b86…2baa Head {h00=0x0020, h01=0x0050, text=»* ORDER 06: WRITE DOCUMENT«, t00=0x001b, t01=0x0162}
0x2baa…2bb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0186}
0x2bb4…2bbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0190}
0x2bbe…2bd2 Head {h00=0x0010, h01=0x0050, text=»WRTDOC EQU *«, t00=0x001c, t01=0x000a}
0x2bd2…2be8 Head {h00=0x0012, h01=0x0050, text=» CF A5,GTSTAT «, t00=0x001c, t01=0x001e}
0x2be8…2c0e Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTST,A6 DEVICE STATUS «, t00=0x001c, t01=0x0034}
0x2c0e…2c3c Head {h00=0x002a, h01=0x0050, text=» ANKL A4,/200 HAS POWER OFF OCCURED ? «, t00=0x001c, t01=0x005a}
0x2c3c…2c56 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRDO05 YES«, t00=0x001c, t01=0x0088}
0x2c56…2c70 Head {h00=0x0016, h01=0x0050, text=» LDKL A3,/2000 * «, t00=0x001c, t01=0x00a2}
0x2c70…2c90 Head {h00=0x001c, h01=0x0050, text=» TM A1,A3 DOCUMENT OUT ?«, t00=0x001c, t01=0x00bc}
0x2c90…2ca8 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRDO06 NO«, t00=0x001c, t01=0x00dc}
0x2ca8…2cd8 Head {h00=0x002c, h01=0x0050, text=» LDKL A3,/8000 YES SET BIT 0 (REQ ERROR)«, t00=0x001c, t01=0x00f4}
0x2cd8…2cf2 Head {h00=0x0016, h01=0x0050, text=» ORS A3,ECBRC,A8 «, t00=0x001c, t01=0x0124}
0x2cf2…2d12 Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x001c, t01=0x013e}
0x2d12…2d2a Head {h00=0x0014, h01=0x0050, text=»WRDO05 EQU * * «, t00=0x001c, t01=0x015e}
0x2d2a…2d42 Head {h00=0x0014, h01=0x0050, text=»WRDO06 LDK A3,1 «, t00=0x001c, t01=0x0176}
0x2d42…2d62 Head {h00=0x001c, h01=0x0050, text=» TM A1,A3 NOT OPERABLE? «, t00=0x001c, t01=0x018e}
0x2d62…2d7a Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRDO10 NO«, t00=0x001d, t01=0x001e}
0x2d7a…2d9a Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x001d, t01=0x0036}
0x2d9a…2dc8 Head {h00=0x002a, h01=0x0050, text=»WRDO10 LD A3,DWTALN,A6 GET ACTUAL LINE«, t00=0x001d, t01=0x0056}
0x2dc8…2dde Head {h00=0x0012, h01=0x0050, text=» RF(NZ) WRDO15«, t00=0x001d, t01=0x0084}
0x2dde…2e0a Head {h00=0x0028, h01=0x0050, text=» LDK A3,1 SET UP ECB BUFFER POINTER «, t00=0x001d, t01=0x009a}
0x2e0a…2e38 Head {h00=0x002a, h01=0x0050, text=» CF A15,GETCHR GET CONTROL CHARACTER «, t00=0x001d, t01=0x00c6}
0x2e38…2e5c Head {h00=0x0020, h01=0x0050, text=» CWK A2,/31 CTRL CHAR=/31 ? «, t00=0x001d, t01=0x00f4}
0x2e5c…2e8a Head {h00=0x002a, h01=0x0050, text=» ABL(NE) POSERR NO,DOC NOT POSITIONED «, t00=0x001d, t01=0x0118}
0x2e8a…2ea4 Head {h00=0x0016, h01=0x0050, text=» LD A3,DWTDL,A6 * «, t00=0x001d, t01=0x0146}
0x2ea4…2ed0 Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTRLN,A6 FIRST LINE ON DOC. «, t00=0x001d, t01=0x0160}
0x2ed0…2f00 Head {h00=0x002c, h01=0x0050, text=»WRDO12 LDKL A2,CSINFF INPUT FRONT FEED «, t00=0x001d, t01=0x018c}
0x2f00…2f36 Head {h00=0x0032, h01=0x0050, text=» LDK A3,DWTRLN REQUESTED LINE NO DISPLACEMENT «, t00=0x001e, t01=0x002c}
0x2f36…2f60 Head {h00=0x0026, h01=0x0050, text=» CF A5,SEND SEND INPUT FRONT FEED «, t00=0x001e, t01=0x0062}
0x2f60…2f78 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTRLN,A6«, t00=0x001e, t01=0x008c}
0x2f78…2fa2 Head {h00=0x0026, h01=0x0050, text=» ST A3,DWTALN,A6 SET DWTALN=DWTRLN«, t00=0x001e, t01=0x00a4}
0x2fa2…2faa Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x00ce}
0x2faa…2fde Head {h00=0x0030, h01=0x0050, text=»WRDO15 LDKL A2,CSSNV SELECT NATIONAL VERSION«, t00=0x001e, t01=0x00d6}
0x2fde…3018 Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTDCS DOCUMENT CHARACTER SET DISPLACEMENT«, t00=0x001e, t01=0x010a}
0x3018…3048 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND SELECT NATIONAL VERSION«, t00=0x001e, t01=0x0144}
0x3048…3058 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x001e, t01=0x0174}
0x3058…3068 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x001e, t01=0x0184}
0x3068…3078 (31, 0, 400) Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x001f, t01=0x0004}
0x3078…30a4 Head {h00=0x0028, h01=0x0050, text=» RF WRT01 GOTO GET CONTROL CHARACTER«, t00=0x001f, t01=0x0014}
0x30a4…30b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0040}
0x30b0…30ba Head {h00=0x0006, h01=0x0050, text=» «, t00=0x001f, t01=0x004c}
0x30ba…30c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0056}
0x30c4…30ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0060}
0x30ce…30fe Head {h00=0x002c, h01=0x0050, text=»* ORDER 06: WRITE CONTINOUS STATIONARY«, t00=0x001f, t01=0x006a}
0x30fe…3108 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x009a}
0x3108…3112 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00a4}
0x3112…3126 Head {h00=0x0010, h01=0x0050, text=»WRTCON EQU *«, t00=0x001f, t01=0x00ae}
0x3126…3134 Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x001f, t01=0x00c2}
0x3134…315c Head {h00=0x0024, h01=0x0050, text=» CF A5,GTSTAT GET DEVICE STATUS «, t00=0x001f, t01=0x00d0}
0x315c…3176 Head {h00=0x0016, h01=0x0050, text=» LDKL A3,/2000 * «, t00=0x001f, t01=0x00f8}
0x3176…3196 Head {h00=0x001c, h01=0x0050, text=» TM A1,A3 END OF PAPER? «, t00=0x001f, t01=0x0112}
0x3196…31b0 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRCO05 NO. «, t00=0x001f, t01=0x0132}
0x31b0…31ce Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x001f, t01=0x014c}
0x31ce…31f4 Head {h00=0x0022, h01=0x0050, text=»WRCO05 LDK A3,1 NOT OPERABLE? «, t00=0x001f, t01=0x016a}
0x31f4…3206 Head {h00=0x000e, h01=0x0050, text=» TM A1,A3 «, t00=0x001f, t01=0x0190}
0x3206…321e Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRCO10 NO«, t00=0x0020, t01=0x0012}
0x321e…323c Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x0020, t01=0x002a}
0x323c…3244 Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0048}
0x3244…3278 Head {h00=0x0030, h01=0x0050, text=»WRCO10 LDKL A2,CSSNV SELECT NATIONAL VERSION«, t00=0x0020, t01=0x0050}
0x3278…32ae Head {h00=0x0032, h01=0x0050, text=» LDK A3,DWTPCS PRINTER CHAR. SET DISPLACEMENT «, t00=0x0020, t01=0x0084}
0x32ae…32de Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND SELECT NATIONAL VERSION«, t00=0x0020, t01=0x00ba}
0x32de…32ee Head {h00=0x000c, h01=0x0050, text=» U =1 «, t00=0x0020, t01=0x00ea}
0x32ee…32fe Head {h00=0x000c, h01=0x0050, text=» U =1 «, t00=0x0020, t01=0x00fa}
0x32fe…330e Head {h00=0x000c, h01=0x0050, text=» U =1 «, t00=0x0020, t01=0x010a}
0x330e…3318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x011a}
0x3318…3338 Head {h00=0x001c, h01=0x0050, text=»* GET CONTROL CHARACTER «, t00=0x0020, t01=0x0124}
0x3338…3342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0144}
0x3342…3372 Head {h00=0x002c, h01=0x0050, text=»WRT01 LDK A3,1 SET UP ECB BUFFER POINTER«, t00=0x0020, t01=0x014e}
0x3372…339e Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CONTROL CHARACTER«, t00=0x0020, t01=0x017e}
0x339e…33a6 Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x001a}
0x33a6…33b8 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0021, t01=0x0022}
0x33b8…33e2 Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTST,A6 GET DEVICE STATUS «, t00=0x0021, t01=0x0034}
0x33e2…3410 Head {h00=0x002a, h01=0x0050, text=» ANKL A1,/200 HAS POWER OFF OCCURED ? «, t00=0x0021, t01=0x005e}
0x3410…3428 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRT04 NO «, t00=0x0021, t01=0x008c}
0x3428…3442 Head {h00=0x0016, h01=0x0050, text=» CF A5,RESREC YES «, t00=0x0021, t01=0x00a4}
0x3442…3468 Head {h00=0x0022, h01=0x0050, text=» CWK A2,/2B CTRL. CHAR.=/2B ? «, t00=0x0021, t01=0x00be}
0x3468…3482 Head {h00=0x0016, h01=0x0050, text=» RF(NE) WRT08 NO «, t00=0x0021, t01=0x00e4}
0x3482…34aa Head {h00=0x0024, h01=0x0050, text=» LC A1,DWTOR+1,A6 GET DWT INDEX «, t00=0x0021, t01=0x00fe}
0x34aa…34c8 Head {h00=0x001a, h01=0x0050, text=» ANK A1,1 DOCUMENT ? «, t00=0x0021, t01=0x0126}
0x34c8…34e2 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT09 YES «, t00=0x0021, t01=0x0144}
0x34e2…34f8 Head {h00=0x0012, h01=0x0050, text=» RF WRT07 NO «, t00=0x0021, t01=0x015e}
0x34f8…3522 Head {h00=0x0026, h01=0x0050, text=»WRT04 CWK A2,/2B CTRL. CHAR.=/2B «, t00=0x0021, t01=0x0174}
0x3522…353c Head {h00=0x0016, h01=0x0050, text=» RF(NE) WRT02 NO «, t00=0x0022, t01=0x000e}
0x353c…3564 Head {h00=0x0024, h01=0x0050, text=» LC A2,DWTOR+1,A6 GET DWT INDEX «, t00=0x0022, t01=0x0028}
0x3564…3580 Head {h00=0x0018, h01=0x0050, text=» ANK A2,1 DOCUMENT? «, t00=0x0022, t01=0x0050}
0x3580…359a Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT03 YES «, t00=0x0022, t01=0x006c}
0x359a…35c4 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTCO1,A6 GET ACTUAL COLUMN«, t00=0x0022, t01=0x0086}
0x35c4…35f2 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x0022, t01=0x00b0}
0x35f2…35fa Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x00de}
0x35fa…363c Head {h00=0x003e, h01=0x0050, text=» SC A2,DWTACP,A6 STORE THE VALUE IN ACTUAL COLUMN PAPER D«, t00=0x0022, t01=0x00e6}
0x363c…368a Head {h00=0x004a, h01=0x0050, text=» ST A4,DWTACP+2,A6 STORE THE VALUE IN ACTUAL COLUMN PAPER DISPLACEMENT«, t00=0x0022, t01=0x0128}
0x368a…36ae Head {h00=0x0020, h01=0x0050, text=»WRT07 LDK A2,/20 SEND SPACE «, t00=0x0022, t01=0x0176}
0x36ae…36c4 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0023, t01=0x000a}
0x36c4…36e2 Head {h00=0x001a, h01=0x0050, text=» LDKL A2,CSREP REPEAT «, t00=0x0023, t01=0x0020}
0x36e2…371a Head {h00=0x0034, h01=0x0050, text=» LDK A3,DWTACP ACTUAL COLUMN PAPER DISPLACEMENT «, t00=0x0023, t01=0x003e}
0x371a…373a Head {h00=0x001c, h01=0x0050, text=» CF A5,SEND SEND REPEAT «, t00=0x0023, t01=0x0076}
0x373a…3766 Head {h00=0x0028, h01=0x0050, text=» LDK A3,2 SET UP ECB BUFFER POINTER «, t00=0x0023, t01=0x0096}
0x3766…3778 Head {h00=0x000e, h01=0x0050, text=» RF WRT15 «, t00=0x0023, t01=0x00c2}
0x3778…37a8 Head {h00=0x002c, h01=0x0050, text=»WRT03 LD A4,DWTCO2,A6 GET ACTUAL COLUMN«, t00=0x0023, t01=0x00d4}
0x37a8…37d6 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x0023, t01=0x0104}
0x37d6…3818 Head {h00=0x003e, h01=0x0050, text=» SC A2,DWTACD,A6 STORE THE VALUE IN ACTUAL COLUMN DOC. DI «, t00=0x0023, t01=0x0132}
0x3818…3866 Head {h00=0x004a, h01=0x0050, text=» SC A4,DWTACD+2,A6 STORE THE VALUE IN ACTUAL COLUMN DOC.DISPLACEMENT «, t00=0x0023, t01=0x0174}
0x3866…3878 Head {h00=0x000e, h01=0x0050, text=» SRL A4,8 «, t00=0x0024, t01=0x0032}
0x3878…38ac Head {h00=0x0030, h01=0x0050, text=» SC A4,DWTACD+1,A6 SHIFT FOR CORRECT DIGITS «, t00=0x0024, t01=0x0044}
0x38ac…38d0 Head {h00=0x0020, h01=0x0050, text=»WRT09 LDK A2,/20 SEND SPACE «, t00=0x0024, t01=0x0078}
0x38d0…38e6 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0024, t01=0x009c}
0x38e6…3904 Head {h00=0x001a, h01=0x0050, text=» LDKL A2,CSREP REPEAT «, t00=0x0024, t01=0x00b2}
0x3904…393e Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTACD ACTUAL COLUMN DOCUMENT DISPLACEMENT«, t00=0x0024, t01=0x00d0}
0x393e…395e Head {h00=0x001c, h01=0x0050, text=» CF A5,SEND SEND REPEAT «, t00=0x0024, t01=0x010a}
0x395e…398a Head {h00=0x0028, h01=0x0050, text=» LDK A3,2 SET UP ECB BUFFER POINTER «, t00=0x0024, t01=0x012a}
0x398a…399c Head {h00=0x000e, h01=0x0050, text=» RF WRT15 «, t00=0x0024, t01=0x0156}
0x399c…39c8 Head {h00=0x0028, h01=0x0050, text=»WRT08 LC A1,DWTLFD,A6 GET INDICATOR «, t00=0x0024, t01=0x0168}
0x39c8…39f4 (37, 0, 400) Head {h00=0x0028, h01=0x0050, text=» ANK A1,/8 IS LINE/FORM FEED DONE ? «, t00=0x0025, t01=0x0004}
0x39f4…3a0e Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRT14 YES «, t00=0x0025, t01=0x0030}
0x3a0e…3a38 Head {h00=0x0026, h01=0x0050, text=»WRT02 LC A1,DWTOR+1,A6 DOCUMENT ? «, t00=0x0025, t01=0x004a}
0x3a38…3a4c Head {h00=0x0010, h01=0x0050, text=» ANK A1,1 * «, t00=0x0025, t01=0x0074}
0x3a4c…3a64 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRT13 NO «, t00=0x0025, t01=0x0088}
0x3a64…3a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00a0}
0x3a6e…3a92 Head {h00=0x0020, h01=0x0050, text=» CWK A2,/30 TWO LINE FEED ? «, t00=0x0025, t01=0x00aa}
0x3a92…3aac Head {h00=0x0016, h01=0x0050, text=» RF(E) WRT11 YES «, t00=0x0025, t01=0x00ce}
0x3aac…3ab6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00e8}
0x3ab6…3ad6 Head {h00=0x001c, h01=0x0050, text=» CWK A2,/31 FORM FEED ? «, t00=0x0025, t01=0x00f2}
0x3ad6…3af0 Head {h00=0x0016, h01=0x0050, text=» RF(E) WRT12 YES «, t00=0x0025, t01=0x0112}
0x3af0…3b04 Head {h00=0x0010, h01=0x0050, text=» RF WRT16 * «, t00=0x0025, t01=0x012c}
0x3b04…3b32 Head {h00=0x002a, h01=0x0050, text=»WRT11 LD A1,DWTRLN,A6 GET REQ LINE NO «, t00=0x0025, t01=0x0140}
0x3b32…3b5e Head {h00=0x0028, h01=0x0050, text=» CF A5,BINARY CONV ASCII TO BINARY «, t00=0x0025, t01=0x016e}
0x3b5e…3b82 Head {h00=0x0020, h01=0x0050, text=» SUK A3,1 INCR REQ LINE NO «, t00=0x0026, t01=0x000a}
0x3b82…3ba0 Head {h00=0x001a, h01=0x0050, text=» RF TWO TWO LINE FEED «, t00=0x0026, t01=0x002e}
0x3ba0…3bce Head {h00=0x002a, h01=0x0050, text=»WRT16 LD A1,DWTRLN,A6 GET REQ LINE NO «, t00=0x0026, t01=0x004c}
0x3bce…3bfa Head {h00=0x0028, h01=0x0050, text=» CF A5,BINARY CONV ASCII TO BINARY «, t00=0x0026, t01=0x007a}
0x3bfa…3c20 Head {h00=0x0022, h01=0x0050, text=»TWO SUK A3,1 INCR REQ LINE NO «, t00=0x0026, t01=0x00a6}
0x3c20…3c36 Head {h00=0x0012, h01=0x0050, text=» LDR A4,A3 * «, t00=0x0026, t01=0x00cc}
0x3c36…3c62 Head {h00=0x0028, h01=0x0050, text=» CF A5,KONVER CONV BINARY TO ASCII «, t00=0x0026, t01=0x00e2}
0x3c62…3c8e Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTRLN,A6 STORE REQ LINE NO «, t00=0x0026, t01=0x010e}
0x3c8e…3c98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x013a}
0x3c98…3cc8 Head {h00=0x002c, h01=0x0050, text=» LDKL A2,CSVPFF VERTICAL POS FRONT FEED «, t00=0x0026, t01=0x0144}
0x3cc8…3cf8 Head {h00=0x002c, h01=0x0050, text=» LDK A3,DWTRLN REQ LINE NO DISPLACEMENT «, t00=0x0026, t01=0x0174}
0x3cf8…3d0e Head {h00=0x0012, h01=0x0050, text=» CF A5,SEND * «, t00=0x0027, t01=0x0014}
0x3d0e…3d18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x002a}
0x3d18…3d34 Head {h00=0x0018, h01=0x0050, text=» LD A4,DWTRLN,A6 * «, t00=0x0027, t01=0x0034}
0x3d34…3d64 Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTALN,A6 ACTUAL LINE =REQ LINE «, t00=0x0027, t01=0x0050}
0x3d64…3d76 Head {h00=0x000e, h01=0x0050, text=» RF WRT12 «, t00=0x0027, t01=0x0080}
0x3d76…3d80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0092}
0x3d80…3d8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x009c}
0x3d8a…3db8 Head {h00=0x002a, h01=0x0050, text=»WRT13 CWK A2,/30 CONTINOUS STATIONARY «, t00=0x0027, t01=0x00a6}
0x3db8…3de0 Head {h00=0x0024, h01=0x0050, text=» RF(E) WRT05 TWO LINE FEED,YES «, t00=0x0027, t01=0x00d4}
0x3de0…3dea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00fc}
0x3dea…3e0a Head {h00=0x001c, h01=0x0050, text=» CWK A2,/31 FORM FEED ? «, t00=0x0027, t01=0x0106}
0x3e0a…3e24 Head {h00=0x0016, h01=0x0050, text=» RF(NE) WRT10 NO «, t00=0x0027, t01=0x0126}
0x3e24…3e2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0140}
0x3e2e…3e50 Head {h00=0x001e, h01=0x0050, text=» LDK A2,FF SEND FORM FEED «, t00=0x0027, t01=0x014a}
0x3e50…3e68 Head {h00=0x0014, h01=0x0050, text=» CF A5,OUTPUT * «, t00=0x0027, t01=0x016c}
0x3e68…3e7c Head {h00=0x0010, h01=0x0050, text=» RF WRT12 * «, t00=0x0027, t01=0x0184}
0x3e7c…3e86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0008}
0x3e86…3eac Head {h00=0x0022, h01=0x0050, text=»WRT05 LDK A2,LF SEND LINE FEED«, t00=0x0028, t01=0x0012}
0x3eac…3ec2 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0028, t01=0x0038}
0x3ec2…3ee8 Head {h00=0x0022, h01=0x0050, text=»WRT10 LDK A2,LF SEND LINE FEED«, t00=0x0028, t01=0x004e}
0x3ee8…3efe Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0028, t01=0x0074}
0x3efe…3f2a Head {h00=0x0028, h01=0x0050, text=»WRT12 LC A1,DWTLFD,A6 GET INDICATOR «, t00=0x0028, t01=0x008a}
0x3f2a…3f5a Head {h00=0x002c, h01=0x0050, text=» ORK A1,/4 INDICATE LINE/FORM FEED DONE «, t00=0x0028, t01=0x00b6}
0x3f5a…3f84 Head {h00=0x0026, h01=0x0050, text=» SC A1,DWTLFD,A6 STORE INDICATOR «, t00=0x0028, t01=0x00e6}
0x3f84…3fb0 Head {h00=0x0028, h01=0x0050, text=»WRT14 LC A2,DWTOR+1,A6 GET DWT INDEX«, t00=0x0028, t01=0x0110}
0x3fb0…3fcc Head {h00=0x0018, h01=0x0050, text=» ANK A2,1 DOCUMENT? «, t00=0x0028, t01=0x013c}
0x3fcc…3fe6 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT45 YES «, t00=0x0028, t01=0x0158}
0x3fe6…4018 Head {h00=0x002e, h01=0x0050, text=» CM DWTCO1,A6 CLEAR PAPER COLUMN COUNTER 1«, t00=0x0028, t01=0x0172}
0x4018…4052 Head {h00=0x0036, h01=0x0050, text=»WRT45 CM DWTCO2,A6 CLEAR DOCUMENT COLUMN COUNTER 2«, t00=0x0029, t01=0x0014}
0x4052…405c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x004e}
0x405c…4066 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0058}
0x4066…406e Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0062}
0x406e…4088 Head {h00=0x0016, h01=0x0050, text=»WRT15 LDK A3,2 * «, t00=0x0029, t01=0x006a}
0x4088…409c Head {h00=0x0010, h01=0x0050, text=» RF WRT20 * «, t00=0x0029, t01=0x0084}
0x409c…40ce Head {h00=0x002e, h01=0x0050, text=»WRT17 SUK A3,/02 ECB BUFFER POINTER = /02 «, t00=0x0029, t01=0x0098}
0x40ce…40e8 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRT18 YES. «, t00=0x0029, t01=0x00ca}
0x40e8…4114 Head {h00=0x0028, h01=0x0050, text=» LDK A2,CR NO. SEND CARRIAGE RETURN «, t00=0x0029, t01=0x00e4}
0x4114…412a Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0029, t01=0x0110}
0x412a…4150 Head {h00=0x0022, h01=0x0050, text=»WRT18 CF A5,GTSTAT GET STATUS «, t00=0x0029, t01=0x0126}
0x4150…416e Head {h00=0x001a, h01=0x0050, text=» RF ENDIO END REQUEST «, t00=0x0029, t01=0x014c}
0x416e…4178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x016a}
0x4178…41b2 Head {h00=0x0036, h01=0x0050, text=»WRT20 CF A15,GETCHR GET CHARACTER FRON ECB-BUFFER «, t00=0x0029, t01=0x0174}
0x41b2…41c4 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x002a, t01=0x001e}
0x41c4…41ec Head {h00=0x0024, h01=0x0050, text=» RB(NP) WRT17 NO MORE CHARACTERS«, t00=0x002a, t01=0x0030}
0x41ec…41fe Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x002a, t01=0x0058}
0x41fe…4208 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x006a}
0x4208…424c Head {h00=0x0040, h01=0x0050, text=»* EXAMINE CHARACTER AND SEND DEPENDING ON TYPE OF CHARACTER «, t00=0x002a, t01=0x0074}
0x424c…4256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00b8}
0x4256…425e Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x00c2}
0x425e…427e Head {h00=0x001c, h01=0x0050, text=» SUK A4,/20 CHAR < /20? «, t00=0x002a, t01=0x00ca}
0x427e…42aa Head {h00=0x0028, h01=0x0050, text=» RB(N) WRT20 YES GET A NEW CHARACTER«, t00=0x002a, t01=0x00ea}
0x42aa…42ca Head {h00=0x001c, h01=0x0050, text=» SUK A4,/5F CHAR < /7F? «, t00=0x002a, t01=0x0116}
0x42ca…42e4 Head {h00=0x0016, h01=0x0050, text=» RF(N) WRT25 YES. «, t00=0x002a, t01=0x0136}
0x42e4…4308 Head {h00=0x0020, h01=0x0050, text=» SUK A4,/2F NO. CHAR = /AE? «, t00=0x002a, t01=0x0150}
0x4308…4334 Head {h00=0x0028, h01=0x0050, text=» RF(Z) WRT30 YES. CONVERT /AE TO /2E«, t00=0x002a, t01=0x0174}
0x4334…436c Head {h00=0x0034, h01=0x0050, text=» LDK A4,/04 ILLEGAL CHARACTER SET BIT 13 IN R.C.«, t00=0x002b, t01=0x0010}
0x436c…4384 Head {h00=0x0014, h01=0x0050, text=» ORS A4,ECBRC,A8«, t00=0x002b, t01=0x0048}
0x4384…4396 Head {h00=0x000e, h01=0x0050, text=» RB WRT20 «, t00=0x002b, t01=0x0060}
0x4396…43ae Head {h00=0x0014, h01=0x0050, text=»WRT30 LDK A2,/2E«, t00=0x002b, t01=0x0072}
0x43ae…43c6 Head {h00=0x0014, h01=0x0050, text=»WRT25 LDR A4,A1 «, t00=0x002b, t01=0x008a}
0x43c6…43ea Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x002b, t01=0x00a2}
0x43ea…4412 Head {h00=0x0024, h01=0x0050, text=» LC A2,DWTOR+1,A6 GET DWT INDEX «, t00=0x002b, t01=0x00c6}
0x4412…442e Head {h00=0x0018, h01=0x0050, text=» ANK A2,1 DOCUMENT? «, t00=0x002b, t01=0x00ee}
0x442e…4448 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT40 YES «, t00=0x002b, t01=0x010a}
0x4448…4472 Head {h00=0x0026, h01=0x0050, text=» IM DWTCO1,A6 INC.COLUMN COUNTER 1«, t00=0x002b, t01=0x0124}
0x4472…4484 Head {h00=0x000e, h01=0x0050, text=» RB WRT20 «, t00=0x002b, t01=0x014e}
0x4484…44b4 Head {h00=0x002c, h01=0x0050, text=»WRT40 IM DWTCO2,A6 INC.COLUMN COUNTER 2 «, t00=0x002b, t01=0x0160}
0x44b4…44c6 Head {h00=0x000e, h01=0x0050, text=» RB WRT20 «, t00=0x002b, t01=0x0190}
0x44c6…44da Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x002c, t01=0x0012}
0x44da…44f6 Head {h00=0x0018, h01=0x0050, text=» LC A2,DWTLFD,A6 * «, t00=0x002c, t01=0x0026}
0x44f6…450c Head {h00=0x0012, h01=0x0050, text=» ANK A2,/8 * «, t00=0x002c, t01=0x0042}
0x450c…4536 Head {h00=0x0026, h01=0x0050, text=» SC A2,DWTLFD,A6 RESET LF/FF IND. «, t00=0x002c, t01=0x0058}
0x4536…4556 Head {h00=0x001c, h01=0x0050, text=» ABL DISEND END REQUEST «, t00=0x002c, t01=0x0082}
0x4556…455e Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x00a2}
0x455e…4568 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x002c, t01=0x00aa}
0x4568…457c Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x002c, t01=0x00b4}
0x457c…4586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00c8}
0x4586…4590 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00d2}
0x4590…45b8 Head {h00=0x0024, h01=0x0050, text=»* ORDER 0B : POSITION DOCUMENT«, t00=0x002c, t01=0x00dc}
0x45b8…45ec Head {h00=0x0030, h01=0x0050, text=»* CONTROL WORD CONTAINS REQUESTED LINE NO «, t00=0x002c, t01=0x0104}
0x45ec…45f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0138}
0x45f6…4600 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0142}
0x4600…4626 Head {h00=0x0022, h01=0x0050, text=»POSDOC EQU * POSITION DOCUMENT«, t00=0x002c, t01=0x014c}
0x4626…463c Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x002c, t01=0x0172}
0x463c…4664 Head {h00=0x0024, h01=0x0050, text=» CF A5,GTSTAT GET DEVICE STATUS «, t00=0x002c, t01=0x0188}
0x4664…4684 Head {h00=0x001c, h01=0x0050, text=» LDK A3,1 NOT OPERABLE «, t00=0x002d, t01=0x0020}
0x4684…4698 Head {h00=0x0010, h01=0x0050, text=» TM A1,A3 * «, t00=0x002d, t01=0x0040}
0x4698…46b4 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) POS020 YES «, t00=0x002d, t01=0x0054}
0x46b4…46e2 Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CSSNV SELECT NATIONAL VERSION«, t00=0x002d, t01=0x0070}
0x46e2…470a Head {h00=0x0024, h01=0x0050, text=» LDK A3,DWTDCS DOCUMENT VERSION «, t00=0x002d, t01=0x009e}
0x470a…4726 Head {h00=0x0018, h01=0x0050, text=» CF A5,SEND SEND SNV«, t00=0x002d, t01=0x00c6}
0x4726…4736 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x002d, t01=0x00e2}
0x4736…4746 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x002d, t01=0x00f2}
0x4746…4756 Head {h00=0x000c, h01=0x0050, text=» * =1 «, t00=0x002d, t01=0x0102}
0x4756…4780 Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBCW,A8 GET REQUESTED LINE«, t00=0x002d, t01=0x0112}
0x4780…4794 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x002d, t01=0x013c}
0x4794…47be Head {h00=0x0026, h01=0x0050, text=» RF(Z) POSERR ILLEGAL LINE NUMBER «, t00=0x002d, t01=0x0150}
0x47be…47e0 Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTDL,A6 MAX. LINE «, t00=0x002d, t01=0x017a}
0x47e0…480e Head {h00=0x002a, h01=0x0050, text=» CF A5,BINARY CONVERT ASCII TO BINARY «, t00=0x002e, t01=0x000c}
0x480e…4834 Head {h00=0x0022, h01=0x0050, text=» CWR A4,A3 REQ. LINE>MAX. LINE«, t00=0x002e, t01=0x003a}
0x4834…484e Head {h00=0x0016, h01=0x0050, text=» RF(G) POSERR YES «, t00=0x002e, t01=0x0060}
0x484e…4870 Head {h00=0x001e, h01=0x0050, text=» ADK A3,1 CORRECT POSITION«, t00=0x002e, t01=0x007a}
0x4870…4892 Head {h00=0x001e, h01=0x0050, text=» SUR A4,A3 INVERT LINE NO.«, t00=0x002e, t01=0x009c}
0x4892…48be Head {h00=0x0028, h01=0x0050, text=» NGR A4,A4 GET PRINTER REQ. LINE NO.«, t00=0x002e, t01=0x00be}
0x48be…48ec Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x002e, t01=0x00ea}
0x48ec…4918 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTRLN,A6 SET REQUESTED LINE «, t00=0x002e, t01=0x0118}
0x4918…4940 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTALN,A6 GET ACTUAL LINE«, t00=0x002e, t01=0x0144}
0x4940…4972 Head {h00=0x002e, h01=0x0050, text=» RF(NZ) POS030 DOCUMENT ALREADY POSITIONED«, t00=0x002e, t01=0x016c}
0x4972…4986 Head {h00=0x0010, h01=0x0050, text=»POS005 EQU *«, t00=0x002f, t01=0x000e}
0x4986…49ae Head {h00=0x0024, h01=0x0050, text=» LDKL A2,CSINFF INPUT FRONT FEED«, t00=0x002f, t01=0x0022}
0x49ae…49e8 Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTRLN REQUESTED LINE NUMBER DISPLACEMENT «, t00=0x002f, t01=0x004a}
0x49e8…4a12 Head {h00=0x0026, h01=0x0050, text=» CF A5,SEND SEND INPUT FRONT FEED «, t00=0x002f, t01=0x0084}
0x4a12…4a26 Head {h00=0x0010, h01=0x0050, text=»POS010 EQU *«, t00=0x002f, t01=0x00ae}
0x4a26…4a46 Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x002f, t01=0x00c2}
0x4a46…4a68 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x002f, t01=0x00e2}
0x4a68…4a94 Head {h00=0x0028, h01=0x0050, text=» ANKL A2,/2000 PAPER DOCUMENT OUT ? «, t00=0x002f, t01=0x0104}
0x4a94…4ad0 Head {h00=0x0038, h01=0x0050, text=» RB(NZ) POS005 YES WAIT FOR DOCUMENT TO BE INSERTED «, t00=0x002f, t01=0x0130}
0x4ad0…4afc Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTRLN,A6 GET REQUESTED LINE «, t00=0x002f, t01=0x016c}
0x4afc…4b2c Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTALN,A6 ACTUAL LINE = REQ LINE «, t00=0x0030, t01=0x0008}
0x4b2c…4b3c Head {h00=0x000c, h01=0x0050, text=» * =2 «, t00=0x0030, t01=0x0038}
0x4b3c…4b56 Head {h00=0x0016, h01=0x0050, text=»POS020 ABL DISEND «, t00=0x0030, t01=0x0048}
0x4b56…4b6a Head {h00=0x0010, h01=0x0050, text=»POS030 EQU *«, t00=0x0030, t01=0x0062}
0x4b6a…4b9e Head {h00=0x0030, h01=0x0050, text=» LDKL A2,CSVPFF VERTICAL POSITION FRONT FEED«, t00=0x0030, t01=0x0076}
0x4b9e…4bd8 Head {h00=0x0036, h01=0x0050, text=» LDK A3,DWTRLN REQUESTED LINE NUMBER DISPLACEMENT «, t00=0x0030, t01=0x00aa}
0x4bd8…4c0e Head {h00=0x0032, h01=0x0050, text=» CF A5,SEND SEND VERTICAL POSITION FRONT FEED «, t00=0x0030, t01=0x00e4}
0x4c0e…4c20 Head {h00=0x000e, h01=0x0050, text=» RB POS010«, t00=0x0030, t01=0x011a}
0x4c20…4c34 Head {h00=0x0010, h01=0x0050, text=» XIF =2 =2 «, t00=0x0030, t01=0x012c}
0x4c34…4c48 Head {h00=0x0010, h01=0x0050, text=»POSERR EQU *«, t00=0x0030, t01=0x0140}
0x4c48…4c6c Head {h00=0x0020, h01=0x0050, text=» LDKL A1,/8000 REQUEST ERROR«, t00=0x0030, t01=0x0154}
0x4c6c…4c8a Head {h00=0x001a, h01=0x0050, text=» RB ENDIO END REQUEST «, t00=0x0030, t01=0x0178}
0x4c8a…4c94 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0031, t01=0x0008}
0x4c94…4ca8 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x0031, t01=0x0012}
0x4ca8…4cb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0026}
0x4cb2…4cbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0030}
0x4cbc…4ce8 Head {h00=0x0028, h01=0x0050, text=»* ORDER 24 : SET DOCUMENT PARAMETERS«, t00=0x0031, t01=0x003a}
0x4ce8…4cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0066}
0x4cf2…4cfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0070}
0x4cfc…4d24 Head {h00=0x0024, h01=0x0050, text=»DOCPAR EQU * DOCUMENT PARAMETERS«, t00=0x0031, t01=0x007a}
0x4d24…4d40 Head {h00=0x0018, h01=0x0050, text=» LDK A1,0 CLEAR A1 «, t00=0x0031, t01=0x00a2}
0x4d40…4d56 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x0031, t01=0x00be}
0x4d56…4d82 Head {h00=0x0028, h01=0x0050, text=» LD A4,ECBCW,A8 GET NUMBER OF LINES «, t00=0x0031, t01=0x00d4}
0x4d82…4d9e Head {h00=0x0018, h01=0x0050, text=» SRL A4,8 GET LINES «, t00=0x0031, t01=0x0100}
0x4d9e…4dc6 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DOC010 NO CHANGE OF LINES«, t00=0x0031, t01=0x011c}
0x4dc6…4de6 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/10 INDEX TO BIG«, t00=0x0031, t01=0x0144}
0x4de6…4e00 Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0031, t01=0x0164}
0x4e00…4e2e Head {h00=0x002a, h01=0x0050, text=» ADR A4,A4 ADJUST INDEX TO LINE TABLE «, t00=0x0031, t01=0x017e}
0x4e2e…4e62 Head {h00=0x0030, h01=0x0050, text=» LD A4,LINNUM,A4 GET LINE ACCORDING TO INDEX«, t00=0x0032, t01=0x001c}
0x4e62…4e96 Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTDL,A6 SET PAGE LENGTH FOR DOCUMENT«, t00=0x0032, t01=0x0050}
0x4e96…4eaa Head {h00=0x0010, h01=0x0050, text=»DOC010 EQU *«, t00=0x0032, t01=0x0084}
0x4eaa…4ee2 Head {h00=0x0034, h01=0x0050, text=» LD A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION«, t00=0x0032, t01=0x0098}
0x4ee2…4ef6 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0032, t01=0x00d0}
0x4ef6…4f30 Head {h00=0x0036, h01=0x0050, text=» RF(Z) DOC020 NO CHANGE OF NATIONAL CHARACTER SET «, t00=0x0032, t01=0x00e4}
0x4f30…4f50 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/F INDEX TO BIG «, t00=0x0032, t01=0x011e}
0x4f50…4f6a Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0032, t01=0x013e}
0x4f6a…4f90 Head {h00=0x0022, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE INDEX «, t00=0x0032, t01=0x0158}
0x4f90…4fca Head {h00=0x0036, h01=0x0050, text=» LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACC. TO INDEX «, t00=0x0032, t01=0x017e}
0x4fca…5002 Head {h00=0x0034, h01=0x0050, text=» ST A4,DWTDCS,A6 SET CHARACTER SET FOR DOCUMENT «, t00=0x0033, t01=0x0028}
0x5002…5016 Head {h00=0x0010, h01=0x0050, text=»DOC020 EQU *«, t00=0x0033, t01=0x0060}
0x5016…5034 Head {h00=0x001a, h01=0x0050, text=» RB ENDIO END REQUEST «, t00=0x0033, t01=0x0074}
0x5034…5040 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0092}
0x5040…504a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0033, t01=0x009e}
0x504a…5054 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00a8}
0x5054…505e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00b2}
0x505e…5098 Head {h00=0x0036, h01=0x0050, text=»* ORDER 24 : SET CONTINUOUS STATIONARY PARAMETERS «, t00=0x0033, t01=0x00bc}
0x5098…50a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00f6}
0x50a2…50ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0100}
0x50ac…50e6 Head {h00=0x0036, h01=0x0050, text=»CSTPAR EQU * SET PARAMETERS CONTINUOUS STATIONARY «, t00=0x0033, t01=0x010a}
0x50e6…5102 Head {h00=0x0018, h01=0x0050, text=» LDK A1,0 CLEAR A1 «, t00=0x0033, t01=0x0144}
0x5102…5118 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x0033, t01=0x0160}
0x5118…5148 Head {h00=0x002c, h01=0x0050, text=» LD A4,ECBCW,A8 GET NUMBER OF LINES CST.«, t00=0x0033, t01=0x0176}
0x5148…5164 Head {h00=0x0018, h01=0x0050, text=» SRL A4,8 GET LINES «, t00=0x0034, t01=0x0016}
0x5164…518c Head {h00=0x0024, h01=0x0050, text=» RF(Z) CST010 NO CHANGE OF LINES«, t00=0x0034, t01=0x0032}
0x518c…51ac Head {h00=0x001c, h01=0x0050, text=» CWK A4,/10 INDEX TO BIG«, t00=0x0034, t01=0x005a}
0x51ac…51c6 Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0034, t01=0x007a}
0x51c6…51f4 Head {h00=0x002a, h01=0x0050, text=» ADR A4,A4 ADJUST INDEX TO LINE TABLE «, t00=0x0034, t01=0x0094}
0x51f4…522a Head {h00=0x0032, h01=0x0050, text=» LD A4,LINNUM,A4 GET LINES ACCORDING TO INDEX «, t00=0x0034, t01=0x00c2}
0x522a…5260 Head {h00=0x0032, h01=0x0050, text=» ST A4,DWTPL,A6 SET PAGE LENGTH FOR CONT.STAT.«, t00=0x0034, t01=0x00f8}
0x5260…528c Head {h00=0x0028, h01=0x0050, text=» LDKL A2,CSSLPL SELECT PAGELENGTH =1«, t00=0x0034, t01=0x012e}
0x528c…52c0 Head {h00=0x0030, h01=0x0050, text=» LDK A3,DWTPL PRINTER PAPER LENGTH DISPL. =1«, t00=0x0034, t01=0x015a}
0x52c0…52ee Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND SELECT PAGELENGTH =1 «, t00=0x0034, t01=0x018e}
0x52ee…5302 Head {h00=0x0010, h01=0x0050, text=»CST010 EQU *«, t00=0x0035, t01=0x002c}
0x5302…533a Head {h00=0x0034, h01=0x0050, text=» LD A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION«, t00=0x0035, t01=0x0040}
0x533a…534e Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0035, t01=0x0078}
0x534e…5380 Head {h00=0x002e, h01=0x0050, text=» RF(Z) CST020 NO CHANGE OF NAT. CHAR. SET «, t00=0x0035, t01=0x008c}
0x5380…53a0 Head {h00=0x001c, h01=0x0050, text=» CWK A4,/F INDEX TO BIG «, t00=0x0035, t01=0x00be}
0x53a0…53ba Head {h00=0x0016, h01=0x0050, text=» RB(G) POSERR YES «, t00=0x0035, t01=0x00de}
0x53ba…53ee Head {h00=0x0030, h01=0x0050, text=» ADR A4,A4 ADJUST INDEX TO NAT. CHAR. TABLE «, t00=0x0035, t01=0x00f8}
0x53ee…5428 Head {h00=0x0036, h01=0x0050, text=» LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACC. TO INDEX «, t00=0x0035, t01=0x012c}
0x5428…5462 Head {h00=0x0036, h01=0x0050, text=» ST A4,DWTPCS,A6 SET NAT. CHAR. SET FOR CONT.STAT.«, t00=0x0035, t01=0x0166}
0x5462…5476 Head {h00=0x0010, h01=0x0050, text=»CST020 EQU *«, t00=0x0036, t01=0x0010}
0x5476…5494 Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x0036, t01=0x0024}
0x5494…549e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0042}
0x549e…54a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x004c}
0x54a8…54b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0056}
0x54b2…54bc Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0036, t01=0x0060}
0x54bc…54d0 Head {h00=0x0010, h01=0x0050, text=» IFT FFDEV=1«, t00=0x0036, t01=0x006a}
0x54d0…54da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x007e}
0x54da…54e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0088}
0x54e4…550a Head {h00=0x0022, h01=0x0050, text=»* ORDER 38 : RELEASE DOCUMENT «, t00=0x0036, t01=0x0092}
0x550a…5514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00b8}
0x5514…551e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00c2}
0x551e…5532 Head {h00=0x0010, h01=0x0050, text=»RELDOC EQU *«, t00=0x0036, t01=0x00cc}
0x5532…5548 Head {h00=0x0012, h01=0x0050, text=» CF A5,RESREC «, t00=0x0036, t01=0x00e0}
0x5548…557a Head {h00=0x002e, h01=0x0050, text=» LDKL A2,CSEJFF CONTROL SEQ. FRONT FEED «, t00=0x0036, t01=0x00f6}
0x557a…559c Head {h00=0x001e, h01=0x0050, text=» CF A5,SEND SEND SEQUENCE «, t00=0x0036, t01=0x0128}
0x559c…55ca Head {h00=0x002a, h01=0x0050, text=» CF A5,GTSTAT GET STATUS FROM PRINTER «, t00=0x0036, t01=0x014a}
0x55ca…55ec Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x0036, t01=0x0178}
0x55ec…5612 Head {h00=0x0022, h01=0x0050, text=» ANK A2,/20 DOCUMENT RELEASED «, t00=0x0037, t01=0x000a}
0x5612…5638 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RELDOC NO , TRY AGAIN «, t00=0x0037, t01=0x0030}
0x5638…565c Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/8000 REQUEST ERROR«, t00=0x0037, t01=0x0056}
0x565c…5684 Head {h00=0x0024, h01=0x0050, text=» CM DWTALN,A6 RESET ACTUAL LINE «, t00=0x0037, t01=0x007a}
0x5684…56ae Head {h00=0x0026, h01=0x0050, text=» CM DWTRLN,A6 RESET REQUESTED LINE«, t00=0x0037, t01=0x00a2}
0x56ae…56cc Head {h00=0x001a, h01=0x0050, text=» ABL ENDIO END REQUEST«, t00=0x0037, t01=0x00cc}
0x56cc…56d8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x00ea}
0x56d8…56e2 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0037, t01=0x00f6}
0x56e2…56ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0100}
0x56ec…56f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x010a}
0x56f6…5708 Head {h00=0x000e, h01=0x0050, text=»* I H T P «, t00=0x0037, t01=0x0114}
0x5708…5712 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0126}
0x5712…571c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0130}
0x571c…574e Head {h00=0x002e, h01=0x0050, text=»* INTERRUPT HANDLER : PROCESS OF INTERRUPT«, t00=0x0037, t01=0x013a}
0x574e…5758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x016c}
0x5758…5762 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0176}
0x5762…576c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0180}
0x576c…577e Head {h00=0x000e, h01=0x0050, text=»IHTP EQU *«, t00=0x0037, t01=0x018a}
0x577e…57a2 Head {h00=0x0020, h01=0x0050, text=» LD A4,DWTST,A6 I/O-REQUEST «, t00=0x0038, t01=0x000c}
0x57a2…57c6 Head {h00=0x0020, h01=0x0050, text=» ABL(N) TDISP NO , DISPATCH «, t00=0x0038, t01=0x0030}
0x57c6…57f0 Head {h00=0x0026, h01=0x0050, text=» ABL LDREG RETURN TO READ ROUTINE «, t00=0x0038, t01=0x0054}
0x57f0…57fa Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0038, t01=0x007e}
0x57fa…5804 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0088}
0x5804…580e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0092}
0x580e…5820 Head {h00=0x000e, h01=0x0050, text=»* R C T P«, t00=0x0038, t01=0x009c}
0x5820…582a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00ae}
0x582a…5868 Head {h00=0x003a, h01=0x0050, text=»* RECOVERY ROUTINE REPEATS RUNNING REQUEST AT POWER ON«, t00=0x0038, t01=0x00b8}
0x5868…5872 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00f6}
0x5872…587c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0100}
0x587c…588e Head {h00=0x000e, h01=0x0050, text=»RCTP EQU *«, t00=0x0038, t01=0x010a}
0x588e…58b0 Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0038, t01=0x011c}
0x58b0…58d8 Head {h00=0x0024, h01=0x0050, text=» LC A4,DWTLFD,A6 GET INDICATOR «, t00=0x0038, t01=0x013e}
0x58d8…58e0 Head {h00=0x0004, h01=0x0050, t00=0x0038, t01=0x0166}
0x58e0…590c Head {h00=0x0028, h01=0x0050, text=» ANK A4,/4 IS LINE/FORM FEED DONE ? «, t00=0x0038, t01=0x016e}
0x590c…5928 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) RCTP05 YES «, t00=0x0039, t01=0x000a}
0x5928…595c Head {h00=0x0030, h01=0x0050, text=» ORK A4,/8 INDICATE:NO LINE/FORM FEED DONE «, t00=0x0039, t01=0x0026}
0x595c…59a2 Head {h00=0x0042, h01=0x0050, text=» SC A4,DWTLFD,A6 * * «, t00=0x0039, t01=0x005a}
0x59a2…59e2 Head {h00=0x003c, h01=0x0050, text=» RF RCTP07 * * «, t00=0x0039, t01=0x00a0}
0x59e2…5a0c Head {h00=0x0026, h01=0x0050, text=»RCTP05 LDK A4,0 RESET INDICATORS «, t00=0x0039, t01=0x00e0}
0x5a0c…5a28 Head {h00=0x0018, h01=0x0050, text=» ST A4,DWTLFD,A6 * «, t00=0x0039, t01=0x010a}
0x5a28…5a56 Head {h00=0x002a, h01=0x0050, text=»RCTP07 LDKL A1,/7FFF SET DEVICE BUSY «, t00=0x0039, t01=0x0126}
0x5a56…5a74 Head {h00=0x001a, h01=0x0050, text=» ANS A1,DWTST,A6 BUSY «, t00=0x0039, t01=0x0154}
0x5a74…5aa2 Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CSRIS RESET TO INITIAL STATE «, t00=0x0039, t01=0x0172}
0x5aa2…5ad2 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND RESET TO INITIAL STATE «, t00=0x003a, t01=0x0010}
0x5ad2…5b06 Head {h00=0x0030, h01=0x0050, text=» LD A1,DWTSYST,A6 INTERN. SYSTEM START IND. «, t00=0x003a, t01=0x0040}
0x5b06…5b2e Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RCTP10 NO SYSTEM START «, t00=0x003a, t01=0x0074}
0x5b2e…5b3c Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x003a, t01=0x009c}
0x5b3c…5b6e Head {h00=0x002e, h01=0x0050, text=» IM DWTSYST,A6 SET SYSTEM START INDICATOR «, t00=0x003a, t01=0x00aa}
0x5b6e…5b7c Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x003a, t01=0x00dc}
0x5b7c…5bb0 Head {h00=0x0030, h01=0x0050, text=» LDKL A4,STDNCV GET STANDARD NAT. CHAR. SET «, t00=0x003a, t01=0x00ea}
0x5bb0…5bde Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BIANARY TO ASCII«, t00=0x003a, t01=0x011e}
0x5bde…5c0e Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTDCS,A6 SET CHAR. SET DOCUMENT «, t00=0x003a, t01=0x014c}
0x5c0e…5c40 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTPCS,A6 SET CHAR. SET CONT.STAT. «, t00=0x003a, t01=0x017c}
0x5c40…5c6c Head {h00=0x0028, h01=0x0050, text=» LDKL A4,PAGLEN STANDARD PAGE LENGTH«, t00=0x003b, t01=0x001e}
0x5c6c…5c9a Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x003b, t01=0x004a}
0x5c9a…5ccc Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTPL,A6 SET PAGE LENGTH CONT.STAT.«, t00=0x003b, t01=0x0078}
0x5ccc…5cf8 Head {h00=0x0028, h01=0x0050, text=» LDKL A2,CSSLPL SELECT PAGELENGTH =1«, t00=0x003b, t01=0x00aa}
0x5cf8…5d2c Head {h00=0x0030, h01=0x0050, text=» LDK A3,DWTPL PRINTER PAPER LENGTH DISPL. =1«, t00=0x003b, t01=0x00d6}
0x5d2c…5d5a Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND SELECT PAGELENGTH =1 «, t00=0x003b, t01=0x010a}
0x5d5a…5d94 Head {h00=0x0036, h01=0x0050, text=» LDKL A4,DOCLEN GET STANDARD PAGE LENGTH DOCUMENT «, t00=0x003b, t01=0x0138}
0x5d94…5dc2 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x003b, t01=0x0172}
0x5dc2…5df2 Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTDL,A6 SET PAGE LENGTH DOCUMENT«, t00=0x003c, t01=0x0010}
0x5df2…5e06 Head {h00=0x0010, h01=0x0050, text=»RCTP10 EQU *«, t00=0x003c, t01=0x0040}
0x5e06…5e2e Head {h00=0x0024, h01=0x0050, text=» CM DWTALN,A6 RESET ACTUAL LINE «, t00=0x003c, t01=0x0054}
0x5e2e…5e5e Head {h00=0x002c, h01=0x0050, text=» LDKL A1,/200 INDICATE POWER OFF OCCURED«, t00=0x003c, t01=0x007c}
0x5e5e…5e78 Head {h00=0x0016, h01=0x0050, text=» ORS A1,DWTST,A6 «, t00=0x003c, t01=0x00ac}
0x5e78…5ea0 Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTECB,A6 RUNNING REQUEST«, t00=0x003c, t01=0x00c6}
0x5ea0…5ed0 Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) ACT005 YES , REPEAT THE REQUEST«, t00=0x003c, t01=0x00ee}
0x5ed0…5eec Head {h00=0x0018, h01=0x0050, text=» ABL DISEND DISPATCH«, t00=0x003c, t01=0x011e}
0x5eec…5ef6 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x003c, t01=0x013a}
0x5ef6…5f00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0144}
0x5f00…5f0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x014e}
0x5f0a…5f1a Head {h00=0x000c, h01=0x0050, text=»* GTSTAT«, t00=0x003c, t01=0x0158}
0x5f1a…5f24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0168}
0x5f24…5f2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0172}
0x5f2e…5f70 Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE SENDS 'DEVICE STATUS REPORT TO THE PRINTER «, t00=0x003c, t01=0x017c}
0x5f70…5f7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x002e}
0x5f7a…5fb8 Head {h00=0x003a, h01=0x0050, text=»* AND ANALYZES THE DEVICE STATUS SENT FROM THE PRINTER«, t00=0x003d, t01=0x0038}
0x5fb8…5fc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0076}
0x5fc2…5fe4 Head {h00=0x001e, h01=0x0050, text=»* AT EXIT A1 = RETURN CODE«, t00=0x003d, t01=0x0080}
0x5fe4…5fee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00a2}
0x5fee…5ff8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00ac}
0x5ff8…600c Head {h00=0x0010, h01=0x0050, text=»GTSTAT EQU *«, t00=0x003d, t01=0x00b6}
0x600c…6032 Head {h00=0x0022, h01=0x0050, text=» CM DWTRC,A6 RESET RETURN CODE«, t00=0x003d, t01=0x00ca}
0x6032…604e Head {h00=0x0018, h01=0x0050, text=» LDK A2,ESC ESCAPE «, t00=0x003d, t01=0x00f0}
0x604e…606c Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND ESC«, t00=0x003d, t01=0x010c}
0x606c…609c Head {h00=0x002c, h01=0x0050, text=» LDK A2,CSI CONTROL SEQUENCE INTRODUCER «, t00=0x003d, t01=0x012a}
0x609c…60ba Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND CSI«, t00=0x003d, t01=0x015a}
0x60ba…60ce Head {h00=0x0010, h01=0x0050, text=» LDK A2,/35 «, t00=0x003d, t01=0x0178}
0x60ce…60ec Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND /35«, t00=0x003d, t01=0x018c}
0x60ec…6114 Head {h00=0x0024, h01=0x0050, text=» LDK A2,DSR DEVICE STATUS REPORT«, t00=0x003e, t01=0x001a}
0x6114…6132 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND DSR«, t00=0x003e, t01=0x0042}
0x6132…6146 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x003e, t01=0x0060}
0x6146…615c Head {h00=0x0012, h01=0x0050, text=» ANK A2,/F * «, t00=0x003e, t01=0x0074}
0x615c…617a Head {h00=0x001a, h01=0x0050, text=» CWK A2,/C PTS 8000 ? «, t00=0x003e, t01=0x008a}
0x617a…6192 Head {h00=0x0014, h01=0x0050, text=» RF(L) GTST05 NO«, t00=0x003e, t01=0x00a8}
0x6192…61ae Head {h00=0x0018, h01=0x0050, text=» SUK A2,/F SALCUZ ? «, t00=0x003e, t01=0x00c0}
0x61ae…61c8 Head {h00=0x0016, h01=0x0050, text=» RF(Z) GTST05 YES «, t00=0x003e, t01=0x00dc}
0x61c8…61e8 Head {h00=0x001c, h01=0x0050, text=» LDK A2,ETX END OF TEXT «, t00=0x003e, t01=0x00f6}
0x61e8…6206 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND ETX«, t00=0x003e, t01=0x0116}
0x6206…6232 Head {h00=0x0028, h01=0x0050, text=»GTST05 LDKL A4,TAB GET TABLE ADDRESS«, t00=0x003e, t01=0x0134}
0x6232…6246 Head {h00=0x0010, h01=0x0050, text=»GTST10 EQU *«, t00=0x003e, t01=0x0160}
0x6246…6270 Head {h00=0x0026, h01=0x0050, text=» LDR A3,A4 A4 WIRD NOCH GEBRAUCHT «, t00=0x003e, t01=0x0174}
0x6270…6296 Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTTP,A6 UHR LAUEFT ???«, t00=0x003f, t01=0x000e}
0x6296…62b2 Head {h00=0x0018, h01=0x0050, text=» RF(E) ZEIT01 NEIN !«, t00=0x003f, t01=0x0034}
0x62b2…62c8 Head {h00=0x0012, h01=0x0050, text=» LDKL A4,-ZEIT«, t00=0x003f, t01=0x0050}
0x62c8…62e0 Head {h00=0x0014, h01=0x0050, text=» ST* A4,DWTTP,A6«, t00=0x003f, t01=0x0066}
0x62e0…62f2 Head {h00=0x000e, h01=0x0050, text=» RF ZEIT02«, t00=0x003f, t01=0x007e}
0x62f2…6306 Head {h00=0x0010, h01=0x0050, text=»ZEIT01 EQU *«, t00=0x003f, t01=0x0090}
0x6306…631c Head {h00=0x0012, h01=0x0050, text=» LDKL A4,DWTTP«, t00=0x003f, t01=0x00a4}
0x631c…632e Head {h00=0x000e, h01=0x0050, text=» ADR A4,A6«, t00=0x003f, t01=0x00ba}
0x632e…6340 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x003f, t01=0x00cc}
0x6340…6356 Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIMP«, t00=0x003f, t01=0x00de}
0x6356…636e Head {h00=0x0014, h01=0x0050, text=» DATA ZAUS,ZEIT «, t00=0x003f, t01=0x00f4}
0x636e…6386 Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x003f, t01=0x010c}
0x6386…6390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0124}
0x6390…63c0 Head {h00=0x002c, h01=0x0050, text=»ZEIT02 LDR A4,A3 DANKE FUERS AUFHEBEN ! «, t00=0x003f, t01=0x012e}
0x63c0…63d2 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003f, t01=0x015e}
0x63d2…6400 Head {h00=0x002a, h01=0x0050, text=» CF A5,STREG READ STATUS FROM PRINTER «, t00=0x003f, t01=0x0170}
0x6400…6418 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTTP,A6 «, t00=0x0040, t01=0x000e}
0x6418…6446 Head {h00=0x002a, h01=0x0050, text=» RF(E) ZEIT03 ES LAUEFT KEINE UHR !!! «, t00=0x0040, t01=0x0026}
0x6446…645c Head {h00=0x0012, h01=0x0050, text=» LDKL A3,-ZEIT«, t00=0x0040, t01=0x0054}
0x645c…648c Head {h00=0x002c, h01=0x0050, text=» ST* A3,DWTTP,A6 ZIEH DIE UHR WIEDER AUF«, t00=0x0040, t01=0x006a}
0x648c…6496 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x009a}
0x6496…64aa Head {h00=0x0010, h01=0x0050, text=»ZEIT03 EQU *«, t00=0x0040, t01=0x00a4}
0x64aa…64cc Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FF GET CHARACTER «, t00=0x0040, t01=0x00b8}
0x64cc…64f4 Head {h00=0x0024, h01=0x0050, text=» CCK A2,/5C5C STRING TERMINATOR «, t00=0x0040, t01=0x00da}
0x64f4…650e Head {h00=0x0016, h01=0x0050, text=» RF(E) GTSEND YES «, t00=0x0040, t01=0x0102}
0x650e…6536 Head {h00=0x0024, h01=0x0050, text=» LCR A3,A4 GET MASK RETURN CODE «, t00=0x0040, t01=0x011c}
0x6536…6548 Head {h00=0x000e, h01=0x0050, text=» ANR A2,A3«, t00=0x0040, t01=0x0144}
0x6548…6576 Head {h00=0x002a, h01=0x0050, text=» LDKL A3,/3AC0 SHIFT LEFT CIRCULAR A2 «, t00=0x0040, t01=0x0156}
0x6576…6592 Head {h00=0x0018, h01=0x0050, text=» LC A3,1,A4 A3 TIMES«, t00=0x0040, t01=0x0184}
0x6592…65ba Head {h00=0x0024, h01=0x0050, text=» EXR A3 EXECUT SHIFT INSTRUCTION«, t00=0x0041, t01=0x0010}
0x65ba…65f0 Head {h00=0x0032, h01=0x0050, text=» ORS A2,DWTRC,A6 SAVE RETURN CODE TEMPORARILY «, t00=0x0041, t01=0x0038}
0x65f0…6612 Head {h00=0x001e, h01=0x0050, text=» ADK A4,2 INCREMENT ADRESS«, t00=0x0041, t01=0x006e}
0x6612…663e Head {h00=0x0028, h01=0x0050, text=» RB GTST10 GET NEXT STATUS CHARACTER«, t00=0x0041, t01=0x0090}
0x663e…6652 Head {h00=0x0010, h01=0x0050, text=»GTSEND EQU *«, t00=0x0041, t01=0x00bc}
0x6652…666a Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTTP,A6 «, t00=0x0041, t01=0x00d0}
0x666a…6694 Head {h00=0x0026, h01=0x0050, text=» RF(E) ZEIT04 ES LAUEFT KEINE UHR «, t00=0x0041, t01=0x00e8}
0x6694…66aa Head {h00=0x0012, h01=0x0050, text=» CM* DWTTP,A6 «, t00=0x0041, t01=0x0112}
0x66aa…66be Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0041, t01=0x0128}
0x66be…66d2 Head {h00=0x0010, h01=0x0050, text=»ZEIT04 EQU *«, t00=0x0041, t01=0x013c}
0x66d2…66dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0150}
0x66dc…66e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x015a}
0x66e6…670e Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTRC,A6 GET RETURN CODE «, t00=0x0041, t01=0x0164}
0x670e…671e Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0041, t01=0x018c}
0x671e…6728 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0042, t01=0x000c}
0x6728…6732 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0016}
0x6732…673c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0020}
0x673c…6762 Head {h00=0x0022, h01=0x0050, text=»* TIME OUT ROUTINE FUER LP 100«, t00=0x0042, t01=0x002a}
0x6762…676c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0050}
0x676c…6776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x005a}
0x6776…6788 Head {h00=0x000e, h01=0x0050, text=»ZAUS EQU *«, t00=0x0042, t01=0x0064}
0x6788…6792 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0076}
0x6792…67b8 Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 A6 WIEDERHERSTELLEN«, t00=0x0042, t01=0x0080}
0x67b8…67cc Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0042, t01=0x00a6}
0x67cc…67e4 Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB1 «, t00=0x0042, t01=0x00ba}
0x67e4…67f6 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0042, t01=0x00d2}
0x67f6…682c Head {h00=0x0032, h01=0x0050, text=» RB GTSTAT MIT VIEL BAUCHWEH !!!!!!!!!!!!!!!!!«, t00=0x0042, t01=0x00e4}
0x682c…6836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x011a}
0x6836…6840 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0124}
0x6840…684a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x012e}
0x684a…6854 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0042, t01=0x0138}
0x6854…685e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0142}
0x685e…689c Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE CONVERTS A BINARY VALUE TO ASCII CODE«, t00=0x0042, t01=0x014c}
0x689c…68a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x018a}
0x68a6…68bc (67, 0, 400) Head {h00=0x0012, h01=0x0050, text=»* REGISTERS : «, t00=0x0043, t01=0x0004}
0x68bc…68da Head {h00=0x001a, h01=0x0050, text=»* A1= WORK REGISTER «, t00=0x0043, t01=0x001a}
0x68da…68f6 Head {h00=0x0018, h01=0x0050, text=»* A4= BINARY INPUT«, t00=0x0043, t01=0x0038}
0x68f6…6916 Head {h00=0x001c, h01=0x0050, text=»* A2,A4= ASCII OUTPUT «, t00=0x0043, t01=0x0054}
0x6916…6920 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0074}
0x6920…692a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x007e}
0x692a…693e Head {h00=0x0010, h01=0x0050, text=»KONVER EQU *«, t00=0x0043, t01=0x0088}
0x693e…6956 Head {h00=0x0014, h01=0x0050, text=»* BINARY TO DEC.«, t00=0x0043, t01=0x009c}
0x6956…6970 Head {h00=0x0016, h01=0x0050, text=» LDK A2,0 CLEAR A2«, t00=0x0043, t01=0x00b4}
0x6970…6992 Head {h00=0x001e, h01=0x0050, text=» CWK A4,100 VALUE > 100 ? «, t00=0x0043, t01=0x00ce}
0x6992…69aa Head {h00=0x0014, h01=0x0050, text=» RF(L) KONV05 NO«, t00=0x0043, t01=0x00f0}
0x69aa…69be Head {h00=0x0010, h01=0x0050, text=» SUKL A4,100«, t00=0x0043, t01=0x0108}
0x69be…69e8 Head {h00=0x0026, h01=0x0050, text=» LDKL A2,/100 LEFT BYTE OF A2=X=1 «, t00=0x0043, t01=0x011c}
0x69e8…6a16 Head {h00=0x002a, h01=0x0050, text=»KONV05 CWK A4,10 ARE THERE ANY TENS ? «, t00=0x0043, t01=0x0146}
0x6a16…6a2e Head {h00=0x0014, h01=0x0050, text=» RF(L) KONV04 NO«, t00=0x0043, t01=0x0174}
0x6a2e…6a40 Head {h00=0x000e, h01=0x0050, text=» SUK A4,10«, t00=0x0043, t01=0x018c}
0x6a40…6a76 Head {h00=0x0032, h01=0x0050, text=» ADK A2,/1 NUMBER OF TENS IN RIGHT B. OF A2=Y «, t00=0x0044, t01=0x000e}
0x6a76…6a8e Head {h00=0x0014, h01=0x0050, text=» RB KONV05 NEXT «, t00=0x0044, t01=0x0044}
0x6a8e…6ab4 Head {h00=0x0022, h01=0x0050, text=»KONV04 ORKL A2,/3030 XY IN A2 «, t00=0x0044, t01=0x005c}
0x6ab4…6ad0 Head {h00=0x0018, h01=0x0050, text=» ORK A4,/30 Z IN A4 «, t00=0x0044, t01=0x0082}
0x6ad0…6aea Head {h00=0x0016, h01=0x0050, text=» SRC A2,8 YX IN A2«, t00=0x0044, t01=0x009e}
0x6aea…6afc Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0044, t01=0x00b8}
0x6afc…6b20 Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/FF00 KEEP Y IN A1 «, t00=0x0044, t01=0x00ca}
0x6b20…6b52 Head {h00=0x002e, h01=0x0050, text=» ANK A2,/FF KEEP X IN R. BYTE OF A2. ASCII«, t00=0x0044, t01=0x00ee}
0x6b52…6b74 Head {h00=0x001e, h01=0x0050, text=» ORR A4,A1 YZ IN A1. ASCII«, t00=0x0044, t01=0x0120}
0x6b74…6b84 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0044, t01=0x0142}
0x6b84…6b8e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0044, t01=0x0152}
0x6b8e…6b98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x015c}
0x6b98…6bb2 Head {h00=0x0016, h01=0x0050, text=»* RESET RECORVERY «, t00=0x0044, t01=0x0166}
0x6bb2…6bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0180}
0x6bbc…6bd0 Head {h00=0x0010, h01=0x0050, text=»RESREC EQU *«, t00=0x0044, t01=0x018a}
0x6bd0…6bf6 Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTST,A6 DEVICE STATUS «, t00=0x0045, t01=0x000e}
0x6bf6…6c16 Head {h00=0x001c, h01=0x0050, text=» ANKL A4,/200 RECOVERY? «, t00=0x0045, t01=0x0034}
0x6c16…6c30 Head {h00=0x0016, h01=0x0050, text=» RF(E) RESRTN NO. «, t00=0x0045, t01=0x0054}
0x6c30…6c60 Head {h00=0x002c, h01=0x0050, text=» XRS A4,DWTST,A6 YES. RESET RECOVERY BIT«, t00=0x0045, t01=0x006e}
0x6c60…6c7c Head {h00=0x0018, h01=0x0050, text=»RESRTN RTN A5 RETURN«, t00=0x0045, t01=0x009e}
0x6c7c…6c86 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0045, t01=0x00ba}
0x6c86…6c90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00c4}
0x6c90…6c9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00ce}
0x6c9a…6cac Head {h00=0x000e, h01=0x0050, text=»* S E N D «, t00=0x0045, t01=0x00d8}
0x6cac…6cb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00ea}
0x6cb6…6ce6 Head {h00=0x002c, h01=0x0050, text=»* THIS ROUTINE SENDS AN CONTROL SEQUENCE«, t00=0x0045, t01=0x00f4}
0x6ce6…6cfe Head {h00=0x0014, h01=0x0050, text=»* TO THE PRINTER«, t00=0x0045, t01=0x0124}
0x6cfe…6d08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x013c}
0x6d08…6d12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0146}
0x6d12…6d26 Head {h00=0x0010, h01=0x0050, text=»* AT ENTRY :«, t00=0x0045, t01=0x0150}
0x6d26…6d4c Head {h00=0x0022, h01=0x0050, text=»* A2 = CONTROL SEQUENCE ADRESS«, t00=0x0045, t01=0x0164}
0x6d4c…6d84 Head {h00=0x0034, h01=0x0050, text=»* A3 = DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC «, t00=0x0045, t01=0x018a}
0x6d84…6d8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0032}
0x6d8e…6d98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x003c}
0x6d98…6dac Head {h00=0x0010, h01=0x0050, text=»* AT EXIT : «, t00=0x0046, t01=0x0046}
0x6dac…6dcc Head {h00=0x001c, h01=0x0050, text=»* A1,A2,A3 IS DESTROYED «, t00=0x0046, t01=0x005a}
0x6dcc…6dd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x007a}
0x6dd6…6de0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0084}
0x6de0…6dea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x008e}
0x6dea…6e12 Head {h00=0x0024, h01=0x0050, text=»SEND EQU * SEND CONTROL SEQUENCE«, t00=0x0046, t01=0x0098}
0x6e12…6e42 Head {h00=0x002c, h01=0x0050, text=» ST A3,DWTDISP,A6 SAVE DWT-DISPLACEMENT «, t00=0x0046, t01=0x00c0}
0x6e42…6e72 Head {h00=0x002c, h01=0x0050, text=» ST A2,DWTSTR,A6 CONTROL SEQUENCE ADRESS«, t00=0x0046, t01=0x00f0}
0x6e72…6e86 Head {h00=0x0010, h01=0x0050, text=»SEND10 EQU *«, t00=0x0046, t01=0x0120}
0x6e86…6eba Head {h00=0x0030, h01=0x0050, text=» LD A3,DWTSTR,A6 GET CONTROL SEQUENCE ADRESS«, t00=0x0046, t01=0x0134}
0x6eba…6eda Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x0046, t01=0x0168}
0x6eda…6efc Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FF MAKE CHARACTER«, t00=0x0046, t01=0x0188}
0x6efc…6f26 Head {h00=0x0026, h01=0x0050, text=» SLL A2,8 END OF CONTROL SEQUENCE «, t00=0x0047, t01=0x001a}
0x6f26…6f48 Head {h00=0x001e, h01=0x0050, text=» RF(N) SENDEND YES,RETURN «, t00=0x0047, t01=0x0044}
0x6f48…6f72 Head {h00=0x0026, h01=0x0050, text=» CWK A2,/3000 LINE NO,CHAR.SET,ETC«, t00=0x0047, t01=0x0066}
0x6f72…6f8c Head {h00=0x0016, h01=0x0050, text=» RF(E) SEND30 YES «, t00=0x0047, t01=0x0090}
0x6f8c…6fb8 Head {h00=0x0028, h01=0x0050, text=» SRL A2,8 PREPARE TO SEND CHARACTER «, t00=0x0047, t01=0x00aa}
0x6fb8…6fdc Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0047, t01=0x00d6}
0x6fdc…6ff0 Head {h00=0x0010, h01=0x0050, text=»SEND20 EQU *«, t00=0x0047, t01=0x00fa}
0x6ff0…7022 Head {h00=0x002e, h01=0x0050, text=» IM DWTSTR,A6 INC. CONTROLSEQUENCE ADRESS «, t00=0x0047, t01=0x010e}
0x7022…703e Head {h00=0x0018, h01=0x0050, text=» RB SEND10 GET NEXT «, t00=0x0047, t01=0x0140}
0x703e…7052 Head {h00=0x0010, h01=0x0050, text=»SEND30 EQU *«, t00=0x0047, t01=0x015c}
0x7052…7080 Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTDISP,A6 GET DWT-DISPLACEMENT«, t00=0x0047, t01=0x0170}
0x7080…70a4 Head {h00=0x0020, h01=0x0050, text=» ADR A3,A6 GET PROPER VALUE «, t00=0x0048, t01=0x000e}
0x70a4…70c4 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x0048, t01=0x0032}
0x70c4…70e8 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0048, t01=0x0052}
0x70e8…7118 Head {h00=0x002c, h01=0x0050, text=» IM DWTDISP,A6 INC. DISPLACEMENT ADRESS «, t00=0x0048, t01=0x0076}
0x7118…7134 Head {h00=0x0018, h01=0x0050, text=» RB SEND20 GET NEXT «, t00=0x0048, t01=0x00a6}
0x7134…714a Head {h00=0x0012, h01=0x0050, text=»SENDEND EQU * «, t00=0x0048, t01=0x00c2}
0x714a…715a Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0048, t01=0x00d8}
0x715a…7164 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0048, t01=0x00e8}
0x7164…716e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00f2}
0x716e…7178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00fc}
0x7178…7188 Head {h00=0x000c, h01=0x0050, text=»* BINARY«, t00=0x0048, t01=0x0106}
0x7188…7192 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0116}
0x7192…71ce Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CONVERTS ASCII CODE TO A BINARY VALUE«, t00=0x0048, t01=0x0120}
0x71ce…71d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x015c}
0x71d8…71ec Head {h00=0x0010, h01=0x0050, text=»* REGISTERS:«, t00=0x0048, t01=0x0166}
0x71ec…7206 Head {h00=0x0016, h01=0x0050, text=»* A1= ASCII INPUT «, t00=0x0048, t01=0x017a}
0x7206…7222 (73, 0, 400) Head {h00=0x0018, h01=0x0050, text=»* A2= WORK REGISTER «, t00=0x0049, t01=0x0004}
0x7222…723e Head {h00=0x0018, h01=0x0050, text=»* A3= BINARY OUTPUT «, t00=0x0049, t01=0x0020}
0x723e…7248 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x003c}
0x7248…7252 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0046}
0x7252…725c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0050}
0x725c…727e Head {h00=0x001e, h01=0x0050, text=»BINARY SUR A3,A3 CLEAR A3 «, t00=0x0049, t01=0x005a}
0x727e…72a0 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 MAX. LINE ASCII«, t00=0x0049, t01=0x007c}
0x72a0…72b2 Head {h00=0x000e, h01=0x0050, text=» SRL A2,8 «, t00=0x0049, t01=0x009e}
0x72b2…72c6 Head {h00=0x0010, h01=0x0050, text=» SUK A2,/30 «, t00=0x0049, t01=0x00b0}
0x72c6…72d8 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0049, t01=0x00c4}
0x72d8…72ea Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0049, t01=0x00d6}
0x72ea…72fc Head {h00=0x000e, h01=0x0050, text=» SLL A2,3 «, t00=0x0049, t01=0x00e8}
0x72fc…730e Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0049, t01=0x00fa}
0x730e…7320 Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0049, t01=0x010c}
0x7320…7344 Head {h00=0x0020, h01=0x0050, text=» ADR A3,A1 MAX. LINE BINARY «, t00=0x0049, t01=0x011e}
0x7344…7354 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0049, t01=0x0142}
0x7354…735e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0049, t01=0x0152}
0x735e…7384 Head {h00=0x0022, h01=0x0050, text=»LINNUM EQU *-2 NUMBER OF LINES«, t00=0x0049, t01=0x015c}
0x7384…73aa Head {h00=0x0022, h01=0x0050, text=» DATA /3132,/3135,/3138,/3234 «, t00=0x0049, t01=0x0182}
0x73aa…73d0 Head {h00=0x0022, h01=0x0050, text=» DATA /3235,/3330,/3333,/3335 «, t00=0x004a, t01=0x0018}
0x73d0…73f6 Head {h00=0x0022, h01=0x0050, text=» DATA /3336,/3438,/3530,/3531 «, t00=0x004a, t01=0x003e}
0x73f6…741c Head {h00=0x0022, h01=0x0050, text=» DATA /3630,/3636,/3730,/3732 «, t00=0x004a, t01=0x0064}
0x741c…7426 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x008a}
0x7426…7430 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0094}
0x7430…743a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x009e}
0x743a…7444 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00a8}
0x7444…747e Head {h00=0x0036, h01=0x0050, text=»NCVTAB EQU *-2 NATIONAL CHARACTER VARIATION YABLE «, t00=0x004a, t01=0x00b2}
0x747e…74a4 Head {h00=0x0022, h01=0x0050, text=» DATA /3031,/3032,/3033,/3034 «, t00=0x004a, t01=0x00ec}
0x74a4…74ca Head {h00=0x0022, h01=0x0050, text=» DATA /3035,/3036,/3037,/3038 «, t00=0x004a, t01=0x0112}
0x74ca…74f0 Head {h00=0x0022, h01=0x0050, text=» DATA /3039,/3130,/3131,/3131 «, t00=0x004a, t01=0x0138}
0x74f0…7510 Head {h00=0x001c, h01=0x0050, text=» DATA /3133,/3134,/3135 «, t00=0x004a, t01=0x015e}
0x7510…754c Head {h00=0x0038, h01=0x0050, text=»TAB EQU * MASK TABLE FOR STATUS REPORT FROM PRINTER «, t00=0x004a, t01=0x017e}
0x754c…756e Head {h00=0x001e, h01=0x0050, text=» DATA /C0,/C0,/C0,/2CC * «, t00=0x004b, t01=0x002a}
0x756e…7590 Head {h00=0x001e, h01=0x0050, text=» DATA /2CF,/4CB,/C0,/C0 * «, t00=0x004b, t01=0x004c}
0x7590…75ae Head {h00=0x001a, h01=0x0050, text=» DATA /C0,/C0,/C0,/C0 «, t00=0x004b, t01=0x006e}
0x75ae…75c4 Head {h00=0x0012, h01=0x0050, text=» DATA /C0,/C0 «, t00=0x004b, t01=0x008c}
0x75c4…75d0 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x004b, t01=0x00a2}
0x75d0…75d4 Head {h00=0x4004, h01=0x0000}
0x75d4…75d8 00 4b 00 ae ┆ K ┆
0x75d8…75e0 (76, 1, 8) 20 04 00 00 00 4c 00 04 ┆ L ┆