|
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: 42584 (0xa658)
Notes: pts_type(SC)
Names: »DRGP03.SC«
└─⟦13e5fd45a⟧ Bits:30009699 Philips computer tape "600507"
└─⟦this⟧ »TOSSWORK/DRGP03.SC«
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
└─⟦this⟧ »TOSSWORK/DRGP03.SC«
IDENT DRGP03 REL 11.0 81-06-01 870105041100 =1,STATUS DEL. REL 11.0 81-01-26 * ******************************************************* * * * PHILIPS TERMINAL SYSTEM PTS * * * * DRGP03 = DRIVER GENERAL PRINTER * * * * * * * ******************************************************* * * THIS DRIVER HANDLES THE GENERAL PRINTER GP74, PTS 6374 & PTS 6375 * * THE DRIVER CONSISTS OF THE FOLLOWING PARTS : * * A C T P : ACTIVATION PART * * R C T P : RECOVERY ROUTINE * * EJECT * * THE FOLLOWING ORDERS ARE TREATED: * * ORDER 00 : TEST STATUS * ORDER 05 : BASIC WRITE * ORDER 06 : STANDARD WRITE * ORDER 0B : POSITION DOCUMENT * ORDER 24 : SET PRINTER PARAMETERS * ORDER 27 : SET FORM PARAMETERS * ORDER 38 : RELEASE DOCUMENT * * THE FOLLOWING RETURN CODES ARE USED: * * BIT 0 : REQUEST ERROR * BIT 2 : END OF JOURNAL TAPE * BIT 7 : RECOVERY EXECUTED * BIT 13 : CODE CHECK ERROR * BIT 15 : NOT OPERABLE * * * NORMAL REGISTER USAGE: * * REGISTER A1: WORK REGISTER * A2: INPUT/OUTPUT * A3: BUFFER POINTER * A4: WORK REGISTER * A5: STACK POINTER * A6: DWT-ADDRESS * A7: ORDER * A8: ECB-ADDRESS * * EJECT * * ******************************************* * * ENTRIES * ******************************************* * * ENTRY GPAD3 ADDRESS BLOCK * * * ******************************************* * * EXTERNALS * ******************************************* * * EXTRN LDISP DISPATCHING FROM INTERRUPT EXTRN LENDER DISPATCH I/O ERROR EXTRN LENDIS END I/O AND DISPATCH EXTRN OUTPUT OUTPUT ONE CHARACTER EXTRN GETCHR GET CHARACTER FROM ECB BUFFER EXTRN SETIMP SET TIMER EXTRN DWTST DWT STATUS DISPLACEMENT EXTRN DWTECB DWT ECB DISPLACEMENT EXTRN DWTOR DWT ORDER DISPLACEMENT EXTRN DWTSB2 STACK BASE EXTRN INPUT STORE REG = GET STATUS INPUT CHAR EXTRN STABLK DEF START OF BLOCK EXTRN ENDBLK DEF END OF BLOCK EXTRN DWTDEV DEVICE STATUS EJECT * ****************************************** * * CONSTANTS * ****************************************** * * SPEC EQU /2E SPECIAL CHARACTER LF EQU /0A LINE FEED RLF EQU /40 REVERSE 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 VPA EQU /64 VERTICAL POSITION ABSOLUTE 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 DS EQU /35 DEVICE STATUS DCS EQU /50 DEVICE CONTROL STRING ST EQU /5C STRING TERMINATOR DEL EQU /7F DELETE ZERO EQU /30 ZERO NEG EQU /FF CPL EQU /78 CHARACTER PITCH LOAD HPA EQU /60 HORIZONTAL POSITIONING ABSOLUTE HTS EQU /48 HORIZONTAL TABULATION SET TBC EQU /67 HORIZONTAL TABULATION CLEAR LSL EQU /7B LINE SPACE LOAD SM EQU /68 SET MODE RM EQU /6C RESET MODE SGR EQU /6D SELECT GRAPHICAL RENDITION SEP EQU /3B FR EQU /32 UL EQU /34 START UNDERLINE TIME EQU /FF 25 SEC. TIMER EJECT * * ********************************************************* * * CONTROL SEQUENCES * ********************************************************* * * BYTE FORM 8,8 * * CSREP EQU * REPEAT BYTE ESC,CSI BYTE ZERO,ZERO BYTE ZERO,REP 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 DS,DSR BYTE NEG,NEG CSCPL EQU * CHARACTER PITCH LOAD BYTE ESC,CSI BYTE ZERO,SEP BYTE ZERO,CPL BYTE NEG,NEG CSHPA EQU * HORIZONTAL POSITIONING ABSOLUTE BYTE ESC,CSI BYTE ZERO,ZERO BYTE ZERO,HPA BYTE NEG,NEG CSTBC EQU * HORIZONTAL TABULATION CLEAR BYTE ESC,CSI BYTE ZERO,TBC BYTE NEG,NEG CSHTS EQU * HORIZONTAL TABULATION SET BYTE ESC,HTS BYTE NEG,NEG CSVPA EQU * VERTICAL POSITIONING ABSOLUTE BYTE ESC,CSI BYTE ZERO,ZERO BYTE VPA,NEG CSLSL EQU * LINE SPACE LOAD BYTE ESC,CSI BYTE ZERO,ZERO BYTE LSL,NEG CSSM EQU * SET MODE BYTE ESC,CSI BYTE FR,ZERO BYTE SM,NEG CSRM EQU * RESET MODE BYTE ESC,CSI BYTE FR,ZERO BYTE RM,NEG CSSUL EQU * START UNDERLINE BYTE ESC,CSI BYTE UL,SGR BYTE NEG,NEG CSEUL EQU * STOP UNDERLINE BYTE ESC,CSI BYTE ZERO,SGR BYTE NEG,NEG EJECT * * ******************************************************* * * CONDITIONAL ASSEMBLY * ******************************************************* * * * * THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN * BY SETTING X:A TO 1-15 ACCORDING TO THE LIST BELOW * * * NCV=1 GERMANY,AUSTRIA,LUXEMBOURG,SWITZERLAND =2 GREAT BRITAIN,NETHERLANDS,BELGIUM,NEW ZEELAND,SOUTH AFRICA =3 FRANCE,SWITZERLAND,BELGIUM,LUXEMBOURG =4 SPAIN,MEXICO,ARGENTINA,VENEZUELA =5 ITALY,SWITZERLAND =6 SWEDEN,FINLAND =7 DENMARK,NORWAY =8 PORTUGAL,BRAZIL =9 YUGOSLAVIA =10 USA,CANADA,AUSTRALIA =11 SWEDEN (SPECIAL VERSION) =13 GREEK =14 JAPAN (KATAKANA VERSION) =15 ISRAEL (HEBREW VERSION) * * X:A EQU 02 GREAT BRITAIN AS STANDARD STDNCV EQU X:A EJECT * * * FRICTION FEED CAN BE SELECTED BY * SETTING X:B=1 X:B EQU 0 SINHAN EQU X:B * * * THE FRONT FEED DEVICE CAN BE EXCLUDED * BY SETTING X:C = 0 * * X:C EQU 1 FFDEV EQU X:C FRONT FEED DEVICE * * * * THE STANDARD PAGELENGTH IS DEFINED * BY SETTING X:D = NUMBER OF LINES * * X:D EQU 48 PAGLEN EQU X:D * * * THE STANDARD NUMBER OF LINES IS DEFINED * BY SETTING X:E = NUMBER OF LINES * * X:E EQU 64 DOCLEN EQU X:E * * * * MMU BUFFER SIZE * * X:F EQU 132 DVBLEN EQU X:F * EJECT * * * THE STANDARD MATRIX IS SELECTED BY SETTING * X:G=MATRIX NUMBER (1-9). * * X:G EQU 1 MATRIX EQU X:G * * * THE STANDARD CHARACTER DENSITY (PITCH) IS SELECTED BY * SETTING X:H=(1-4). 1=10 CH/INCH,2=12 CH/INCH,3=15 CH/INCH * 4= PROPORTIONAL PITCH * * X:H EQU 1 DENSIT EQU X:H * * * HIGH SPEED PRINTING CAN BE PERFORMED BY SETTING X:I=1 * * X:I EQU 0 SPEEDY EQU X:I * * * END OF REQUEST AT POWER FAILURE,NOT OP., LRC-, LINK- * ERROR OR SOFTW. TIME OUT IF X:J=1 * * X:J EQU 0 REQEND EQU X:J * * * ORDER /27, SET FORM PARAMETERS CAN BE EXCLUDED BY * SETTING X:K=0 * * X:K EQU 1 FORMPA EQU X:K * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1 * * MMUPAG EQU 0 * * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0 * * CPU852 EQU 1 EJECT * * ******************************************* * * DWT - DISPLACEMENTS * ******************************************* * DWTTP EQU /2 TIMER POINTER DWTDCS EQU /4 DOCUMENT CHARACTER SET DWTPCS EQU /6 PRINTER CHARACTER SET DWTPL EQU /8 PRINTER PAPER LENGTH DWTDL EQU /A DOCUMENT PAPER LENGTH DWTALN EQU /C ACTUAL LINE ON DOCUMENT DWTRLN EQU /E REQUESTED LINE ON DOCUMENT DWTRC EQU /11 RETURN CODE (ACKUMULATED) DWTSTR EQU /12 CONTROL SEQUENCE ADRESS DWTDISP EQU /14 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. DWTACP EQU /16 ACTUAL COLUMN PAPER DWTCO1 EQU /1A COLUMN COUNTER 1 DWTSYST EQU /1C SYSTEM START IND. DWTLFD EQU /1E LINE/FORM FEED INDICATOR DWTCMF EQU /20 CHAR MATRIX & PITCH, TRACTOR FEED DWTCMT EQU /22 CHAR MATRIX & PITCH, FRONT/FRI FEED DWTLS EQU /24 LINE SPACE DWTHSP EQU /26 HIGH SPEED DWTHOP EQU /28 HOPPER 1 OR 2 DWTTAB EQU /2A LAST TAB POS SET DWTSER EQU /2E CONTR. SEQ. SEPARATOR IND. EJECT * * ******************************************* * * ECB - DISPLACEMENTS * ******************************************* * ECBBA EQU 2 BUFFER ADDRESS IN ECB ECBRL EQU 4 REQUESTED LENGTH IN ECB ECBEL EQU 6 EFFECTIVE LENGTH IN ECB ECBRC EQU 8 RETURN CODE IN ECB ECBCW EQU 10 CONTROL WORD IN ECB EJECT * ******************************************* * * TABLES * ******************************************* * * DATA DVBLEN MMU BUFFER SIZE DATA 2 DEVICE INDEX GPAD3 EQU * ADDRESS BLOCK DATA ACTP ACTIVATION DRIVER DATA 0 ABORT ROUTINE ADDRESS DATA 0 INTERRUPT HANDLER DATA RCTP RECOVERY ROUTINE TPTAB EQU * IFT SINHAN+FFDEV=1 DATA /0107,/0C25,/2839 XIF DATA /0006,/2427,/0505 TPLEN EQU *-TPTAB EJECT ************************************************************ * * A C T P * * THIS IS THE ACTIVATION PART OF THE DRIVER * CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR * ************************************************************ * ACTP EQU * ACTIVATION ENTRY * * * GET DWT INDEX: 0=TRACTOR FEED, 1=FRONT FEED/FRICTION FEED * LC A2,DWTOR,A6 GET DWT INDEX ANK A2,1 MASK SC A2,DWTDEV,A6 STORE NEW DEVICE INDEX CWK A7,/24 RF(E) ACT010 LC A3,DWTDEV+1,A6 GET OLD DEVICE INDEX ANK A3,1 CWR A2,A3 RF(E) ACT010 ACT005 LDR A4,P GET PROGRAM COUNTER ADK A4,6 MAKE RETURN ADDRESS BEFORE ABL ABL SENPAR SEND PARAM. TO PRINTER LC A2,DWTDEV,A6 ANK A2,1 ACT010 LC A3,DWTDEV+1,A6 ANK A3,/FE ORR A3,A2 SC A3,DWTDEV+1,A6 STORE INDEX CWK A7,/05 ORDER /05 ? RF(E) ACT015 YES ADR A7,A2 ADD DWT INDEX TO ORDER ACT015 SC A7,DWTOR+1,A6 STORE MODIFIED ORDER ACT020 LDK A3,TPLEN-1 ACT030 CC A7,TPTAB,A3 CHECK IF LEGAL ORDER RF(E) ACT040 VALID ORDER SUK A3,1 RB(NN) ACT030 TRY NEXT * ABL LENDER ILLEGAL ORDER * * ACT040 EQU * ADR A3,A3 GET INDEX ABI TPFUC,A3 EXECUTE ORDER TPFUC EQU * IFT SINHAN+FFDEV=1 DATA TSTSTA,WRTCON,POSDOC,PRIPAR,FORPAR,RELDOC XIF DATA TSTSTA,WRTCON,PRIPAR,FORPAR,BASWRT,BASWRT EJECT ****************************** * * ORDER 00 : TEST STATUS * ****************************** TSTSTA EQU * TEST STATUS CF A5,GTSTAT GET STATUS FROM PRINTER TSTEND LDR A2,A1 GET RETURN CODE ANKL A2,/100 PRINTER RESET ? ABL(NZ) RCTP YES CF A5,RESREC RESET RECOVERY BIT ABL LENDIS END REQUEST EJECT ************************* * * ORDER 06: WRITE * ************************* WRTCON EQU * * * =1 * * =1 * * =1 LD A2,ECBRL,A8 GET REQ. LENGTH ADK A2,/8 BLOCK LENGTH CF A5,STABLK START OF BLOCK RF(NZ) ERGP01 JMP IF ERROR * * EXAMINE CONTROL CHARACTER * LDK A3,1 SET UP ECB BUFFER POINTER CF A15,GETCHR GET CONTROL CHARACTER LD A1,DWTDEV,A6 GET DEVICE STATUS ANK A1,/20 HAS POWER OFF OCCURED ? RF(NZ) REP2 YES SUK A2,/2B PRINT ON SAME LINE =/2B? RF(Z) WRC20 YES WRC04 CM DWTDEV+DWTCO1,A6 CLEAR COLUMN COUNTER SUK A2,5 PRINT AFTER TWO LF =/30 RF(Z) TWOLF YES * SUK A2,1 PRINT AFTER FORM FEED =/31 ? RF(NZ) ONELF NO,ONE LF * LDK A2,FF RF FORMF FORM FEED * * EXECUTE CONTROL CHARACTER * WRC20 EQU * LDK A2,CR CARRIDGE RETURN CF A5,OUTPUT RF(NZ) ERGP01 WRC03 LD A4,DWTDEV+DWTCO1,A6 GET ACTUAL COLUMN RF(Z) WRC05 FOR CORRECT NO OF SPACES SUK A4,1 WRC05 CF A5,KONVER CONVERT BINARY TO ASCII ST A2,DWTDEV+DWTACP,A6 STORE THE VALUE IN ACTUAL COL. ST A4,DWTDEV+DWTACP+2,A6 STORE THE VALUE IN ACT. COL. * WRC07 LD A4,DWTDEV+DWTCO1,A6 GET ACTUAL COLUMN RF(Z) WRT15 JMP IF NO PRECEIDING SPACES LDK A2,/20 SEND SPACE CF A5,OUTPUT RF(NZ) ERGP01 JMP IF ERROR LDKL A2,CSREP REPEAT LDKL A3,DWTDEV+DWTACP+1 ACTUAL COLUMN PAPER DISPLACEMENT CF A5,SEND SEND REPEAT RF WRT15 * TWOLF LDK A2,LF LINE FEED CF A5,OUTPUT RF(NZ) ERGP01 JMP IF ERROR ONELF LDK A2,LF LINE FEED FORMF CF A5,OUTPUT RF(NZ) ERGP01 JMP IF ERROR LDK A2,CR CARRIDGE RETURN CF A5,OUTPUT RF(NZ) ERGP01 JMP IF ERROR IM DWTDEV+DWTLFD,A6 SET LF/FF INDICATOR RF WRT15 * * REPEAT WRITE REQUEST * REP2 EQU * LDR A3,A2 SAVE CONTROL CHAR. LDK A2,CR SEND CARRIDGE RETURN CF A5,OUTPUT RF(NZ) ERGP01 JMP IF ERROR LDR A2,A3 SUK A2,/2B PRINT WITHOUT LINE FEED ? RF(NZ) REP3 NO RB WRC07 REP3 LD A1,DWTDEV+DWTLFD,A6 GET INDICATOR RF(NZ) WRT15 JMP IF LF/FF DONE RB WRC04 EJECT * * ORDER 06 : THIS PART SENDS THE CHARACTERS * TO DOCUMENT OR CONTINUOUS STATIONARY. * * WRT15 LDK A3,2 SET ECB BUFFER POINTER WRT020 CWK A3,/90 RF(NZ) WRT030 NEW BLOCK NECESSARY ? CF A5,ENDBLK YES ERGP01 RF(NZ) ERGP04 JMP IF ERROR LDK A2,/90 NEW BLOCK LENGTH CF A5,STABLK START OF BLOCK RF(NZ) ERGP04 JMP IF ERROR WRT030 CF A15,GETCHR GET CHARACTER LDR A4,A1 BUFFER FINISHED ? RF(P) WRT050 NO LD A4,DWTDEV,A6 GET DEVICE STATUS ANK A4,/80 SHIFT OUT PERFORMED ? RF(Z) WRT040 NO LDK A2,SI SEND SHIFT IN CF A5,OUTPUT RF(NZ) ERGP04 JMP IF ERROR XRS A4,DWTDEV,A6 RESET SHIFT INDIC. WRT040 CF A5,ENDBLK END OF BLOCK RF(NZ) ERGP04 JMP IF ERROR CF A5,GTSTAT GET STATUS RF ENDIO END REQUEST * WRT050 EQU * LDR A4,A2 * * EXAMINE CHARACTER AND SEND DEPENDING ON TYPE OF CHARACTER * CWK A4,/20 CHAR =<20 ? RF(NL) WRT100 NO * CHECK IF SPECIAL CHARACTER SUK A4,/9 TABULATION ? RF(Z) WRT170 YES SUK A4,/9 START UNDERLINE ? RF(NZ) WRT060 NO LDR A4,A3 SAVE ECB BUFFER POINTER LDKL A3,CSSUL SEND START UNDERLINE RF WRT070 WRT060 SUK A4,1 STOP UNDERLINE ? RF(NZ) WRT080 NO LDR A4,A3 SAVE ECB BUFFER POINTER LDKL A3,CSEUL SEND STOP UNDERLINE WRT070 CF A5,SEN40 GO & SEND LDR A3,A4 RESTORE ECB BUFFER POINTER RB WRT020 GET NEXT CHARACTER WRT080 SUK A4,/8 /1B, PARTIAL LINE UP DOWN ? RB(NZ) WRT020 NO, GET NEXT CHARACTER CF A15,GETCHR YES, CHECK NEXT CHARACTER RB(NP) WRT040 END OF BUFFER ? LDR A4,A2 SAVE CHAR IN A4 SUK A2,/4B PARTIAL LINE DOWN ? RF(Z) WRT090 YES SUK A2,1 PARTIAL LINE UP ? RF(NZ) WRT140 NO, INDICATE CODE CHECK ERROR WRT090 LDK A2,ESC SEND PARTIAL LINE UP/DOWN CF A5,OUTPUT RF(NZ) ERGP04 JMP IF ERROR LDR A2,A4 RESTORE CHAR. CF A5,OUTPUT RF(NZ) ERGP04 JMP IF ERROR RB WRT020 GET NEXT CHARACTER * WRT100 SUK A4,/7E CHAR =</7E ? RF(NP) WRT110 YES, LEGAL CHARACTER CWK A2,/AE ROOMLESS POINT ? RF(E) WRT160 YES SUK A4,/23 CHAR >=/A1 ? RF(N) WRT150 NO,INDICATE CODE CHECK ERROR ! SUK A4,/5D CHAR =</FE ? RF(NP) WRT120 YES, LEGAL CHARACTER RF WRT150 NO, INDICATE CODE CHECK ERROR * AUTOMATIC SHIFT OUT/IN FUNCTION * * WRT110 LD A4,DWTDEV,A6 7-BIT CODE /20-/7E ANK A4,/80 SHIFT OUT PERFORMED EARLIER ? RF(Z) WRT170 NO, SEND CHARACTER LDK A4,/80 XRS A4,DWTDEV,A6 RESET SHIFT INDICATOR LDR A4,A2 STORE CHAR. LDK A2,SI SEND SHIFT IN RF WRT130 * WRT120 LD A4,DWTDEV,A6 8-BIT CODE /A1-/FE ANK A4,/80 SHIFT OUT PERFORMED EARLIER ? RF(NZ) WRT170 YES, SEND CHARACTER LDK A4,/80 ORS A4,DWTDEV,A6 INDICATE SHIFT OUT LDR A4,A2 STORE CHAR. LDK A2,SO SEND SHIFT OUT WRT130 CF A5,OUTPUT SEND SHIFT CONTROL RF(NZ) ERGP04 JMP IF ERROR LDR A2,A4 RESTORE CHAR. RF WRT170 SEND CHARACTER WRT140 SUK A3,1 DECREMENT ECB BUFFER POINTER WRT150 LDK A4,/04 ILLEGAL CHARACTER SET BIT 13 IN R.C. ORS A4,ECBRC,A8 RB WRT020 WRT160 LDK A2,/2E WRT170 LDR A4,A1 ANK A2,/7F MASK,JUST 7 BIT CHAR. CF A5,OUTPUT SEND CHARACTER ERGP04 RF(NZ) ERGP06 JMP IF ERROR IM DWTDEV+DWTCO1,A6 INC COLUMN COUNTER 1 RB WRT020 ENDIO EQU * LDR A2,A1 GET RETURN CODE ANKL A2,/100 PRINTER RESET ? ABL(NZ) RCTP YES CF A5,RESREC RESET RECOVERY BIT CM DWTDEV+DWTLFD,A6 CLEAR LF/FF INDICATOR ABL LENDIS END REQUEST EJECT ****************************** * * ORDER 05 : BASIC WRITE * ****************************** BASWRT EQU * * * =1 * * =1 * * =1 LDK A3,0 BAS10 LDK A4,/90 TEST END OF BLOCK LDR A2,A4 BLOCK LENGTH IN A2=144 CF A5,STABLK START OF BLOCK RF(NZ) ERGP06 JMP IF ERROR BAS15 CF A15,GETCHR GET CHARACTER LDR A1,A1 BUFFER FINISHED ? RF(Z) BAS25 YES CF A5,OUTPUT RF(NZ) ERGP06 JMP IF ERROR SUK A4,1 END OF BLOCK ? RF(Z) BAS20 YES RB BAS15 GET NEXT CHARACTER BAS20 CF A5,ENDBLK END OF BLOCK RF(NZ) ERGP06 JMP IF ERROR RB BAS10 START NEXT BLOCK BAS25 CF A5,ENDBLK END OF BLOCK ERGP06 ABL(NZ) ERGP15 JMP IF ERROR ABL TSTSTA CHECK STATUS & END REQ. EJECT IFT SINHAN+FFDEV=1 ********************************************* * * ORDER 0B : POSITION DOCUMENT * CONTROL WORD CONTAINS REQUESTED LINE NO * ********************************************* POSDOC EQU * POSITION DOCUMENT CF A5,GTSTAT GET DEVICE STATUS LDR A1,A1 ERROR ? RF(NZ) POS040 ERROR INDICATION LD A4,ECBCW,A8 GET REQUESTED LINE ANK A4,/FF RF(Z) POSERR ILLEGAL LINE NUMBER LD A1,DWTDEV+DWTDL,A6 MAX. LINE CF A5,BINARY CONVERT ASCII TO BINARY CWR A4,A3 REQ. LINE>MAX. LINE RF(G) POSERR YES CF A5,KONVER CONVERT BINARY TO ASCII ST A4,DWTDEV+DWTRLN,A6 SET REQUESTED LINE POS005 EQU * LDK A2,/15 BLOCK LENGTH CF A5,STABLK START OF BLOCK RF(NZ) ERGP08 JMP IF ERROR LD A3,DWTDEV+DWTALN,A6 RF(NZ) POS020 LDK A2,FF CF A5,OUTPUT RF(NZ) ERGP08 JMP IF ERROR POS020 LDKL A2,CSVPA LDKL A3,DWTDEV+DWTRLN CF A5,SEND POS030 CF A5,ENDBLK END OF BLOCK ERGP08 ABL(NZ) ERGP15 JMP IF ERROR CF A5,GTSTAT GET STATUS RF(NZ) POS040 ERROR ? LD A2,DWTDEV+DWTRLN,A6 GET REQ. LINE NO. ST A2,DWTDEV+DWTALN,A6 ACTUAL LINE = REQ. LINE CM DWTDEV+DWTCO1,A6 CLEAR COLUMN COUNTER POS040 EQU * LDR A2,A1 GET RETURN CODE ANKL A2,/100 PRINTER RESET ? ABL(NZ) RCTP YES CF A5,RESREC RESET RECOVERY BIT ABL LENDIS END REQUEST POSERR ABL LENDER XIF EJECT ******************************************** * * ORDER 24 : SET PRINTER PARAMETERS * ******************************************** PRIPAR EQU * PRI07 LDK A3,/6 SET UP BRANCH POINTER LD A1,ECBCW,A8 GET CONTROL WORD PRI10 LDR A4,A1 IFT SINHAN+FFDEV=1 LC A2,DWTOR+1,A6 GET DWT INDEX ANK A2,1 RF(Z) PRI14 ANK A4,/F CHECK IF NEW PARAM. VALUE WANTED ABI(NZ) FROTAB,A3 FRONT FEED RF PRI15 XIF PRI14 ANK A4,/F CHECK IF NEW PARAM. VALUE WANTED ABI(NZ) PRITAB,A3 FRICTION/TRACTOR FEED PRI15 SRL A1,4 GET NEXT PARAMETER PRI16 CWK A3,0 FRI/TRA, ANY MORE PARAM. TO CHECK RF(E) PRI17 NO, GO AND SEND PRI18 SUK A3,2 TEST NEXT PARAMETER RB PRI10 PRI17 LDR A4,P GET PROGRAM COUNTER ADK A4,6 MAKE RETURN ADDRESS BEFORE ABL ABL SENPAR SEND PARAMETERS TO PRINTER CF A5,GTSTAT GET STATUS LDR A2,A1 GET RETURN CODE ANKL A2,/100 PRINTER RESET ? ABL(NZ) RCTP YES CF A5,RESREC RESET RECOVERY BIT ABL LENDIS END REQUEST * STORE PARAMETERS, TRACTOR FEED PRI20 EQU * NCV= NATIONAL CHARACTER VARIATION ADR A4,A4 ADJUST TABLE LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACCORDING TO INDEX ST A4,DWTDEV+DWTPCS,A6 STORE IN DWT RB PRI15 PRI30 EQU * SCM= SELECT CHARACTER MATRIX CWK A4,/9 RF(G) PRI60 INDEX TOO HIGH ORK A4,/30 ASCII SC A4,DWTDEV+DWTCMF,A6 STORE IN DWT RB PRI15 PRI40 EQU * PL= PAGE LENGTH ADR A4,A4 ADJUST TABLE LD A4,LINNUM,A4 GET LINE ACCORDING TO INDEX ST A4,DWTDEV+DWTPL,A6 STORE IN DWT RB PRI15 PRI50 EQU * CD= CHARACTER PITCH CWK A4,/4 RF(G) PRI60 INDEX TOO HIGH ORK A4,/30 ASCII SC A4,DWTDEV+DWTCMF+1,A6 STORE IN DWT RB PRI17 * STORE PARAMETERS, FRONT FEED/FRICTION FEED IFT SINHAN+FFDEV=1 FRO20 EQU * NCV= NATIONAL CHARACTER VARIATION ADR A4,A4 ADJUST TABLE LD A4,NCVTAB,A4 GET NAT. CHAR. VAR. ACCORDING TO INDEX ST A4,DWTDEV+DWTDCS,A6 STORE IN DWT RB PRI15 FRO30 EQU * SCM=SELECT CHARACTER MATRIX CWK A4,/9 RF(G) PRI60 INDEX TOO HIGH ORK A4,/30 ASCII SC A4,DWTDEV+DWTCMT,A6 STORE IN DWT RB PRI15 FRO40 EQU * PL= PAGE LENGTH ADR A4,A4 ADJUST TABLE LD A4,LINNUM,A4 GET LINE ACCORDING TO INDEX ST A4,DWTDEV+DWTDL,A6 STORE IN DWT RB PRI15 FRO50 EQU * CD= CHARACTER PITCH CWK A4,/4 RF(G) PRI60 INDEX TOO HIGH ORK A4,/30 ASCII SC A4,DWTDEV+DWTCMT+1,A6 STORE IN DWT RB PRI17 XIF PRI60 ABL LENDER REQUEST ERROR EJECT ******************************************** * * ORDER /27 : SET FORM PARAMETERS * ******************************************** FORPAR EQU * IFT FORMPA=1 LD A2,ECBCW,A8 GET CONTROL WORD, INDEX ANK A2,/F MASK SUK A2,1 RF(Z) FOR020 HOPPER,HIGH SPEED OR LINE SPACE PARAM. SUK A2,1 ABL(Z) BASWRT LOAD CHARACTER MATRIX SUK A2,1 RF(Z) TAB010 TABULATIONS XIF FOR010 ABL LENDER REQUEST ERROR,END OF REQ. IFT FORMPA=1 * HOPPER, HIGH SPEED & LINE SPACE PARAMETERS * FOR020 LDK A2,/E BLOCK LENGTH CF A5,STABLK START OF BLOCK ABL(NZ) ERGP15 JMP IF ERROR LD A4,ECBCW,A8 GET CONTROL WORD LDR A1,A4 ALSO IN A4 SRL A1,4 SHIFT ANK A1,/F MASK LINE SPACE INDEX RF(Z) FOR030 NO CHANGE WANTED CWK A1,/8 RB(G) FOR010 REQUEST ERROR, INDEX TOO BIG ADR A1,A1 ADJUST TABLE LD A1,LINTAB,A1 GET LINE SPACE ACCORDING TO TABLE ST A1,DWTDEV+DWTLS,A6 STORE IN DWT LDKL A2,CSLSL LDKL A3,DWTDEV+DWTLS CF A5,SEND SEND LINE SPACE LOAD FOR030 LDR A1,A4 GET CONTROL WORD SRL A1,8 ANK A1,/F MASK HIGH SPEED PARAMETER RF(Z) FOR060 NO CHANGE WANTED SUK A1,1 RF(NZ) FOR040 LDK A2,SM HIGH SPEED SELECTED SC A2,DWTDEV+DWTHSP+1,A6 STORE IN DWT LDKL A2,CSSM RF FOR050 SEND SELECT HIGH SPEED MODE FOR040 SUK A1,1 RB(NZ) FOR010 REQUEST ERROR LDK A2,RM SC A2,DWTDEV+DWTHSP+1,A6 STORE IN DWT LDKL A2,CSRM SEND SELECT NORMAL SPEED FOR050 LDKL A3,DWTDEV+DWTHSP CF A5,SEND FOR060 EQU * IFT SINHAN=1 LDR A1,A4 GET CONTROL WORD SRL A1,/C ANK A1,/F MASK HOPPER PARAMETER RF(Z) FOR120 NO CHANGE WANTED SUK A1,1 RF(NZ) FOR070 LDKL A2,/3168 SELECT HOPPER 1 RF FOR075 FOR070 SUK A1,1 RF(NZ) FOR080 LDKL A2,/3268 SELECT HOPPER 2 FOR075 ST A2,DWTDEV+DWTHOP,A6 STORE IN DWT LDKL A2,CSSM RF FOR110 FOR080 SUK A1,1 RF(NZ) FOR090 LDKL A2,/316C DESELECT HOPPER 1 RF FOR095 FOR090 SUK A1,1 RB(NZ) FOR010 REQUEST ERROR LDKL A2,/326C DESELECT HOPPER 2 FOR095 ST A2,DWTDEV+DWTHOP,A6 STORE IN DWT LDKL A2,CSRM FOR110 LDKL A3,DWTDEV+DWTHOP CF A5,SEND SEND HOPPER MODE XIF IFT FORMPA=1 RF FOR120 END OF REQ. * * TABULATION PART * TAB010 EQU * LDK A3,0 SET UP BUFFER POINTER TAB020 CF A15,GETCHR GET CHARACTER LDR A1,A1 END OF BUFFER ? RB(Z) FOR010 REQUEST ERROR LDR A4,A2 KEEP CHAR. IN A4 LDK A2,/80 BLOCK LENGTH CF A5,STABLK START OF BLOCK RF(NZ) ERGP10 JMP IF ERROR ANK A4,1 SET OR CLEAR TABS. ? RF(Z) TAB050 CLEAR ALL TABULATIONS TAB030 CF A15,GETCHR GET TABULATION POSITION LDR A1,A1 RF(Z) FOR120 END OF REQUEST LDR A4,A2 TAB. POS. IN A4 CF A5,KONVER KONVERT TO ASCII SC A2,DWTDEV+DWTTAB,A6 SC A4,DWTDEV+DWTTAB+2,A6 STORE TAB POS IN DWT SRL A4,8 SHIFT RIGHT SC A4,DWTDEV+DWTTAB+1,A6 STORE TAB POS IN DWT LDR A4,A3 KEEP COUNTER IN A4 LDKL A2,CSHPA LDKL A3,DWTDEV+DWTTAB CF A5,SEND SEND HORIZONTAL POS ABS. LDKL A2,CSHTS CF A5,SEND SET TAB POS AT ACTIVE POS LDR A3,A4 RESTORE COUNTER RB TAB030 GET NEXT POS TAB050 EQU * LDK A3,/33 CLEAR ALL TABS SC A3,DWTDEV+DWTTAB,A6 STORE IN DWT LDKL A2,CSTBC LDKL A3,DWTDEV+DWTTAB CF A5,SEND CLEAR ALL TABULATION POS. FOR120 CF A5,ENDBLK END OF BLOCK ERGP10 ABL(NZ) ERGP15 JMP IF ERROR ABL TSTSTA CHECK STATUS & END REQ. XIF EJECT ***************************************** * * ORDER 38 : RELEASE DOCUMENT * ***************************************** IFT SINHAN+FFDEV=1 RELDOC EQU * CF A5,GTSTAT GET STATUS LDR A2,A1 RF(NZ) REL20 ERROR ? LDK A2,/F BLOCK LENGTH CF A5,STABLK START OF BLOCK RF(NZ) ERGP14 JMP IF ERROR LDKL A2,CSVPA LDKL A3,DWTDEV+DWTDL SEND LF TO END OF PAGE CF A5,SEND LDK A3,/F SET UP LINE FEED COUNTER REL10 LDK A2,LF LINE FEED CF A5,OUTPUT RF(NZ) ERGP14 JMP IF ERROR SUK A3,1 DECREMENT LINE FEED COUNTER RB(NZ) REL10 ANY MORE LF ? CF A5,ENDBLK END OF BLOCK RF(NZ) ERGP14 JMP IF ERROR CF A5,GTSTAT GET STATUS FROM PRINTER CM DWTDEV+DWTALN,A6 RESET ACTUAL LINE CM DWTDEV+DWTRLN,A6 RESET REQUESTED LINE CM DWTDEV+DWTCO1,A6 CLEAR COLUMN COUNTER LDR A2,A1 GET RETURN CODE REL20 ANKL A2,/100 PRINTER RESET ? ABL(NZ) RCTP YES CF A5,RESREC RESET RECOVERY BIT ABL LENDIS END REQUEST XIF EJECT *********************************************************** * * R C T P * * RECOVERY ROUTINE REPEATS RUNNING REQUEST AT POWER ON * ************************************************************ RCTP EQU * RCTP07 LDKL A1,/7FFF SET DEVICE BUSY ANS A1,DWTST,A6 BUSY LDKL A5,DWTSB2 STACK BASE ADR A5,A6 LD A1,DWTDEV+DWTSYST,A6 INTERN. SYSTEM START IND. RF(Z) RCTP10 NO SYSTEM START * CM DWTDEV+DWTSYST,A6 SET SYSTEM START INDICATOR LDKL A4,STDNCV GET STANDARD NAT. CHAR. SET CF A5,KONVER CONVERT BIANARY TO ASCII ST A4,DWTDEV+DWTDCS,A6 SET CHAR. SET DOCUMENT ST A4,DWTDEV+DWTPCS,A6 SET CHAR. SET CONT.STAT. LDKL A4,PAGLEN STANDARD PAGE LENGTH CF A5,KONVER CONVERT BINARY TO ASCII ST A4,DWTDEV+DWTPL,A6 SET PAGE LENGTH CONT.STAT. LDKL A4,DOCLEN GET STANDARD PAGE LENGTH DOCUMENT CF A5,KONVER CONVERT BINARY TO ASCII ST A4,DWTDEV+DWTDL,A6 SET PAGE LENGTH DOCUMENT LDKL A4,MATRIX GET STANDARD CHAR MATRIX FONT ORK A4,ZERO MAKE ASCII SC A4,DWTDEV+DWTCMT,A6 STORE IN DWT (TRACTOR) SC A4,DWTDEV+DWTCMF,A6 STORE IN DWT (FRONT/FRI) LDKL A4,DENSIT GET STANDARD CHAR DENSITY/PITCH ORK A4,ZERO MAKE ASCII SC A4,DWTDEV+DWTCMT+1,A6 STORE IN DWT (TRACTOR) SC A4,DWTDEV+DWTCMF+1,A6 STORE IN DWT (FRONT/FRI) CF A5,GTSTAT DUMMY ST., CLEAR RESET BIT RCTP10 EQU * LDR A4,P GET PROGRAM COUNTER ADK A4,6 MAKE RETURN ADDRESS ABL SENPAR SEND PARAMETERS CM DWTDEV+DWTALN,A6 CLEAR ACTUAL LINE (FRONT/FRI) LDKL A1,/20 INDICATE POWER OFF OCCURED ORS A1,DWTDEV,A6 LD A1,DWTECB,A6 RUNNING REQUEST ABL(NZ) ACT020 YES , REPEAT THE REQUEST RCTP20 ABL LENDIS DISPATCH EJECT ************************************************************ * * GTSTAT * * * THIS ROUTINE SENDS 'DEVICE STATUS REPORT TO THE PRINTER * * AND ANALYZES THE DEVICE STATUS SENT FROM THE PRINTER * * AT EXIT A1 = RETURN CODE * ************************************************************ GTSTAT EQU * CM DWTDEV+DWTRC,A6 RESET RETURN CODE LDK A2,/5 BLOCK LENGTH CF A5,STABLK START OF BLOCK RF(NZ) ERGP14 JMP IF ERROR LDKL A3,CSDSR DEVICE STATUS REPORT GTST02 LCR A2,A3 GET CHARACTER ANK A2,/FF MASK SLL A2,8 SHIFT LEFT RF(N) GTST04 END OF CONTROL SEQUENSE SRL A2,8 SHIFT RIGHT CF A5,OUTPUT RF(NZ) ERGP14 JMP IF ERROR ADK A3,1 INCR. ADDRESS RB GTST02 GET NEXT CHARACTER GTST04 CF A5,ENDBLK END OF BLOCK ERGP14 RF(NZ) ERGP15 JMP IF ERROR LDR A1,A6 SAVE DWTADDRESS LDKL A4,DWTDEV+DWTTP ADR A4,A6 TIMER CF A15,SETIMP SET TIMER, 10 SEC. DATA ERGP00,TIME RETURN ADDRESS,TIME GTST05 LDKL A4,TAB GET TABLE ADDRESS GTST10 EQU * LDK A3,0 RESET INDEX CF A5,INPUT READ STATUS FROM PRINTER ANK A2,/FF GET CHARACTER CCK A2,/5C5C STRING TERMINATOR RF(E) GTSEND YES LDR A7,A7 ORDER /00 ? RF(NZ) GTST15 NO CCK A2,/3B STRING SEPARATOR ? RF(NE) GTST15 NO IM DWTDEV+DWTSER,A6 IND. STRING SEP. LD A2,DWTDEV+DWTSER,A6 SUK A2,2 TWO SEPARATORS RECEIVED ? RF(NZ) GTST30 NO, READ NEXT CHAR. CF A5,INPUT CHECK IF SERVICE STATUS PRESENT ANK A2,/F MASK CCK A2,/A RB(NL) GTST10 NO SERVICE STATUS LDKL A4,TAB+20 INCR. ADDR. TO SERV. STAT. GTST15 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 LDR A7,A7 ORDER /00 ? RF(NZ) GTST20 NO CW A4,TAB+20 SERVICE STATUS ? RF(L) GTST20 NO ORS A2,ECBCW,A8 SERVICE STAT. IN CONTR. WORD RF GTST30 GTST20 ORS A2,DWTDEV+DWTRC,A6 SAVE RETURN CODE TEMPORARILY GTST30 ADK A4,2 INCREMENT ADRESS RB GTST10 GET NEXT STATUS CHARACTER GTSEND EQU * LD A1,DWTDEV+DWTRC,A6 GET RETURN CODE CM DWTDEV+DWTSER,A6 CLEAR STRING SEP. IND. LD A2,DWTDEV+DWTTP,A6 RF(Z) GTST40 CHECK IF ALLREADY ZERO CM* DWTDEV+DWTTP,A6 RESET TIMER GTST40 CM DWTDEV+DWTTP,A6 RESET TIMER POINTER GTST50 EQU * RTN A5 EJECT ************************************************************ * * THIS ROUTINE CONVERTS A BINARY VALUE TO ASCII CODE * * REGISTERS : * A1= WORK REGISTER * A4= BINARY INPUT * A2,A4= ASCII OUTPUT * * KONVER EQU * * BINARY TO DEC. LDK A2,0 CLEAR A2 CWK A4,100 VALUE > 100 ? RF(L) KONV05 NO SUKL A4,100 LDKL A2,/100 LEFT BYTE OF A2=X=1 KONV05 CWK A4,10 ARE THERE ANY TENS ? RF(L) KONV04 NO SUK A4,10 ADK A2,/1 NUMBER OF TENS IN RIGHT B. OF A2=Y RB KONV05 NEXT KONV04 ORKL A2,/3030 XY IN A2 ORK A4,/30 Z IN A4 SRC A2,8 YX IN A2 LDR A1,A2 ANKL A1,/FF00 KEEP Y IN A1 ANK A2,/FF KEEP X IN R. BYTE OF A2. ASCII ORR A4,A1 YZ IN A1. ASCII RTN A5 EJECT ************************* * RESET RECORVERY * RESREC EQU * LD A4,DWTDEV,A6 DEVICE STATUS ANKL A4,/20 RECOVERY? RF(E) RESRTN NO. XRS A4,DWTDEV,A6 YES. RESET RECOVERY BIT ORKL A1,/100 INDIC. RECOV. IN RET. CODE BIT7 RESRTN RTN A5 RETURN * * ************************************************** * * ERROR ROUTINE FOR STABLK,OUTPUT, ENDBLK * AND TIMER. * ERGP00 EQU * LDR A6,A1 RESTORE DWTADDRESS CM DWTDEV+DWTTP,A6 RESET TIMER POINTER RF ERGP20 ERGP15 EQU * ANK A1,/1A OUTP. ERR, SOFTW. T-OUT,LRC-ERR ABL(NZ) RCTP YES, RECOVERY ERGP17 EQU * IFF REQEND=1 ABL LDISP DISPATCH XIF ERGP20 LDK A1,1 SET NOT OPERABLE ERGP30 ABL LENDIS END OF REQUEST EJECT ******************************************************* * * S E N D * * THIS ROUTINE SENDS AN CONTROL SEQUENCE * TO THE PRINTER * * * AT ENTRY : * A2 = CONTROL SEQUENCE ADRESS * A3 = DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC * * * AT EXIT : * A1,A2,A3 IS DESTROYED * * * SEND EQU * SEND CONTROL SEQUENCE ST A3,DWTDEV+DWTDISP,A6 SAVE DWT-DISPLACEMENT ST A2,DWTDEV+DWTSTR,A6 CONTROL SEQUENCE ADRESS SEND10 EQU * LD A3,DWTDEV+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 RB(NZ) ERGP15 JMP IF ERROR SEND20 EQU * IM DWTDEV+DWTSTR,A6 INC. CONTROLSEQUENCE ADRESS RB SEND10 GET NEXT SEND30 EQU * LD A3,DWTDEV+DWTDISP,A6 GET DWT-DISPLACEMENT ADR A3,A6 GET PROPER VALUE LCR A2,A3 GET CHARACTER CF A5,OUTPUT SEND CHARACTER RB(NZ) ERGP15 JMP IF ERROR IM DWTDEV+DWTDISP,A6 INC. DISPLACEMENT ADRESS RB SEND20 GET NEXT SENDEND EQU * RTN A5 EJECT ************************************************************ * * SENPAR * * THIS ROUTINE SENDS THE PRINTER PARAMETERS TO THE SUBDEVICE * SENPAR EQU * LDK A2,/1A CF A5,STABLK ERGP16 RB(NZ) ERGP15 JMP IF ERROR IFT SPEEDY=1 LDKL A2,CSSM LDKL A3,DWTDEV+DWTHSP CF A5,SEND SEND SELECT HIGH SPEED XIF IFT SINHAN+FFDEV=1 LC A2,DWTDEV,A6 GET DWTINDEX ANK A2,1 RF(NZ) SEN10 XIF LDKL A3,CSRM SET TRACTOR MODE CF A5,SEN40 LDKL A2,CSSLPL LDKL A3,DWTDEV+DWTPL CF A5,SEND SEND SELECTED PAGE LENGTH LDKL A2,CSSNV LDKL A3,DWTDEV+DWTPCS CF A5,SEND SEND NATIONAL CHAR VARIATION LDKL A2,CSCPL LDKL A3,DWTDEV+DWTCMF CF A5,SEND SEND CHAR. MATRIX & PITCH RF SEN20 * IFT SINHAN+FFDEV=1 SEN10 EQU * IFT SINHAN=0 LDKL A3,CSSM SET FRONT FEED MODE CF A5,SEN40 XIF IFT SINHAN+FFDEV=1 LDKL A2,CSSLPL LDKL A3,DWTDEV+DWTDL CF A5,SEND SEND SELECTED PAGE LENGTH LDKL A2,CSSNV LDKL A3,DWTDEV+DWTDCS CF A5,SEND SEND NATIONAL CHAR VARIATION LDKL A2,CSCPL LDKL A3,DWTDEV+DWTCMT CF A5,SEND SEND CHAR. MATRIX & PITCH XIF SEN20 CF A5,ENDBLK END OF BLOCK RB(NZ) ERGP16 JMP IF ERROR ABR A4 RETURN * EJECT ********************************************** * * THIS ROUTINE SENDS A CONTR. SEQ. WITHOUT DWT REFERENCE * AT ENTRY : A3= CONTROL SEQ, ADDRESS * SEN40 LCR A2,A3 ANK A2,/FF MASK SLL A2,8 SHIFT LEFT RF(N) SEN50 END OF SEQUENSE SRL A2,8 SHIFT RIGHT CF A5,OUTPUT RB(NZ) ERGP16 JMP IF ERROR ADK A3,1 INCR. ADDRESS RB SEN40 GET NEXT CHAR. SEN50 RTN A5 RETURN & SEND PARAMETERS EJECT ************************************************************ * * BINARY * * THIS ROUTINE CONVERTS ASCII CODE TO A BINARY VALUE * * REGISTERS: * A1= ASCII INPUT * A2= WORK REGISTER * A3= BINARY OUTPUT * * * BINARY SUR A3,A3 CLEAR A3 LDR A2,A1 MAX. LINE ASCII SRL A2,8 SUK A2,/30 ADR A3,A2 ADR A3,A2 SLL A2,3 ADR A3,A2 ANK A1,/F ADR A3,A1 MAX. LINE BINARY RTN A5 EJECT LINNUM EQU *-2 NUMBER OF LINES DATA /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,/1C8,/C0,/C0 * DATA /C0,/C0,/FC8,/FC0 DATA /C0,/C0 PRITAB EQU * BRANCH ADDRESSES ORDER /24 DATA PRI50 DATA PRI40 DATA PRI30 DATA PRI20 FROTAB EQU * BRANCH ADDRESSES ORDER /24 IFT SINHAN+FFDEV=1 DATA FRO50 DATA FRO40 DATA FRO30 DATA FRO20 XIF LINTAB EQU *-2 LINE SPACE TABLE DATA /3033,/3034,/3036,/3038,/3132 DATA /3136,/3234,/3438 END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRGP03 REL 11.0 81-06-01 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0058 Head {h00=0x0016, h01=0x0050, text=» =1,STATUS DEL. «, t00=0x0000, t01=0x0042}
0x0058…0074 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-01-26«, t00=0x0000, t01=0x005c}
0x0074…007e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0078}
0x007e…00be Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x0082}
0x00be…00fe Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0000, t01=0x00c2}
0x00fe…013e Head {h00=0x003c, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS * «, t00=0x0000, t01=0x0102}
0x013e…017e Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0000, t01=0x0142}
0x017e…01b6 Head {h00=0x0034, h01=0x0050, text=»* DRGP03 = DRIVER GENERAL PRINTER * «, t00=0x0000, t01=0x0182}
0x01b6…01f6 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x002a}
0x01f6…0236 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x006a}
0x0236…0276 Head {h00=0x003c, h01=0x0050, text=»* * «, t00=0x0001, t01=0x00aa}
0x0276…02b6 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0001, t01=0x00ea}
0x02b6…02c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x012a}
0x02c0…030e Head {h00=0x004a, h01=0x0050, text=»* THIS DRIVER HANDLES THE GENERAL PRINTER GP74, PTS 6374 & PTS 6375 «, t00=0x0001, t01=0x0134}
0x030e…0318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0182}
0x0318…0350 Head {h00=0x0034, h01=0x0050, text=»* THE DRIVER CONSISTS OF THE FOLLOWING PARTS :«, t00=0x0001, t01=0x018c}
0x0350…035a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0034}
0x035a…0382 Head {h00=0x0024, h01=0x0050, text=»* A C T P : ACTIVATION PART «, t00=0x0002, t01=0x003e}
0x0382…038c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0066}
0x038c…03b4 Head {h00=0x0024, h01=0x0050, text=»* R C T P : RECOVERY ROUTINE«, t00=0x0002, t01=0x0070}
0x03b4…03be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0098}
0x03be…03c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a2}
0x03c8…03d6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x00ac}
0x03d6…03e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ba}
0x03e0…040e Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED: «, t00=0x0002, t01=0x00c4}
0x040e…0418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00f2}
0x0418…0440 Head {h00=0x0024, h01=0x0050, text=»* ORDER 00 : TEST STATUS «, t00=0x0002, t01=0x00fc}
0x0440…0468 Head {h00=0x0024, h01=0x0050, text=»* ORDER 05 : BASIC WRITE «, t00=0x0002, t01=0x0124}
0x0468…0492 Head {h00=0x0026, h01=0x0050, text=»* ORDER 06 : STANDARD WRITE«, t00=0x0002, t01=0x014c}
0x0492…04c0 Head {h00=0x002a, h01=0x0050, text=»* ORDER 0B : POSITION DOCUMENT «, t00=0x0002, t01=0x0176}
0x04c0…04f2 Head {h00=0x002e, h01=0x0050, text=»* ORDER 24 : SET PRINTER PARAMETERS«, t00=0x0003, t01=0x0014}
0x04f2…0522 Head {h00=0x002c, h01=0x0050, text=»* ORDER 27 : SET FORM PARAMETERS «, t00=0x0003, t01=0x0046}
0x0522…054e Head {h00=0x0028, h01=0x0050, text=»* ORDER 38 : RELEASE DOCUMENT«, t00=0x0003, t01=0x0076}
0x054e…0558 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00a2}
0x0558…0588 Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING RETURN CODES ARE USED:«, t00=0x0003, t01=0x00ac}
0x0588…0592 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00dc}
0x0592…05bc Head {h00=0x0026, h01=0x0050, text=»* BIT 0 : REQUEST ERROR «, t00=0x0003, t01=0x00e6}
0x05bc…05ee Head {h00=0x002e, h01=0x0050, text=»* BIT 2 : END OF JOURNAL TAPE «, t00=0x0003, t01=0x0110}
0x05ee…061c Head {h00=0x002a, h01=0x0050, text=»* BIT 7 : RECOVERY EXECUTED «, t00=0x0003, t01=0x0142}
0x061c…0648 Head {h00=0x0028, h01=0x0050, text=»* BIT 13 : CODE CHECK ERROR«, t00=0x0003, t01=0x0170}
0x0648…0670 Head {h00=0x0024, h01=0x0050, text=»* BIT 15 : NOT OPERABLE«, t00=0x0004, t01=0x000c}
0x0670…067a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0034}
0x067a…0684 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x003e}
0x0684…06a6 Head {h00=0x001e, h01=0x0050, text=»* NORMAL REGISTER USAGE:«, t00=0x0004, t01=0x0048}
0x06a6…06b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006a}
0x06b0…06d6 Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1: WORK REGISTER«, t00=0x0004, t01=0x0074}
0x06d6…06fc Head {h00=0x0022, h01=0x0050, text=»* A2: INPUT/OUTPUT «, t00=0x0004, t01=0x009a}
0x06fc…0724 Head {h00=0x0024, h01=0x0050, text=»* A3: BUFFER POINTER «, t00=0x0004, t01=0x00c0}
0x0724…074a Head {h00=0x0022, h01=0x0050, text=»* A4: WORK REGISTER«, t00=0x0004, t01=0x00e8}
0x074a…0770 Head {h00=0x0022, h01=0x0050, text=»* A5: STACK POINTER«, t00=0x0004, t01=0x010e}
0x0770…0794 Head {h00=0x0020, h01=0x0050, text=»* A6: DWT-ADDRESS«, t00=0x0004, t01=0x0134}
0x0794…07b2 Head {h00=0x001a, h01=0x0050, text=»* A7: ORDER«, t00=0x0004, t01=0x0158}
0x07b2…07d6 Head {h00=0x0020, h01=0x0050, text=»* A8: ECB-ADDRESS«, t00=0x0004, t01=0x0176}
0x07d6…07e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x000a}
0x07e0…07ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0014}
0x07ea…07f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x001e}
0x07f8…0802 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x002c}
0x0802…080c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0036}
0x080c…0840 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0005, t01=0x0040}
0x0840…084a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0074}
0x084a…085c Head {h00=0x000e, h01=0x0050, text=»* ENTRIES «, t00=0x0005, t01=0x007e}
0x085c…0866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0090}
0x0866…089a Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0005, t01=0x009a}
0x089a…08a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ce}
0x08a4…08ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d8}
0x08ae…08d0 Head {h00=0x001e, h01=0x0050, text=» ENTRY GPAD3 ADDRESS BLOCK«, t00=0x0005, t01=0x00e2}
0x08d0…08da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0104}
0x08da…08e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x010e}
0x08e4…08ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0118}
0x08ee…0922 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0005, t01=0x0122}
0x0922…092c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0156}
0x092c…0940 Head {h00=0x0010, h01=0x0050, text=»* EXTERNALS «, t00=0x0005, t01=0x0160}
0x0940…094a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0174}
0x094a…097e Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0005, t01=0x017e}
0x097e…0988 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0022}
0x0988…0992 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x002c}
0x0992…09c2 Head {h00=0x002c, h01=0x0050, text=» EXTRN LDISP DISPATCHING FROM INTERRUPT «, t00=0x0006, t01=0x0036}
0x09c2…09ea Head {h00=0x0024, h01=0x0050, text=» EXTRN LENDER DISPATCH I/O ERROR«, t00=0x0006, t01=0x0066}
0x09ea…0a14 Head {h00=0x0026, h01=0x0050, text=» EXTRN LENDIS END I/O AND DISPATCH«, t00=0x0006, t01=0x008e}
0x0a14…0a3e Head {h00=0x0026, h01=0x0050, text=» EXTRN OUTPUT OUTPUT ONE CHARACTER«, t00=0x0006, t01=0x00b8}
0x0a3e…0a72 Head {h00=0x0030, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER FROM ECB BUFFER «, t00=0x0006, t01=0x00e2}
0x0a72…0a92 Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIMP SET TIMER «, t00=0x0006, t01=0x0116}
0x0a92…0abe Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTST DWT STATUS DISPLACEMENT«, t00=0x0006, t01=0x0136}
0x0abe…0ae8 Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTECB DWT ECB DISPLACEMENT«, t00=0x0006, t01=0x0162}
0x0ae8…0b14 Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTOR DWT ORDER DISPLACEMENT «, t00=0x0006, t01=0x018c}
0x0b14…0b34 Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTSB2 STACK BASE«, t00=0x0007, t01=0x0028}
0x0b34…0b6a Head {h00=0x0032, h01=0x0050, text=» EXTRN INPUT STORE REG = GET STATUS INPUT CHAR«, t00=0x0007, t01=0x0048}
0x0b6a…0b92 Head {h00=0x0024, h01=0x0050, text=» EXTRN STABLK DEF START OF BLOCK«, t00=0x0007, t01=0x007e}
0x0b92…0bb8 Head {h00=0x0022, h01=0x0050, text=» EXTRN ENDBLK DEF END OF BLOCK«, t00=0x0007, t01=0x00a6}
0x0bb8…0bdc Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTDEV DEVICE STATUS «, t00=0x0007, t01=0x00cc}
0x0bdc…0bee Head {h00=0x000e, h01=0x0050, text=» EJECT «, t00=0x0007, t01=0x00f0}
0x0bee…0bf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0102}
0x0bf8…0c2a Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0007, t01=0x010c}
0x0c2a…0c34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x013e}
0x0c34…0c48 Head {h00=0x0010, h01=0x0050, text=»* CONSTANTS «, t00=0x0007, t01=0x0148}
0x0c48…0c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x015c}
0x0c52…0c84 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0007, t01=0x0166}
0x0c84…0c8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0008}
0x0c8e…0c98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0012}
0x0c98…0cbe Head {h00=0x0022, h01=0x0050, text=»SPEC EQU /2E SPECIAL CHARACTER«, t00=0x0008, t01=0x001c}
0x0cbe…0cda Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x0008, t01=0x0042}
0x0cda…0d00 Head {h00=0x0022, h01=0x0050, text=»RLF EQU /40 REVERSE LINE FEED «, t00=0x0008, t01=0x005e}
0x0d00…0d1c Head {h00=0x0018, h01=0x0050, text=»FF EQU /0C FORM FEED«, t00=0x0008, t01=0x0084}
0x0d1c…0d3e Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x0008, t01=0x00a0}
0x0d3e…0d5a Head {h00=0x0018, h01=0x0050, text=»SO EQU /0E SHIFT OUT«, t00=0x0008, t01=0x00c2}
0x0d5a…0d76 Head {h00=0x0018, h01=0x0050, text=»SI EQU /0F SHIFT IN «, t00=0x0008, t01=0x00de}
0x0d76…0d90 Head {h00=0x0016, h01=0x0050, text=»ESC EQU /1B ESCAPE«, t00=0x0008, t01=0x00fa}
0x0d90…0dc0 Head {h00=0x002c, h01=0x0050, text=»CSI EQU /5B CONTROL SEQUENCE INTRODUCER «, t00=0x0008, t01=0x0114}
0x0dc0…0dda Head {h00=0x0016, h01=0x0050, text=»REP EQU /62 REPEAT«, t00=0x0008, t01=0x0144}
0x0dda…0e08 Head {h00=0x002a, h01=0x0050, text=»VPR EQU /65 VERTICAL POSITION RELATIVE«, t00=0x0008, t01=0x015e}
0x0e08…0e36 Head {h00=0x002a, h01=0x0050, text=»VPA EQU /64 VERTICAL POSITION ABSOLUTE«, t00=0x0008, t01=0x018c}
0x0e36…0e62 Head {h00=0x0028, h01=0x0050, text=»SNV EQU /77 SELECT NATIONAL VERSION «, t00=0x0009, t01=0x002a}
0x0e62…0e8a Head {h00=0x0024, h01=0x0050, text=»SLPL EQU /76 SELECT PAGE LENGTH «, t00=0x0009, t01=0x0056}
0x0e8a…0eb4 Head {h00=0x0026, h01=0x0050, text=»RIS EQU /63 RESET TO INITIAL STATE«, t00=0x0009, t01=0x007e}
0x0eb4…0edc Head {h00=0x0024, h01=0x0050, text=»DSR EQU /6E DEVICE STATUS REPORT«, t00=0x0009, t01=0x00a8}
0x0edc…0efc Head {h00=0x001c, h01=0x0050, text=»DS EQU /35 DEVICE STATUS«, t00=0x0009, t01=0x00d0}
0x0efc…0f26 Head {h00=0x0026, h01=0x0050, text=»DCS EQU /50 DEVICE CONTROL STRING «, t00=0x0009, t01=0x00f0}
0x0f26…0f4a Head {h00=0x0020, h01=0x0050, text=»ST EQU /5C STRING TERMINATOR«, t00=0x0009, t01=0x011a}
0x0f4a…0f64 Head {h00=0x0016, h01=0x0050, text=»DEL EQU /7F DELETE«, t00=0x0009, t01=0x013e}
0x0f64…0f7e Head {h00=0x0016, h01=0x0050, text=»ZERO EQU /30 ZERO «, t00=0x0009, t01=0x0158}
0x0f7e…0f92 Head {h00=0x0010, h01=0x0050, text=»NEG EQU /FF «, t00=0x0009, t01=0x0172}
0x0f92…0fba Head {h00=0x0024, h01=0x0050, text=»CPL EQU /78 CHARACTER PITCH LOAD«, t00=0x0009, t01=0x0186}
0x0fba…0fee Head {h00=0x0030, h01=0x0050, text=»HPA EQU /60 HORIZONTAL POSITIONING ABSOLUTE «, t00=0x000a, t01=0x001e}
0x0fee…101c Head {h00=0x002a, h01=0x0050, text=»HTS EQU /48 HORIZONTAL TABULATION SET «, t00=0x000a, t01=0x0052}
0x101c…104c Head {h00=0x002c, h01=0x0050, text=»TBC EQU /67 HORIZONTAL TABULATION CLEAR «, t00=0x000a, t01=0x0080}
0x104c…1070 Head {h00=0x0020, h01=0x0050, text=»LSL EQU /7B LINE SPACE LOAD «, t00=0x000a, t01=0x00b0}
0x1070…108c Head {h00=0x0018, h01=0x0050, text=»SM EQU /68 SET MODE «, t00=0x000a, t01=0x00d4}
0x108c…10aa Head {h00=0x001a, h01=0x0050, text=»RM EQU /6C RESET MODE «, t00=0x000a, t01=0x00f0}
0x10aa…10d8 Head {h00=0x002a, h01=0x0050, text=»SGR EQU /6D SELECT GRAPHICAL RENDITION«, t00=0x000a, t01=0x010e}
0x10d8…10ec Head {h00=0x0010, h01=0x0050, text=»SEP EQU /3B «, t00=0x000a, t01=0x013c}
0x10ec…10fe Head {h00=0x000e, h01=0x0050, text=»FR EQU /32«, t00=0x000a, t01=0x0150}
0x10fe…1120 Head {h00=0x001e, h01=0x0050, text=»UL EQU /34 START UNDERLINE«, t00=0x000a, t01=0x0162}
0x1120…1142 Head {h00=0x001e, h01=0x0050, text=»TIME EQU /FF 25 SEC. TIMER«, t00=0x000a, t01=0x0184}
0x1142…1154 Head {h00=0x000e, h01=0x0050, text=» EJECT «, t00=0x000b, t01=0x0016}
0x1154…115e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0028}
0x115e…1168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0032}
0x1168…11aa Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x000b, t01=0x003c}
0x11aa…11b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x007e}
0x11b4…11d0 Head {h00=0x0018, h01=0x0050, text=»* CONTROL SEQUENCES «, t00=0x000b, t01=0x0088}
0x11d0…11da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00a4}
0x11da…121c Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x000b, t01=0x00ae}
0x121c…1226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00f0}
0x1226…1230 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00fa}
0x1230…1246 Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x000b, t01=0x0104}
0x1246…1250 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x011a}
0x1250…125a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0124}
0x125a…1274 Head {h00=0x0016, h01=0x0050, text=»CSREP EQU * REPEAT«, t00=0x000b, t01=0x012e}
0x1274…128a Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000b, t01=0x0148}
0x128a…12a2 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000b, t01=0x015e}
0x12a2…12b8 Head {h00=0x0012, h01=0x0050, text=» BYTE ZERO,REP«, t00=0x000b, t01=0x0176}
0x12b8…12ce Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000b, t01=0x018c}
0x12ce…12e2 Head {h00=0x0010, h01=0x0050, text=»CSSNV EQU * «, t00=0x000c, t01=0x0012}
0x12e2…1304 Head {h00=0x001e, h01=0x0050, text=» SELECT NATIONAL VERSION«, t00=0x000c, t01=0x0026}
0x1304…131a Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000c, t01=0x0048}
0x131a…1332 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000c, t01=0x005e}
0x1332…1348 Head {h00=0x0012, h01=0x0050, text=» BYTE SNV,NEG «, t00=0x000c, t01=0x0076}
0x1348…136e Head {h00=0x0022, h01=0x0050, text=»CSSLPL EQU * SELECT PAGELENGTH«, t00=0x000c, t01=0x008c}
0x136e…1384 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000c, t01=0x00b2}
0x1384…139c Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000c, t01=0x00c8}
0x139c…13b6 Head {h00=0x0016, h01=0x0050, text=» BYTE SLPL,NEG «, t00=0x000c, t01=0x00e0}
0x13b6…13cc Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000c, t01=0x00fa}
0x13cc…13f6 Head {h00=0x0026, h01=0x0050, text=»CSRIS EQU * RESET TO INITIAL STATE«, t00=0x000c, t01=0x0110}
0x13f6…140c Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,RIS «, t00=0x000c, t01=0x013a}
0x140c…1422 Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000c, t01=0x0150}
0x1422…144a Head {h00=0x0024, h01=0x0050, text=»CSDSR EQU * DEVICE STATUS REPORT«, t00=0x000c, t01=0x0166}
0x144a…1460 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000c, t01=0x018e}
0x1460…1474 Head {h00=0x0010, h01=0x0050, text=» BYTE DS,DSR«, t00=0x000d, t01=0x0014}
0x1474…148a Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000d, t01=0x0028}
0x148a…14b2 Head {h00=0x0024, h01=0x0050, text=»CSCPL EQU * CHARACTER PITCH LOAD«, t00=0x000d, t01=0x003e}
0x14b2…14c8 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000d, t01=0x0066}
0x14c8…14de Head {h00=0x0012, h01=0x0050, text=» BYTE ZERO,SEP«, t00=0x000d, t01=0x007c}
0x14de…14f4 Head {h00=0x0012, h01=0x0050, text=» BYTE ZERO,CPL«, t00=0x000d, t01=0x0092}
0x14f4…150a Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000d, t01=0x00a8}
0x150a…153e Head {h00=0x0030, h01=0x0050, text=»CSHPA EQU * HORIZONTAL POSITIONING ABSOLUTE «, t00=0x000d, t01=0x00be}
0x153e…1554 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000d, t01=0x00f2}
0x1554…156c Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000d, t01=0x0108}
0x156c…1582 Head {h00=0x0012, h01=0x0050, text=» BYTE ZERO,HPA«, t00=0x000d, t01=0x0120}
0x1582…1598 Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000d, t01=0x0136}
0x1598…15c8 Head {h00=0x002c, h01=0x0050, text=»CSTBC EQU * HORIZONTAL TABULATION CLEAR «, t00=0x000d, t01=0x014c}
0x15c8…15de Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000d, t01=0x017c}
0x15de…15f4 (14, 0, 400) Head {h00=0x0012, h01=0x0050, text=» BYTE ZERO,TBC«, t00=0x000e, t01=0x0004}
0x15f4…160a Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000e, t01=0x001a}
0x160a…1638 Head {h00=0x002a, h01=0x0050, text=»CSHTS EQU * HORIZONTAL TABULATION SET «, t00=0x000e, t01=0x0030}
0x1638…164e Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,HTS «, t00=0x000e, t01=0x005e}
0x164e…1664 Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000e, t01=0x0074}
0x1664…1696 Head {h00=0x002e, h01=0x0050, text=»CSVPA EQU * VERTICAL POSITIONING ABSOLUTE «, t00=0x000e, t01=0x008a}
0x1696…16ac Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000e, t01=0x00bc}
0x16ac…16c4 Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000e, t01=0x00d2}
0x16c4…16da Head {h00=0x0012, h01=0x0050, text=» BYTE VPA,NEG «, t00=0x000e, t01=0x00ea}
0x16da…16fe Head {h00=0x0020, h01=0x0050, text=»CSLSL EQU * LINE SPACE LOAD «, t00=0x000e, t01=0x0100}
0x16fe…1714 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000e, t01=0x0124}
0x1714…172c Head {h00=0x0014, h01=0x0050, text=» BYTE ZERO,ZERO «, t00=0x000e, t01=0x013a}
0x172c…1742 Head {h00=0x0012, h01=0x0050, text=» BYTE LSL,NEG «, t00=0x000e, t01=0x0152}
0x1742…175e Head {h00=0x0018, h01=0x0050, text=»CSSM EQU * SET MODE «, t00=0x000e, t01=0x0168}
0x175e…1774 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000e, t01=0x0184}
0x1774…178a Head {h00=0x0012, h01=0x0050, text=» BYTE FR,ZERO «, t00=0x000f, t01=0x000a}
0x178a…179e Head {h00=0x0010, h01=0x0050, text=» BYTE SM,NEG«, t00=0x000f, t01=0x0020}
0x179e…17bc Head {h00=0x001a, h01=0x0050, text=»CSRM EQU * RESET MODE «, t00=0x000f, t01=0x0034}
0x17bc…17d2 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000f, t01=0x0052}
0x17d2…17e8 Head {h00=0x0012, h01=0x0050, text=» BYTE FR,ZERO «, t00=0x000f, t01=0x0068}
0x17e8…17fc Head {h00=0x0010, h01=0x0050, text=» BYTE RM,NEG«, t00=0x000f, t01=0x007e}
0x17fc…1820 Head {h00=0x0020, h01=0x0050, text=»CSSUL EQU * START UNDERLINE «, t00=0x000f, t01=0x0092}
0x1820…1836 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000f, t01=0x00b6}
0x1836…184a Head {h00=0x0010, h01=0x0050, text=» BYTE UL,SGR«, t00=0x000f, t01=0x00cc}
0x184a…1860 Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000f, t01=0x00e0}
0x1860…1882 Head {h00=0x001e, h01=0x0050, text=»CSEUL EQU * STOP UNDERLINE«, t00=0x000f, t01=0x00f6}
0x1882…1898 Head {h00=0x0012, h01=0x0050, text=» BYTE ESC,CSI «, t00=0x000f, t01=0x0118}
0x1898…18ae Head {h00=0x0012, h01=0x0050, text=» BYTE ZERO,SGR«, t00=0x000f, t01=0x012e}
0x18ae…18c4 Head {h00=0x0012, h01=0x0050, text=» BYTE NEG,NEG «, t00=0x000f, t01=0x0144}
0x18c4…18d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x015a}
0x18d2…18dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0168}
0x18dc…18e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0172}
0x18e6…1926 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000f, t01=0x017c}
0x1926…1930 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x002c}
0x1930…194e Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0010, t01=0x0036}
0x194e…1958 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0054}
0x1958…1998 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0010, t01=0x005e}
0x1998…19a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x009e}
0x19a2…19ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a8}
0x19ac…19b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b2}
0x19b6…19ee Head {h00=0x0034, h01=0x0050, text=»* THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN«, t00=0x0010, t01=0x00bc}
0x19ee…1a2a Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:A TO 1-15 ACCORDING TO THE LIST BELOW«, t00=0x0010, t01=0x00f4}
0x1a2a…1a34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0130}
0x1a34…1a3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x013a}
0x1a3e…1a76 Head {h00=0x0034, h01=0x0050, text=»* NCV=1 GERMANY,AUSTRIA,LUXEMBOURG,SWITZERLAND «, t00=0x0010, t01=0x0144}
0x1a76…1ac0 Head {h00=0x0046, h01=0x0050, text=» =2 GREAT BRITAIN,NETHERLANDS,BELGIUM,NEW ZEELAND,SOUTH AFRICA «, t00=0x0010, t01=0x017c}
0x1ac0…1af4 Head {h00=0x0030, h01=0x0050, text=» =3 FRANCE,SWITZERLAND,BELGIUM,LUXEMBOURG«, t00=0x0011, t01=0x0036}
0x1af4…1b24 Head {h00=0x002c, h01=0x0050, text=» =4 SPAIN,MEXICO,ARGENTINA,VENEZUELA «, t00=0x0011, t01=0x006a}
0x1b24…1b44 Head {h00=0x001c, h01=0x0050, text=» =5 ITALY,SWITZERLAND«, t00=0x0011, t01=0x009a}
0x1b44…1b62 Head {h00=0x001a, h01=0x0050, text=» =6 SWEDEN,FINLAND «, t00=0x0011, t01=0x00ba}
0x1b62…1b80 Head {h00=0x001a, h01=0x0050, text=» =7 DENMARK,NORWAY «, t00=0x0011, t01=0x00d8}
0x1b80…1b9e Head {h00=0x001a, h01=0x0050, text=» =8 PORTUGAL,BRAZIL«, t00=0x0011, t01=0x00f6}
0x1b9e…1bb8 Head {h00=0x0016, h01=0x0050, text=» =9 YUGOSLAVIA «, t00=0x0011, t01=0x0114}
0x1bb8…1bdc Head {h00=0x0020, h01=0x0050, text=» =10 USA,CANADA,AUSTRALIA«, t00=0x0011, t01=0x012e}
0x1bdc…1c04 Head {h00=0x0024, h01=0x0050, text=» =11 SWEDEN (SPECIAL VERSION)«, t00=0x0011, t01=0x0152}
0x1c04…1c1a Head {h00=0x0012, h01=0x0050, text=» =13 GREEK «, t00=0x0011, t01=0x017a}
0x1c1a…1c42 Head {h00=0x0024, h01=0x0050, text=» =14 JAPAN (KATAKANA VERSION)«, t00=0x0011, t01=0x0190}
0x1c42…1c6a Head {h00=0x0024, h01=0x0050, text=» =15 ISRAEL (HEBREW VERSION)«, t00=0x0012, t01=0x0028}
0x1c6a…1c74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0050}
0x1c74…1c7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x005a}
0x1c7e…1caa Head {h00=0x0028, h01=0x0050, text=»X:A EQU 02 GREAT BRITAIN AS STANDARD«, t00=0x0012, t01=0x0064}
0x1caa…1cc0 Head {h00=0x0012, h01=0x0050, text=»STDNCV EQU X:A«, t00=0x0012, t01=0x0090}
0x1cc0…1cce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x00a6}
0x1cce…1cd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b4}
0x1cd8…1ce2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00be}
0x1ce2…1d0c Head {h00=0x0026, h01=0x0050, text=»* FRICTION FEED CAN BE SELECTED BY«, t00=0x0012, t01=0x00c8}
0x1d0c…1d24 Head {h00=0x0014, h01=0x0050, text=»* SETTING X:B=1 «, t00=0x0012, t01=0x00f2}
0x1d24…1d36 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0012, t01=0x010a}
0x1d36…1d4c Head {h00=0x0012, h01=0x0050, text=»SINHAN EQU X:B«, t00=0x0012, t01=0x011c}
0x1d4c…1d56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0132}
0x1d56…1d60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x013c}
0x1d60…1d90 Head {h00=0x002c, h01=0x0050, text=»* THE FRONT FEED DEVICE CAN BE EXCLUDED «, t00=0x0012, t01=0x0146}
0x1d90…1dac Head {h00=0x0018, h01=0x0050, text=»* BY SETTING X:C = 0«, t00=0x0012, t01=0x0176}
0x1dac…1db6 (19, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0004}
0x1db6…1dc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x000e}
0x1dc0…1dd2 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x0013, t01=0x0018}
0x1dd2…1dfa Head {h00=0x0024, h01=0x0050, text=»FFDEV EQU X:C FRONT FEED DEVICE «, t00=0x0013, t01=0x002a}
0x1dfa…1e04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0052}
0x1e04…1e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x005c}
0x1e0e…1e18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0066}
0x1e18…1e44 Head {h00=0x0028, h01=0x0050, text=»* THE STANDARD PAGELENGTH IS DEFINED«, t00=0x0013, t01=0x0070}
0x1e44…1e6e Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:D = NUMBER OF LINES«, t00=0x0013, t01=0x009c}
0x1e6e…1e78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00c6}
0x1e78…1e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d0}
0x1e82…1e94 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 48«, t00=0x0013, t01=0x00da}
0x1e94…1eaa Head {h00=0x0012, h01=0x0050, text=»PAGLEN EQU X:D«, t00=0x0013, t01=0x00ec}
0x1eaa…1eb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0102}
0x1eb4…1ebe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x010c}
0x1ebe…1ef0 Head {h00=0x002e, h01=0x0050, text=»* THE STANDARD NUMBER OF LINES IS DEFINED «, t00=0x0013, t01=0x0116}
0x1ef0…1f1a Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:E = NUMBER OF LINES«, t00=0x0013, t01=0x0148}
0x1f1a…1f24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0172}
0x1f24…1f2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x017c}
0x1f2e…1f44 Head {h00=0x0012, h01=0x0050, text=»X:E EQU 64 «, t00=0x0013, t01=0x0186}
0x1f44…1f5a Head {h00=0x0012, h01=0x0050, text=»DOCLEN EQU X:E«, t00=0x0014, t01=0x000c}
0x1f5a…1f64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0022}
0x1f64…1f6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x002c}
0x1f6e…1f78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0036}
0x1f78…1f92 Head {h00=0x0016, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x0014, t01=0x0040}
0x1f92…1f9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x005a}
0x1f9c…1fa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0064}
0x1fa6…1fba Head {h00=0x0010, h01=0x0050, text=»X:F EQU 132 «, t00=0x0014, t01=0x006e}
0x1fba…1fd0 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:F«, t00=0x0014, t01=0x0082}
0x1fd0…1fda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0098}
0x1fda…1fe8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x00a2}
0x1fe8…1ff2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00b0}
0x1ff2…1ffc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ba}
0x1ffc…2030 Head {h00=0x0030, h01=0x0050, text=»* THE STANDARD MATRIX IS SELECTED BY SETTING«, t00=0x0014, t01=0x00c4}
0x2030…2052 Head {h00=0x001e, h01=0x0050, text=»* X:G=MATRIX NUMBER (1-9).«, t00=0x0014, t01=0x00f8}
0x2052…205c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x011a}
0x205c…2066 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0124}
0x2066…2078 Head {h00=0x000e, h01=0x0050, text=»X:G EQU 1 «, t00=0x0014, t01=0x012e}
0x2078…208e Head {h00=0x0012, h01=0x0050, text=»MATRIX EQU X:G«, t00=0x0014, t01=0x0140}
0x208e…2098 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0156}
0x2098…20a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0160}
0x20a2…20e2 Head {h00=0x003c, h01=0x0050, text=»* THE STANDARD CHARACTER DENSITY (PITCH) IS SELECTED BY «, t00=0x0014, t01=0x016a}
0x20e2…2126 Head {h00=0x0040, h01=0x0050, text=»* SETTING X:H=(1-4). 1=10 CH/INCH,2=12 CH/INCH,3=15 CH/INCH «, t00=0x0015, t01=0x001a}
0x2126…2146 Head {h00=0x001c, h01=0x0050, text=»* 4= PROPORTIONAL PITCH «, t00=0x0015, t01=0x005e}
0x2146…2150 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x007e}
0x2150…215a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0088}
0x215a…216c Head {h00=0x000e, h01=0x0050, text=»X:H EQU 1 «, t00=0x0015, t01=0x0092}
0x216c…2182 Head {h00=0x0012, h01=0x0050, text=»DENSIT EQU X:H«, t00=0x0015, t01=0x00a4}
0x2182…218c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ba}
0x218c…2196 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00c4}
0x2196…21d6 Head {h00=0x003c, h01=0x0050, text=»* HIGH SPEED PRINTING CAN BE PERFORMED BY SETTING X:I=1 «, t00=0x0015, t01=0x00ce}
0x21d6…21e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x010e}
0x21e0…21ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0118}
0x21ea…21fc Head {h00=0x000e, h01=0x0050, text=»X:I EQU 0 «, t00=0x0015, t01=0x0122}
0x21fc…2212 Head {h00=0x0012, h01=0x0050, text=»SPEEDY EQU X:I«, t00=0x0015, t01=0x0134}
0x2212…221c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x014a}
0x221c…2226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0154}
0x2226…2264 Head {h00=0x003a, h01=0x0050, text=»* END OF REQUEST AT POWER FAILURE,NOT OP., LRC-, LINK-«, t00=0x0015, t01=0x015e}
0x2264…2290 Head {h00=0x0028, h01=0x0050, text=»* ERROR OR SOFTW. TIME OUT IF X:J=1 «, t00=0x0016, t01=0x000c}
0x2290…229a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0038}
0x229a…22a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0042}
0x22a4…22b6 Head {h00=0x000e, h01=0x0050, text=»X:J EQU 0 «, t00=0x0016, t01=0x004c}
0x22b6…22cc Head {h00=0x0012, h01=0x0050, text=»REQEND EQU X:J«, t00=0x0016, t01=0x005e}
0x22cc…22d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0074}
0x22d6…22e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x007e}
0x22e0…231c Head {h00=0x0038, h01=0x0050, text=»* ORDER /27, SET FORM PARAMETERS CAN BE EXCLUDED BY «, t00=0x0016, t01=0x0088}
0x231c…2334 Head {h00=0x0014, h01=0x0050, text=»* SETTING X:K=0 «, t00=0x0016, t01=0x00c4}
0x2334…233e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00dc}
0x233e…2348 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00e6}
0x2348…235a Head {h00=0x000e, h01=0x0050, text=»X:K EQU 1 «, t00=0x0016, t01=0x00f0}
0x235a…2370 Head {h00=0x0012, h01=0x0050, text=»FORMPA EQU X:K«, t00=0x0016, t01=0x0102}
0x2370…237a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0118}
0x237a…2384 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0122}
0x2384…23b6 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0016, t01=0x012c}
0x23b6…23e4 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1 «, t00=0x0016, t01=0x015e}
0x23e4…23ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x018c}
0x23ee…23f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0008}
0x23f8…240c Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0017, t01=0x0012}
0x240c…2416 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0026}
0x2416…2420 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0030}
0x2420…242a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x003a}
0x242a…2464 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0017, t01=0x0044}
0x2464…2496 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0 «, t00=0x0017, t01=0x007e}
0x2496…24a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b0}
0x24a0…24aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ba}
0x24aa…24be Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0017, t01=0x00c4}
0x24be…24cc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x00d8}
0x24cc…24d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00e6}
0x24d6…24e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00f0}
0x24e0…2514 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0017, t01=0x00fa}
0x2514…251e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x012e}
0x251e…253c Head {h00=0x001a, h01=0x0050, text=»* DWT - DISPLACEMENTS «, t00=0x0017, t01=0x0138}
0x253c…2546 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0156}
0x2546…257a Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0017, t01=0x0160}
0x257a…2584 (24, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0004}
0x2584…25a6 Head {h00=0x001e, h01=0x0050, text=»DWTTP EQU /2 TIMER POINTER«, t00=0x0018, t01=0x000e}
0x25a6…25d2 Head {h00=0x0028, h01=0x0050, text=»DWTDCS EQU /4 DOCUMENT CHARACTER SET«, t00=0x0018, t01=0x0030}
0x25d2…25fe Head {h00=0x0028, h01=0x0050, text=»DWTPCS EQU /6 PRINTER CHARACTER SET «, t00=0x0018, t01=0x005c}
0x25fe…2628 Head {h00=0x0026, h01=0x0050, text=»DWTPL EQU /8 PRINTER PAPER LENGTH «, t00=0x0018, t01=0x0088}
0x2628…2652 Head {h00=0x0026, h01=0x0050, text=»DWTDL EQU /A DOCUMENT PAPER LENGTH«, t00=0x0018, t01=0x00b2}
0x2652…2680 Head {h00=0x002a, h01=0x0050, text=»DWTALN EQU /C ACTUAL LINE ON DOCUMENT «, t00=0x0018, t01=0x00dc}
0x2680…26b0 Head {h00=0x002c, h01=0x0050, text=»DWTRLN EQU /E REQUESTED LINE ON DOCUMENT«, t00=0x0018, t01=0x010a}
0x26b0…26e0 Head {h00=0x002c, h01=0x0050, text=»DWTRC EQU /11 RETURN CODE (ACKUMULATED) «, t00=0x0018, t01=0x013a}
0x26e0…270e Head {h00=0x002a, h01=0x0050, text=»DWTSTR EQU /12 CONTROL SEQUENCE ADRESS«, t00=0x0018, t01=0x016a}
0x270e…2750 Head {h00=0x003e, h01=0x0050, text=»DWTDISP EQU /14 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. «, t00=0x0019, t01=0x0008}
0x2750…277a Head {h00=0x0026, h01=0x0050, text=»DWTACP EQU /16 ACTUAL COLUMN PAPER«, t00=0x0019, t01=0x004a}
0x277a…27a2 Head {h00=0x0024, h01=0x0050, text=»DWTCO1 EQU /1A COLUMN COUNTER 1 «, t00=0x0019, t01=0x0074}
0x27a2…27cc Head {h00=0x0026, h01=0x0050, text=»DWTSYST EQU /1C SYSTEM START IND. «, t00=0x0019, t01=0x009c}
0x27cc…27fc Head {h00=0x002c, h01=0x0050, text=»DWTLFD EQU /1E LINE/FORM FEED INDICATOR «, t00=0x0019, t01=0x00c6}
0x27fc…2834 Head {h00=0x0034, h01=0x0050, text=»DWTCMF EQU /20 CHAR MATRIX & PITCH, TRACTOR FEED«, t00=0x0019, t01=0x00f6}
0x2834…286e Head {h00=0x0036, h01=0x0050, text=»DWTCMT EQU /22 CHAR MATRIX & PITCH, FRONT/FRI FEED«, t00=0x0019, t01=0x012e}
0x286e…288e Head {h00=0x001c, h01=0x0050, text=»DWTLS EQU /24 LINE SPACE«, t00=0x0019, t01=0x0168}
0x288e…28b0 Head {h00=0x001e, h01=0x0050, text=»DWTHSP EQU /26 HIGH SPEED «, t00=0x0019, t01=0x0188}
0x28b0…28d4 Head {h00=0x0020, h01=0x0050, text=»DWTHOP EQU /28 HOPPER 1 OR 2«, t00=0x001a, t01=0x001a}
0x28d4…28fc Head {h00=0x0024, h01=0x0050, text=»DWTTAB EQU /2A LAST TAB POS SET «, t00=0x001a, t01=0x003e}
0x28fc…292e Head {h00=0x002e, h01=0x0050, text=»DWTSER EQU /2E CONTR. SEQ. SEPARATOR IND. «, t00=0x001a, t01=0x0066}
0x292e…293c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0098}
0x293c…2946 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00a6}
0x2946…2950 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00b0}
0x2950…2984 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x001a, t01=0x00ba}
0x2984…298e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00ee}
0x298e…29ac Head {h00=0x001a, h01=0x0050, text=»* ECB - DISPLACEMENTS «, t00=0x001a, t01=0x00f8}
0x29ac…29b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0116}
0x29b6…29ea Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x001a, t01=0x0120}
0x29ea…29f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0154}
0x29f4…2a1e Head {h00=0x0026, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS IN ECB «, t00=0x001a, t01=0x015e}
0x2a1e…2a4a Head {h00=0x0028, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH IN ECB «, t00=0x001a, t01=0x0188}
0x2a4a…2a76 Head {h00=0x0028, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH IN ECB «, t00=0x001b, t01=0x0024}
0x2a76…2a9c Head {h00=0x0022, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE IN ECB«, t00=0x001b, t01=0x0050}
0x2a9c…2ac4 Head {h00=0x0024, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD IN ECB«, t00=0x001b, t01=0x0076}
0x2ac4…2ad2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x009e}
0x2ad2…2adc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ac}
0x2adc…2b10 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x001b, t01=0x00b6}
0x2b10…2b1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ea}
0x2b1a…2b2a Head {h00=0x000c, h01=0x0050, text=»* TABLES«, t00=0x001b, t01=0x00f4}
0x2b2a…2b34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0104}
0x2b34…2b68 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x001b, t01=0x010e}
0x2b68…2b72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0142}
0x2b72…2b7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x014c}
0x2b7c…2ba0 Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x001b, t01=0x0156}
0x2ba0…2bbc Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x001b, t01=0x017a}
0x2bbc…2bde Head {h00=0x001e, h01=0x0050, text=»GPAD3 EQU * ADDRESS BLOCK «, t00=0x001c, t01=0x0008}
0x2bde…2c02 Head {h00=0x0020, h01=0x0050, text=» DATA ACTP ACTIVATION DRIVER«, t00=0x001c, t01=0x002a}
0x2c02…2c28 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x001c, t01=0x004e}
0x2c28…2c4a Head {h00=0x001e, h01=0x0050, text=» DATA 0 INTERRUPT HANDLER «, t00=0x001c, t01=0x0074}
0x2c4a…2c6e Head {h00=0x0020, h01=0x0050, text=» DATA RCTP RECOVERY ROUTINE «, t00=0x001c, t01=0x0096}
0x2c6e…2c82 Head {h00=0x0010, h01=0x0050, text=»TPTAB EQU * «, t00=0x001c, t01=0x00ba}
0x2c82…2c9e Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x001c, t01=0x00ce}
0x2c9e…2cbe Head {h00=0x001c, h01=0x0050, text=» DATA /0107,/0C25,/2839 «, t00=0x001c, t01=0x00ea}
0x2cbe…2cca Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x010a}
0x2cca…2cea Head {h00=0x001c, h01=0x0050, text=» DATA /0006,/2427,/0505 «, t00=0x001c, t01=0x0116}
0x2cea…2d04 Head {h00=0x0016, h01=0x0050, text=»TPLEN EQU *-TPTAB «, t00=0x001c, t01=0x0136}
0x2d04…2d0c Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0150}
0x2d0c…2d14 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0158}
0x2d14…2d22 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x0160}
0x2d22…2d66 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x001c, t01=0x016e}
0x2d66…2d70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0022}
0x2d70…2d84 Head {h00=0x0010, h01=0x0050, text=»* A C T P «, t00=0x001d, t01=0x002c}
0x2d84…2d8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0040}
0x2d8e…2dc4 Head {h00=0x0032, h01=0x0050, text=»* THIS IS THE ACTIVATION PART OF THE DRIVER «, t00=0x001d, t01=0x004a}
0x2dc4…2e06 Head {h00=0x003e, h01=0x0050, text=»* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR«, t00=0x001d, t01=0x0080}
0x2e06…2e10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c2}
0x2e10…2e54 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x001d, t01=0x00cc}
0x2e54…2e5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0110}
0x2e5e…2e82 Head {h00=0x0020, h01=0x0050, text=»ACTP EQU * ACTIVATION ENTRY «, t00=0x001d, t01=0x011a}
0x2e82…2e8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x013e}
0x2e8c…2e96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0148}
0x2e96…2edc Head {h00=0x0042, h01=0x0050, text=»* GET DWT INDEX: 0=TRACTOR FEED, 1=FRONT FEED/FRICTION FEED «, t00=0x001d, t01=0x0152}
0x2edc…2ee6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0008}
0x2ee6…2f0c Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOR,A6 GET DWT INDEX «, t00=0x001e, t01=0x0012}
0x2f0c…2f22 Head {h00=0x0012, h01=0x0050, text=» ANK A2,1 MASK«, t00=0x001e, t01=0x0038}
0x2f22…2f52 Head {h00=0x002c, h01=0x0050, text=» SC A2,DWTDEV,A6 STORE NEW DEVICE INDEX «, t00=0x001e, t01=0x004e}
0x2f52…2f66 Head {h00=0x0010, h01=0x0050, text=» CWK A7,/24 «, t00=0x001e, t01=0x007e}
0x2f66…2f7c Head {h00=0x0012, h01=0x0050, text=» RF(E) ACT010 «, t00=0x001e, t01=0x0092}
0x2f7c…2fac Head {h00=0x002c, h01=0x0050, text=» LC A3,DWTDEV+1,A6 GET OLD DEVICE INDEX «, t00=0x001e, t01=0x00a8}
0x2fac…2fbe Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x001e, t01=0x00d8}
0x2fbe…2fd0 Head {h00=0x000e, h01=0x0050, text=» CWR A2,A3«, t00=0x001e, t01=0x00ea}
0x2fd0…2fe6 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACT010 «, t00=0x001e, t01=0x00fc}
0x2fe6…3012 Head {h00=0x0028, h01=0x0050, text=»ACT005 LDR A4,P GET PROGRAM COUNTER «, t00=0x001e, t01=0x0112}
0x3012…3042 Head {h00=0x002c, h01=0x0050, text=» ADK A4,6 MAKE RETURN ADDRESS BEFORE ABL«, t00=0x001e, t01=0x013e}
0x3042…306c Head {h00=0x0026, h01=0x0050, text=» ABL SENPAR SEND PARAM. TO PRINTER«, t00=0x001e, t01=0x016e}
0x306c…3084 Head {h00=0x0014, h01=0x0050, text=» LC A2,DWTDEV,A6«, t00=0x001f, t01=0x0008}
0x3084…3096 Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x001f, t01=0x0020}
0x3096…30b6 Head {h00=0x001c, h01=0x0050, text=»ACT010 LC A3,DWTDEV+1,A6«, t00=0x001f, t01=0x0032}
0x30b6…30ca Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FE «, t00=0x001f, t01=0x0052}
0x30ca…30dc Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x001f, t01=0x0066}
0x30dc…3102 Head {h00=0x0022, h01=0x0050, text=» SC A3,DWTDEV+1,A6 STORE INDEX«, t00=0x001f, t01=0x0078}
0x3102…3122 Head {h00=0x001c, h01=0x0050, text=» CWK A7,/05 ORDER /05 ? «, t00=0x001f, t01=0x009e}
0x3122…313c Head {h00=0x0016, h01=0x0050, text=» RF(E) ACT015 YES «, t00=0x001f, t01=0x00be}
0x313c…3166 Head {h00=0x0026, h01=0x0050, text=» ADR A7,A2 ADD DWT INDEX TO ORDER «, t00=0x001f, t01=0x00d8}
0x3166…319a Head {h00=0x0030, h01=0x0050, text=»ACT015 SC A7,DWTOR+1,A6 STORE MODIFIED ORDER«, t00=0x001f, t01=0x0102}
0x319a…31b8 Head {h00=0x001a, h01=0x0050, text=»ACT020 LDK A3,TPLEN-1 «, t00=0x001f, t01=0x0136}
0x31b8…31ea Head {h00=0x002e, h01=0x0050, text=»ACT030 CC A7,TPTAB,A3 CHECK IF LEGAL ORDER«, t00=0x001f, t01=0x0154}
0x31ea…320c Head {h00=0x001e, h01=0x0050, text=» RF(E) ACT040 VALID ORDER «, t00=0x001f, t01=0x0186}
0x320c…321e Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0020, t01=0x0018}
0x321e…323e Head {h00=0x001c, h01=0x0050, text=» RB(NN) ACT030 TRY NEXT «, t00=0x0020, t01=0x002a}
0x323e…3248 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x004a}
0x3248…326a Head {h00=0x001e, h01=0x0050, text=» ABL LENDER ILLEGAL ORDER «, t00=0x0020, t01=0x0054}
0x326a…3274 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0076}
0x3274…327e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0080}
0x327e…3292 Head {h00=0x0010, h01=0x0050, text=»ACT040 EQU *«, t00=0x0020, t01=0x008a}
0x3292…32ae Head {h00=0x0018, h01=0x0050, text=» ADR A3,A3 GET INDEX«, t00=0x0020, t01=0x009e}
0x32ae…32d2 Head {h00=0x0020, h01=0x0050, text=» ABI TPFUC,A3 EXECUTE ORDER «, t00=0x0020, t01=0x00ba}
0x32d2…32e6 Head {h00=0x0010, h01=0x0050, text=»TPFUC EQU * «, t00=0x0020, t01=0x00de}
0x32e6…3302 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0020, t01=0x00f2}
0x3302…333a Head {h00=0x0034, h01=0x0050, text=» DATA TSTSTA,WRTCON,POSDOC,PRIPAR,FORPAR,RELDOC «, t00=0x0020, t01=0x010e}
0x333a…3346 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0146}
0x3346…337e Head {h00=0x0034, h01=0x0050, text=» DATA TSTSTA,WRTCON,PRIPAR,FORPAR,BASWRT,BASWRT «, t00=0x0020, t01=0x0152}
0x337e…338c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x018a}
0x338c…33b2 Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0021, t01=0x0008}
0x33b2…33bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x002e}
0x33bc…33de Head {h00=0x001e, h01=0x0050, text=»* ORDER 00 : TEST STATUS«, t00=0x0021, t01=0x0038}
0x33de…33e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x005a}
0x33e8…340e Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0021, t01=0x0064}
0x340e…342e Head {h00=0x001c, h01=0x0050, text=»TSTSTA EQU * TEST STATUS«, t00=0x0021, t01=0x008a}
0x342e…345c Head {h00=0x002a, h01=0x0050, text=» CF A5,GTSTAT GET STATUS FROM PRINTER «, t00=0x0021, t01=0x00aa}
0x345c…3484 Head {h00=0x0024, h01=0x0050, text=»TSTEND LDR A2,A1 GET RETURN CODE«, t00=0x0021, t01=0x00d8}
0x3484…34aa Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/100 PRINTER RESET ? «, t00=0x0021, t01=0x0100}
0x34aa…34c4 Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) RCTP YES «, t00=0x0021, t01=0x0126}
0x34c4…34ec Head {h00=0x0024, h01=0x0050, text=» CF A5,RESREC RESET RECOVERY BIT«, t00=0x0021, t01=0x0140}
0x34ec…350c Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END REQUEST «, t00=0x0021, t01=0x0168}
0x350c…351a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0188}
0x351a…353c Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0022, t01=0x0008}
0x353c…3546 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x002a}
0x3546…3562 Head {h00=0x0018, h01=0x0050, text=»* ORDER 06: WRITE «, t00=0x0022, t01=0x0034}
0x3562…356c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0050}
0x356c…358e Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0022, t01=0x005a}
0x358e…35a2 Head {h00=0x0010, h01=0x0050, text=»WRTCON EQU *«, t00=0x0022, t01=0x007c}
0x35a2…35b2 Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0022, t01=0x0090}
0x35b2…35c2 Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0022, t01=0x00a0}
0x35c2…35d2 Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0022, t01=0x00b0}
0x35d2…35fa Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBRL,A8 GET REQ. LENGTH «, t00=0x0022, t01=0x00c0}
0x35fa…361a Head {h00=0x001c, h01=0x0050, text=» ADK A2,/8 BLOCK LENGTH «, t00=0x0022, t01=0x00e8}
0x361a…363e Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0022, t01=0x0108}
0x363e…3662 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0022, t01=0x012c}
0x3662…366c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0150}
0x366c…3692 Head {h00=0x0022, h01=0x0050, text=»* EXAMINE CONTROL CHARACTER «, t00=0x0022, t01=0x015a}
0x3692…369c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0180}
0x369c…36c8 Head {h00=0x0028, h01=0x0050, text=» LDK A3,1 SET UP ECB BUFFER POINTER «, t00=0x0022, t01=0x018a}
0x36c8…36f4 Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CONTROL CHARACTER«, t00=0x0023, t01=0x0026}
0x36f4…371e Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTDEV,A6 GET DEVICE STATUS«, t00=0x0023, t01=0x0052}
0x371e…374a Head {h00=0x0028, h01=0x0050, text=» ANK A1,/20 HAS POWER OFF OCCURED ? «, t00=0x0023, t01=0x007c}
0x374a…3762 Head {h00=0x0014, h01=0x0050, text=» RF(NZ) REP2 YES«, t00=0x0023, t01=0x00a8}
0x3762…378e Head {h00=0x0028, h01=0x0050, text=» SUK A2,/2B PRINT ON SAME LINE =/2B?«, t00=0x0023, t01=0x00c0}
0x378e…37a6 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRC20 YES«, t00=0x0023, t01=0x00ec}
0x37a6…37dc Head {h00=0x0032, h01=0x0050, text=»WRC04 CM DWTDEV+DWTCO1,A6 CLEAR COLUMN COUNTER«, t00=0x0023, t01=0x0104}
0x37dc…3806 Head {h00=0x0026, h01=0x0050, text=» SUK A2,5 PRINT AFTER TWO LF =/30 «, t00=0x0023, t01=0x013a}
0x3806…381e Head {h00=0x0014, h01=0x0050, text=» RF(Z) TWOLF YES«, t00=0x0023, t01=0x0164}
0x381e…3828 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x017c}
0x3828…3856 Head {h00=0x002a, h01=0x0050, text=» SUK A2,1 PRINT AFTER FORM FEED =/31 ?«, t00=0x0023, t01=0x0186}
0x3856…3876 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) ONELF NO,ONE LF «, t00=0x0024, t01=0x0024}
0x3876…3880 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0044}
0x3880…3892 Head {h00=0x000e, h01=0x0050, text=» LDK A2,FF«, t00=0x0024, t01=0x004e}
0x3892…38ae Head {h00=0x0018, h01=0x0050, text=» RF FORMF FORM FEED «, t00=0x0024, t01=0x0060}
0x38ae…38b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x007c}
0x38b8…38de Head {h00=0x0022, h01=0x0050, text=»* EXECUTE CONTROL CHARACTER«, t00=0x0024, t01=0x0086}
0x38de…38e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00ac}
0x38e8…38fc Head {h00=0x0010, h01=0x0050, text=»WRC20 EQU * «, t00=0x0024, t01=0x00b6}
0x38fc…391e Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIDGE RETURN«, t00=0x0024, t01=0x00ca}
0x391e…3934 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0024, t01=0x00ec}
0x3934…394a Head {h00=0x0012, h01=0x0050, text=» RF(NZ) ERGP01«, t00=0x0024, t01=0x0102}
0x394a…3980 Head {h00=0x0032, h01=0x0050, text=»WRC03 LD A4,DWTDEV+DWTCO1,A6 GET ACTUAL COLUMN«, t00=0x0024, t01=0x0118}
0x3980…39ae Head {h00=0x002a, h01=0x0050, text=» RF(Z) WRC05 FOR CORRECT NO OF SPACES «, t00=0x0024, t01=0x014e}
0x39ae…39c0 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0024, t01=0x017c}
0x39c0…39f2 Head {h00=0x002e, h01=0x0050, text=»WRC05 CF A5,KONVER CONVERT BINARY TO ASCII«, t00=0x0024, t01=0x018e}
0x39f2…3a30 Head {h00=0x003a, h01=0x0050, text=» ST A2,DWTDEV+DWTACP,A6 STORE THE VALUE IN ACTUAL COL.«, t00=0x0025, t01=0x0030}
0x3a30…3a6e Head {h00=0x003a, h01=0x0050, text=» ST A4,DWTDEV+DWTACP+2,A6 STORE THE VALUE IN ACT. COL.«, t00=0x0025, t01=0x006e}
0x3a6e…3a78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00ac}
0x3a78…3aae Head {h00=0x0032, h01=0x0050, text=»WRC07 LD A4,DWTDEV+DWTCO1,A6 GET ACTUAL COLUMN«, t00=0x0025, t01=0x00b6}
0x3aae…3ade Head {h00=0x002c, h01=0x0050, text=» RF(Z) WRT15 JMP IF NO PRECEIDING SPACES«, t00=0x0025, t01=0x00ec}
0x3ade…3afc Head {h00=0x001a, h01=0x0050, text=» LDK A2,/20 SEND SPACE«, t00=0x0025, t01=0x011c}
0x3afc…3b12 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0025, t01=0x013a}
0x3b12…3b36 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0025, t01=0x0150}
0x3b36…3b54 Head {h00=0x001a, h01=0x0050, text=» LDKL A2,CSREP REPEAT «, t00=0x0025, t01=0x0174}
0x3b54…3b96 (38, 0, 400) Head {h00=0x003e, h01=0x0050, text=» LDKL A3,DWTDEV+DWTACP+1 ACTUAL COLUMN PAPER DISPLACEMENT «, t00=0x0026, t01=0x0004}
0x3b96…3bb6 Head {h00=0x001c, h01=0x0050, text=» CF A5,SEND SEND REPEAT «, t00=0x0026, t01=0x0046}
0x3bb6…3bc8 Head {h00=0x000e, h01=0x0050, text=» RF WRT15 «, t00=0x0026, t01=0x0066}
0x3bc8…3bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0078}
0x3bd2…3bf4 Head {h00=0x001e, h01=0x0050, text=»TWOLF LDK A2,LF LINE FEED «, t00=0x0026, t01=0x0082}
0x3bf4…3c0a Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0026, t01=0x00a4}
0x3c0a…3c2e Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0026, t01=0x00ba}
0x3c2e…3c50 Head {h00=0x001e, h01=0x0050, text=»ONELF LDK A2,LF LINE FEED «, t00=0x0026, t01=0x00de}
0x3c50…3c6a Head {h00=0x0016, h01=0x0050, text=»FORMF CF A5,OUTPUT«, t00=0x0026, t01=0x0100}
0x3c6a…3c8e Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0026, t01=0x011a}
0x3c8e…3cb0 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIDGE RETURN«, t00=0x0026, t01=0x013e}
0x3cb0…3cc6 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0026, t01=0x0160}
0x3cc6…3cea Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0026, t01=0x0176}
0x3cea…3d1a Head {h00=0x002c, h01=0x0050, text=» IM DWTDEV+DWTLFD,A6 SET LF/FF INDICATOR«, t00=0x0027, t01=0x000a}
0x3d1a…3d2c Head {h00=0x000e, h01=0x0050, text=» RF WRT15 «, t00=0x0027, t01=0x003a}
0x3d2c…3d36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x004c}
0x3d36…3d58 Head {h00=0x001e, h01=0x0050, text=»* REPEAT WRITE REQUEST «, t00=0x0027, t01=0x0056}
0x3d58…3d62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0078}
0x3d62…3d74 Head {h00=0x000e, h01=0x0050, text=»REP2 EQU *«, t00=0x0027, t01=0x0082}
0x3d74…3d9a Head {h00=0x0022, h01=0x0050, text=» LDR A3,A2 SAVE CONTROL CHAR. «, t00=0x0027, t01=0x0094}
0x3d9a…3dc2 Head {h00=0x0024, h01=0x0050, text=» LDK A2,CR SEND CARRIDGE RETURN «, t00=0x0027, t01=0x00ba}
0x3dc2…3dd8 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0027, t01=0x00e2}
0x3dd8…3dfc Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0027, t01=0x00f8}
0x3dfc…3e0e Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0027, t01=0x011c}
0x3e0e…3e3c Head {h00=0x002a, h01=0x0050, text=» SUK A2,/2B PRINT WITHOUT LINE FEED ? «, t00=0x0027, t01=0x012e}
0x3e3c…3e54 Head {h00=0x0014, h01=0x0050, text=» RF(NZ) REP3 NO «, t00=0x0027, t01=0x015c}
0x3e54…3e66 Head {h00=0x000e, h01=0x0050, text=» RB WRC07 «, t00=0x0027, t01=0x0174}
0x3e66…3e98 Head {h00=0x002e, h01=0x0050, text=»REP3 LD A1,DWTDEV+DWTLFD,A6 GET INDICATOR «, t00=0x0027, t01=0x0186}
0x3e98…3ec0 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) WRT15 JMP IF LF/FF DONE «, t00=0x0028, t01=0x0028}
0x3ec0…3ed2 Head {h00=0x000e, h01=0x0050, text=» RB WRC04 «, t00=0x0028, t01=0x0050}
0x3ed2…3ee0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0062}
0x3ee0…3eea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0070}
0x3eea…3f20 Head {h00=0x0032, h01=0x0050, text=»* ORDER 06 : THIS PART SENDS THE CHARACTERS«, t00=0x0028, t01=0x007a}
0x3f20…3f52 Head {h00=0x002e, h01=0x0050, text=»* TO DOCUMENT OR CONTINUOUS STATIONARY.«, t00=0x0028, t01=0x00b0}
0x3f52…3f5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00e2}
0x3f5c…3f66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00ec}
0x3f66…3f94 Head {h00=0x002a, h01=0x0050, text=»WRT15 LDK A3,2 SET ECB BUFFER POINTER «, t00=0x0028, t01=0x00f6}
0x3f94…3fae Head {h00=0x0016, h01=0x0050, text=»WRT020 CWK A3,/90 «, t00=0x0028, t01=0x0124}
0x3fae…3fda Head {h00=0x0028, h01=0x0050, text=» RF(NZ) WRT030 NEW BLOCK NECESSARY ?«, t00=0x0028, t01=0x013e}
0x3fda…3ff4 Head {h00=0x0016, h01=0x0050, text=» CF A5,ENDBLK YES «, t00=0x0028, t01=0x016a}
0x3ff4…401e Head {h00=0x0026, h01=0x0050, text=»ERGP01 RF(NZ) ERGP04 JMP IF ERROR «, t00=0x0028, t01=0x0184}
0x401e…4042 Head {h00=0x0020, h01=0x0050, text=» LDK A2,/90 NEW BLOCK LENGTH«, t00=0x0029, t01=0x001e}
0x4042…4066 Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0029, t01=0x0042}
0x4066…408a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x0029, t01=0x0066}
0x408a…40b4 Head {h00=0x0026, h01=0x0050, text=»WRT030 CF A15,GETCHR GET CHARACTER«, t00=0x0029, t01=0x008a}
0x40b4…40d8 Head {h00=0x0020, h01=0x0050, text=» LDR A4,A1 BUFFER FINISHED ?«, t00=0x0029, t01=0x00b4}
0x40d8…40f0 Head {h00=0x0014, h01=0x0050, text=» RF(P) WRT050 NO«, t00=0x0029, t01=0x00d8}
0x40f0…411a Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTDEV,A6 GET DEVICE STATUS«, t00=0x0029, t01=0x00f0}
0x411a…4144 Head {h00=0x0026, h01=0x0050, text=» ANK A4,/80 SHIFT OUT PERFORMED ? «, t00=0x0029, t01=0x011a}
0x4144…415c Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRT040 NO«, t00=0x0029, t01=0x0144}
0x415c…417c Head {h00=0x001c, h01=0x0050, text=» LDK A2,SI SEND SHIFT IN«, t00=0x0029, t01=0x015c}
0x417c…4192 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0029, t01=0x017c}
0x4192…41b6 (42, 0, 400) Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x002a, t01=0x0004}
0x41b6…41e2 Head {h00=0x0028, h01=0x0050, text=» XRS A4,DWTDEV,A6 RESET SHIFT INDIC.«, t00=0x002a, t01=0x0028}
0x41e2…420a Head {h00=0x0024, h01=0x0050, text=»WRT040 CF A5,ENDBLK END OF BLOCK«, t00=0x002a, t01=0x0054}
0x420a…422e Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x002a, t01=0x007c}
0x422e…424e Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x002a, t01=0x00a0}
0x424e…426c Head {h00=0x001a, h01=0x0050, text=» RF ENDIO END REQUEST «, t00=0x002a, t01=0x00c0}
0x426c…4276 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00de}
0x4276…428a Head {h00=0x0010, h01=0x0050, text=»WRT050 EQU *«, t00=0x002a, t01=0x00e8}
0x428a…429c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x002a, t01=0x00fc}
0x429c…42a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x010e}
0x42a6…42ea Head {h00=0x0040, h01=0x0050, text=»* EXAMINE CHARACTER AND SEND DEPENDING ON TYPE OF CHARACTER «, t00=0x002a, t01=0x0118}
0x42ea…42f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x015c}
0x42f4…42fc Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0166}
0x42fc…431c Head {h00=0x001c, h01=0x0050, text=» CWK A4,/20 CHAR =<20 ? «, t00=0x002a, t01=0x016e}
0x431c…4336 Head {h00=0x0016, h01=0x0050, text=» RF(NL) WRT100 NO «, t00=0x002a, t01=0x018e}
0x4336…435c Head {h00=0x0022, h01=0x0050, text=»* CHECK IF SPECIAL CHARACTER«, t00=0x002b, t01=0x0018}
0x435c…437c Head {h00=0x001c, h01=0x0050, text=» SUK A4,/9 TABULATION ? «, t00=0x002b, t01=0x003e}
0x437c…4396 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRT170 YES «, t00=0x002b, t01=0x005e}
0x4396…43ba Head {h00=0x0020, h01=0x0050, text=» SUK A4,/9 START UNDERLINE ?«, t00=0x002b, t01=0x0078}
0x43ba…43d4 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT060 NO «, t00=0x002b, t01=0x009c}
0x43d4…43fe Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 SAVE ECB BUFFER POINTER«, t00=0x002b, t01=0x00b6}
0x43fe…442a Head {h00=0x0028, h01=0x0050, text=» LDKL A3,CSSUL SEND START UNDERLINE «, t00=0x002b, t01=0x00e0}
0x442a…443c Head {h00=0x000e, h01=0x0050, text=» RF WRT070«, t00=0x002b, t01=0x010c}
0x443c…4464 Head {h00=0x0024, h01=0x0050, text=»WRT060 SUK A4,1 STOP UNDERLINE ?«, t00=0x002b, t01=0x011e}
0x4464…447e Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT080 NO «, t00=0x002b, t01=0x0146}
0x447e…44a8 Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 SAVE ECB BUFFER POINTER«, t00=0x002b, t01=0x0160}
0x44a8…44d2 Head {h00=0x0026, h01=0x0050, text=» LDKL A3,CSEUL SEND STOP UNDERLINE«, t00=0x002b, t01=0x018a}
0x44d2…44f6 Head {h00=0x0020, h01=0x0050, text=»WRT070 CF A5,SEN40 GO & SEND«, t00=0x002c, t01=0x0024}
0x44f6…4524 Head {h00=0x002a, h01=0x0050, text=» LDR A3,A4 RESTORE ECB BUFFER POINTER «, t00=0x002c, t01=0x0048}
0x4524…454a Head {h00=0x0022, h01=0x0050, text=» RB WRT020 GET NEXT CHARACTER «, t00=0x002c, t01=0x0076}
0x454a…457e Head {h00=0x0030, h01=0x0050, text=»WRT080 SUK A4,/8 /1B, PARTIAL LINE UP DOWN ?«, t00=0x002c, t01=0x009c}
0x457e…45ac Head {h00=0x002a, h01=0x0050, text=» RB(NZ) WRT020 NO, GET NEXT CHARACTER «, t00=0x002c, t01=0x00d0}
0x45ac…45dc Head {h00=0x002c, h01=0x0050, text=» CF A15,GETCHR YES, CHECK NEXT CHARACTER«, t00=0x002c, t01=0x00fe}
0x45dc…4602 Head {h00=0x0022, h01=0x0050, text=» RB(NP) WRT040 END OF BUFFER ?«, t00=0x002c, t01=0x012e}
0x4602…4624 Head {h00=0x001e, h01=0x0050, text=» LDR A4,A2 SAVE CHAR IN A4«, t00=0x002c, t01=0x0154}
0x4624…464c Head {h00=0x0024, h01=0x0050, text=» SUK A2,/4B PARTIAL LINE DOWN ? «, t00=0x002c, t01=0x0176}
0x464c…4666 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRT090 YES «, t00=0x002d, t01=0x000e}
0x4666…468a Head {h00=0x0020, h01=0x0050, text=» SUK A2,1 PARTIAL LINE UP ? «, t00=0x002d, t01=0x0028}
0x468a…46be Head {h00=0x0030, h01=0x0050, text=» RF(NZ) WRT140 NO, INDICATE CODE CHECK ERROR«, t00=0x002d, t01=0x004c}
0x46be…46f2 Head {h00=0x0030, h01=0x0050, text=»WRT090 LDK A2,ESC SEND PARTIAL LINE UP/DOWN «, t00=0x002d, t01=0x0080}
0x46f2…4708 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x002d, t01=0x00b4}
0x4708…472c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x002d, t01=0x00ca}
0x472c…474c Head {h00=0x001c, h01=0x0050, text=» LDR A2,A4 RESTORE CHAR.«, t00=0x002d, t01=0x00ee}
0x474c…4762 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x002d, t01=0x010e}
0x4762…4786 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x002d, t01=0x0124}
0x4786…47ac Head {h00=0x0022, h01=0x0050, text=» RB WRT020 GET NEXT CHARACTER «, t00=0x002d, t01=0x0148}
0x47ac…47b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x016e}
0x47b6…47dc Head {h00=0x0022, h01=0x0050, text=»WRT100 SUK A4,/7E CHAR =</7E ?«, t00=0x002d, t01=0x0178}
0x47dc…4808 Head {h00=0x0028, h01=0x0050, text=» RF(NP) WRT110 YES, LEGAL CHARACTER «, t00=0x002e, t01=0x000e}
0x4808…482c Head {h00=0x0020, h01=0x0050, text=» CWK A2,/AE ROOMLESS POINT ?«, t00=0x002e, t01=0x003a}
0x482c…4846 Head {h00=0x0016, h01=0x0050, text=» RF(E) WRT160 YES «, t00=0x002e, t01=0x005e}
0x4846…4866 Head {h00=0x001c, h01=0x0050, text=» SUK A4,/23 CHAR >=/A1 ?«, t00=0x002e, t01=0x0078}
0x4866…489a Head {h00=0x0030, h01=0x0050, text=» RF(N) WRT150 NO,INDICATE CODE CHECK ERROR !«, t00=0x002e, t01=0x0098}
0x489a…48ba Head {h00=0x001c, h01=0x0050, text=» SUK A4,/5D CHAR =</FE ?«, t00=0x002e, t01=0x00cc}
0x48ba…48e6 Head {h00=0x0028, h01=0x0050, text=» RF(NP) WRT120 YES, LEGAL CHARACTER «, t00=0x002e, t01=0x00ec}
0x48e6…4916 Head {h00=0x002c, h01=0x0050, text=» RF WRT150 NO, INDICATE CODE CHECK ERROR«, t00=0x002e, t01=0x0118}
0x4916…4946 Head {h00=0x002c, h01=0x0050, text=»* AUTOMATIC SHIFT OUT/IN FUNCTION * «, t00=0x002e, t01=0x0148}
0x4946…4950 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0178}
0x4950…4982 Head {h00=0x002e, h01=0x0050, text=»WRT110 LD A4,DWTDEV,A6 7-BIT CODE /20-/7E «, t00=0x002e, t01=0x0182}
0x4982…49b4 Head {h00=0x002e, h01=0x0050, text=» ANK A4,/80 SHIFT OUT PERFORMED EARLIER ? «, t00=0x002f, t01=0x0024}
0x49b4…49dc Head {h00=0x0024, h01=0x0050, text=» RF(Z) WRT170 NO, SEND CHARACTER«, t00=0x002f, t01=0x0056}
0x49dc…49f0 Head {h00=0x0010, h01=0x0050, text=» LDK A4,/80 «, t00=0x002f, t01=0x007e}
0x49f0…4a20 Head {h00=0x002c, h01=0x0050, text=» XRS A4,DWTDEV,A6 RESET SHIFT INDICATOR «, t00=0x002f, t01=0x0092}
0x4a20…4a3e Head {h00=0x001a, h01=0x0050, text=» LDR A4,A2 STORE CHAR.«, t00=0x002f, t01=0x00c2}
0x4a3e…4a5e Head {h00=0x001c, h01=0x0050, text=» LDK A2,SI SEND SHIFT IN«, t00=0x002f, t01=0x00e0}
0x4a5e…4a70 Head {h00=0x000e, h01=0x0050, text=» RF WRT130«, t00=0x002f, t01=0x0100}
0x4a70…4a7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0112}
0x4a7a…4aac Head {h00=0x002e, h01=0x0050, text=»WRT120 LD A4,DWTDEV,A6 8-BIT CODE /A1-/FE «, t00=0x002f, t01=0x011c}
0x4aac…4ade Head {h00=0x002e, h01=0x0050, text=» ANK A4,/80 SHIFT OUT PERFORMED EARLIER ? «, t00=0x002f, t01=0x014e}
0x4ade…4b08 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) WRT170 YES, SEND CHARACTER«, t00=0x002f, t01=0x0180}
0x4b08…4b1c Head {h00=0x0010, h01=0x0050, text=» LDK A4,/80 «, t00=0x0030, t01=0x001a}
0x4b1c…4b48 Head {h00=0x0028, h01=0x0050, text=» ORS A4,DWTDEV,A6 INDICATE SHIFT OUT«, t00=0x0030, t01=0x002e}
0x4b48…4b66 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A2 STORE CHAR.«, t00=0x0030, t01=0x005a}
0x4b66…4b88 Head {h00=0x001e, h01=0x0050, text=» LDK A2,SO SEND SHIFT OUT «, t00=0x0030, t01=0x0078}
0x4b88…4bb6 Head {h00=0x002a, h01=0x0050, text=»WRT130 CF A5,OUTPUT SEND SHIFT CONTROL«, t00=0x0030, t01=0x009a}
0x4bb6…4bda Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x0030, t01=0x00c8}
0x4bda…4bfa Head {h00=0x001c, h01=0x0050, text=» LDR A2,A4 RESTORE CHAR.«, t00=0x0030, t01=0x00ec}
0x4bfa…4c1c Head {h00=0x001e, h01=0x0050, text=» RF WRT170 SEND CHARACTER «, t00=0x0030, t01=0x010c}
0x4c1c…4c50 Head {h00=0x0030, h01=0x0050, text=»WRT140 SUK A3,1 DECREMENT ECB BUFFER POINTER«, t00=0x0030, t01=0x012e}
0x4c50…4c8e Head {h00=0x003a, h01=0x0050, text=»WRT150 LDK A4,/04 ILLEGAL CHARACTER SET BIT 13 IN R.C.«, t00=0x0030, t01=0x0162}
0x4c8e…4ca6 Head {h00=0x0014, h01=0x0050, text=» ORS A4,ECBRC,A8«, t00=0x0031, t01=0x0010}
0x4ca6…4cb8 Head {h00=0x000e, h01=0x0050, text=» RB WRT020«, t00=0x0031, t01=0x0028}
0x4cb8…4cd2 Head {h00=0x0016, h01=0x0050, text=»WRT160 LDK A2,/2E «, t00=0x0031, t01=0x003a}
0x4cd2…4cea Head {h00=0x0014, h01=0x0050, text=»WRT170 LDR A4,A1«, t00=0x0031, t01=0x0054}
0x4cea…4d14 Head {h00=0x0026, h01=0x0050, text=» ANK A2,/7F MASK,JUST 7 BIT CHAR. «, t00=0x0031, t01=0x006c}
0x4d14…4d38 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0031, t01=0x0096}
0x4d38…4d62 Head {h00=0x0026, h01=0x0050, text=»ERGP04 RF(NZ) ERGP06 JMP IF ERROR «, t00=0x0031, t01=0x00ba}
0x4d62…4d94 Head {h00=0x002e, h01=0x0050, text=» IM DWTDEV+DWTCO1,A6 INC COLUMN COUNTER 1 «, t00=0x0031, t01=0x00e4}
0x4d94…4da6 Head {h00=0x000e, h01=0x0050, text=» RB WRT020«, t00=0x0031, t01=0x0116}
0x4da6…4dba Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0031, t01=0x0128}
0x4dba…4ddc Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x0031, t01=0x013c}
0x4ddc…4e02 Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/100 PRINTER RESET ? «, t00=0x0031, t01=0x015e}
0x4e02…4e1c Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) RCTP YES «, t00=0x0031, t01=0x0184}
0x4e1c…4e44 Head {h00=0x0024, h01=0x0050, text=» CF A5,RESREC RESET RECOVERY BIT«, t00=0x0032, t01=0x000e}
0x4e44…4e76 Head {h00=0x002e, h01=0x0050, text=» CM DWTDEV+DWTLFD,A6 CLEAR LF/FF INDICATOR«, t00=0x0032, t01=0x0036}
0x4e76…4e96 Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END REQUEST «, t00=0x0032, t01=0x0068}
0x4e96…4ea4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x0088}
0x4ea4…4eca Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0032, t01=0x0096}
0x4eca…4ed4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00bc}
0x4ed4…4ef6 Head {h00=0x001e, h01=0x0050, text=»* ORDER 05 : BASIC WRITE«, t00=0x0032, t01=0x00c6}
0x4ef6…4f00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00e8}
0x4f00…4f26 Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0032, t01=0x00f2}
0x4f26…4f3a Head {h00=0x0010, h01=0x0050, text=»BASWRT EQU *«, t00=0x0032, t01=0x0118}
0x4f3a…4f4a Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0032, t01=0x012c}
0x4f4a…4f5a Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0032, t01=0x013c}
0x4f5a…4f6a Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0032, t01=0x014c}
0x4f6a…4f7c Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0032, t01=0x015c}
0x4f7c…4fa6 Head {h00=0x0026, h01=0x0050, text=»BAS10 LDK A4,/90 TEST END OF BLOCK«, t00=0x0032, t01=0x016e}
0x4fa6…4fd0 Head {h00=0x0026, h01=0x0050, text=» LDR A2,A4 BLOCK LENGTH IN A2=144 «, t00=0x0033, t01=0x0008}
0x4fd0…4ff4 Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0033, t01=0x0032}
0x4ff4…5018 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP06 JMP IF ERROR «, t00=0x0033, t01=0x0056}
0x5018…5042 Head {h00=0x0026, h01=0x0050, text=»BAS15 CF A15,GETCHR GET CHARACTER «, t00=0x0033, t01=0x007a}
0x5042…5066 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 BUFFER FINISHED ?«, t00=0x0033, t01=0x00a4}
0x5066…507e Head {h00=0x0014, h01=0x0050, text=» RF(Z) BAS25 YES«, t00=0x0033, t01=0x00c8}
0x507e…5094 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0033, t01=0x00e0}
0x5094…50b8 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP06 JMP IF ERROR «, t00=0x0033, t01=0x00f6}
0x50b8…50d8 Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 END OF BLOCK ?«, t00=0x0033, t01=0x011a}
0x50d8…50f0 Head {h00=0x0014, h01=0x0050, text=» RF(Z) BAS20 YES«, t00=0x0033, t01=0x013a}
0x50f0…5114 Head {h00=0x0020, h01=0x0050, text=» RB BAS15 GET NEXT CHARACTER«, t00=0x0033, t01=0x0152}
0x5114…513c Head {h00=0x0024, h01=0x0050, text=»BAS20 CF A5,ENDBLK END OF BLOCK «, t00=0x0033, t01=0x0176}
0x513c…5160 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP06 JMP IF ERROR «, t00=0x0034, t01=0x000e}
0x5160…5182 Head {h00=0x001e, h01=0x0050, text=» RB BAS10 START NEXT BLOCK«, t00=0x0034, t01=0x0032}
0x5182…51aa Head {h00=0x0024, h01=0x0050, text=»BAS25 CF A5,ENDBLK END OF BLOCK «, t00=0x0034, t01=0x0054}
0x51aa…51d4 Head {h00=0x0026, h01=0x0050, text=»ERGP06 ABL(NZ) ERGP15 JMP IF ERROR«, t00=0x0034, t01=0x007c}
0x51d4…5200 Head {h00=0x0028, h01=0x0050, text=» ABL TSTSTA CHECK STATUS & END REQ. «, t00=0x0034, t01=0x00a6}
0x5200…520e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x00d2}
0x520e…522a Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0034, t01=0x00e0}
0x522a…5260 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0034, t01=0x00fc}
0x5260…526a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0132}
0x526a…5292 Head {h00=0x0024, h01=0x0050, text=»* ORDER 0B : POSITION DOCUMENT«, t00=0x0034, t01=0x013c}
0x5292…52c6 Head {h00=0x0030, h01=0x0050, text=»* CONTROL WORD CONTAINS REQUESTED LINE NO «, t00=0x0034, t01=0x0164}
0x52c6…52d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0008}
0x52d0…5306 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0035, t01=0x0012}
0x5306…532c Head {h00=0x0022, h01=0x0050, text=»POSDOC EQU * POSITION DOCUMENT«, t00=0x0035, t01=0x0048}
0x532c…5354 Head {h00=0x0024, h01=0x0050, text=» CF A5,GTSTAT GET DEVICE STATUS «, t00=0x0035, t01=0x006e}
0x5354…536e Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 ERROR ?«, t00=0x0035, t01=0x0096}
0x536e…5396 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) POS040 ERROR INDICATION «, t00=0x0035, t01=0x00b0}
0x5396…53c0 Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBCW,A8 GET REQUESTED LINE«, t00=0x0035, t01=0x00d8}
0x53c0…53d4 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0035, t01=0x0102}
0x53d4…53fe Head {h00=0x0026, h01=0x0050, text=» RF(Z) POSERR ILLEGAL LINE NUMBER «, t00=0x0035, t01=0x0116}
0x53fe…5426 Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTDEV+DWTDL,A6 MAX. LINE«, t00=0x0035, t01=0x0140}
0x5426…5454 Head {h00=0x002a, h01=0x0050, text=» CF A5,BINARY CONVERT ASCII TO BINARY «, t00=0x0035, t01=0x0168}
0x5454…547a Head {h00=0x0022, h01=0x0050, text=» CWR A4,A3 REQ. LINE>MAX. LINE«, t00=0x0036, t01=0x0008}
0x547a…5494 Head {h00=0x0016, h01=0x0050, text=» RF(G) POSERR YES «, t00=0x0036, t01=0x002e}
0x5494…54c2 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x0036, t01=0x0048}
0x54c2…54f4 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTDEV+DWTRLN,A6 SET REQUESTED LINE«, t00=0x0036, t01=0x0076}
0x54f4…5508 Head {h00=0x0010, h01=0x0050, text=»POS005 EQU *«, t00=0x0036, t01=0x00a8}
0x5508…5528 Head {h00=0x001c, h01=0x0050, text=» LDK A2,/15 BLOCK LENGTH«, t00=0x0036, t01=0x00bc}
0x5528…554c Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0036, t01=0x00dc}
0x554c…5570 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP08 JMP IF ERROR «, t00=0x0036, t01=0x0100}
0x5570…5590 Head {h00=0x001c, h01=0x0050, text=» LD A3,DWTDEV+DWTALN,A6 «, t00=0x0036, t01=0x0124}
0x5590…55a6 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POS020«, t00=0x0036, t01=0x0144}
0x55a6…55b8 Head {h00=0x000e, h01=0x0050, text=» LDK A2,FF«, t00=0x0036, t01=0x015a}
0x55b8…55ce Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0036, t01=0x016c}
0x55ce…55f2 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP08 JMP IF ERROR «, t00=0x0036, t01=0x0182}
0x55f2…560e Head {h00=0x0018, h01=0x0050, text=»POS020 LDKL A2,CSVPA«, t00=0x0037, t01=0x0016}
0x560e…562c Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTRLN«, t00=0x0037, t01=0x0032}
0x562c…5640 Head {h00=0x0010, h01=0x0050, text=» CF A5,SEND «, t00=0x0037, t01=0x0050}
0x5640…5668 Head {h00=0x0024, h01=0x0050, text=»POS030 CF A5,ENDBLK END OF BLOCK«, t00=0x0037, t01=0x0064}
0x5668…5692 Head {h00=0x0026, h01=0x0050, text=»ERGP08 ABL(NZ) ERGP15 JMP IF ERROR«, t00=0x0037, t01=0x008c}
0x5692…56b2 Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x0037, t01=0x00b6}
0x56b2…56d0 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) POS040 ERROR ?«, t00=0x0037, t01=0x00d6}
0x56d0…5702 Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTDEV+DWTRLN,A6 GET REQ. LINE NO. «, t00=0x0037, t01=0x00f4}
0x5702…573a Head {h00=0x0034, h01=0x0050, text=» ST A2,DWTDEV+DWTALN,A6 ACTUAL LINE = REQ. LINE «, t00=0x0037, t01=0x0126}
0x573a…576c Head {h00=0x002e, h01=0x0050, text=» CM DWTDEV+DWTCO1,A6 CLEAR COLUMN COUNTER «, t00=0x0037, t01=0x015e}
0x576c…5780 Head {h00=0x0010, h01=0x0050, text=»POS040 EQU *«, t00=0x0037, t01=0x0190}
0x5780…57a2 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x0038, t01=0x0014}
0x57a2…57c8 Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/100 PRINTER RESET ? «, t00=0x0038, t01=0x0036}
0x57c8…57e2 Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) RCTP YES «, t00=0x0038, t01=0x005c}
0x57e2…580a Head {h00=0x0024, h01=0x0050, text=» CF A5,RESREC RESET RECOVERY BIT«, t00=0x0038, t01=0x0076}
0x580a…582a Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END REQUEST «, t00=0x0038, t01=0x009e}
0x582a…5844 Head {h00=0x0016, h01=0x0050, text=»POSERR ABL LENDER «, t00=0x0038, t01=0x00be}
0x5844…5850 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x00d8}
0x5850…585e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x00e4}
0x585e…5892 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0038, t01=0x00f2}
0x5892…589c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0126}
0x589c…58c8 Head {h00=0x0028, h01=0x0050, text=»* ORDER 24 : SET PRINTER PARAMETERS «, t00=0x0038, t01=0x0130}
0x58c8…58d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x015c}
0x58d2…5906 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0038, t01=0x0166}
0x5906…591c Head {h00=0x0012, h01=0x0050, text=»PRIPAR EQU * «, t00=0x0039, t01=0x000a}
0x591c…594a Head {h00=0x002a, h01=0x0050, text=»PRI07 LDK A3,/6 SET UP BRANCH POINTER «, t00=0x0039, t01=0x0020}
0x594a…5972 Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBCW,A8 GET CONTROL WORD«, t00=0x0039, t01=0x004e}
0x5972…598a Head {h00=0x0014, h01=0x0050, text=»PRI10 LDR A4,A1 «, t00=0x0039, t01=0x0076}
0x598a…59a6 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0039, t01=0x008e}
0x59a6…59ce Head {h00=0x0024, h01=0x0050, text=» LC A2,DWTOR+1,A6 GET DWT INDEX «, t00=0x0039, t01=0x00aa}
0x59ce…59e0 Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x0039, t01=0x00d2}
0x59e0…59f4 Head {h00=0x0010, h01=0x0050, text=» RF(Z) PRI14«, t00=0x0039, t01=0x00e4}
0x59f4…5a28 Head {h00=0x0030, h01=0x0050, text=» ANK A4,/F CHECK IF NEW PARAM. VALUE WANTED «, t00=0x0039, t01=0x00f8}
0x5a28…5a4e Head {h00=0x0022, h01=0x0050, text=» ABI(NZ) FROTAB,A3 FRONT FEED «, t00=0x0039, t01=0x012c}
0x5a4e…5a60 Head {h00=0x000e, h01=0x0050, text=» RF PRI15 «, t00=0x0039, t01=0x0152}
0x5a60…5a6c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0164}
0x5a6c…5aa4 Head {h00=0x0034, h01=0x0050, text=»PRI14 ANK A4,/F CHECK IF NEW PARAM. VALUE WANTED«, t00=0x0039, t01=0x0170}
0x5aa4…5ad4 Head {h00=0x002c, h01=0x0050, text=» ABI(NZ) PRITAB,A3 FRICTION/TRACTOR FEED«, t00=0x003a, t01=0x0018}
0x5ad4…5afe Head {h00=0x0026, h01=0x0050, text=»PRI15 SRL A1,4 GET NEXT PARAMETER «, t00=0x003a, t01=0x0048}
0x5afe…5b36 Head {h00=0x0034, h01=0x0050, text=»PRI16 CWK A3,0 FRI/TRA, ANY MORE PARAM. TO CHECK«, t00=0x003a, t01=0x0072}
0x5b36…5b5a Head {h00=0x0020, h01=0x0050, text=» RF(E) PRI17 NO, GO AND SEND«, t00=0x003a, t01=0x00aa}
0x5b5a…5b84 Head {h00=0x0026, h01=0x0050, text=»PRI18 SUK A3,2 TEST NEXT PARAMETER«, t00=0x003a, t01=0x00ce}
0x5b84…5b96 Head {h00=0x000e, h01=0x0050, text=» RB PRI10 «, t00=0x003a, t01=0x00f8}
0x5b96…5bc0 Head {h00=0x0026, h01=0x0050, text=»PRI17 LDR A4,P GET PROGRAM COUNTER«, t00=0x003a, t01=0x010a}
0x5bc0…5bf0 Head {h00=0x002c, h01=0x0050, text=» ADK A4,6 MAKE RETURN ADDRESS BEFORE ABL«, t00=0x003a, t01=0x0134}
0x5bf0…5c1e Head {h00=0x002a, h01=0x0050, text=» ABL SENPAR SEND PARAMETERS TO PRINTER«, t00=0x003a, t01=0x0164}
0x5c1e…5c3e (59, 0, 400) Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x003b, t01=0x0004}
0x5c3e…5c60 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x003b, t01=0x0024}
0x5c60…5c86 Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/100 PRINTER RESET ? «, t00=0x003b, t01=0x0046}
0x5c86…5ca0 Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) RCTP YES «, t00=0x003b, t01=0x006c}
0x5ca0…5cc8 Head {h00=0x0024, h01=0x0050, text=» CF A5,RESREC RESET RECOVERY BIT«, t00=0x003b, t01=0x0086}
0x5cc8…5ce8 Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END REQUEST «, t00=0x003b, t01=0x00ae}
0x5ce8…5d12 Head {h00=0x0026, h01=0x0050, text=»* STORE PARAMETERS, TRACTOR FEED«, t00=0x003b, t01=0x00ce}
0x5d12…5d48 Head {h00=0x0032, h01=0x0050, text=»PRI20 EQU * NCV= NATIONAL CHARACTER VARIATION «, t00=0x003b, t01=0x00f8}
0x5d48…5d68 Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE «, t00=0x003b, t01=0x012e}
0x5d68…5da6 Head {h00=0x003a, h01=0x0050, text=» LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACCORDING TO INDEX«, t00=0x003b, t01=0x014e}
0x5da6…5dd2 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTDEV+DWTPCS,A6 STORE IN DWT«, t00=0x003b, t01=0x018c}
0x5dd2…5de4 Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003c, t01=0x0028}
0x5de4…5e14 Head {h00=0x002c, h01=0x0050, text=»PRI30 EQU * SCM= SELECT CHARACTER MATRIX«, t00=0x003c, t01=0x003a}
0x5e14…5e26 Head {h00=0x000e, h01=0x0050, text=» CWK A4,/9«, t00=0x003c, t01=0x006a}
0x5e26…5e4a Head {h00=0x0020, h01=0x0050, text=» RF(G) PRI60 INDEX TOO HIGH «, t00=0x003c, t01=0x007c}
0x5e4a…5e64 Head {h00=0x0016, h01=0x0050, text=» ORK A4,/30 ASCII «, t00=0x003c, t01=0x00a0}
0x5e64…5e90 Head {h00=0x0028, h01=0x0050, text=» SC A4,DWTDEV+DWTCMF,A6 STORE IN DWT«, t00=0x003c, t01=0x00ba}
0x5e90…5ea2 Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003c, t01=0x00e6}
0x5ea2…5ec6 Head {h00=0x0020, h01=0x0050, text=»PRI40 EQU * PL= PAGE LENGTH «, t00=0x003c, t01=0x00f8}
0x5ec6…5ee6 Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE «, t00=0x003c, t01=0x011c}
0x5ee6…5f1a Head {h00=0x0030, h01=0x0050, text=» LD A4,LINNUM,A4 GET LINE ACCORDING TO INDEX«, t00=0x003c, t01=0x013c}
0x5f1a…5f46 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTDEV+DWTPL,A6 STORE IN DWT «, t00=0x003c, t01=0x0170}
0x5f46…5f58 Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003d, t01=0x000c}
0x5f58…5f80 Head {h00=0x0024, h01=0x0050, text=»PRI50 EQU * CD= CHARACTER PITCH «, t00=0x003d, t01=0x001e}
0x5f80…5f92 Head {h00=0x000e, h01=0x0050, text=» CWK A4,/4«, t00=0x003d, t01=0x0046}
0x5f92…5fb6 Head {h00=0x0020, h01=0x0050, text=» RF(G) PRI60 INDEX TOO HIGH «, t00=0x003d, t01=0x0058}
0x5fb6…5fd0 Head {h00=0x0016, h01=0x0050, text=» ORK A4,/30 ASCII «, t00=0x003d, t01=0x007c}
0x5fd0…5ffe Head {h00=0x002a, h01=0x0050, text=» SC A4,DWTDEV+DWTCMF+1,A6 STORE IN DWT«, t00=0x003d, t01=0x0096}
0x5ffe…6010 Head {h00=0x000e, h01=0x0050, text=» RB PRI17 «, t00=0x003d, t01=0x00c4}
0x6010…6046 Head {h00=0x0032, h01=0x0050, text=»* STORE PARAMETERS, FRONT FEED/FRICTION FEED«, t00=0x003d, t01=0x00d6}
0x6046…6062 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x003d, t01=0x010c}
0x6062…6098 Head {h00=0x0032, h01=0x0050, text=»FRO20 EQU * NCV= NATIONAL CHARACTER VARIATION «, t00=0x003d, t01=0x0128}
0x6098…60b8 Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE «, t00=0x003d, t01=0x015e}
0x60b8…60f8 Head {h00=0x003c, h01=0x0050, text=» LD A4,NCVTAB,A4 GET NAT. CHAR. VAR. ACCORDING TO INDEX «, t00=0x003d, t01=0x017e}
0x60f8…6124 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTDEV+DWTDCS,A6 STORE IN DWT«, t00=0x003e, t01=0x002e}
0x6124…6136 Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003e, t01=0x005a}
0x6136…6166 Head {h00=0x002c, h01=0x0050, text=»FRO30 EQU * SCM=SELECT CHARACTER MATRIX «, t00=0x003e, t01=0x006c}
0x6166…6178 Head {h00=0x000e, h01=0x0050, text=» CWK A4,/9«, t00=0x003e, t01=0x009c}
0x6178…619c Head {h00=0x0020, h01=0x0050, text=» RF(G) PRI60 INDEX TOO HIGH «, t00=0x003e, t01=0x00ae}
0x619c…61b6 Head {h00=0x0016, h01=0x0050, text=» ORK A4,/30 ASCII «, t00=0x003e, t01=0x00d2}
0x61b6…61e2 Head {h00=0x0028, h01=0x0050, text=» SC A4,DWTDEV+DWTCMT,A6 STORE IN DWT«, t00=0x003e, t01=0x00ec}
0x61e2…61f4 Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003e, t01=0x0118}
0x61f4…6218 Head {h00=0x0020, h01=0x0050, text=»FRO40 EQU * PL= PAGE LENGTH «, t00=0x003e, t01=0x012a}
0x6218…6238 Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE «, t00=0x003e, t01=0x014e}
0x6238…626c Head {h00=0x0030, h01=0x0050, text=» LD A4,LINNUM,A4 GET LINE ACCORDING TO INDEX«, t00=0x003e, t01=0x016e}
0x626c…6298 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTDEV+DWTDL,A6 STORE IN DWT «, t00=0x003f, t01=0x0012}
0x6298…62aa Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003f, t01=0x003e}
0x62aa…62d2 Head {h00=0x0024, h01=0x0050, text=»FRO50 EQU * CD= CHARACTER PITCH «, t00=0x003f, t01=0x0050}
0x62d2…62e4 Head {h00=0x000e, h01=0x0050, text=» CWK A4,/4«, t00=0x003f, t01=0x0078}
0x62e4…6308 Head {h00=0x0020, h01=0x0050, text=» RF(G) PRI60 INDEX TOO HIGH «, t00=0x003f, t01=0x008a}
0x6308…6322 Head {h00=0x0016, h01=0x0050, text=» ORK A4,/30 ASCII «, t00=0x003f, t01=0x00ae}
0x6322…6350 Head {h00=0x002a, h01=0x0050, text=» SC A4,DWTDEV+DWTCMT+1,A6 STORE IN DWT«, t00=0x003f, t01=0x00c8}
0x6350…6362 Head {h00=0x000e, h01=0x0050, text=» RB PRI17 «, t00=0x003f, t01=0x00f6}
0x6362…636e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0108}
0x636e…6394 Head {h00=0x0022, h01=0x0050, text=»PRI60 ABL LENDER REQUEST ERROR«, t00=0x003f, t01=0x0114}
0x6394…63a2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x013a}
0x63a2…63d6 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x003f, t01=0x0148}
0x63d6…63e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x017c}
0x63e0…640a Head {h00=0x0026, h01=0x0050, text=»* ORDER /27 : SET FORM PARAMETERS «, t00=0x003f, t01=0x0186}
0x640a…6414 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0020}
0x6414…6448 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0040, t01=0x002a}
0x6448…645c Head {h00=0x0010, h01=0x0050, text=»FORPAR EQU *«, t00=0x0040, t01=0x005e}
0x645c…6472 Head {h00=0x0012, h01=0x0050, text=» IFT FORMPA=1 «, t00=0x0040, t01=0x0072}
0x6472…64a2 Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBCW,A8 GET CONTROL WORD, INDEX «, t00=0x0040, t01=0x0088}
0x64a2…64ba Head {h00=0x0014, h01=0x0050, text=» ANK A2,/F MASK «, t00=0x0040, t01=0x00b8}
0x64ba…64cc Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0040, t01=0x00d0}
0x64cc…6508 Head {h00=0x0038, h01=0x0050, text=» RF(Z) FOR020 HOPPER,HIGH SPEED OR LINE SPACE PARAM.«, t00=0x0040, t01=0x00e2}
0x6508…651a Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0040, t01=0x011e}
0x651a…6546 Head {h00=0x0028, h01=0x0050, text=» ABL(Z) BASWRT LOAD CHARACTER MATRIX«, t00=0x0040, t01=0x0130}
0x6546…6558 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0040, t01=0x015c}
0x6558…657a Head {h00=0x001e, h01=0x0050, text=» RF(Z) TAB010 TABULATIONS «, t00=0x0040, t01=0x016e}
0x657a…6586 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x0190}
0x6586…65ba Head {h00=0x0030, h01=0x0050, text=»FOR010 ABL LENDER REQUEST ERROR,END OF REQ. «, t00=0x0041, t01=0x000c}
0x65ba…65d0 Head {h00=0x0012, h01=0x0050, text=» IFT FORMPA=1 «, t00=0x0041, t01=0x0040}
0x65d0…6606 Head {h00=0x0032, h01=0x0050, text=»* HOPPER, HIGH SPEED & LINE SPACE PARAMETERS«, t00=0x0041, t01=0x0056}
0x6606…6610 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x008c}
0x6610…6636 Head {h00=0x0022, h01=0x0050, text=»FOR020 LDK A2,/E BLOCK LENGTH «, t00=0x0041, t01=0x0096}
0x6636…665a Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0041, t01=0x00bc}
0x665a…667e Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) ERGP15 JMP IF ERROR«, t00=0x0041, t01=0x00e0}
0x667e…66a6 Head {h00=0x0024, h01=0x0050, text=» LD A4,ECBCW,A8 GET CONTROL WORD«, t00=0x0041, t01=0x0104}
0x66a6…66c4 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A4 ALSO IN A4 «, t00=0x0041, t01=0x012c}
0x66c4…66dc Head {h00=0x0014, h01=0x0050, text=» SRL A1,4 SHIFT «, t00=0x0041, t01=0x014a}
0x66dc…6704 Head {h00=0x0024, h01=0x0050, text=» ANK A1,/F MASK LINE SPACE INDEX«, t00=0x0041, t01=0x0162}
0x6704…672a Head {h00=0x0022, h01=0x0050, text=» RF(Z) FOR030 NO CHANGE WANTED«, t00=0x0041, t01=0x018a}
0x672a…673c Head {h00=0x000e, h01=0x0050, text=» CWK A1,/8«, t00=0x0042, t01=0x0020}
0x673c…676e Head {h00=0x002e, h01=0x0050, text=» RB(G) FOR010 REQUEST ERROR, INDEX TOO BIG«, t00=0x0042, t01=0x0032}
0x676e…678e Head {h00=0x001c, h01=0x0050, text=» ADR A1,A1 ADJUST TABLE «, t00=0x0042, t01=0x0064}
0x678e…67c8 Head {h00=0x0036, h01=0x0050, text=» LD A1,LINTAB,A1 GET LINE SPACE ACCORDING TO TABLE«, t00=0x0042, t01=0x0084}
0x67c8…67f4 Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTDEV+DWTLS,A6 STORE IN DWT «, t00=0x0042, t01=0x00be}
0x67f4…680a Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSLSL«, t00=0x0042, t01=0x00ea}
0x680a…6828 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTLS «, t00=0x0042, t01=0x0100}
0x6828…6850 Head {h00=0x0024, h01=0x0050, text=» CF A5,SEND SEND LINE SPACE LOAD«, t00=0x0042, t01=0x011e}
0x6850…687a Head {h00=0x0026, h01=0x0050, text=»FOR030 LDR A1,A4 GET CONTROL WORD «, t00=0x0042, t01=0x0146}
0x687a…688c Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x0042, t01=0x0170}
0x688c…68b8 Head {h00=0x0028, h01=0x0050, text=» ANK A1,/F MASK HIGH SPEED PARAMETER«, t00=0x0042, t01=0x0182}
0x68b8…68de Head {h00=0x0022, h01=0x0050, text=» RF(Z) FOR060 NO CHANGE WANTED«, t00=0x0043, t01=0x001e}
0x68de…68f0 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0043, t01=0x0044}
0x68f0…6906 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) FOR040«, t00=0x0043, t01=0x0056}
0x6906…692c Head {h00=0x0022, h01=0x0050, text=» LDK A2,SM HIGH SPEED SELECTED«, t00=0x0043, t01=0x006c}
0x692c…695a Head {h00=0x002a, h01=0x0050, text=» SC A2,DWTDEV+DWTHSP+1,A6 STORE IN DWT«, t00=0x0043, t01=0x0092}
0x695a…6970 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSSM «, t00=0x0043, t01=0x00c0}
0x6970…699e Head {h00=0x002a, h01=0x0050, text=» RF FOR050 SEND SELECT HIGH SPEED MODE«, t00=0x0043, t01=0x00d6}
0x699e…69b6 Head {h00=0x0014, h01=0x0050, text=»FOR040 SUK A1,1 «, t00=0x0043, t01=0x0104}
0x69b6…69da Head {h00=0x0020, h01=0x0050, text=» RB(NZ) FOR010 REQUEST ERROR«, t00=0x0043, t01=0x011c}
0x69da…69ec Head {h00=0x000e, h01=0x0050, text=» LDK A2,RM«, t00=0x0043, t01=0x0140}
0x69ec…6a1a Head {h00=0x002a, h01=0x0050, text=» SC A2,DWTDEV+DWTHSP+1,A6 STORE IN DWT«, t00=0x0043, t01=0x0152}
0x6a1a…6a48 Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CSRM SEND SELECT NORMAL SPEED«, t00=0x0043, t01=0x0180}
0x6a48…6a6c Head {h00=0x0020, h01=0x0050, text=»FOR050 LDKL A3,DWTDEV+DWTHSP«, t00=0x0044, t01=0x001e}
0x6a6c…6a80 Head {h00=0x0010, h01=0x0050, text=» CF A5,SEND «, t00=0x0044, t01=0x0042}
0x6a80…6a94 Head {h00=0x0010, h01=0x0050, text=»FOR060 EQU *«, t00=0x0044, t01=0x0056}
0x6a94…6aaa Head {h00=0x0012, h01=0x0050, text=» IFT SINHAN=1 «, t00=0x0044, t01=0x006a}
0x6aaa…6ace Head {h00=0x0020, h01=0x0050, text=» LDR A1,A4 GET CONTROL WORD «, t00=0x0044, t01=0x0080}
0x6ace…6ae0 Head {h00=0x000e, h01=0x0050, text=» SRL A1,/C«, t00=0x0044, t01=0x00a4}
0x6ae0…6b08 Head {h00=0x0024, h01=0x0050, text=» ANK A1,/F MASK HOPPER PARAMETER«, t00=0x0044, t01=0x00b6}
0x6b08…6b2e Head {h00=0x0022, h01=0x0050, text=» RF(Z) FOR120 NO CHANGE WANTED«, t00=0x0044, t01=0x00de}
0x6b2e…6b40 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0044, t01=0x0104}
0x6b40…6b56 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) FOR070«, t00=0x0044, t01=0x0116}
0x6b56…6b7c Head {h00=0x0022, h01=0x0050, text=» LDKL A2,/3168 SELECT HOPPER 1«, t00=0x0044, t01=0x012c}
0x6b7c…6b8e Head {h00=0x000e, h01=0x0050, text=» RF FOR075«, t00=0x0044, t01=0x0152}
0x6b8e…6ba6 Head {h00=0x0014, h01=0x0050, text=»FOR070 SUK A1,1 «, t00=0x0044, t01=0x0164}
0x6ba6…6bbc Head {h00=0x0012, h01=0x0050, text=» RF(NZ) FOR080«, t00=0x0044, t01=0x017c}
0x6bbc…6be2 (69, 0, 400) Head {h00=0x0022, h01=0x0050, text=» LDKL A2,/3268 SELECT HOPPER 2«, t00=0x0045, t01=0x0004}
0x6be2…6c14 Head {h00=0x002e, h01=0x0050, text=»FOR075 ST A2,DWTDEV+DWTHOP,A6 STORE IN DWT«, t00=0x0045, t01=0x002a}
0x6c14…6c2a Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSSM «, t00=0x0045, t01=0x005c}
0x6c2a…6c3c Head {h00=0x000e, h01=0x0050, text=» RF FOR110«, t00=0x0045, t01=0x0072}
0x6c3c…6c54 Head {h00=0x0014, h01=0x0050, text=»FOR080 SUK A1,1 «, t00=0x0045, t01=0x0084}
0x6c54…6c6a Head {h00=0x0012, h01=0x0050, text=» RF(NZ) FOR090«, t00=0x0045, t01=0x009c}
0x6c6a…6c92 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,/316C DESELECT HOPPER 1«, t00=0x0045, t01=0x00b2}
0x6c92…6ca4 Head {h00=0x000e, h01=0x0050, text=» RF FOR095«, t00=0x0045, t01=0x00da}
0x6ca4…6cbc Head {h00=0x0014, h01=0x0050, text=»FOR090 SUK A1,1 «, t00=0x0045, t01=0x00ec}
0x6cbc…6ce0 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) FOR010 REQUEST ERROR«, t00=0x0045, t01=0x0104}
0x6ce0…6d08 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,/326C DESELECT HOPPER 2«, t00=0x0045, t01=0x0128}
0x6d08…6d3a Head {h00=0x002e, h01=0x0050, text=»FOR095 ST A2,DWTDEV+DWTHOP,A6 STORE IN DWT«, t00=0x0045, t01=0x0150}
0x6d3a…6d50 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSRM «, t00=0x0045, t01=0x0182}
0x6d50…6d74 Head {h00=0x0020, h01=0x0050, text=»FOR110 LDKL A3,DWTDEV+DWTHOP«, t00=0x0046, t01=0x0008}
0x6d74…6d98 Head {h00=0x0020, h01=0x0050, text=» CF A5,SEND SEND HOPPER MODE«, t00=0x0046, t01=0x002c}
0x6d98…6da4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x0050}
0x6da4…6dba Head {h00=0x0012, h01=0x0050, text=» IFT FORMPA=1 «, t00=0x0046, t01=0x005c}
0x6dba…6dd8 Head {h00=0x001a, h01=0x0050, text=» RF FOR120 END OF REQ.«, t00=0x0046, t01=0x0072}
0x6dd8…6de2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0090}
0x6de2…6dfe Head {h00=0x0018, h01=0x0050, text=»* TABULATION PART «, t00=0x0046, t01=0x009a}
0x6dfe…6e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00b6}
0x6e08…6e1c Head {h00=0x0010, h01=0x0050, text=»TAB010 EQU *«, t00=0x0046, t01=0x00c0}
0x6e1c…6e44 Head {h00=0x0024, h01=0x0050, text=» LDK A3,0 SET UP BUFFER POINTER «, t00=0x0046, t01=0x00d4}
0x6e44…6e6e Head {h00=0x0026, h01=0x0050, text=»TAB020 CF A15,GETCHR GET CHARACTER«, t00=0x0046, t01=0x00fc}
0x6e6e…6e90 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A1 END OF BUFFER ?«, t00=0x0046, t01=0x0126}
0x6e90…6eb4 Head {h00=0x0020, h01=0x0050, text=» RB(Z) FOR010 REQUEST ERROR «, t00=0x0046, t01=0x0148}
0x6eb4…6ed8 Head {h00=0x0020, h01=0x0050, text=» LDR A4,A2 KEEP CHAR. IN A4 «, t00=0x0046, t01=0x016c}
0x6ed8…6ef8 Head {h00=0x001c, h01=0x0050, text=» LDK A2,/80 BLOCK LENGTH«, t00=0x0046, t01=0x0190}
0x6ef8…6f1c Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0047, t01=0x0020}
0x6f1c…6f40 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP10 JMP IF ERROR «, t00=0x0047, t01=0x0044}
0x6f40…6f66 Head {h00=0x0022, h01=0x0050, text=» ANK A4,1 SET OR CLEAR TABS. ?«, t00=0x0047, t01=0x0068}
0x6f66…6f92 Head {h00=0x0028, h01=0x0050, text=» RF(Z) TAB050 CLEAR ALL TABULATIONS «, t00=0x0047, t01=0x008e}
0x6f92…6fc6 Head {h00=0x0030, h01=0x0050, text=»TAB030 CF A15,GETCHR GET TABULATION POSITION«, t00=0x0047, t01=0x00ba}
0x6fc6…6fd8 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0047, t01=0x00ee}
0x6fd8…6ffc Head {h00=0x0020, h01=0x0050, text=» RF(Z) FOR120 END OF REQUEST«, t00=0x0047, t01=0x0100}
0x6ffc…701e Head {h00=0x001e, h01=0x0050, text=» LDR A4,A2 TAB. POS. IN A4«, t00=0x0047, t01=0x0124}
0x701e…7044 Head {h00=0x0022, h01=0x0050, text=» CF A5,KONVER KONVERT TO ASCII«, t00=0x0047, t01=0x0146}
0x7044…7064 Head {h00=0x001c, h01=0x0050, text=» SC A2,DWTDEV+DWTTAB,A6 «, t00=0x0047, t01=0x016c}
0x7064…709a Head {h00=0x0032, h01=0x0050, text=» SC A4,DWTDEV+DWTTAB+2,A6 STORE TAB POS IN DWT«, t00=0x0047, t01=0x018c}
0x709a…70b8 Head {h00=0x001a, h01=0x0050, text=» SRL A4,8 SHIFT RIGHT «, t00=0x0048, t01=0x0032}
0x70b8…70ee Head {h00=0x0032, h01=0x0050, text=» SC A4,DWTDEV+DWTTAB+1,A6 STORE TAB POS IN DWT«, t00=0x0048, t01=0x0050}
0x70ee…7114 Head {h00=0x0022, h01=0x0050, text=» LDR A4,A3 KEEP COUNTER IN A4 «, t00=0x0048, t01=0x0086}
0x7114…712a Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSHPA«, t00=0x0048, t01=0x00ac}
0x712a…7148 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTTAB«, t00=0x0048, t01=0x00c2}
0x7148…7174 Head {h00=0x0028, h01=0x0050, text=» CF A5,SEND SEND HORIZONTAL POS ABS.«, t00=0x0048, t01=0x00e0}
0x7174…718a Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSHTS«, t00=0x0048, t01=0x010c}
0x718a…71b8 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SET TAB POS AT ACTIVE POS «, t00=0x0048, t01=0x0122}
0x71b8…71da Head {h00=0x001e, h01=0x0050, text=» LDR A3,A4 RESTORE COUNTER«, t00=0x0048, t01=0x0150}
0x71da…71fa Head {h00=0x001c, h01=0x0050, text=» RB TAB030 GET NEXT POS «, t00=0x0048, t01=0x0172}
0x71fa…720e (73, 0, 398) Head {h00=0x0010, h01=0x0050, text=»TAB050 EQU *«, t00=0x0049, t01=0x0004}
0x720e…7230 Head {h00=0x001e, h01=0x0050, text=» LDK A3,/33 CLEAR ALL TABS«, t00=0x0049, t01=0x0018}
0x7230…725c Head {h00=0x0028, h01=0x0050, text=» SC A3,DWTDEV+DWTTAB,A6 STORE IN DWT«, t00=0x0049, t01=0x003a}
0x725c…7272 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSTBC«, t00=0x0049, t01=0x0066}
0x7272…7290 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTTAB«, t00=0x0049, t01=0x007c}
0x7290…72be Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND CLEAR ALL TABULATION POS. «, t00=0x0049, t01=0x009a}
0x72be…72e6 Head {h00=0x0024, h01=0x0050, text=»FOR120 CF A5,ENDBLK END OF BLOCK«, t00=0x0049, t01=0x00c8}
0x72e6…7310 Head {h00=0x0026, h01=0x0050, text=»ERGP10 ABL(NZ) ERGP15 JMP IF ERROR«, t00=0x0049, t01=0x00f0}
0x7310…733c Head {h00=0x0028, h01=0x0050, text=» ABL TSTSTA CHECK STATUS & END REQ. «, t00=0x0049, t01=0x011a}
0x733c…7348 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0146}
0x7348…7356 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x0152}
0x7356…7388 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0049, t01=0x0160}
0x7388…7392 (74, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0004}
0x7392…73b8 Head {h00=0x0022, h01=0x0050, text=»* ORDER 38 : RELEASE DOCUMENT «, t00=0x004a, t01=0x000e}
0x73b8…73c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0034}
0x73c2…73f4 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x004a, t01=0x003e}
0x73f4…7410 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x004a, t01=0x0070}
0x7410…7424 Head {h00=0x0010, h01=0x0050, text=»RELDOC EQU *«, t00=0x004a, t01=0x008c}
0x7424…7444 Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x004a, t01=0x00a0}
0x7444…7456 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x004a, t01=0x00c0}
0x7456…7474 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) REL20 ERROR ? «, t00=0x004a, t01=0x00d2}
0x7474…7494 Head {h00=0x001c, h01=0x0050, text=» LDK A2,/F BLOCK LENGTH «, t00=0x004a, t01=0x00f0}
0x7494…74b8 Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x004a, t01=0x0110}
0x74b8…74dc Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP14 JMP IF ERROR «, t00=0x004a, t01=0x0134}
0x74dc…74f2 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSVPA«, t00=0x004a, t01=0x0158}
0x74f2…7526 Head {h00=0x0030, h01=0x0050, text=» LDKL A3,DWTDEV+DWTDL SEND LF TO END OF PAGE«, t00=0x004a, t01=0x016e}
0x7526…753a Head {h00=0x0010, h01=0x0050, text=» CF A5,SEND «, t00=0x004b, t01=0x0012}
0x753a…7566 Head {h00=0x0028, h01=0x0050, text=» LDK A3,/F SET UP LINE FEED COUNTER «, t00=0x004b, t01=0x0026}
0x7566…7588 Head {h00=0x001e, h01=0x0050, text=»REL10 LDK A2,LF LINE FEED «, t00=0x004b, t01=0x0052}
0x7588…759e Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x004b, t01=0x0074}
0x759e…75c2 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP14 JMP IF ERROR «, t00=0x004b, t01=0x008a}
0x75c2…75f0 Head {h00=0x002a, h01=0x0050, text=» SUK A3,1 DECREMENT LINE FEED COUNTER «, t00=0x004b, t01=0x00ae}
0x75f0…7614 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) REL10 ANY MORE LF ? «, t00=0x004b, t01=0x00dc}
0x7614…7636 Head {h00=0x001e, h01=0x0050, text=» CF A5,ENDBLK END OF BLOCK«, t00=0x004b, t01=0x0100}
0x7636…765a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP14 JMP IF ERROR «, t00=0x004b, t01=0x0122}
0x765a…7688 Head {h00=0x002a, h01=0x0050, text=» CF A5,GTSTAT GET STATUS FROM PRINTER «, t00=0x004b, t01=0x0146}
0x7688…76b6 Head {h00=0x002a, h01=0x0050, text=» CM DWTDEV+DWTALN,A6 RESET ACTUAL LINE«, t00=0x004b, t01=0x0174}
0x76b6…76e8 Head {h00=0x002e, h01=0x0050, text=» CM DWTDEV+DWTRLN,A6 RESET REQUESTED LINE «, t00=0x004c, t01=0x0012}
0x76e8…771a Head {h00=0x002e, h01=0x0050, text=» CM DWTDEV+DWTCO1,A6 CLEAR COLUMN COUNTER «, t00=0x004c, t01=0x0044}
0x771a…773c Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x004c, t01=0x0076}
0x773c…7766 Head {h00=0x0026, h01=0x0050, text=»REL20 ANKL A2,/100 PRINTER RESET ?«, t00=0x004c, t01=0x0098}
0x7766…7780 Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) RCTP YES «, t00=0x004c, t01=0x00c2}
0x7780…77a8 Head {h00=0x0024, h01=0x0050, text=» CF A5,RESREC RESET RECOVERY BIT«, t00=0x004c, t01=0x00dc}
0x77a8…77c8 Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END REQUEST «, t00=0x004c, t01=0x0104}
0x77c8…77d4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0124}
0x77d4…77e2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x0130}
0x77e2…7826 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x004c, t01=0x013e}
0x7826…7830 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0182}
0x7830…7842 Head {h00=0x000e, h01=0x0050, text=»* R C T P«, t00=0x004c, t01=0x018c}
0x7842…784c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x000e}
0x784c…788a Head {h00=0x003a, h01=0x0050, text=»* RECOVERY ROUTINE REPEATS RUNNING REQUEST AT POWER ON«, t00=0x004d, t01=0x0018}
0x788a…7894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0056}
0x7894…78d8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004d, t01=0x0060}
0x78d8…78ea Head {h00=0x000e, h01=0x0050, text=»RCTP EQU *«, t00=0x004d, t01=0x00a4}
0x78ea…7918 Head {h00=0x002a, h01=0x0050, text=»RCTP07 LDKL A1,/7FFF SET DEVICE BUSY «, t00=0x004d, t01=0x00b6}
0x7918…7936 Head {h00=0x001a, h01=0x0050, text=» ANS A1,DWTST,A6 BUSY «, t00=0x004d, t01=0x00e4}
0x7936…7958 Head {h00=0x001e, h01=0x0050, text=» LDKL A5,DWTSB2 STACK BASE«, t00=0x004d, t01=0x0102}
0x7958…796a Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x004d, t01=0x0124}
0x796a…79a6 Head {h00=0x0038, h01=0x0050, text=» LD A1,DWTDEV+DWTSYST,A6 INTERN. SYSTEM START IND. «, t00=0x004d, t01=0x0136}
0x79a6…79cc Head {h00=0x0022, h01=0x0050, text=» RF(Z) RCTP10 NO SYSTEM START «, t00=0x004d, t01=0x0172}
0x79cc…79da Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x004e, t01=0x0008}
0x79da…7a14 Head {h00=0x0036, h01=0x0050, text=» CM DWTDEV+DWTSYST,A6 SET SYSTEM START INDICATOR «, t00=0x004e, t01=0x0016}
0x7a14…7a48 Head {h00=0x0030, h01=0x0050, text=» LDKL A4,STDNCV GET STANDARD NAT. CHAR. SET «, t00=0x004e, t01=0x0050}
0x7a48…7a76 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BIANARY TO ASCII«, t00=0x004e, t01=0x0084}
0x7a76…7aac Head {h00=0x0032, h01=0x0050, text=» ST A4,DWTDEV+DWTDCS,A6 SET CHAR. SET DOCUMENT«, t00=0x004e, t01=0x00b2}
0x7aac…7ae4 Head {h00=0x0034, h01=0x0050, text=» ST A4,DWTDEV+DWTPCS,A6 SET CHAR. SET CONT.STAT.«, t00=0x004e, t01=0x00e8}
0x7ae4…7b10 Head {h00=0x0028, h01=0x0050, text=» LDKL A4,PAGLEN STANDARD PAGE LENGTH«, t00=0x004e, t01=0x0120}
0x7b10…7b3e Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x004e, t01=0x014c}
0x7b3e…7b78 Head {h00=0x0036, h01=0x0050, text=» ST A4,DWTDEV+DWTPL,A6 SET PAGE LENGTH CONT.STAT. «, t00=0x004e, t01=0x017a}
0x7b78…7bb2 Head {h00=0x0036, h01=0x0050, text=» LDKL A4,DOCLEN GET STANDARD PAGE LENGTH DOCUMENT «, t00=0x004f, t01=0x0024}
0x7bb2…7be0 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x004f, t01=0x005e}
0x7be0…7c18 Head {h00=0x0034, h01=0x0050, text=» ST A4,DWTDEV+DWTDL,A6 SET PAGE LENGTH DOCUMENT «, t00=0x004f, t01=0x008c}
0x7c18…7c4e Head {h00=0x0032, h01=0x0050, text=» LDKL A4,MATRIX GET STANDARD CHAR MATRIX FONT «, t00=0x004f, t01=0x00c4}
0x7c4e…7c6e Head {h00=0x001c, h01=0x0050, text=» ORK A4,ZERO MAKE ASCII «, t00=0x004f, t01=0x00fa}
0x7c6e…7ca4 Head {h00=0x0032, h01=0x0050, text=» SC A4,DWTDEV+DWTCMT,A6 STORE IN DWT (TRACTOR)«, t00=0x004f, t01=0x011a}
0x7ca4…7cdc Head {h00=0x0034, h01=0x0050, text=» SC A4,DWTDEV+DWTCMF,A6 STORE IN DWT (FRONT/FRI)«, t00=0x004f, t01=0x0150}
0x7cdc…7d14 Head {h00=0x0034, h01=0x0050, text=» LDKL A4,DENSIT GET STANDARD CHAR DENSITY/PITCH «, t00=0x004f, t01=0x0188}
0x7d14…7d34 Head {h00=0x001c, h01=0x0050, text=» ORK A4,ZERO MAKE ASCII «, t00=0x0050, t01=0x0030}
0x7d34…7d6c Head {h00=0x0034, h01=0x0050, text=» SC A4,DWTDEV+DWTCMT+1,A6 STORE IN DWT (TRACTOR)«, t00=0x0050, t01=0x0050}
0x7d6c…7da6 Head {h00=0x0036, h01=0x0050, text=» SC A4,DWTDEV+DWTCMF+1,A6 STORE IN DWT (FRONT/FRI)«, t00=0x0050, t01=0x0088}
0x7da6…7dd6 Head {h00=0x002c, h01=0x0050, text=» CF A5,GTSTAT DUMMY ST., CLEAR RESET BIT«, t00=0x0050, t01=0x00c2}
0x7dd6…7dea Head {h00=0x0010, h01=0x0050, text=»RCTP10 EQU *«, t00=0x0050, t01=0x00f2}
0x7dea…7e10 Head {h00=0x0022, h01=0x0050, text=» LDR A4,P GET PROGRAM COUNTER «, t00=0x0050, t01=0x0106}
0x7e10…7e36 Head {h00=0x0022, h01=0x0050, text=» ADK A4,6 MAKE RETURN ADDRESS «, t00=0x0050, t01=0x012c}
0x7e36…7e5a Head {h00=0x0020, h01=0x0050, text=» ABL SENPAR SEND PARAMETERS «, t00=0x0050, t01=0x0152}
0x7e5a…7e94 Head {h00=0x0036, h01=0x0050, text=» CM DWTDEV+DWTALN,A6 CLEAR ACTUAL LINE (FRONT/FRI)«, t00=0x0050, t01=0x0176}
0x7e94…7ec4 Head {h00=0x002c, h01=0x0050, text=» LDKL A1,/20 INDICATE POWER OFF OCCURED «, t00=0x0051, t01=0x0020}
0x7ec4…7ede Head {h00=0x0016, h01=0x0050, text=» ORS A1,DWTDEV,A6 «, t00=0x0051, t01=0x0050}
0x7ede…7f06 Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTECB,A6 RUNNING REQUEST«, t00=0x0051, t01=0x006a}
0x7f06…7f36 Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) ACT020 YES , REPEAT THE REQUEST«, t00=0x0051, t01=0x0092}
0x7f36…7f58 Head {h00=0x001e, h01=0x0050, text=»RCTP20 ABL LENDIS DISPATCH«, t00=0x0051, t01=0x00c2}
0x7f58…7f66 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x00e4}
0x7f66…7faa Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0051, t01=0x00f2}
0x7faa…7fb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0136}
0x7fb4…7fc4 Head {h00=0x000c, h01=0x0050, text=»* GTSTAT«, t00=0x0051, t01=0x0140}
0x7fc4…7fce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0150}
0x7fce…7fd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x015a}
0x7fd8…801a Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE SENDS 'DEVICE STATUS REPORT TO THE PRINTER «, t00=0x0051, t01=0x0164}
0x801a…8024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0016}
0x8024…8062 Head {h00=0x003a, h01=0x0050, text=»* AND ANALYZES THE DEVICE STATUS SENT FROM THE PRINTER«, t00=0x0052, t01=0x0020}
0x8062…806c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x005e}
0x806c…808e Head {h00=0x001e, h01=0x0050, text=»* AT EXIT A1 = RETURN CODE«, t00=0x0052, t01=0x0068}
0x808e…8098 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x008a}
0x8098…80dc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0052, t01=0x0094}
0x80dc…80f0 Head {h00=0x0010, h01=0x0050, text=»GTSTAT EQU *«, t00=0x0052, t01=0x00d8}
0x80f0…811e Head {h00=0x002a, h01=0x0050, text=» CM DWTDEV+DWTRC,A6 RESET RETURN CODE «, t00=0x0052, t01=0x00ec}
0x811e…813e Head {h00=0x001c, h01=0x0050, text=» LDK A2,/5 BLOCK LENGTH «, t00=0x0052, t01=0x011a}
0x813e…8162 Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0052, t01=0x013a}
0x8162…8186 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP14 JMP IF ERROR «, t00=0x0052, t01=0x015e}
0x8186…81b2 Head {h00=0x0028, h01=0x0050, text=» LDKL A3,CSDSR DEVICE STATUS REPORT «, t00=0x0052, t01=0x0182}
0x81b2…81d8 Head {h00=0x0022, h01=0x0050, text=»GTST02 LCR A2,A3 GET CHARACTER«, t00=0x0053, t01=0x001e}
0x81d8…81f0 Head {h00=0x0014, h01=0x0050, text=» ANK A2,/FF MASK«, t00=0x0053, t01=0x0044}
0x81f0…820c Head {h00=0x0018, h01=0x0050, text=» SLL A2,8 SHIFT LEFT«, t00=0x0053, t01=0x005c}
0x820c…823a Head {h00=0x002a, h01=0x0050, text=» RF(N) GTST04 END OF CONTROL SEQUENSE «, t00=0x0053, t01=0x0078}
0x823a…8258 Head {h00=0x001a, h01=0x0050, text=» SRL A2,8 SHIFT RIGHT «, t00=0x0053, t01=0x00a6}
0x8258…826e Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0053, t01=0x00c4}
0x826e…8292 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP14 JMP IF ERROR «, t00=0x0053, t01=0x00da}
0x8292…82b2 Head {h00=0x001c, h01=0x0050, text=» ADK A3,1 INCR. ADDRESS «, t00=0x0053, t01=0x00fe}
0x82b2…82d8 Head {h00=0x0022, h01=0x0050, text=» RB GTST02 GET NEXT CHARACTER «, t00=0x0053, t01=0x011e}
0x82d8…8300 Head {h00=0x0024, h01=0x0050, text=»GTST04 CF A5,ENDBLK END OF BLOCK«, t00=0x0053, t01=0x0144}
0x8300…832a Head {h00=0x0026, h01=0x0050, text=»ERGP14 RF(NZ) ERGP15 JMP IF ERROR «, t00=0x0053, t01=0x016c}
0x832a…834c Head {h00=0x001e, h01=0x0050, text=» LDR A1,A6 SAVE DWTADDRESS«, t00=0x0054, t01=0x0008}
0x834c…836a Head {h00=0x001a, h01=0x0050, text=» LDKL A4,DWTDEV+DWTTP «, t00=0x0054, t01=0x002a}
0x836a…8382 Head {h00=0x0014, h01=0x0050, text=» ADR A4,A6 TIMER«, t00=0x0054, t01=0x0048}
0x8382…83ac Head {h00=0x0026, h01=0x0050, text=» CF A15,SETIMP SET TIMER, 10 SEC. «, t00=0x0054, t01=0x0060}
0x83ac…83da Head {h00=0x002a, h01=0x0050, text=» DATA ERGP00,TIME RETURN ADDRESS,TIME «, t00=0x0054, t01=0x008a}
0x83da…8406 Head {h00=0x0028, h01=0x0050, text=»GTST05 LDKL A4,TAB GET TABLE ADDRESS«, t00=0x0054, t01=0x00b8}
0x8406…841a Head {h00=0x0010, h01=0x0050, text=»GTST10 EQU *«, t00=0x0054, t01=0x00e4}
0x841a…8438 Head {h00=0x001a, h01=0x0050, text=» LDK A3,0 RESET INDEX «, t00=0x0054, t01=0x00f8}
0x8438…8466 Head {h00=0x002a, h01=0x0050, text=» CF A5,INPUT READ STATUS FROM PRINTER «, t00=0x0054, t01=0x0116}
0x8466…8488 Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FF GET CHARACTER «, t00=0x0054, t01=0x0144}
0x8488…84b0 Head {h00=0x0024, h01=0x0050, text=» CCK A2,/5C5C STRING TERMINATOR «, t00=0x0054, t01=0x0166}
0x84b0…84ca Head {h00=0x0016, h01=0x0050, text=» RF(E) GTSEND YES «, t00=0x0054, t01=0x018e}
0x84ca…84e8 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A7 ORDER /00 ?«, t00=0x0055, t01=0x0018}
0x84e8…8502 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) GTST15 NO «, t00=0x0055, t01=0x0036}
0x8502…8528 Head {h00=0x0022, h01=0x0050, text=» CCK A2,/3B STRING SEPARATOR ?«, t00=0x0055, t01=0x0050}
0x8528…8542 Head {h00=0x0016, h01=0x0050, text=» RF(NE) GTST15 NO «, t00=0x0055, t01=0x0076}
0x8542…8570 Head {h00=0x002a, h01=0x0050, text=» IM DWTDEV+DWTSER,A6 IND. STRING SEP. «, t00=0x0055, t01=0x0090}
0x8570…8590 Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTDEV+DWTSER,A6 «, t00=0x0055, t01=0x00be}
0x8590…85bc Head {h00=0x0028, h01=0x0050, text=» SUK A2,2 TWO SEPARATORS RECEIVED ? «, t00=0x0055, t01=0x00de}
0x85bc…85e6 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) GTST30 NO, READ NEXT CHAR.«, t00=0x0055, t01=0x010a}
0x85e6…861a Head {h00=0x0030, h01=0x0050, text=» CF A5,INPUT CHECK IF SERVICE STATUS PRESENT«, t00=0x0055, t01=0x0134}
0x861a…8632 Head {h00=0x0014, h01=0x0050, text=» ANK A2,/F MASK «, t00=0x0055, t01=0x0168}
0x8632…8644 Head {h00=0x000e, h01=0x0050, text=» CCK A2,/A«, t00=0x0055, t01=0x0180}
0x8644…866c (86, 0, 400) Head {h00=0x0024, h01=0x0050, text=» RB(NL) GTST10 NO SERVICE STATUS«, t00=0x0056, t01=0x0004}
0x866c…869e Head {h00=0x002e, h01=0x0050, text=» LDKL A4,TAB+20 INCR. ADDR. TO SERV. STAT.«, t00=0x0056, t01=0x002c}
0x869e…86cc Head {h00=0x002a, h01=0x0050, text=»GTST15 LCR A3,A4 GET MASK RETURN CODE «, t00=0x0056, t01=0x005e}
0x86cc…86de Head {h00=0x000e, h01=0x0050, text=» ANR A2,A3«, t00=0x0056, t01=0x008c}
0x86de…870c Head {h00=0x002a, h01=0x0050, text=» LDKL A3,/3AC0 SHIFT LEFT CIRCULAR A2 «, t00=0x0056, t01=0x009e}
0x870c…8728 Head {h00=0x0018, h01=0x0050, text=» LC A3,1,A4 A3 TIMES«, t00=0x0056, t01=0x00cc}
0x8728…8750 Head {h00=0x0024, h01=0x0050, text=» EXR A3 EXECUT SHIFT INSTRUCTION«, t00=0x0056, t01=0x00e8}
0x8750…876e Head {h00=0x001a, h01=0x0050, text=» LDR A7,A7 ORDER /00 ?«, t00=0x0056, t01=0x0110}
0x876e…8788 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) GTST20 NO «, t00=0x0056, t01=0x012e}
0x8788…87ae Head {h00=0x0022, h01=0x0050, text=» CW A4,TAB+20 SERVICE STATUS ?«, t00=0x0056, t01=0x0148}
0x87ae…87c6 Head {h00=0x0014, h01=0x0050, text=» RF(L) GTST20 NO«, t00=0x0056, t01=0x016e}
0x87c6…87fc Head {h00=0x0032, h01=0x0050, text=» ORS A2,ECBCW,A8 SERVICE STAT. IN CONTR. WORD «, t00=0x0056, t01=0x0186}
0x87fc…880e Head {h00=0x000e, h01=0x0050, text=» RF GTST30«, t00=0x0057, t01=0x002c}
0x880e…8850 Head {h00=0x003e, h01=0x0050, text=»GTST20 ORS A2,DWTDEV+DWTRC,A6 SAVE RETURN CODE TEMPORARILY«, t00=0x0057, t01=0x003e}
0x8850…8878 Head {h00=0x0024, h01=0x0050, text=»GTST30 ADK A4,2 INCREMENT ADRESS«, t00=0x0057, t01=0x0080}
0x8878…88a4 Head {h00=0x0028, h01=0x0050, text=» RB GTST10 GET NEXT STATUS CHARACTER«, t00=0x0057, t01=0x00a8}
0x88a4…88b8 Head {h00=0x0010, h01=0x0050, text=»GTSEND EQU *«, t00=0x0057, t01=0x00d4}
0x88b8…88e6 Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTDEV+DWTRC,A6 GET RETURN CODE«, t00=0x0057, t01=0x00e8}
0x88e6…891a Head {h00=0x0030, h01=0x0050, text=» CM DWTDEV+DWTSER,A6 CLEAR STRING SEP. IND. «, t00=0x0057, t01=0x0116}
0x891a…8938 Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTDEV+DWTTP,A6«, t00=0x0057, t01=0x014a}
0x8938…8964 Head {h00=0x0028, h01=0x0050, text=» RF(Z) GTST40 CHECK IF ALLREADY ZERO«, t00=0x0057, t01=0x0168}
0x8964…898c (88, 0, 400) Head {h00=0x0024, h01=0x0050, text=» CM* DWTDEV+DWTTP,A6 RESET TIMER«, t00=0x0058, t01=0x0004}
0x898c…89c2 Head {h00=0x0032, h01=0x0050, text=»GTST40 CM DWTDEV+DWTTP,A6 RESET TIMER POINTER «, t00=0x0058, t01=0x002c}
0x89c2…89d6 Head {h00=0x0010, h01=0x0050, text=»GTST50 EQU *«, t00=0x0058, t01=0x0062}
0x89d6…89e6 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0058, t01=0x0076}
0x89e6…89f4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0058, t01=0x0086}
0x89f4…8a38 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0058, t01=0x0094}
0x8a38…8a42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00d8}
0x8a42…8a80 Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE CONVERTS A BINARY VALUE TO ASCII CODE«, t00=0x0058, t01=0x00e2}
0x8a80…8a8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0120}
0x8a8a…8aa0 Head {h00=0x0012, h01=0x0050, text=»* REGISTERS : «, t00=0x0058, t01=0x012a}
0x8aa0…8abe Head {h00=0x001a, h01=0x0050, text=»* A1= WORK REGISTER «, t00=0x0058, t01=0x0140}
0x8abe…8ada Head {h00=0x0018, h01=0x0050, text=»* A4= BINARY INPUT«, t00=0x0058, t01=0x015e}
0x8ada…8afa Head {h00=0x001c, h01=0x0050, text=»* A2,A4= ASCII OUTPUT «, t00=0x0058, t01=0x017a}
0x8afa…8b04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x000a}
0x8b04…8b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0014}
0x8b0e…8b22 Head {h00=0x0010, h01=0x0050, text=»KONVER EQU *«, t00=0x0059, t01=0x001e}
0x8b22…8b3a Head {h00=0x0014, h01=0x0050, text=»* BINARY TO DEC.«, t00=0x0059, t01=0x0032}
0x8b3a…8b54 Head {h00=0x0016, h01=0x0050, text=» LDK A2,0 CLEAR A2«, t00=0x0059, t01=0x004a}
0x8b54…8b76 Head {h00=0x001e, h01=0x0050, text=» CWK A4,100 VALUE > 100 ? «, t00=0x0059, t01=0x0064}
0x8b76…8b8e Head {h00=0x0014, h01=0x0050, text=» RF(L) KONV05 NO«, t00=0x0059, t01=0x0086}
0x8b8e…8ba2 Head {h00=0x0010, h01=0x0050, text=» SUKL A4,100«, t00=0x0059, t01=0x009e}
0x8ba2…8bcc Head {h00=0x0026, h01=0x0050, text=» LDKL A2,/100 LEFT BYTE OF A2=X=1 «, t00=0x0059, t01=0x00b2}
0x8bcc…8bfa Head {h00=0x002a, h01=0x0050, text=»KONV05 CWK A4,10 ARE THERE ANY TENS ? «, t00=0x0059, t01=0x00dc}
0x8bfa…8c12 Head {h00=0x0014, h01=0x0050, text=» RF(L) KONV04 NO«, t00=0x0059, t01=0x010a}
0x8c12…8c24 Head {h00=0x000e, h01=0x0050, text=» SUK A4,10«, t00=0x0059, t01=0x0122}
0x8c24…8c5a Head {h00=0x0032, h01=0x0050, text=» ADK A2,/1 NUMBER OF TENS IN RIGHT B. OF A2=Y «, t00=0x0059, t01=0x0134}
0x8c5a…8c72 Head {h00=0x0014, h01=0x0050, text=» RB KONV05 NEXT «, t00=0x0059, t01=0x016a}
0x8c72…8c98 Head {h00=0x0022, h01=0x0050, text=»KONV04 ORKL A2,/3030 XY IN A2 «, t00=0x0059, t01=0x0182}
0x8c98…8cb4 Head {h00=0x0018, h01=0x0050, text=» ORK A4,/30 Z IN A4 «, t00=0x005a, t01=0x0018}
0x8cb4…8cce Head {h00=0x0016, h01=0x0050, text=» SRC A2,8 YX IN A2«, t00=0x005a, t01=0x0034}
0x8cce…8ce0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x005a, t01=0x004e}
0x8ce0…8d04 Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/FF00 KEEP Y IN A1 «, t00=0x005a, t01=0x0060}
0x8d04…8d36 Head {h00=0x002e, h01=0x0050, text=» ANK A2,/FF KEEP X IN R. BYTE OF A2. ASCII«, t00=0x005a, t01=0x0084}
0x8d36…8d58 Head {h00=0x001e, h01=0x0050, text=» ORR A4,A1 YZ IN A1. ASCII«, t00=0x005a, t01=0x00b6}
0x8d58…8d68 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005a, t01=0x00d8}
0x8d68…8d76 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005a, t01=0x00e8}
0x8d76…8d98 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x005a, t01=0x00f6}
0x8d98…8db2 Head {h00=0x0016, h01=0x0050, text=»* RESET RECORVERY «, t00=0x005a, t01=0x0118}
0x8db2…8dbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0132}
0x8dbc…8dd0 Head {h00=0x0010, h01=0x0050, text=»RESREC EQU *«, t00=0x005a, t01=0x013c}
0x8dd0…8df6 Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTDEV,A6 DEVICE STATUS«, t00=0x005a, t01=0x0150}
0x8df6…8e14 Head {h00=0x001a, h01=0x0050, text=» ANKL A4,/20 RECOVERY?«, t00=0x005a, t01=0x0176}
0x8e14…8e2e (91, 0, 400) Head {h00=0x0016, h01=0x0050, text=» RF(E) RESRTN NO. «, t00=0x005b, t01=0x0004}
0x8e2e…8e60 Head {h00=0x002e, h01=0x0050, text=» XRS A4,DWTDEV,A6 YES. RESET RECOVERY BIT «, t00=0x005b, t01=0x001e}
0x8e60…8e96 Head {h00=0x0032, h01=0x0050, text=» ORKL A1,/100 INDIC. RECOV. IN RET. CODE BIT7 «, t00=0x005b, t01=0x0050}
0x8e96…8eb2 Head {h00=0x0018, h01=0x0050, text=»RESRTN RTN A5 RETURN«, t00=0x005b, t01=0x0086}
0x8eb2…8ebc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00a2}
0x8ebc…8ec6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00ac}
0x8ec6…8f00 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x005b, t01=0x00b6}
0x8f00…8f0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00f0}
0x8f0a…8f3c Head {h00=0x002e, h01=0x0050, text=»* ERROR ROUTINE FOR STABLK,OUTPUT, ENDBLK «, t00=0x005b, t01=0x00fa}
0x8f3c…8f50 Head {h00=0x0010, h01=0x0050, text=»* AND TIMER.«, t00=0x005b, t01=0x012c}
0x8f50…8f5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0140}
0x8f5a…8f6e Head {h00=0x0010, h01=0x0050, text=»ERGP00 EQU *«, t00=0x005b, t01=0x014a}
0x8f6e…8f94 Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RESTORE DWTADDRESS «, t00=0x005b, t01=0x015e}
0x8f94…8fc4 Head {h00=0x002c, h01=0x0050, text=» CM DWTDEV+DWTTP,A6 RESET TIMER POINTER «, t00=0x005b, t01=0x0184}
0x8fc4…8fd6 Head {h00=0x000e, h01=0x0050, text=» RF ERGP20«, t00=0x005c, t01=0x0024}
0x8fd6…8fea Head {h00=0x0010, h01=0x0050, text=»ERGP15 EQU *«, t00=0x005c, t01=0x0036}
0x8fea…901e Head {h00=0x0030, h01=0x0050, text=» ANK A1,/1A OUTP. ERR, SOFTW. T-OUT,LRC-ERR «, t00=0x005c, t01=0x004a}
0x901e…9042 Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) RCTP YES, RECOVERY «, t00=0x005c, t01=0x007e}
0x9042…9056 Head {h00=0x0010, h01=0x0050, text=»ERGP17 EQU *«, t00=0x005c, t01=0x00a2}
0x9056…906c Head {h00=0x0012, h01=0x0050, text=» IFF REQEND=1 «, t00=0x005c, t01=0x00b6}
0x906c…9088 Head {h00=0x0018, h01=0x0050, text=» ABL LDISP DISPATCH «, t00=0x005c, t01=0x00cc}
0x9088…9094 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x00e8}
0x9094…90bc Head {h00=0x0024, h01=0x0050, text=»ERGP20 LDK A1,1 SET NOT OPERABLE«, t00=0x005c, t01=0x00f4}
0x90bc…90e4 Head {h00=0x0024, h01=0x0050, text=»ERGP30 ABL LENDIS END OF REQUEST«, t00=0x005c, t01=0x011c}
0x90e4…90f2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005c, t01=0x0144}
0x90f2…9132 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x005c, t01=0x0152}
0x9132…913c (93, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0004}
0x913c…914e Head {h00=0x000e, h01=0x0050, text=»* S E N D «, t00=0x005d, t01=0x000e}
0x914e…9158 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0020}
0x9158…9188 Head {h00=0x002c, h01=0x0050, text=»* THIS ROUTINE SENDS AN CONTROL SEQUENCE«, t00=0x005d, t01=0x002a}
0x9188…91a0 Head {h00=0x0014, h01=0x0050, text=»* TO THE PRINTER«, t00=0x005d, t01=0x005a}
0x91a0…91aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0072}
0x91aa…91b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x007c}
0x91b4…91c8 Head {h00=0x0010, h01=0x0050, text=»* AT ENTRY :«, t00=0x005d, t01=0x0086}
0x91c8…91ee Head {h00=0x0022, h01=0x0050, text=»* A2 = CONTROL SEQUENCE ADRESS«, t00=0x005d, t01=0x009a}
0x91ee…9226 Head {h00=0x0034, h01=0x0050, text=»* A3 = DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC «, t00=0x005d, t01=0x00c0}
0x9226…9230 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00f8}
0x9230…923a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0102}
0x923a…924e Head {h00=0x0010, h01=0x0050, text=»* AT EXIT : «, t00=0x005d, t01=0x010c}
0x924e…926e Head {h00=0x001c, h01=0x0050, text=»* A1,A2,A3 IS DESTROYED «, t00=0x005d, t01=0x0120}
0x926e…9278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0140}
0x9278…9282 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x014a}
0x9282…928c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0154}
0x928c…92b4 Head {h00=0x0024, h01=0x0050, text=»SEND EQU * SEND CONTROL SEQUENCE«, t00=0x005d, t01=0x015e}
0x92b4…92ea Head {h00=0x0032, h01=0x0050, text=» ST A3,DWTDEV+DWTDISP,A6 SAVE DWT-DISPLACEMENT«, t00=0x005d, t01=0x0186}
0x92ea…9322 Head {h00=0x0034, h01=0x0050, text=» ST A2,DWTDEV+DWTSTR,A6 CONTROL SEQUENCE ADRESS «, t00=0x005e, t01=0x002c}
0x9322…9336 Head {h00=0x0010, h01=0x0050, text=»SEND10 EQU *«, t00=0x005e, t01=0x0064}
0x9336…9372 Head {h00=0x0038, h01=0x0050, text=» LD A3,DWTDEV+DWTSTR,A6 GET CONTROL SEQUENCE ADRESS «, t00=0x005e, t01=0x0078}
0x9372…9392 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x005e, t01=0x00b4}
0x9392…93b4 Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FF MAKE CHARACTER«, t00=0x005e, t01=0x00d4}
0x93b4…93de Head {h00=0x0026, h01=0x0050, text=» SLL A2,8 END OF CONTROL SEQUENCE «, t00=0x005e, t01=0x00f6}
0x93de…9400 Head {h00=0x001e, h01=0x0050, text=» RF(N) SENDEND YES,RETURN «, t00=0x005e, t01=0x0120}
0x9400…942a Head {h00=0x0026, h01=0x0050, text=» CWK A2,/3000 LINE NO,CHAR.SET,ETC«, t00=0x005e, t01=0x0142}
0x942a…9444 Head {h00=0x0016, h01=0x0050, text=» RF(E) SEND30 YES «, t00=0x005e, t01=0x016c}
0x9444…9470 Head {h00=0x0028, h01=0x0050, text=» SRL A2,8 PREPARE TO SEND CHARACTER «, t00=0x005e, t01=0x0186}
0x9470…9494 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x005f, t01=0x0022}
0x9494…94b8 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ERGP15 JMP IF ERROR «, t00=0x005f, t01=0x0046}
0x94b8…94cc Head {h00=0x0010, h01=0x0050, text=»SEND20 EQU *«, t00=0x005f, t01=0x006a}
0x94cc…9504 Head {h00=0x0034, h01=0x0050, text=» IM DWTDEV+DWTSTR,A6 INC. CONTROLSEQUENCE ADRESS«, t00=0x005f, t01=0x007e}
0x9504…9520 Head {h00=0x0018, h01=0x0050, text=» RB SEND10 GET NEXT «, t00=0x005f, t01=0x00b6}
0x9520…9534 Head {h00=0x0010, h01=0x0050, text=»SEND30 EQU *«, t00=0x005f, t01=0x00d2}
0x9534…956a Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTDEV+DWTDISP,A6 GET DWT-DISPLACEMENT «, t00=0x005f, t01=0x00e6}
0x956a…958e Head {h00=0x0020, h01=0x0050, text=» ADR A3,A6 GET PROPER VALUE «, t00=0x005f, t01=0x011c}
0x958e…95ae Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x005f, t01=0x0140}
0x95ae…95d2 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x005f, t01=0x0160}
0x95d2…95f6 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ERGP15 JMP IF ERROR «, t00=0x005f, t01=0x0184}
0x95f6…962c Head {h00=0x0032, h01=0x0050, text=» IM DWTDEV+DWTDISP,A6 INC. DISPLACEMENT ADRESS«, t00=0x0060, t01=0x0018}
0x962c…9648 Head {h00=0x0018, h01=0x0050, text=» RB SEND20 GET NEXT «, t00=0x0060, t01=0x004e}
0x9648…965e Head {h00=0x0012, h01=0x0050, text=»SENDEND EQU * «, t00=0x0060, t01=0x006a}
0x965e…966e Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0060, t01=0x0080}
0x966e…967c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0060, t01=0x0090}
0x967c…96c0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0060, t01=0x009e}
0x96c0…96ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00e2}
0x96ca…96da Head {h00=0x000c, h01=0x0050, text=»* SENPAR«, t00=0x0060, t01=0x00ec}
0x96da…96e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00fc}
0x96e4…972a Head {h00=0x0042, h01=0x0050, text=»* THIS ROUTINE SENDS THE PRINTER PARAMETERS TO THE SUBDEVICE«, t00=0x0060, t01=0x0106}
0x972a…9734 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x014c}
0x9734…9748 Head {h00=0x0010, h01=0x0050, text=»SENPAR EQU *«, t00=0x0060, t01=0x0156}
0x9748…975c Head {h00=0x0010, h01=0x0050, text=» LDK A2,/1A «, t00=0x0060, t01=0x016a}
0x975c…9772 Head {h00=0x0012, h01=0x0050, text=» CF A5,STABLK «, t00=0x0060, t01=0x017e}
0x9772…979c (97, 0, 400) Head {h00=0x0026, h01=0x0050, text=»ERGP16 RB(NZ) ERGP15 JMP IF ERROR «, t00=0x0061, t01=0x0004}
0x979c…97b2 Head {h00=0x0012, h01=0x0050, text=» IFT SPEEDY=1 «, t00=0x0061, t01=0x002e}
0x97b2…97c8 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSSM «, t00=0x0061, t01=0x0044}
0x97c8…97e6 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTHSP«, t00=0x0061, t01=0x005a}
0x97e6…9810 Head {h00=0x0026, h01=0x0050, text=» CF A5,SEND SEND SELECT HIGH SPEED«, t00=0x0061, t01=0x0078}
0x9810…981c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x00a2}
0x981c…9838 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0061, t01=0x00ae}
0x9838…985e Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTDEV,A6 GET DWTINDEX «, t00=0x0061, t01=0x00ca}
0x985e…9870 Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x0061, t01=0x00f0}
0x9870…9886 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEN10 «, t00=0x0061, t01=0x0102}
0x9886…9892 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0118}
0x9892…98b8 Head {h00=0x0022, h01=0x0050, text=» LDKL A3,CSRM SET TRACTOR MODE«, t00=0x0061, t01=0x0124}
0x98b8…98cc Head {h00=0x0010, h01=0x0050, text=» CF A5,SEN40«, t00=0x0061, t01=0x014a}
0x98cc…98e4 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,CSSLPL «, t00=0x0061, t01=0x015e}
0x98e4…9902 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTPL «, t00=0x0061, t01=0x0176}
0x9902…9930 (98, 0, 400) Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND SELECTED PAGE LENGTH «, t00=0x0062, t01=0x0004}
0x9930…9946 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSSNV«, t00=0x0062, t01=0x0032}
0x9946…9964 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTPCS«, t00=0x0062, t01=0x0048}
0x9964…9994 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND NATIONAL CHAR VARIATION«, t00=0x0062, t01=0x0066}
0x9994…99aa Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSCPL«, t00=0x0062, t01=0x0096}
0x99aa…99c8 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTCMF«, t00=0x0062, t01=0x00ac}
0x99c8…99f6 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND CHAR. MATRIX & PITCH «, t00=0x0062, t01=0x00ca}
0x99f6…9a08 Head {h00=0x000e, h01=0x0050, text=» RF SEN20 «, t00=0x0062, t01=0x00f8}
0x9a08…9a12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x010a}
0x9a12…9a2e Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0062, t01=0x0114}
0x9a2e…9a42 Head {h00=0x0010, h01=0x0050, text=»SEN10 EQU * «, t00=0x0062, t01=0x0130}
0x9a42…9a58 Head {h00=0x0012, h01=0x0050, text=» IFT SINHAN=0 «, t00=0x0062, t01=0x0144}
0x9a58…9a82 Head {h00=0x0026, h01=0x0050, text=» LDKL A3,CSSM SET FRONT FEED MODE «, t00=0x0062, t01=0x015a}
0x9a82…9a96 Head {h00=0x0010, h01=0x0050, text=» CF A5,SEN40«, t00=0x0062, t01=0x0184}
0x9a96…9aa2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x0008}
0x9aa2…9abe Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0063, t01=0x0014}
0x9abe…9ad6 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,CSSLPL «, t00=0x0063, t01=0x0030}
0x9ad6…9af4 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTDL «, t00=0x0063, t01=0x0048}
0x9af4…9b22 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND SELECTED PAGE LENGTH «, t00=0x0063, t01=0x0066}
0x9b22…9b38 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSSNV«, t00=0x0063, t01=0x0094}
0x9b38…9b56 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTDCS«, t00=0x0063, t01=0x00aa}
0x9b56…9b86 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND NATIONAL CHAR VARIATION«, t00=0x0063, t01=0x00c8}
0x9b86…9b9c Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSCPL«, t00=0x0063, t01=0x00f8}
0x9b9c…9bba Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTCMT«, t00=0x0063, t01=0x010e}
0x9bba…9be8 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND CHAR. MATRIX & PITCH «, t00=0x0063, t01=0x012c}
0x9be8…9bf4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x015a}
0x9bf4…9c1c Head {h00=0x0024, h01=0x0050, text=»SEN20 CF A5,ENDBLK END OF BLOCK «, t00=0x0063, t01=0x0166}
0x9c1c…9c40 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ERGP16 JMP IF ERROR «, t00=0x0063, t01=0x018e}
0x9c40…9c56 Head {h00=0x0012, h01=0x0050, text=» ABR A4 RETURN«, t00=0x0064, t01=0x0022}
0x9c56…9c60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0038}
0x9c60…9c6e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0064, t01=0x0042}
0x9c6e…9ca4 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0064, t01=0x0050}
0x9ca4…9cae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0086}
0x9cae…9cf0 Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE SENDS A CONTR. SEQ. WITHOUT DWT REFERENCE«, t00=0x0064, t01=0x0090}
0x9cf0…9d20 Head {h00=0x002c, h01=0x0050, text=»* AT ENTRY : A3= CONTROL SEQ, ADDRESS «, t00=0x0064, t01=0x00d2}
0x9d20…9d2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0102}
0x9d2a…9d42 Head {h00=0x0014, h01=0x0050, text=»SEN40 LCR A2,A3 «, t00=0x0064, t01=0x010c}
0x9d42…9d5a Head {h00=0x0014, h01=0x0050, text=» ANK A2,/FF MASK«, t00=0x0064, t01=0x0124}
0x9d5a…9d76 Head {h00=0x0018, h01=0x0050, text=» SLL A2,8 SHIFT LEFT«, t00=0x0064, t01=0x013c}
0x9d76…9d9a Head {h00=0x0020, h01=0x0050, text=» RF(N) SEN50 END OF SEQUENSE«, t00=0x0064, t01=0x0158}
0x9d9a…9db8 Head {h00=0x001a, h01=0x0050, text=» SRL A2,8 SHIFT RIGHT «, t00=0x0064, t01=0x017c}
0x9db8…9dce Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0065, t01=0x000a}
0x9dce…9df2 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ERGP16 JMP IF ERROR «, t00=0x0065, t01=0x0020}
0x9df2…9e12 Head {h00=0x001c, h01=0x0050, text=» ADK A3,1 INCR. ADDRESS «, t00=0x0065, t01=0x0044}
0x9e12…9e32 Head {h00=0x001c, h01=0x0050, text=» RB SEN40 GET NEXT CHAR.«, t00=0x0065, t01=0x0064}
0x9e32…9e60 Head {h00=0x002a, h01=0x0050, text=»SEN50 RTN A5 RETURN & SEND PARAMETERS «, t00=0x0065, t01=0x0084}
0x9e60…9e6e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0065, t01=0x00b2}
0x9e6e…9eb2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0065, t01=0x00c0}
0x9eb2…9ebc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0104}
0x9ebc…9ecc Head {h00=0x000c, h01=0x0050, text=»* BINARY«, t00=0x0065, t01=0x010e}
0x9ecc…9ed6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x011e}
0x9ed6…9f12 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CONVERTS ASCII CODE TO A BINARY VALUE«, t00=0x0065, t01=0x0128}
0x9f12…9f1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0164}
0x9f1c…9f30 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS:«, t00=0x0065, t01=0x016e}
0x9f30…9f4a Head {h00=0x0016, h01=0x0050, text=»* A1= ASCII INPUT «, t00=0x0065, t01=0x0182}
0x9f4a…9f66 Head {h00=0x0018, h01=0x0050, text=»* A2= WORK REGISTER «, t00=0x0066, t01=0x000c}
0x9f66…9f82 Head {h00=0x0018, h01=0x0050, text=»* A3= BINARY OUTPUT «, t00=0x0066, t01=0x0028}
0x9f82…9f8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0044}
0x9f8c…9f96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x004e}
0x9f96…9fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0058}
0x9fa0…9fc2 Head {h00=0x001e, h01=0x0050, text=»BINARY SUR A3,A3 CLEAR A3 «, t00=0x0066, t01=0x0062}
0x9fc2…9fe4 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 MAX. LINE ASCII«, t00=0x0066, t01=0x0084}
0x9fe4…9ff6 Head {h00=0x000e, h01=0x0050, text=» SRL A2,8 «, t00=0x0066, t01=0x00a6}
0x9ff6…a00a Head {h00=0x0010, h01=0x0050, text=» SUK A2,/30 «, t00=0x0066, t01=0x00b8}
0xa00a…a01c Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0066, t01=0x00cc}
0xa01c…a02e Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0066, t01=0x00de}
0xa02e…a040 Head {h00=0x000e, h01=0x0050, text=» SLL A2,3 «, t00=0x0066, t01=0x00f0}
0xa040…a052 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0066, t01=0x0102}
0xa052…a064 Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0066, t01=0x0114}
0xa064…a088 Head {h00=0x0020, h01=0x0050, text=» ADR A3,A1 MAX. LINE BINARY «, t00=0x0066, t01=0x0126}
0xa088…a098 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0066, t01=0x014a}
0xa098…a0a6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0066, t01=0x015a}
0xa0a6…a0cc Head {h00=0x0022, h01=0x0050, text=»LINNUM EQU *-2 NUMBER OF LINES«, t00=0x0066, t01=0x0168}
0xa0cc…a0ec Head {h00=0x001c, h01=0x0050, text=» DATA /3135,/3138,/3234 «, t00=0x0066, t01=0x018e}
0xa0ec…a112 Head {h00=0x0022, h01=0x0050, text=» DATA /3235,/3330,/3333,/3335 «, t00=0x0067, t01=0x001e}
0xa112…a138 Head {h00=0x0022, h01=0x0050, text=» DATA /3336,/3438,/3530,/3531 «, t00=0x0067, t01=0x0044}
0xa138…a15e Head {h00=0x0022, h01=0x0050, text=» DATA /3630,/3636,/3730,/3732 «, t00=0x0067, t01=0x006a}
0xa15e…a168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0090}
0xa168…a172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x009a}
0xa172…a17c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00a4}
0xa17c…a186 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00ae}
0xa186…a1c0 Head {h00=0x0036, h01=0x0050, text=»NCVTAB EQU *-2 NATIONAL CHARACTER VARIATION YABLE «, t00=0x0067, t01=0x00b8}
0xa1c0…a1e6 Head {h00=0x0022, h01=0x0050, text=» DATA /3031,/3032,/3033,/3034 «, t00=0x0067, t01=0x00f2}
0xa1e6…a20c Head {h00=0x0022, h01=0x0050, text=» DATA /3035,/3036,/3037,/3038 «, t00=0x0067, t01=0x0118}
0xa20c…a232 Head {h00=0x0022, h01=0x0050, text=» DATA /3039,/3130,/3131,/3131 «, t00=0x0067, t01=0x013e}
0xa232…a252 Head {h00=0x001c, h01=0x0050, text=» DATA /3133,/3134,/3135 «, t00=0x0067, t01=0x0164}
0xa252…a28e Head {h00=0x0038, h01=0x0050, text=»TAB EQU * MASK TABLE FOR STATUS REPORT FROM PRINTER «, t00=0x0067, t01=0x0184}
0xa28e…a2b0 Head {h00=0x001e, h01=0x0050, text=» DATA /C0,/C0,/C0,/2CC * «, t00=0x0068, t01=0x0030}
0xa2b0…a2d2 Head {h00=0x001e, h01=0x0050, text=» DATA /2CF,/1C8,/C0,/C0 * «, t00=0x0068, t01=0x0052}
0xa2d2…a2f2 Head {h00=0x001c, h01=0x0050, text=» DATA /C0,/C0,/FC8,/FC0 «, t00=0x0068, t01=0x0074}
0xa2f2…a308 Head {h00=0x0012, h01=0x0050, text=» DATA /C0,/C0 «, t00=0x0068, t01=0x0094}
0xa308…a338 Head {h00=0x002c, h01=0x0050, text=»PRITAB EQU * BRANCH ADDRESSES ORDER /24 «, t00=0x0068, t01=0x00aa}
0xa338…a34c Head {h00=0x0010, h01=0x0050, text=» DATA PRI50 «, t00=0x0068, t01=0x00da}
0xa34c…a360 Head {h00=0x0010, h01=0x0050, text=» DATA PRI40 «, t00=0x0068, t01=0x00ee}
0xa360…a374 Head {h00=0x0010, h01=0x0050, text=» DATA PRI30 «, t00=0x0068, t01=0x0102}
0xa374…a388 Head {h00=0x0010, h01=0x0050, text=» DATA PRI20 «, t00=0x0068, t01=0x0116}
0xa388…a3b8 Head {h00=0x002c, h01=0x0050, text=»FROTAB EQU * BRANCH ADDRESSES ORDER /24 «, t00=0x0068, t01=0x012a}
0xa3b8…a3d4 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0068, t01=0x015a}
0xa3d4…a3e8 Head {h00=0x0010, h01=0x0050, text=» DATA FRO50 «, t00=0x0068, t01=0x0176}
0xa3e8…a3fc Head {h00=0x0010, h01=0x0050, text=» DATA FRO40 «, t00=0x0068, t01=0x018a}
0xa3fc…a410 Head {h00=0x0010, h01=0x0050, text=» DATA FRO30 «, t00=0x0069, t01=0x000e}
0xa410…a424 Head {h00=0x0010, h01=0x0050, text=» DATA FRO20 «, t00=0x0069, t01=0x0022}
0xa424…a430 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x0036}
0xa430…a458 Head {h00=0x0024, h01=0x0050, text=»LINTAB EQU *-2 LINE SPACE TABLE «, t00=0x0069, t01=0x0042}
0xa458…a484 Head {h00=0x0028, h01=0x0050, text=» DATA /3033,/3034,/3036,/3038,/3132 «, t00=0x0069, t01=0x006a}
0xa484…a4a4 Head {h00=0x001c, h01=0x0050, text=» DATA /3136,/3234,/3438 «, t00=0x0069, t01=0x0096}
0xa4a4…a4b0 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0069, t01=0x00b6}
0xa4b0…a4b4 Head {h00=0x4004, h01=0x0000}
0xa4b4…a4b8 00 69 00 c2 ┆ i ┆
0xa4b8…a4c0 (106, 2, 8) 40 04 00 00 00 6a 00 04 ┆@ j ┆
0xa4c0…a4c8 (107, 1, 8) 20 04 00 00 00 6b 00 04 ┆ k ┆
0xa4c8…a518 (108, 0, 400) 4f 4e 41 4c 20 56 45 52 53 49 4f 4e 00 0b 01 82 00 12 00 50 5c 42 59 54 45 5c 45 53 43 2c 43 53 49 20 00 0c 00 14 00 14 00 50 5c 42 59 54 45 5c 5a 45 52 4f 2c 5a 45 52 4f 20 00 0c 00 2a 00 12 00 50 5c 42 59 54 45 5c 53 4e 56 2c 4e 45 47 20 ┆ONAL VERSION P BYTE ESC,CSI P BYTE ZERO,ZERO * P BYTE SNV,NEG ┆
0xa518…a568 00 0c 00 42 00 22 00 50 43 53 53 4c 50 4c 5c 45 51 55 5c 2a 5c 53 45 4c 45 43 54 20 50 41 47 45 4c 45 4e 47 54 48 00 0c 00 58 00 12 00 50 5c 42 59 54 45 5c 45 53 43 2c 43 53 49 20 00 0c 00 7e 00 14 00 50 5c 42 59 54 45 5c 5a 45 52 4f 2c 5a ┆ B " PCSSLPL EQU * SELECT PAGELENGTH X P BYTE ESC,CSI ~ P BYTE ZERO,Z┆
0xa568…a5b8 45 52 4f 20 00 0c 00 94 00 16 00 50 5c 42 59 54 45 5c 53 4c 50 4c 2c 4e 45 47 5c 20 5c 20 00 0c 00 ac 00 12 00 50 5c 42 59 54 45 5c 4e 45 47 2c 4e 45 47 20 00 0c 00 c6 00 26 00 50 43 53 52 49 53 5c 45 51 55 5c 2a 5c 52 45 53 45 54 20 54 4f ┆ERO P BYTE SLPL,NEG P BYTE NEG,NEG & PCSRIS EQU * RESET TO┆
0xa5b8…a608 20 49 4e 49 54 49 41 4c 20 53 54 41 54 45 00 0c 00 dc 00 12 00 50 5c 42 59 54 45 5c 45 53 43 2c 52 49 53 20 00 0c 01 06 00 12 00 50 5c 42 59 54 45 5c 4e 45 47 2c 4e 45 47 20 00 0c 01 1c 00 24 00 50 43 53 44 53 52 5c 45 51 55 5c 2a 5c 44 45 ┆ INITIAL STATE P BYTE ESC,RIS P BYTE NEG,NEG $ PCSDSR EQU * DE┆
0xa608…a658 56 49 43 45 20 53 54 41 54 55 53 20 52 45 50 4f 52 54 00 0c 01 32 00 12 00 50 5c 42 59 54 45 5c 45 53 43 2c 43 53 49 20 00 0c 01 5a 00 10 00 50 5c 42 59 54 45 5c 44 53 2c 44 53 52 00 0c 01 70 00 12 00 50 5c 42 59 54 45 5c 4e 45 47 2c 4e 45 ┆VICE STATUS REPORT 2 P BYTE ESC,CSI Z P BYTE DS,DSR p P BYTE NEG,NE┆