|
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: 42570 (0xa64a)
Notes: pts_type(SC)
Names: »DRGP03.SC«
└─⟦f350e1b7a⟧ Bits:30009678 Philips computer tape "600219"
└─⟦this⟧ »MONGEN/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 01 EJECT * * * FRICTION FEED CAN BE SELECTED BY * SETTING X:B=1 X:B EQU 0 SINHAN EQU 1 * * * THE FRONT FEED DEVICE CAN BE EXCLUDED * BY SETTING X:C = 0 * * X:C EQU 1 FFDEV EQU 1 FRONT FEED DEVICE * * * * THE STANDARD PAGELENGTH IS DEFINED * BY SETTING X:D = NUMBER OF LINES * * X:D EQU 48 PAGLEN EQU 48 * * * THE STANDARD NUMBER OF LINES IS DEFINED * BY SETTING X:E = NUMBER OF LINES * * X:E EQU 64 DOCLEN EQU 60 * * * * MMU BUFFER SIZE * * X:F EQU 132 DVBLEN EQU 256 * EJECT * * * THE STANDARD MATRIX IS SELECTED BY SETTING * 2=MATRIX NUMBER (1-9). * * X:G EQU 1 MATRIX EQU 2 * * * 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 2 * * * HIGH SPEED PRINTING CAN BE PERFORMED BY SETTING X:I=1 * * X:I EQU 0 SPEEDY EQU 00 * * * 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 1 * * * ORDER /27, SET FORM PARAMETERS CAN BE EXCLUDED BY * SETTING X:K=0 * * X:K EQU 1 FORMPA EQU 1 * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1 * * MMUPAG EQU 1 * * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0 * * CPU852 EQU 0 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 01 «, 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…1d4a Head {h00=0x0010, h01=0x0050, text=»SINHAN EQU 1«, t00=0x0012, t01=0x011c}
0x1d4a…1d54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0130}
0x1d54…1d5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x013a}
0x1d5e…1d8e Head {h00=0x002c, h01=0x0050, text=»* THE FRONT FEED DEVICE CAN BE EXCLUDED «, t00=0x0012, t01=0x0144}
0x1d8e…1daa Head {h00=0x0018, h01=0x0050, text=»* BY SETTING X:C = 0«, t00=0x0012, t01=0x0174}
0x1daa…1db4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0190}
0x1db4…1dbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x000a}
0x1dbe…1dd0 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x0013, t01=0x0014}
0x1dd0…1df6 Head {h00=0x0022, h01=0x0050, text=»FFDEV EQU 1 FRONT FEED DEVICE «, t00=0x0013, t01=0x0026}
0x1df6…1e00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x004c}
0x1e00…1e0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0056}
0x1e0a…1e14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0060}
0x1e14…1e40 Head {h00=0x0028, h01=0x0050, text=»* THE STANDARD PAGELENGTH IS DEFINED«, t00=0x0013, t01=0x006a}
0x1e40…1e6a Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:D = NUMBER OF LINES«, t00=0x0013, t01=0x0096}
0x1e6a…1e74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00c0}
0x1e74…1e7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ca}
0x1e7e…1e90 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 48«, t00=0x0013, t01=0x00d4}
0x1e90…1ea6 Head {h00=0x0012, h01=0x0050, text=»PAGLEN EQU 48 «, t00=0x0013, t01=0x00e6}
0x1ea6…1eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00fc}
0x1eb0…1eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0106}
0x1eba…1eec Head {h00=0x002e, h01=0x0050, text=»* THE STANDARD NUMBER OF LINES IS DEFINED «, t00=0x0013, t01=0x0110}
0x1eec…1f16 Head {h00=0x0026, h01=0x0050, text=»* BY SETTING X:E = NUMBER OF LINES«, t00=0x0013, t01=0x0142}
0x1f16…1f20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x016c}
0x1f20…1f2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0176}
0x1f2a…1f40 Head {h00=0x0012, h01=0x0050, text=»X:E EQU 64 «, t00=0x0013, t01=0x0180}
0x1f40…1f56 Head {h00=0x0012, h01=0x0050, text=»DOCLEN EQU 60 «, t00=0x0014, t01=0x0008}
0x1f56…1f60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x001e}
0x1f60…1f6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0028}
0x1f6a…1f74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0032}
0x1f74…1f8e Head {h00=0x0016, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x0014, t01=0x003c}
0x1f8e…1f98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0056}
0x1f98…1fa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0060}
0x1fa2…1fb6 Head {h00=0x0010, h01=0x0050, text=»X:F EQU 132 «, t00=0x0014, t01=0x006a}
0x1fb6…1fcc Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU 256«, t00=0x0014, t01=0x007e}
0x1fcc…1fd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0094}
0x1fd6…1fe4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x009e}
0x1fe4…1fee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ac}
0x1fee…1ff8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00b6}
0x1ff8…202c Head {h00=0x0030, h01=0x0050, text=»* THE STANDARD MATRIX IS SELECTED BY SETTING«, t00=0x0014, t01=0x00c0}
0x202c…204c Head {h00=0x001c, h01=0x0050, text=»* 2=MATRIX NUMBER (1-9).«, t00=0x0014, t01=0x00f4}
0x204c…2056 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0114}
0x2056…2060 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x011e}
0x2060…2072 Head {h00=0x000e, h01=0x0050, text=»X:G EQU 1 «, t00=0x0014, t01=0x0128}
0x2072…2086 Head {h00=0x0010, h01=0x0050, text=»MATRIX EQU 2«, t00=0x0014, t01=0x013a}
0x2086…2090 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x014e}
0x2090…209a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0158}
0x209a…20da Head {h00=0x003c, h01=0x0050, text=»* THE STANDARD CHARACTER DENSITY (PITCH) IS SELECTED BY «, t00=0x0014, t01=0x0162}
0x20da…211e 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=0x0012}
0x211e…213e Head {h00=0x001c, h01=0x0050, text=»* 4= PROPORTIONAL PITCH «, t00=0x0015, t01=0x0056}
0x213e…2148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0076}
0x2148…2152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0080}
0x2152…2164 Head {h00=0x000e, h01=0x0050, text=»X:H EQU 1 «, t00=0x0015, t01=0x008a}
0x2164…2178 Head {h00=0x0010, h01=0x0050, text=»DENSIT EQU 2«, t00=0x0015, t01=0x009c}
0x2178…2182 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00b0}
0x2182…218c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ba}
0x218c…21cc Head {h00=0x003c, h01=0x0050, text=»* HIGH SPEED PRINTING CAN BE PERFORMED BY SETTING X:I=1 «, t00=0x0015, t01=0x00c4}
0x21cc…21d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0104}
0x21d6…21e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x010e}
0x21e0…21f2 Head {h00=0x000e, h01=0x0050, text=»X:I EQU 0 «, t00=0x0015, t01=0x0118}
0x21f2…2208 Head {h00=0x0012, h01=0x0050, text=»SPEEDY EQU 00 «, t00=0x0015, t01=0x012a}
0x2208…2212 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0140}
0x2212…221c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x014a}
0x221c…225a Head {h00=0x003a, h01=0x0050, text=»* END OF REQUEST AT POWER FAILURE,NOT OP., LRC-, LINK-«, t00=0x0015, t01=0x0154}
0x225a…2286 (22, 0, 400) Head {h00=0x0028, h01=0x0050, text=»* ERROR OR SOFTW. TIME OUT IF X:J=1 «, t00=0x0016, t01=0x0004}
0x2286…2290 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0030}
0x2290…229a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x003a}
0x229a…22ac Head {h00=0x000e, h01=0x0050, text=»X:J EQU 0 «, t00=0x0016, t01=0x0044}
0x22ac…22c0 Head {h00=0x0010, h01=0x0050, text=»REQEND EQU 1«, t00=0x0016, t01=0x0056}
0x22c0…22ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x006a}
0x22ca…22d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0074}
0x22d4…2310 Head {h00=0x0038, h01=0x0050, text=»* ORDER /27, SET FORM PARAMETERS CAN BE EXCLUDED BY «, t00=0x0016, t01=0x007e}
0x2310…2328 Head {h00=0x0014, h01=0x0050, text=»* SETTING X:K=0 «, t00=0x0016, t01=0x00ba}
0x2328…2332 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00d2}
0x2332…233c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00dc}
0x233c…234e Head {h00=0x000e, h01=0x0050, text=»X:K EQU 1 «, t00=0x0016, t01=0x00e6}
0x234e…2362 Head {h00=0x0010, h01=0x0050, text=»FORMPA EQU 1«, t00=0x0016, t01=0x00f8}
0x2362…236c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x010c}
0x236c…2376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0116}
0x2376…23a8 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0016, t01=0x0120}
0x23a8…23d6 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1 «, t00=0x0016, t01=0x0152}
0x23d6…23e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0180}
0x23e0…23ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x018a}
0x23ea…23fe (23, 0, 400) Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0017, t01=0x0004}
0x23fe…2408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0018}
0x2408…2412 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0022}
0x2412…241c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x002c}
0x241c…2456 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0017, t01=0x0036}
0x2456…2488 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0 «, t00=0x0017, t01=0x0070}
0x2488…2492 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00a2}
0x2492…249c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ac}
0x249c…24b0 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0017, t01=0x00b6}
0x24b0…24be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x00ca}
0x24be…24c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d8}
0x24c8…24d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00e2}
0x24d2…2506 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0017, t01=0x00ec}
0x2506…2510 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0120}
0x2510…252e Head {h00=0x001a, h01=0x0050, text=»* DWT - DISPLACEMENTS «, t00=0x0017, t01=0x012a}
0x252e…2538 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0148}
0x2538…256c Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0017, t01=0x0152}
0x256c…2576 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0186}
0x2576…2598 Head {h00=0x001e, h01=0x0050, text=»DWTTP EQU /2 TIMER POINTER«, t00=0x0017, t01=0x0190}
0x2598…25c4 Head {h00=0x0028, h01=0x0050, text=»DWTDCS EQU /4 DOCUMENT CHARACTER SET«, t00=0x0018, t01=0x0022}
0x25c4…25f0 Head {h00=0x0028, h01=0x0050, text=»DWTPCS EQU /6 PRINTER CHARACTER SET «, t00=0x0018, t01=0x004e}
0x25f0…261a Head {h00=0x0026, h01=0x0050, text=»DWTPL EQU /8 PRINTER PAPER LENGTH «, t00=0x0018, t01=0x007a}
0x261a…2644 Head {h00=0x0026, h01=0x0050, text=»DWTDL EQU /A DOCUMENT PAPER LENGTH«, t00=0x0018, t01=0x00a4}
0x2644…2672 Head {h00=0x002a, h01=0x0050, text=»DWTALN EQU /C ACTUAL LINE ON DOCUMENT «, t00=0x0018, t01=0x00ce}
0x2672…26a2 Head {h00=0x002c, h01=0x0050, text=»DWTRLN EQU /E REQUESTED LINE ON DOCUMENT«, t00=0x0018, t01=0x00fc}
0x26a2…26d2 Head {h00=0x002c, h01=0x0050, text=»DWTRC EQU /11 RETURN CODE (ACKUMULATED) «, t00=0x0018, t01=0x012c}
0x26d2…2700 Head {h00=0x002a, h01=0x0050, text=»DWTSTR EQU /12 CONTROL SEQUENCE ADRESS«, t00=0x0018, t01=0x015c}
0x2700…2742 Head {h00=0x003e, h01=0x0050, text=»DWTDISP EQU /14 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. «, t00=0x0018, t01=0x018a}
0x2742…276c Head {h00=0x0026, h01=0x0050, text=»DWTACP EQU /16 ACTUAL COLUMN PAPER«, t00=0x0019, t01=0x003c}
0x276c…2794 Head {h00=0x0024, h01=0x0050, text=»DWTCO1 EQU /1A COLUMN COUNTER 1 «, t00=0x0019, t01=0x0066}
0x2794…27be Head {h00=0x0026, h01=0x0050, text=»DWTSYST EQU /1C SYSTEM START IND. «, t00=0x0019, t01=0x008e}
0x27be…27ee Head {h00=0x002c, h01=0x0050, text=»DWTLFD EQU /1E LINE/FORM FEED INDICATOR «, t00=0x0019, t01=0x00b8}
0x27ee…2826 Head {h00=0x0034, h01=0x0050, text=»DWTCMF EQU /20 CHAR MATRIX & PITCH, TRACTOR FEED«, t00=0x0019, t01=0x00e8}
0x2826…2860 Head {h00=0x0036, h01=0x0050, text=»DWTCMT EQU /22 CHAR MATRIX & PITCH, FRONT/FRI FEED«, t00=0x0019, t01=0x0120}
0x2860…2880 Head {h00=0x001c, h01=0x0050, text=»DWTLS EQU /24 LINE SPACE«, t00=0x0019, t01=0x015a}
0x2880…28a2 Head {h00=0x001e, h01=0x0050, text=»DWTHSP EQU /26 HIGH SPEED «, t00=0x0019, t01=0x017a}
0x28a2…28c6 Head {h00=0x0020, h01=0x0050, text=»DWTHOP EQU /28 HOPPER 1 OR 2«, t00=0x001a, t01=0x000c}
0x28c6…28ee Head {h00=0x0024, h01=0x0050, text=»DWTTAB EQU /2A LAST TAB POS SET «, t00=0x001a, t01=0x0030}
0x28ee…2920 Head {h00=0x002e, h01=0x0050, text=»DWTSER EQU /2E CONTR. SEQ. SEPARATOR IND. «, t00=0x001a, t01=0x0058}
0x2920…292e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x008a}
0x292e…2938 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0098}
0x2938…2942 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00a2}
0x2942…2976 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x001a, t01=0x00ac}
0x2976…2980 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00e0}
0x2980…299e Head {h00=0x001a, h01=0x0050, text=»* ECB - DISPLACEMENTS «, t00=0x001a, t01=0x00ea}
0x299e…29a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0108}
0x29a8…29dc Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x001a, t01=0x0112}
0x29dc…29e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0146}
0x29e6…2a10 Head {h00=0x0026, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS IN ECB «, t00=0x001a, t01=0x0150}
0x2a10…2a3c Head {h00=0x0028, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH IN ECB «, t00=0x001a, t01=0x017a}
0x2a3c…2a68 Head {h00=0x0028, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH IN ECB «, t00=0x001b, t01=0x0016}
0x2a68…2a8e Head {h00=0x0022, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE IN ECB«, t00=0x001b, t01=0x0042}
0x2a8e…2ab6 Head {h00=0x0024, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD IN ECB«, t00=0x001b, t01=0x0068}
0x2ab6…2ac4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0090}
0x2ac4…2ace Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x009e}
0x2ace…2b02 Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x001b, t01=0x00a8}
0x2b02…2b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00dc}
0x2b0c…2b1c Head {h00=0x000c, h01=0x0050, text=»* TABLES«, t00=0x001b, t01=0x00e6}
0x2b1c…2b26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00f6}
0x2b26…2b5a Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x001b, t01=0x0100}
0x2b5a…2b64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0134}
0x2b64…2b6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x013e}
0x2b6e…2b92 Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x001b, t01=0x0148}
0x2b92…2bae Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x001b, t01=0x016c}
0x2bae…2bd0 Head {h00=0x001e, h01=0x0050, text=»GPAD3 EQU * ADDRESS BLOCK «, t00=0x001b, t01=0x0188}
0x2bd0…2bf4 Head {h00=0x0020, h01=0x0050, text=» DATA ACTP ACTIVATION DRIVER«, t00=0x001c, t01=0x001a}
0x2bf4…2c1a Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x001c, t01=0x003e}
0x2c1a…2c3c Head {h00=0x001e, h01=0x0050, text=» DATA 0 INTERRUPT HANDLER «, t00=0x001c, t01=0x0064}
0x2c3c…2c60 Head {h00=0x0020, h01=0x0050, text=» DATA RCTP RECOVERY ROUTINE «, t00=0x001c, t01=0x0086}
0x2c60…2c74 Head {h00=0x0010, h01=0x0050, text=»TPTAB EQU * «, t00=0x001c, t01=0x00aa}
0x2c74…2c90 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x001c, t01=0x00be}
0x2c90…2cb0 Head {h00=0x001c, h01=0x0050, text=» DATA /0107,/0C25,/2839 «, t00=0x001c, t01=0x00da}
0x2cb0…2cbc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00fa}
0x2cbc…2cdc Head {h00=0x001c, h01=0x0050, text=» DATA /0006,/2427,/0505 «, t00=0x001c, t01=0x0106}
0x2cdc…2cf6 Head {h00=0x0016, h01=0x0050, text=»TPLEN EQU *-TPTAB «, t00=0x001c, t01=0x0126}
0x2cf6…2cfe Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0140}
0x2cfe…2d06 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0148}
0x2d06…2d14 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x0150}
0x2d14…2d58 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x001c, t01=0x015e}
0x2d58…2d62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0012}
0x2d62…2d76 Head {h00=0x0010, h01=0x0050, text=»* A C T P «, t00=0x001d, t01=0x001c}
0x2d76…2d80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0030}
0x2d80…2db6 Head {h00=0x0032, h01=0x0050, text=»* THIS IS THE ACTIVATION PART OF THE DRIVER «, t00=0x001d, t01=0x003a}
0x2db6…2df8 Head {h00=0x003e, h01=0x0050, text=»* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR«, t00=0x001d, t01=0x0070}
0x2df8…2e02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b2}
0x2e02…2e46 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x001d, t01=0x00bc}
0x2e46…2e50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0100}
0x2e50…2e74 Head {h00=0x0020, h01=0x0050, text=»ACTP EQU * ACTIVATION ENTRY «, t00=0x001d, t01=0x010a}
0x2e74…2e7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x012e}
0x2e7e…2e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0138}
0x2e88…2ece Head {h00=0x0042, h01=0x0050, text=»* GET DWT INDEX: 0=TRACTOR FEED, 1=FRONT FEED/FRICTION FEED «, t00=0x001d, t01=0x0142}
0x2ece…2ed8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0188}
0x2ed8…2efe (30, 0, 400) Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOR,A6 GET DWT INDEX «, t00=0x001e, t01=0x0004}
0x2efe…2f14 Head {h00=0x0012, h01=0x0050, text=» ANK A2,1 MASK«, t00=0x001e, t01=0x002a}
0x2f14…2f44 Head {h00=0x002c, h01=0x0050, text=» SC A2,DWTDEV,A6 STORE NEW DEVICE INDEX «, t00=0x001e, t01=0x0040}
0x2f44…2f58 Head {h00=0x0010, h01=0x0050, text=» CWK A7,/24 «, t00=0x001e, t01=0x0070}
0x2f58…2f6e Head {h00=0x0012, h01=0x0050, text=» RF(E) ACT010 «, t00=0x001e, t01=0x0084}
0x2f6e…2f9e Head {h00=0x002c, h01=0x0050, text=» LC A3,DWTDEV+1,A6 GET OLD DEVICE INDEX «, t00=0x001e, t01=0x009a}
0x2f9e…2fb0 Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x001e, t01=0x00ca}
0x2fb0…2fc2 Head {h00=0x000e, h01=0x0050, text=» CWR A2,A3«, t00=0x001e, t01=0x00dc}
0x2fc2…2fd8 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACT010 «, t00=0x001e, t01=0x00ee}
0x2fd8…3004 Head {h00=0x0028, h01=0x0050, text=»ACT005 LDR A4,P GET PROGRAM COUNTER «, t00=0x001e, t01=0x0104}
0x3004…3034 Head {h00=0x002c, h01=0x0050, text=» ADK A4,6 MAKE RETURN ADDRESS BEFORE ABL«, t00=0x001e, t01=0x0130}
0x3034…305e Head {h00=0x0026, h01=0x0050, text=» ABL SENPAR SEND PARAM. TO PRINTER«, t00=0x001e, t01=0x0160}
0x305e…3076 Head {h00=0x0014, h01=0x0050, text=» LC A2,DWTDEV,A6«, t00=0x001e, t01=0x018a}
0x3076…3088 Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x001f, t01=0x0012}
0x3088…30a8 Head {h00=0x001c, h01=0x0050, text=»ACT010 LC A3,DWTDEV+1,A6«, t00=0x001f, t01=0x0024}
0x30a8…30bc Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FE «, t00=0x001f, t01=0x0044}
0x30bc…30ce Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x001f, t01=0x0058}
0x30ce…30f4 Head {h00=0x0022, h01=0x0050, text=» SC A3,DWTDEV+1,A6 STORE INDEX«, t00=0x001f, t01=0x006a}
0x30f4…3114 Head {h00=0x001c, h01=0x0050, text=» CWK A7,/05 ORDER /05 ? «, t00=0x001f, t01=0x0090}
0x3114…312e Head {h00=0x0016, h01=0x0050, text=» RF(E) ACT015 YES «, t00=0x001f, t01=0x00b0}
0x312e…3158 Head {h00=0x0026, h01=0x0050, text=» ADR A7,A2 ADD DWT INDEX TO ORDER «, t00=0x001f, t01=0x00ca}
0x3158…318c Head {h00=0x0030, h01=0x0050, text=»ACT015 SC A7,DWTOR+1,A6 STORE MODIFIED ORDER«, t00=0x001f, t01=0x00f4}
0x318c…31aa Head {h00=0x001a, h01=0x0050, text=»ACT020 LDK A3,TPLEN-1 «, t00=0x001f, t01=0x0128}
0x31aa…31dc Head {h00=0x002e, h01=0x0050, text=»ACT030 CC A7,TPTAB,A3 CHECK IF LEGAL ORDER«, t00=0x001f, t01=0x0146}
0x31dc…31fe Head {h00=0x001e, h01=0x0050, text=» RF(E) ACT040 VALID ORDER «, t00=0x001f, t01=0x0178}
0x31fe…3210 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0020, t01=0x000a}
0x3210…3230 Head {h00=0x001c, h01=0x0050, text=» RB(NN) ACT030 TRY NEXT «, t00=0x0020, t01=0x001c}
0x3230…323a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x003c}
0x323a…325c Head {h00=0x001e, h01=0x0050, text=» ABL LENDER ILLEGAL ORDER «, t00=0x0020, t01=0x0046}
0x325c…3266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0068}
0x3266…3270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0072}
0x3270…3284 Head {h00=0x0010, h01=0x0050, text=»ACT040 EQU *«, t00=0x0020, t01=0x007c}
0x3284…32a0 Head {h00=0x0018, h01=0x0050, text=» ADR A3,A3 GET INDEX«, t00=0x0020, t01=0x0090}
0x32a0…32c4 Head {h00=0x0020, h01=0x0050, text=» ABI TPFUC,A3 EXECUTE ORDER «, t00=0x0020, t01=0x00ac}
0x32c4…32d8 Head {h00=0x0010, h01=0x0050, text=»TPFUC EQU * «, t00=0x0020, t01=0x00d0}
0x32d8…32f4 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0020, t01=0x00e4}
0x32f4…332c Head {h00=0x0034, h01=0x0050, text=» DATA TSTSTA,WRTCON,POSDOC,PRIPAR,FORPAR,RELDOC «, t00=0x0020, t01=0x0100}
0x332c…3338 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0138}
0x3338…3370 Head {h00=0x0034, h01=0x0050, text=» DATA TSTSTA,WRTCON,PRIPAR,FORPAR,BASWRT,BASWRT «, t00=0x0020, t01=0x0144}
0x3370…337e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x017c}
0x337e…33a4 Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0020, t01=0x018a}
0x33a4…33ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0020}
0x33ae…33d0 Head {h00=0x001e, h01=0x0050, text=»* ORDER 00 : TEST STATUS«, t00=0x0021, t01=0x002a}
0x33d0…33da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x004c}
0x33da…3400 Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0021, t01=0x0056}
0x3400…3420 Head {h00=0x001c, h01=0x0050, text=»TSTSTA EQU * TEST STATUS«, t00=0x0021, t01=0x007c}
0x3420…344e Head {h00=0x002a, h01=0x0050, text=» CF A5,GTSTAT GET STATUS FROM PRINTER «, t00=0x0021, t01=0x009c}
0x344e…3476 Head {h00=0x0024, h01=0x0050, text=»TSTEND LDR A2,A1 GET RETURN CODE«, t00=0x0021, t01=0x00ca}
0x3476…349c Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/100 PRINTER RESET ? «, t00=0x0021, t01=0x00f2}
0x349c…34b6 Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) RCTP YES «, t00=0x0021, t01=0x0118}
0x34b6…34de Head {h00=0x0024, h01=0x0050, text=» CF A5,RESREC RESET RECOVERY BIT«, t00=0x0021, t01=0x0132}
0x34de…34fe Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END REQUEST «, t00=0x0021, t01=0x015a}
0x34fe…350c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x017a}
0x350c…352e Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0021, t01=0x0188}
0x352e…3538 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x001a}
0x3538…3554 Head {h00=0x0018, h01=0x0050, text=»* ORDER 06: WRITE «, t00=0x0022, t01=0x0024}
0x3554…355e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0040}
0x355e…3580 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0022, t01=0x004a}
0x3580…3594 Head {h00=0x0010, h01=0x0050, text=»WRTCON EQU *«, t00=0x0022, t01=0x006c}
0x3594…35a4 Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0022, t01=0x0080}
0x35a4…35b4 Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0022, t01=0x0090}
0x35b4…35c4 Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0022, t01=0x00a0}
0x35c4…35ec Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBRL,A8 GET REQ. LENGTH «, t00=0x0022, t01=0x00b0}
0x35ec…360c Head {h00=0x001c, h01=0x0050, text=» ADK A2,/8 BLOCK LENGTH «, t00=0x0022, t01=0x00d8}
0x360c…3630 Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0022, t01=0x00f8}
0x3630…3654 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0022, t01=0x011c}
0x3654…365e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0140}
0x365e…3684 Head {h00=0x0022, h01=0x0050, text=»* EXAMINE CONTROL CHARACTER «, t00=0x0022, t01=0x014a}
0x3684…368e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0170}
0x368e…36ba Head {h00=0x0028, h01=0x0050, text=» LDK A3,1 SET UP ECB BUFFER POINTER «, t00=0x0022, t01=0x017a}
0x36ba…36e6 Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CONTROL CHARACTER«, t00=0x0023, t01=0x0016}
0x36e6…3710 Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTDEV,A6 GET DEVICE STATUS«, t00=0x0023, t01=0x0042}
0x3710…373c Head {h00=0x0028, h01=0x0050, text=» ANK A1,/20 HAS POWER OFF OCCURED ? «, t00=0x0023, t01=0x006c}
0x373c…3754 Head {h00=0x0014, h01=0x0050, text=» RF(NZ) REP2 YES«, t00=0x0023, t01=0x0098}
0x3754…3780 Head {h00=0x0028, h01=0x0050, text=» SUK A2,/2B PRINT ON SAME LINE =/2B?«, t00=0x0023, t01=0x00b0}
0x3780…3798 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRC20 YES«, t00=0x0023, t01=0x00dc}
0x3798…37ce Head {h00=0x0032, h01=0x0050, text=»WRC04 CM DWTDEV+DWTCO1,A6 CLEAR COLUMN COUNTER«, t00=0x0023, t01=0x00f4}
0x37ce…37f8 Head {h00=0x0026, h01=0x0050, text=» SUK A2,5 PRINT AFTER TWO LF =/30 «, t00=0x0023, t01=0x012a}
0x37f8…3810 Head {h00=0x0014, h01=0x0050, text=» RF(Z) TWOLF YES«, t00=0x0023, t01=0x0154}
0x3810…381a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x016c}
0x381a…3848 Head {h00=0x002a, h01=0x0050, text=» SUK A2,1 PRINT AFTER FORM FEED =/31 ?«, t00=0x0023, t01=0x0176}
0x3848…3868 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) ONELF NO,ONE LF «, t00=0x0024, t01=0x0014}
0x3868…3872 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0034}
0x3872…3884 Head {h00=0x000e, h01=0x0050, text=» LDK A2,FF«, t00=0x0024, t01=0x003e}
0x3884…38a0 Head {h00=0x0018, h01=0x0050, text=» RF FORMF FORM FEED «, t00=0x0024, t01=0x0050}
0x38a0…38aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x006c}
0x38aa…38d0 Head {h00=0x0022, h01=0x0050, text=»* EXECUTE CONTROL CHARACTER«, t00=0x0024, t01=0x0076}
0x38d0…38da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x009c}
0x38da…38ee Head {h00=0x0010, h01=0x0050, text=»WRC20 EQU * «, t00=0x0024, t01=0x00a6}
0x38ee…3910 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIDGE RETURN«, t00=0x0024, t01=0x00ba}
0x3910…3926 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0024, t01=0x00dc}
0x3926…393c Head {h00=0x0012, h01=0x0050, text=» RF(NZ) ERGP01«, t00=0x0024, t01=0x00f2}
0x393c…3972 Head {h00=0x0032, h01=0x0050, text=»WRC03 LD A4,DWTDEV+DWTCO1,A6 GET ACTUAL COLUMN«, t00=0x0024, t01=0x0108}
0x3972…39a0 Head {h00=0x002a, h01=0x0050, text=» RF(Z) WRC05 FOR CORRECT NO OF SPACES «, t00=0x0024, t01=0x013e}
0x39a0…39b2 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0024, t01=0x016c}
0x39b2…39e4 Head {h00=0x002e, h01=0x0050, text=»WRC05 CF A5,KONVER CONVERT BINARY TO ASCII«, t00=0x0024, t01=0x017e}
0x39e4…3a22 Head {h00=0x003a, h01=0x0050, text=» ST A2,DWTDEV+DWTACP,A6 STORE THE VALUE IN ACTUAL COL.«, t00=0x0025, t01=0x0020}
0x3a22…3a60 Head {h00=0x003a, h01=0x0050, text=» ST A4,DWTDEV+DWTACP+2,A6 STORE THE VALUE IN ACT. COL.«, t00=0x0025, t01=0x005e}
0x3a60…3a6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x009c}
0x3a6a…3aa0 Head {h00=0x0032, h01=0x0050, text=»WRC07 LD A4,DWTDEV+DWTCO1,A6 GET ACTUAL COLUMN«, t00=0x0025, t01=0x00a6}
0x3aa0…3ad0 Head {h00=0x002c, h01=0x0050, text=» RF(Z) WRT15 JMP IF NO PRECEIDING SPACES«, t00=0x0025, t01=0x00dc}
0x3ad0…3aee Head {h00=0x001a, h01=0x0050, text=» LDK A2,/20 SEND SPACE«, t00=0x0025, t01=0x010c}
0x3aee…3b04 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0025, t01=0x012a}
0x3b04…3b28 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0025, t01=0x0140}
0x3b28…3b46 Head {h00=0x001a, h01=0x0050, text=» LDKL A2,CSREP REPEAT «, t00=0x0025, t01=0x0164}
0x3b46…3b88 Head {h00=0x003e, h01=0x0050, text=» LDKL A3,DWTDEV+DWTACP+1 ACTUAL COLUMN PAPER DISPLACEMENT «, t00=0x0025, t01=0x0182}
0x3b88…3ba8 Head {h00=0x001c, h01=0x0050, text=» CF A5,SEND SEND REPEAT «, t00=0x0026, t01=0x0034}
0x3ba8…3bba Head {h00=0x000e, h01=0x0050, text=» RF WRT15 «, t00=0x0026, t01=0x0054}
0x3bba…3bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0066}
0x3bc4…3be6 Head {h00=0x001e, h01=0x0050, text=»TWOLF LDK A2,LF LINE FEED «, t00=0x0026, t01=0x0070}
0x3be6…3bfc Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0026, t01=0x0092}
0x3bfc…3c20 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0026, t01=0x00a8}
0x3c20…3c42 Head {h00=0x001e, h01=0x0050, text=»ONELF LDK A2,LF LINE FEED «, t00=0x0026, t01=0x00cc}
0x3c42…3c5c Head {h00=0x0016, h01=0x0050, text=»FORMF CF A5,OUTPUT«, t00=0x0026, t01=0x00ee}
0x3c5c…3c80 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0026, t01=0x0108}
0x3c80…3ca2 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIDGE RETURN«, t00=0x0026, t01=0x012c}
0x3ca2…3cb8 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0026, t01=0x014e}
0x3cb8…3cdc Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0026, t01=0x0164}
0x3cdc…3d0c Head {h00=0x002c, h01=0x0050, text=» IM DWTDEV+DWTLFD,A6 SET LF/FF INDICATOR«, t00=0x0026, t01=0x0188}
0x3d0c…3d1e Head {h00=0x000e, h01=0x0050, text=» RF WRT15 «, t00=0x0027, t01=0x0028}
0x3d1e…3d28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x003a}
0x3d28…3d4a Head {h00=0x001e, h01=0x0050, text=»* REPEAT WRITE REQUEST «, t00=0x0027, t01=0x0044}
0x3d4a…3d54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0066}
0x3d54…3d66 Head {h00=0x000e, h01=0x0050, text=»REP2 EQU *«, t00=0x0027, t01=0x0070}
0x3d66…3d8c Head {h00=0x0022, h01=0x0050, text=» LDR A3,A2 SAVE CONTROL CHAR. «, t00=0x0027, t01=0x0082}
0x3d8c…3db4 Head {h00=0x0024, h01=0x0050, text=» LDK A2,CR SEND CARRIDGE RETURN «, t00=0x0027, t01=0x00a8}
0x3db4…3dca Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0027, t01=0x00d0}
0x3dca…3dee Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP01 JMP IF ERROR «, t00=0x0027, t01=0x00e6}
0x3dee…3e00 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0027, t01=0x010a}
0x3e00…3e2e Head {h00=0x002a, h01=0x0050, text=» SUK A2,/2B PRINT WITHOUT LINE FEED ? «, t00=0x0027, t01=0x011c}
0x3e2e…3e46 Head {h00=0x0014, h01=0x0050, text=» RF(NZ) REP3 NO «, t00=0x0027, t01=0x014a}
0x3e46…3e58 Head {h00=0x000e, h01=0x0050, text=» RB WRC07 «, t00=0x0027, t01=0x0162}
0x3e58…3e8a Head {h00=0x002e, h01=0x0050, text=»REP3 LD A1,DWTDEV+DWTLFD,A6 GET INDICATOR «, t00=0x0027, t01=0x0174}
0x3e8a…3eb2 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) WRT15 JMP IF LF/FF DONE «, t00=0x0028, t01=0x0016}
0x3eb2…3ec4 Head {h00=0x000e, h01=0x0050, text=» RB WRC04 «, t00=0x0028, t01=0x003e}
0x3ec4…3ed2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0050}
0x3ed2…3edc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x005e}
0x3edc…3f12 Head {h00=0x0032, h01=0x0050, text=»* ORDER 06 : THIS PART SENDS THE CHARACTERS«, t00=0x0028, t01=0x0068}
0x3f12…3f44 Head {h00=0x002e, h01=0x0050, text=»* TO DOCUMENT OR CONTINUOUS STATIONARY.«, t00=0x0028, t01=0x009e}
0x3f44…3f4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00d0}
0x3f4e…3f58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00da}
0x3f58…3f86 Head {h00=0x002a, h01=0x0050, text=»WRT15 LDK A3,2 SET ECB BUFFER POINTER «, t00=0x0028, t01=0x00e4}
0x3f86…3fa0 Head {h00=0x0016, h01=0x0050, text=»WRT020 CWK A3,/90 «, t00=0x0028, t01=0x0112}
0x3fa0…3fcc Head {h00=0x0028, h01=0x0050, text=» RF(NZ) WRT030 NEW BLOCK NECESSARY ?«, t00=0x0028, t01=0x012c}
0x3fcc…3fe6 Head {h00=0x0016, h01=0x0050, text=» CF A5,ENDBLK YES «, t00=0x0028, t01=0x0158}
0x3fe6…4010 Head {h00=0x0026, h01=0x0050, text=»ERGP01 RF(NZ) ERGP04 JMP IF ERROR «, t00=0x0028, t01=0x0172}
0x4010…4034 Head {h00=0x0020, h01=0x0050, text=» LDK A2,/90 NEW BLOCK LENGTH«, t00=0x0029, t01=0x000c}
0x4034…4058 Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0029, t01=0x0030}
0x4058…407c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x0029, t01=0x0054}
0x407c…40a6 Head {h00=0x0026, h01=0x0050, text=»WRT030 CF A15,GETCHR GET CHARACTER«, t00=0x0029, t01=0x0078}
0x40a6…40ca Head {h00=0x0020, h01=0x0050, text=» LDR A4,A1 BUFFER FINISHED ?«, t00=0x0029, t01=0x00a2}
0x40ca…40e2 Head {h00=0x0014, h01=0x0050, text=» RF(P) WRT050 NO«, t00=0x0029, t01=0x00c6}
0x40e2…410c Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTDEV,A6 GET DEVICE STATUS«, t00=0x0029, t01=0x00de}
0x410c…4136 Head {h00=0x0026, h01=0x0050, text=» ANK A4,/80 SHIFT OUT PERFORMED ? «, t00=0x0029, t01=0x0108}
0x4136…414e Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRT040 NO«, t00=0x0029, t01=0x0132}
0x414e…416e Head {h00=0x001c, h01=0x0050, text=» LDK A2,SI SEND SHIFT IN«, t00=0x0029, t01=0x014a}
0x416e…4184 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0029, t01=0x016a}
0x4184…41a8 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x0029, t01=0x0180}
0x41a8…41d4 Head {h00=0x0028, h01=0x0050, text=» XRS A4,DWTDEV,A6 RESET SHIFT INDIC.«, t00=0x002a, t01=0x0014}
0x41d4…41fc Head {h00=0x0024, h01=0x0050, text=»WRT040 CF A5,ENDBLK END OF BLOCK«, t00=0x002a, t01=0x0040}
0x41fc…4220 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x002a, t01=0x0068}
0x4220…4240 Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x002a, t01=0x008c}
0x4240…425e Head {h00=0x001a, h01=0x0050, text=» RF ENDIO END REQUEST «, t00=0x002a, t01=0x00ac}
0x425e…4268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00ca}
0x4268…427c Head {h00=0x0010, h01=0x0050, text=»WRT050 EQU *«, t00=0x002a, t01=0x00d4}
0x427c…428e Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x002a, t01=0x00e8}
0x428e…4298 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00fa}
0x4298…42dc Head {h00=0x0040, h01=0x0050, text=»* EXAMINE CHARACTER AND SEND DEPENDING ON TYPE OF CHARACTER «, t00=0x002a, t01=0x0104}
0x42dc…42e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0148}
0x42e6…42ee Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0152}
0x42ee…430e Head {h00=0x001c, h01=0x0050, text=» CWK A4,/20 CHAR =<20 ? «, t00=0x002a, t01=0x015a}
0x430e…4328 Head {h00=0x0016, h01=0x0050, text=» RF(NL) WRT100 NO «, t00=0x002a, t01=0x017a}
0x4328…434e (43, 0, 400) Head {h00=0x0022, h01=0x0050, text=»* CHECK IF SPECIAL CHARACTER«, t00=0x002b, t01=0x0004}
0x434e…436e Head {h00=0x001c, h01=0x0050, text=» SUK A4,/9 TABULATION ? «, t00=0x002b, t01=0x002a}
0x436e…4388 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRT170 YES «, t00=0x002b, t01=0x004a}
0x4388…43ac Head {h00=0x0020, h01=0x0050, text=» SUK A4,/9 START UNDERLINE ?«, t00=0x002b, t01=0x0064}
0x43ac…43c6 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT060 NO «, t00=0x002b, t01=0x0088}
0x43c6…43f0 Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 SAVE ECB BUFFER POINTER«, t00=0x002b, t01=0x00a2}
0x43f0…441c Head {h00=0x0028, h01=0x0050, text=» LDKL A3,CSSUL SEND START UNDERLINE «, t00=0x002b, t01=0x00cc}
0x441c…442e Head {h00=0x000e, h01=0x0050, text=» RF WRT070«, t00=0x002b, t01=0x00f8}
0x442e…4456 Head {h00=0x0024, h01=0x0050, text=»WRT060 SUK A4,1 STOP UNDERLINE ?«, t00=0x002b, t01=0x010a}
0x4456…4470 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRT080 NO «, t00=0x002b, t01=0x0132}
0x4470…449a Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 SAVE ECB BUFFER POINTER«, t00=0x002b, t01=0x014c}
0x449a…44c4 Head {h00=0x0026, h01=0x0050, text=» LDKL A3,CSEUL SEND STOP UNDERLINE«, t00=0x002b, t01=0x0176}
0x44c4…44e8 Head {h00=0x0020, h01=0x0050, text=»WRT070 CF A5,SEN40 GO & SEND«, t00=0x002c, t01=0x0010}
0x44e8…4516 Head {h00=0x002a, h01=0x0050, text=» LDR A3,A4 RESTORE ECB BUFFER POINTER «, t00=0x002c, t01=0x0034}
0x4516…453c Head {h00=0x0022, h01=0x0050, text=» RB WRT020 GET NEXT CHARACTER «, t00=0x002c, t01=0x0062}
0x453c…4570 Head {h00=0x0030, h01=0x0050, text=»WRT080 SUK A4,/8 /1B, PARTIAL LINE UP DOWN ?«, t00=0x002c, t01=0x0088}
0x4570…459e Head {h00=0x002a, h01=0x0050, text=» RB(NZ) WRT020 NO, GET NEXT CHARACTER «, t00=0x002c, t01=0x00bc}
0x459e…45ce Head {h00=0x002c, h01=0x0050, text=» CF A15,GETCHR YES, CHECK NEXT CHARACTER«, t00=0x002c, t01=0x00ea}
0x45ce…45f4 Head {h00=0x0022, h01=0x0050, text=» RB(NP) WRT040 END OF BUFFER ?«, t00=0x002c, t01=0x011a}
0x45f4…4616 Head {h00=0x001e, h01=0x0050, text=» LDR A4,A2 SAVE CHAR IN A4«, t00=0x002c, t01=0x0140}
0x4616…463e Head {h00=0x0024, h01=0x0050, text=» SUK A2,/4B PARTIAL LINE DOWN ? «, t00=0x002c, t01=0x0162}
0x463e…4658 Head {h00=0x0016, h01=0x0050, text=» RF(Z) WRT090 YES «, t00=0x002c, t01=0x018a}
0x4658…467c Head {h00=0x0020, h01=0x0050, text=» SUK A2,1 PARTIAL LINE UP ? «, t00=0x002d, t01=0x0014}
0x467c…46b0 Head {h00=0x0030, h01=0x0050, text=» RF(NZ) WRT140 NO, INDICATE CODE CHECK ERROR«, t00=0x002d, t01=0x0038}
0x46b0…46e4 Head {h00=0x0030, h01=0x0050, text=»WRT090 LDK A2,ESC SEND PARTIAL LINE UP/DOWN «, t00=0x002d, t01=0x006c}
0x46e4…46fa Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x002d, t01=0x00a0}
0x46fa…471e Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x002d, t01=0x00b6}
0x471e…473e Head {h00=0x001c, h01=0x0050, text=» LDR A2,A4 RESTORE CHAR.«, t00=0x002d, t01=0x00da}
0x473e…4754 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x002d, t01=0x00fa}
0x4754…4778 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x002d, t01=0x0110}
0x4778…479e Head {h00=0x0022, h01=0x0050, text=» RB WRT020 GET NEXT CHARACTER «, t00=0x002d, t01=0x0134}
0x479e…47a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x015a}
0x47a8…47ce Head {h00=0x0022, h01=0x0050, text=»WRT100 SUK A4,/7E CHAR =</7E ?«, t00=0x002d, t01=0x0164}
0x47ce…47fa Head {h00=0x0028, h01=0x0050, text=» RF(NP) WRT110 YES, LEGAL CHARACTER «, t00=0x002d, t01=0x018a}
0x47fa…481e Head {h00=0x0020, h01=0x0050, text=» CWK A2,/AE ROOMLESS POINT ?«, t00=0x002e, t01=0x0026}
0x481e…4838 Head {h00=0x0016, h01=0x0050, text=» RF(E) WRT160 YES «, t00=0x002e, t01=0x004a}
0x4838…4858 Head {h00=0x001c, h01=0x0050, text=» SUK A4,/23 CHAR >=/A1 ?«, t00=0x002e, t01=0x0064}
0x4858…488c Head {h00=0x0030, h01=0x0050, text=» RF(N) WRT150 NO,INDICATE CODE CHECK ERROR !«, t00=0x002e, t01=0x0084}
0x488c…48ac Head {h00=0x001c, h01=0x0050, text=» SUK A4,/5D CHAR =</FE ?«, t00=0x002e, t01=0x00b8}
0x48ac…48d8 Head {h00=0x0028, h01=0x0050, text=» RF(NP) WRT120 YES, LEGAL CHARACTER «, t00=0x002e, t01=0x00d8}
0x48d8…4908 Head {h00=0x002c, h01=0x0050, text=» RF WRT150 NO, INDICATE CODE CHECK ERROR«, t00=0x002e, t01=0x0104}
0x4908…4938 Head {h00=0x002c, h01=0x0050, text=»* AUTOMATIC SHIFT OUT/IN FUNCTION * «, t00=0x002e, t01=0x0134}
0x4938…4942 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0164}
0x4942…4974 Head {h00=0x002e, h01=0x0050, text=»WRT110 LD A4,DWTDEV,A6 7-BIT CODE /20-/7E «, t00=0x002e, t01=0x016e}
0x4974…49a6 Head {h00=0x002e, h01=0x0050, text=» ANK A4,/80 SHIFT OUT PERFORMED EARLIER ? «, t00=0x002f, t01=0x0010}
0x49a6…49ce Head {h00=0x0024, h01=0x0050, text=» RF(Z) WRT170 NO, SEND CHARACTER«, t00=0x002f, t01=0x0042}
0x49ce…49e2 Head {h00=0x0010, h01=0x0050, text=» LDK A4,/80 «, t00=0x002f, t01=0x006a}
0x49e2…4a12 Head {h00=0x002c, h01=0x0050, text=» XRS A4,DWTDEV,A6 RESET SHIFT INDICATOR «, t00=0x002f, t01=0x007e}
0x4a12…4a30 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A2 STORE CHAR.«, t00=0x002f, t01=0x00ae}
0x4a30…4a50 Head {h00=0x001c, h01=0x0050, text=» LDK A2,SI SEND SHIFT IN«, t00=0x002f, t01=0x00cc}
0x4a50…4a62 Head {h00=0x000e, h01=0x0050, text=» RF WRT130«, t00=0x002f, t01=0x00ec}
0x4a62…4a6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00fe}
0x4a6c…4a9e Head {h00=0x002e, h01=0x0050, text=»WRT120 LD A4,DWTDEV,A6 8-BIT CODE /A1-/FE «, t00=0x002f, t01=0x0108}
0x4a9e…4ad0 Head {h00=0x002e, h01=0x0050, text=» ANK A4,/80 SHIFT OUT PERFORMED EARLIER ? «, t00=0x002f, t01=0x013a}
0x4ad0…4afa Head {h00=0x0026, h01=0x0050, text=» RF(NZ) WRT170 YES, SEND CHARACTER«, t00=0x002f, t01=0x016c}
0x4afa…4b0e Head {h00=0x0010, h01=0x0050, text=» LDK A4,/80 «, t00=0x0030, t01=0x0008}
0x4b0e…4b3a Head {h00=0x0028, h01=0x0050, text=» ORS A4,DWTDEV,A6 INDICATE SHIFT OUT«, t00=0x0030, t01=0x001c}
0x4b3a…4b58 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A2 STORE CHAR.«, t00=0x0030, t01=0x0048}
0x4b58…4b7a Head {h00=0x001e, h01=0x0050, text=» LDK A2,SO SEND SHIFT OUT «, t00=0x0030, t01=0x0066}
0x4b7a…4ba8 Head {h00=0x002a, h01=0x0050, text=»WRT130 CF A5,OUTPUT SEND SHIFT CONTROL«, t00=0x0030, t01=0x0088}
0x4ba8…4bcc Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP04 JMP IF ERROR «, t00=0x0030, t01=0x00b6}
0x4bcc…4bec Head {h00=0x001c, h01=0x0050, text=» LDR A2,A4 RESTORE CHAR.«, t00=0x0030, t01=0x00da}
0x4bec…4c0e Head {h00=0x001e, h01=0x0050, text=» RF WRT170 SEND CHARACTER «, t00=0x0030, t01=0x00fa}
0x4c0e…4c42 Head {h00=0x0030, h01=0x0050, text=»WRT140 SUK A3,1 DECREMENT ECB BUFFER POINTER«, t00=0x0030, t01=0x011c}
0x4c42…4c80 Head {h00=0x003a, h01=0x0050, text=»WRT150 LDK A4,/04 ILLEGAL CHARACTER SET BIT 13 IN R.C.«, t00=0x0030, t01=0x0150}
0x4c80…4c98 Head {h00=0x0014, h01=0x0050, text=» ORS A4,ECBRC,A8«, t00=0x0030, t01=0x018e}
0x4c98…4caa Head {h00=0x000e, h01=0x0050, text=» RB WRT020«, t00=0x0031, t01=0x0016}
0x4caa…4cc4 Head {h00=0x0016, h01=0x0050, text=»WRT160 LDK A2,/2E «, t00=0x0031, t01=0x0028}
0x4cc4…4cdc Head {h00=0x0014, h01=0x0050, text=»WRT170 LDR A4,A1«, t00=0x0031, t01=0x0042}
0x4cdc…4d06 Head {h00=0x0026, h01=0x0050, text=» ANK A2,/7F MASK,JUST 7 BIT CHAR. «, t00=0x0031, t01=0x005a}
0x4d06…4d2a Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0031, t01=0x0084}
0x4d2a…4d54 Head {h00=0x0026, h01=0x0050, text=»ERGP04 RF(NZ) ERGP06 JMP IF ERROR «, t00=0x0031, t01=0x00a8}
0x4d54…4d86 Head {h00=0x002e, h01=0x0050, text=» IM DWTDEV+DWTCO1,A6 INC COLUMN COUNTER 1 «, t00=0x0031, t01=0x00d2}
0x4d86…4d98 Head {h00=0x000e, h01=0x0050, text=» RB WRT020«, t00=0x0031, t01=0x0104}
0x4d98…4dac Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0031, t01=0x0116}
0x4dac…4dce Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x0031, t01=0x012a}
0x4dce…4df4 Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/100 PRINTER RESET ? «, t00=0x0031, t01=0x014c}
0x4df4…4e0e Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) RCTP YES «, t00=0x0031, t01=0x0172}
0x4e0e…4e36 Head {h00=0x0024, h01=0x0050, text=» CF A5,RESREC RESET RECOVERY BIT«, t00=0x0031, t01=0x018c}
0x4e36…4e68 Head {h00=0x002e, h01=0x0050, text=» CM DWTDEV+DWTLFD,A6 CLEAR LF/FF INDICATOR«, t00=0x0032, t01=0x0024}
0x4e68…4e88 Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END REQUEST «, t00=0x0032, t01=0x0056}
0x4e88…4e96 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x0076}
0x4e96…4ebc Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0032, t01=0x0084}
0x4ebc…4ec6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00aa}
0x4ec6…4ee8 Head {h00=0x001e, h01=0x0050, text=»* ORDER 05 : BASIC WRITE«, t00=0x0032, t01=0x00b4}
0x4ee8…4ef2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00d6}
0x4ef2…4f18 Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0032, t01=0x00e0}
0x4f18…4f2c Head {h00=0x0010, h01=0x0050, text=»BASWRT EQU *«, t00=0x0032, t01=0x0106}
0x4f2c…4f3c Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0032, t01=0x011a}
0x4f3c…4f4c Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0032, t01=0x012a}
0x4f4c…4f5c Head {h00=0x000c, h01=0x0050, text=»* * =1«, t00=0x0032, t01=0x013a}
0x4f5c…4f6e Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0032, t01=0x014a}
0x4f6e…4f98 Head {h00=0x0026, h01=0x0050, text=»BAS10 LDK A4,/90 TEST END OF BLOCK«, t00=0x0032, t01=0x015c}
0x4f98…4fc2 Head {h00=0x0026, h01=0x0050, text=» LDR A2,A4 BLOCK LENGTH IN A2=144 «, t00=0x0032, t01=0x0186}
0x4fc2…4fe6 Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0033, t01=0x0020}
0x4fe6…500a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP06 JMP IF ERROR «, t00=0x0033, t01=0x0044}
0x500a…5034 Head {h00=0x0026, h01=0x0050, text=»BAS15 CF A15,GETCHR GET CHARACTER «, t00=0x0033, t01=0x0068}
0x5034…5058 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 BUFFER FINISHED ?«, t00=0x0033, t01=0x0092}
0x5058…5070 Head {h00=0x0014, h01=0x0050, text=» RF(Z) BAS25 YES«, t00=0x0033, t01=0x00b6}
0x5070…5086 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0033, t01=0x00ce}
0x5086…50aa Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP06 JMP IF ERROR «, t00=0x0033, t01=0x00e4}
0x50aa…50ca Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 END OF BLOCK ?«, t00=0x0033, t01=0x0108}
0x50ca…50e2 Head {h00=0x0014, h01=0x0050, text=» RF(Z) BAS20 YES«, t00=0x0033, t01=0x0128}
0x50e2…5106 Head {h00=0x0020, h01=0x0050, text=» RB BAS15 GET NEXT CHARACTER«, t00=0x0033, t01=0x0140}
0x5106…512e Head {h00=0x0024, h01=0x0050, text=»BAS20 CF A5,ENDBLK END OF BLOCK «, t00=0x0033, t01=0x0164}
0x512e…5152 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP06 JMP IF ERROR «, t00=0x0033, t01=0x018c}
0x5152…5174 Head {h00=0x001e, h01=0x0050, text=» RB BAS10 START NEXT BLOCK«, t00=0x0034, t01=0x0020}
0x5174…519c Head {h00=0x0024, h01=0x0050, text=»BAS25 CF A5,ENDBLK END OF BLOCK «, t00=0x0034, t01=0x0042}
0x519c…51c6 Head {h00=0x0026, h01=0x0050, text=»ERGP06 ABL(NZ) ERGP15 JMP IF ERROR«, t00=0x0034, t01=0x006a}
0x51c6…51f2 Head {h00=0x0028, h01=0x0050, text=» ABL TSTSTA CHECK STATUS & END REQ. «, t00=0x0034, t01=0x0094}
0x51f2…5200 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x00c0}
0x5200…521c Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0034, t01=0x00ce}
0x521c…5252 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0034, t01=0x00ea}
0x5252…525c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0120}
0x525c…5284 Head {h00=0x0024, h01=0x0050, text=»* ORDER 0B : POSITION DOCUMENT«, t00=0x0034, t01=0x012a}
0x5284…52b8 Head {h00=0x0030, h01=0x0050, text=»* CONTROL WORD CONTAINS REQUESTED LINE NO «, t00=0x0034, t01=0x0152}
0x52b8…52c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0186}
0x52c2…52f8 Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0034, t01=0x0190}
0x52f8…531e Head {h00=0x0022, h01=0x0050, text=»POSDOC EQU * POSITION DOCUMENT«, t00=0x0035, t01=0x0036}
0x531e…5346 Head {h00=0x0024, h01=0x0050, text=» CF A5,GTSTAT GET DEVICE STATUS «, t00=0x0035, t01=0x005c}
0x5346…5360 Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 ERROR ?«, t00=0x0035, t01=0x0084}
0x5360…5388 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) POS040 ERROR INDICATION «, t00=0x0035, t01=0x009e}
0x5388…53b2 Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBCW,A8 GET REQUESTED LINE«, t00=0x0035, t01=0x00c6}
0x53b2…53c6 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0035, t01=0x00f0}
0x53c6…53f0 Head {h00=0x0026, h01=0x0050, text=» RF(Z) POSERR ILLEGAL LINE NUMBER «, t00=0x0035, t01=0x0104}
0x53f0…5418 Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTDEV+DWTDL,A6 MAX. LINE«, t00=0x0035, t01=0x012e}
0x5418…5446 Head {h00=0x002a, h01=0x0050, text=» CF A5,BINARY CONVERT ASCII TO BINARY «, t00=0x0035, t01=0x0156}
0x5446…546c Head {h00=0x0022, h01=0x0050, text=» CWR A4,A3 REQ. LINE>MAX. LINE«, t00=0x0035, t01=0x0184}
0x546c…5486 Head {h00=0x0016, h01=0x0050, text=» RF(G) POSERR YES «, t00=0x0036, t01=0x001a}
0x5486…54b4 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x0036, t01=0x0034}
0x54b4…54e6 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTDEV+DWTRLN,A6 SET REQUESTED LINE«, t00=0x0036, t01=0x0062}
0x54e6…54fa Head {h00=0x0010, h01=0x0050, text=»POS005 EQU *«, t00=0x0036, t01=0x0094}
0x54fa…551a Head {h00=0x001c, h01=0x0050, text=» LDK A2,/15 BLOCK LENGTH«, t00=0x0036, t01=0x00a8}
0x551a…553e Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0036, t01=0x00c8}
0x553e…5562 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP08 JMP IF ERROR «, t00=0x0036, t01=0x00ec}
0x5562…5582 Head {h00=0x001c, h01=0x0050, text=» LD A3,DWTDEV+DWTALN,A6 «, t00=0x0036, t01=0x0110}
0x5582…5598 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POS020«, t00=0x0036, t01=0x0130}
0x5598…55aa Head {h00=0x000e, h01=0x0050, text=» LDK A2,FF«, t00=0x0036, t01=0x0146}
0x55aa…55c0 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0036, t01=0x0158}
0x55c0…55e4 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP08 JMP IF ERROR «, t00=0x0036, t01=0x016e}
0x55e4…5600 (55, 0, 398) Head {h00=0x0018, h01=0x0050, text=»POS020 LDKL A2,CSVPA«, t00=0x0037, t01=0x0004}
0x5600…561e Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTRLN«, t00=0x0037, t01=0x0020}
0x561e…5632 Head {h00=0x0010, h01=0x0050, text=» CF A5,SEND «, t00=0x0037, t01=0x003e}
0x5632…565a Head {h00=0x0024, h01=0x0050, text=»POS030 CF A5,ENDBLK END OF BLOCK«, t00=0x0037, t01=0x0052}
0x565a…5684 Head {h00=0x0026, h01=0x0050, text=»ERGP08 ABL(NZ) ERGP15 JMP IF ERROR«, t00=0x0037, t01=0x007a}
0x5684…56a4 Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x0037, t01=0x00a4}
0x56a4…56c2 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) POS040 ERROR ?«, t00=0x0037, t01=0x00c4}
0x56c2…56f4 Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTDEV+DWTRLN,A6 GET REQ. LINE NO. «, t00=0x0037, t01=0x00e2}
0x56f4…572c Head {h00=0x0034, h01=0x0050, text=» ST A2,DWTDEV+DWTALN,A6 ACTUAL LINE = REQ. LINE «, t00=0x0037, t01=0x0114}
0x572c…575e Head {h00=0x002e, h01=0x0050, text=» CM DWTDEV+DWTCO1,A6 CLEAR COLUMN COUNTER «, t00=0x0037, t01=0x014c}
0x575e…5772 Head {h00=0x0010, h01=0x0050, text=»POS040 EQU *«, t00=0x0037, t01=0x017e}
0x5772…5794 (56, 0, 400) Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x0038, t01=0x0004}
0x5794…57ba Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/100 PRINTER RESET ? «, t00=0x0038, t01=0x0026}
0x57ba…57d4 Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) RCTP YES «, t00=0x0038, t01=0x004c}
0x57d4…57fc Head {h00=0x0024, h01=0x0050, text=» CF A5,RESREC RESET RECOVERY BIT«, t00=0x0038, t01=0x0066}
0x57fc…581c Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END REQUEST «, t00=0x0038, t01=0x008e}
0x581c…5836 Head {h00=0x0016, h01=0x0050, text=»POSERR ABL LENDER «, t00=0x0038, t01=0x00ae}
0x5836…5842 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x00c8}
0x5842…5850 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x00d4}
0x5850…5884 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0038, t01=0x00e2}
0x5884…588e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0116}
0x588e…58ba Head {h00=0x0028, h01=0x0050, text=»* ORDER 24 : SET PRINTER PARAMETERS «, t00=0x0038, t01=0x0120}
0x58ba…58c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x014c}
0x58c4…58f8 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0038, t01=0x0156}
0x58f8…590e Head {h00=0x0012, h01=0x0050, text=»PRIPAR EQU * «, t00=0x0038, t01=0x018a}
0x590e…593c Head {h00=0x002a, h01=0x0050, text=»PRI07 LDK A3,/6 SET UP BRANCH POINTER «, t00=0x0039, t01=0x0010}
0x593c…5964 Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBCW,A8 GET CONTROL WORD«, t00=0x0039, t01=0x003e}
0x5964…597c Head {h00=0x0014, h01=0x0050, text=»PRI10 LDR A4,A1 «, t00=0x0039, t01=0x0066}
0x597c…5998 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0039, t01=0x007e}
0x5998…59c0 Head {h00=0x0024, h01=0x0050, text=» LC A2,DWTOR+1,A6 GET DWT INDEX «, t00=0x0039, t01=0x009a}
0x59c0…59d2 Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x0039, t01=0x00c2}
0x59d2…59e6 Head {h00=0x0010, h01=0x0050, text=» RF(Z) PRI14«, t00=0x0039, t01=0x00d4}
0x59e6…5a1a Head {h00=0x0030, h01=0x0050, text=» ANK A4,/F CHECK IF NEW PARAM. VALUE WANTED «, t00=0x0039, t01=0x00e8}
0x5a1a…5a40 Head {h00=0x0022, h01=0x0050, text=» ABI(NZ) FROTAB,A3 FRONT FEED «, t00=0x0039, t01=0x011c}
0x5a40…5a52 Head {h00=0x000e, h01=0x0050, text=» RF PRI15 «, t00=0x0039, t01=0x0142}
0x5a52…5a5e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0154}
0x5a5e…5a96 Head {h00=0x0034, h01=0x0050, text=»PRI14 ANK A4,/F CHECK IF NEW PARAM. VALUE WANTED«, t00=0x0039, t01=0x0160}
0x5a96…5ac6 Head {h00=0x002c, h01=0x0050, text=» ABI(NZ) PRITAB,A3 FRICTION/TRACTOR FEED«, t00=0x003a, t01=0x0008}
0x5ac6…5af0 Head {h00=0x0026, h01=0x0050, text=»PRI15 SRL A1,4 GET NEXT PARAMETER «, t00=0x003a, t01=0x0038}
0x5af0…5b28 Head {h00=0x0034, h01=0x0050, text=»PRI16 CWK A3,0 FRI/TRA, ANY MORE PARAM. TO CHECK«, t00=0x003a, t01=0x0062}
0x5b28…5b4c Head {h00=0x0020, h01=0x0050, text=» RF(E) PRI17 NO, GO AND SEND«, t00=0x003a, t01=0x009a}
0x5b4c…5b76 Head {h00=0x0026, h01=0x0050, text=»PRI18 SUK A3,2 TEST NEXT PARAMETER«, t00=0x003a, t01=0x00be}
0x5b76…5b88 Head {h00=0x000e, h01=0x0050, text=» RB PRI10 «, t00=0x003a, t01=0x00e8}
0x5b88…5bb2 Head {h00=0x0026, h01=0x0050, text=»PRI17 LDR A4,P GET PROGRAM COUNTER«, t00=0x003a, t01=0x00fa}
0x5bb2…5be2 Head {h00=0x002c, h01=0x0050, text=» ADK A4,6 MAKE RETURN ADDRESS BEFORE ABL«, t00=0x003a, t01=0x0124}
0x5be2…5c10 Head {h00=0x002a, h01=0x0050, text=» ABL SENPAR SEND PARAMETERS TO PRINTER«, t00=0x003a, t01=0x0154}
0x5c10…5c30 Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x003a, t01=0x0182}
0x5c30…5c52 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x003b, t01=0x0012}
0x5c52…5c78 Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/100 PRINTER RESET ? «, t00=0x003b, t01=0x0034}
0x5c78…5c92 Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) RCTP YES «, t00=0x003b, t01=0x005a}
0x5c92…5cba Head {h00=0x0024, h01=0x0050, text=» CF A5,RESREC RESET RECOVERY BIT«, t00=0x003b, t01=0x0074}
0x5cba…5cda Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END REQUEST «, t00=0x003b, t01=0x009c}
0x5cda…5d04 Head {h00=0x0026, h01=0x0050, text=»* STORE PARAMETERS, TRACTOR FEED«, t00=0x003b, t01=0x00bc}
0x5d04…5d3a Head {h00=0x0032, h01=0x0050, text=»PRI20 EQU * NCV= NATIONAL CHARACTER VARIATION «, t00=0x003b, t01=0x00e6}
0x5d3a…5d5a Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE «, t00=0x003b, t01=0x011c}
0x5d5a…5d98 Head {h00=0x003a, h01=0x0050, text=» LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACCORDING TO INDEX«, t00=0x003b, t01=0x013c}
0x5d98…5dc4 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTDEV+DWTPCS,A6 STORE IN DWT«, t00=0x003b, t01=0x017a}
0x5dc4…5dd6 Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003c, t01=0x0016}
0x5dd6…5e06 Head {h00=0x002c, h01=0x0050, text=»PRI30 EQU * SCM= SELECT CHARACTER MATRIX«, t00=0x003c, t01=0x0028}
0x5e06…5e18 Head {h00=0x000e, h01=0x0050, text=» CWK A4,/9«, t00=0x003c, t01=0x0058}
0x5e18…5e3c Head {h00=0x0020, h01=0x0050, text=» RF(G) PRI60 INDEX TOO HIGH «, t00=0x003c, t01=0x006a}
0x5e3c…5e56 Head {h00=0x0016, h01=0x0050, text=» ORK A4,/30 ASCII «, t00=0x003c, t01=0x008e}
0x5e56…5e82 Head {h00=0x0028, h01=0x0050, text=» SC A4,DWTDEV+DWTCMF,A6 STORE IN DWT«, t00=0x003c, t01=0x00a8}
0x5e82…5e94 Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003c, t01=0x00d4}
0x5e94…5eb8 Head {h00=0x0020, h01=0x0050, text=»PRI40 EQU * PL= PAGE LENGTH «, t00=0x003c, t01=0x00e6}
0x5eb8…5ed8 Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE «, t00=0x003c, t01=0x010a}
0x5ed8…5f0c Head {h00=0x0030, h01=0x0050, text=» LD A4,LINNUM,A4 GET LINE ACCORDING TO INDEX«, t00=0x003c, t01=0x012a}
0x5f0c…5f38 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTDEV+DWTPL,A6 STORE IN DWT «, t00=0x003c, t01=0x015e}
0x5f38…5f4a Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003c, t01=0x018a}
0x5f4a…5f72 Head {h00=0x0024, h01=0x0050, text=»PRI50 EQU * CD= CHARACTER PITCH «, t00=0x003d, t01=0x000c}
0x5f72…5f84 Head {h00=0x000e, h01=0x0050, text=» CWK A4,/4«, t00=0x003d, t01=0x0034}
0x5f84…5fa8 Head {h00=0x0020, h01=0x0050, text=» RF(G) PRI60 INDEX TOO HIGH «, t00=0x003d, t01=0x0046}
0x5fa8…5fc2 Head {h00=0x0016, h01=0x0050, text=» ORK A4,/30 ASCII «, t00=0x003d, t01=0x006a}
0x5fc2…5ff0 Head {h00=0x002a, h01=0x0050, text=» SC A4,DWTDEV+DWTCMF+1,A6 STORE IN DWT«, t00=0x003d, t01=0x0084}
0x5ff0…6002 Head {h00=0x000e, h01=0x0050, text=» RB PRI17 «, t00=0x003d, t01=0x00b2}
0x6002…6038 Head {h00=0x0032, h01=0x0050, text=»* STORE PARAMETERS, FRONT FEED/FRICTION FEED«, t00=0x003d, t01=0x00c4}
0x6038…6054 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x003d, t01=0x00fa}
0x6054…608a Head {h00=0x0032, h01=0x0050, text=»FRO20 EQU * NCV= NATIONAL CHARACTER VARIATION «, t00=0x003d, t01=0x0116}
0x608a…60aa Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE «, t00=0x003d, t01=0x014c}
0x60aa…60ea Head {h00=0x003c, h01=0x0050, text=» LD A4,NCVTAB,A4 GET NAT. CHAR. VAR. ACCORDING TO INDEX «, t00=0x003d, t01=0x016c}
0x60ea…6116 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTDEV+DWTDCS,A6 STORE IN DWT«, t00=0x003e, t01=0x001c}
0x6116…6128 Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003e, t01=0x0048}
0x6128…6158 Head {h00=0x002c, h01=0x0050, text=»FRO30 EQU * SCM=SELECT CHARACTER MATRIX «, t00=0x003e, t01=0x005a}
0x6158…616a Head {h00=0x000e, h01=0x0050, text=» CWK A4,/9«, t00=0x003e, t01=0x008a}
0x616a…618e Head {h00=0x0020, h01=0x0050, text=» RF(G) PRI60 INDEX TOO HIGH «, t00=0x003e, t01=0x009c}
0x618e…61a8 Head {h00=0x0016, h01=0x0050, text=» ORK A4,/30 ASCII «, t00=0x003e, t01=0x00c0}
0x61a8…61d4 Head {h00=0x0028, h01=0x0050, text=» SC A4,DWTDEV+DWTCMT,A6 STORE IN DWT«, t00=0x003e, t01=0x00da}
0x61d4…61e6 Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003e, t01=0x0106}
0x61e6…620a Head {h00=0x0020, h01=0x0050, text=»FRO40 EQU * PL= PAGE LENGTH «, t00=0x003e, t01=0x0118}
0x620a…622a Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 ADJUST TABLE «, t00=0x003e, t01=0x013c}
0x622a…625e Head {h00=0x0030, h01=0x0050, text=» LD A4,LINNUM,A4 GET LINE ACCORDING TO INDEX«, t00=0x003e, t01=0x015c}
0x625e…628a Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTDEV+DWTDL,A6 STORE IN DWT «, t00=0x003e, t01=0x0190}
0x628a…629c Head {h00=0x000e, h01=0x0050, text=» RB PRI15 «, t00=0x003f, t01=0x002c}
0x629c…62c4 Head {h00=0x0024, h01=0x0050, text=»FRO50 EQU * CD= CHARACTER PITCH «, t00=0x003f, t01=0x003e}
0x62c4…62d6 Head {h00=0x000e, h01=0x0050, text=» CWK A4,/4«, t00=0x003f, t01=0x0066}
0x62d6…62fa Head {h00=0x0020, h01=0x0050, text=» RF(G) PRI60 INDEX TOO HIGH «, t00=0x003f, t01=0x0078}
0x62fa…6314 Head {h00=0x0016, h01=0x0050, text=» ORK A4,/30 ASCII «, t00=0x003f, t01=0x009c}
0x6314…6342 Head {h00=0x002a, h01=0x0050, text=» SC A4,DWTDEV+DWTCMT+1,A6 STORE IN DWT«, t00=0x003f, t01=0x00b6}
0x6342…6354 Head {h00=0x000e, h01=0x0050, text=» RB PRI17 «, t00=0x003f, t01=0x00e4}
0x6354…6360 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x00f6}
0x6360…6386 Head {h00=0x0022, h01=0x0050, text=»PRI60 ABL LENDER REQUEST ERROR«, t00=0x003f, t01=0x0102}
0x6386…6394 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x0128}
0x6394…63c8 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x003f, t01=0x0136}
0x63c8…63d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x016a}
0x63d2…63fc Head {h00=0x0026, h01=0x0050, text=»* ORDER /27 : SET FORM PARAMETERS «, t00=0x003f, t01=0x0174}
0x63fc…6406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x000e}
0x6406…643a Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0040, t01=0x0018}
0x643a…644e Head {h00=0x0010, h01=0x0050, text=»FORPAR EQU *«, t00=0x0040, t01=0x004c}
0x644e…6464 Head {h00=0x0012, h01=0x0050, text=» IFT FORMPA=1 «, t00=0x0040, t01=0x0060}
0x6464…6494 Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBCW,A8 GET CONTROL WORD, INDEX «, t00=0x0040, t01=0x0076}
0x6494…64ac Head {h00=0x0014, h01=0x0050, text=» ANK A2,/F MASK «, t00=0x0040, t01=0x00a6}
0x64ac…64be Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0040, t01=0x00be}
0x64be…64fa Head {h00=0x0038, h01=0x0050, text=» RF(Z) FOR020 HOPPER,HIGH SPEED OR LINE SPACE PARAM.«, t00=0x0040, t01=0x00d0}
0x64fa…650c Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0040, t01=0x010c}
0x650c…6538 Head {h00=0x0028, h01=0x0050, text=» ABL(Z) BASWRT LOAD CHARACTER MATRIX«, t00=0x0040, t01=0x011e}
0x6538…654a Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0040, t01=0x014a}
0x654a…656c Head {h00=0x001e, h01=0x0050, text=» RF(Z) TAB010 TABULATIONS «, t00=0x0040, t01=0x015c}
0x656c…6578 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x017e}
0x6578…65ac Head {h00=0x0030, h01=0x0050, text=»FOR010 ABL LENDER REQUEST ERROR,END OF REQ. «, t00=0x0040, t01=0x018a}
0x65ac…65c2 Head {h00=0x0012, h01=0x0050, text=» IFT FORMPA=1 «, t00=0x0041, t01=0x002e}
0x65c2…65f8 Head {h00=0x0032, h01=0x0050, text=»* HOPPER, HIGH SPEED & LINE SPACE PARAMETERS«, t00=0x0041, t01=0x0044}
0x65f8…6602 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x007a}
0x6602…6628 Head {h00=0x0022, h01=0x0050, text=»FOR020 LDK A2,/E BLOCK LENGTH «, t00=0x0041, t01=0x0084}
0x6628…664c Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0041, t01=0x00aa}
0x664c…6670 Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) ERGP15 JMP IF ERROR«, t00=0x0041, t01=0x00ce}
0x6670…6698 Head {h00=0x0024, h01=0x0050, text=» LD A4,ECBCW,A8 GET CONTROL WORD«, t00=0x0041, t01=0x00f2}
0x6698…66b6 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A4 ALSO IN A4 «, t00=0x0041, t01=0x011a}
0x66b6…66ce Head {h00=0x0014, h01=0x0050, text=» SRL A1,4 SHIFT «, t00=0x0041, t01=0x0138}
0x66ce…66f6 Head {h00=0x0024, h01=0x0050, text=» ANK A1,/F MASK LINE SPACE INDEX«, t00=0x0041, t01=0x0150}
0x66f6…671c Head {h00=0x0022, h01=0x0050, text=» RF(Z) FOR030 NO CHANGE WANTED«, t00=0x0041, t01=0x0178}
0x671c…672e Head {h00=0x000e, h01=0x0050, text=» CWK A1,/8«, t00=0x0042, t01=0x000e}
0x672e…6760 Head {h00=0x002e, h01=0x0050, text=» RB(G) FOR010 REQUEST ERROR, INDEX TOO BIG«, t00=0x0042, t01=0x0020}
0x6760…6780 Head {h00=0x001c, h01=0x0050, text=» ADR A1,A1 ADJUST TABLE «, t00=0x0042, t01=0x0052}
0x6780…67ba Head {h00=0x0036, h01=0x0050, text=» LD A1,LINTAB,A1 GET LINE SPACE ACCORDING TO TABLE«, t00=0x0042, t01=0x0072}
0x67ba…67e6 Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTDEV+DWTLS,A6 STORE IN DWT «, t00=0x0042, t01=0x00ac}
0x67e6…67fc Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSLSL«, t00=0x0042, t01=0x00d8}
0x67fc…681a Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTLS «, t00=0x0042, t01=0x00ee}
0x681a…6842 Head {h00=0x0024, h01=0x0050, text=» CF A5,SEND SEND LINE SPACE LOAD«, t00=0x0042, t01=0x010c}
0x6842…686c Head {h00=0x0026, h01=0x0050, text=»FOR030 LDR A1,A4 GET CONTROL WORD «, t00=0x0042, t01=0x0134}
0x686c…687e Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x0042, t01=0x015e}
0x687e…68aa Head {h00=0x0028, h01=0x0050, text=» ANK A1,/F MASK HIGH SPEED PARAMETER«, t00=0x0042, t01=0x0170}
0x68aa…68d0 Head {h00=0x0022, h01=0x0050, text=» RF(Z) FOR060 NO CHANGE WANTED«, t00=0x0043, t01=0x000c}
0x68d0…68e2 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0043, t01=0x0032}
0x68e2…68f8 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) FOR040«, t00=0x0043, t01=0x0044}
0x68f8…691e Head {h00=0x0022, h01=0x0050, text=» LDK A2,SM HIGH SPEED SELECTED«, t00=0x0043, t01=0x005a}
0x691e…694c Head {h00=0x002a, h01=0x0050, text=» SC A2,DWTDEV+DWTHSP+1,A6 STORE IN DWT«, t00=0x0043, t01=0x0080}
0x694c…6962 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSSM «, t00=0x0043, t01=0x00ae}
0x6962…6990 Head {h00=0x002a, h01=0x0050, text=» RF FOR050 SEND SELECT HIGH SPEED MODE«, t00=0x0043, t01=0x00c4}
0x6990…69a8 Head {h00=0x0014, h01=0x0050, text=»FOR040 SUK A1,1 «, t00=0x0043, t01=0x00f2}
0x69a8…69cc Head {h00=0x0020, h01=0x0050, text=» RB(NZ) FOR010 REQUEST ERROR«, t00=0x0043, t01=0x010a}
0x69cc…69de Head {h00=0x000e, h01=0x0050, text=» LDK A2,RM«, t00=0x0043, t01=0x012e}
0x69de…6a0c Head {h00=0x002a, h01=0x0050, text=» SC A2,DWTDEV+DWTHSP+1,A6 STORE IN DWT«, t00=0x0043, t01=0x0140}
0x6a0c…6a3a Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CSRM SEND SELECT NORMAL SPEED«, t00=0x0043, t01=0x016e}
0x6a3a…6a5e Head {h00=0x0020, h01=0x0050, text=»FOR050 LDKL A3,DWTDEV+DWTHSP«, t00=0x0044, t01=0x000c}
0x6a5e…6a72 Head {h00=0x0010, h01=0x0050, text=» CF A5,SEND «, t00=0x0044, t01=0x0030}
0x6a72…6a86 Head {h00=0x0010, h01=0x0050, text=»FOR060 EQU *«, t00=0x0044, t01=0x0044}
0x6a86…6a9c Head {h00=0x0012, h01=0x0050, text=» IFT SINHAN=1 «, t00=0x0044, t01=0x0058}
0x6a9c…6ac0 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A4 GET CONTROL WORD «, t00=0x0044, t01=0x006e}
0x6ac0…6ad2 Head {h00=0x000e, h01=0x0050, text=» SRL A1,/C«, t00=0x0044, t01=0x0092}
0x6ad2…6afa Head {h00=0x0024, h01=0x0050, text=» ANK A1,/F MASK HOPPER PARAMETER«, t00=0x0044, t01=0x00a4}
0x6afa…6b20 Head {h00=0x0022, h01=0x0050, text=» RF(Z) FOR120 NO CHANGE WANTED«, t00=0x0044, t01=0x00cc}
0x6b20…6b32 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0044, t01=0x00f2}
0x6b32…6b48 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) FOR070«, t00=0x0044, t01=0x0104}
0x6b48…6b6e Head {h00=0x0022, h01=0x0050, text=» LDKL A2,/3168 SELECT HOPPER 1«, t00=0x0044, t01=0x011a}
0x6b6e…6b80 Head {h00=0x000e, h01=0x0050, text=» RF FOR075«, t00=0x0044, t01=0x0140}
0x6b80…6b98 Head {h00=0x0014, h01=0x0050, text=»FOR070 SUK A1,1 «, t00=0x0044, t01=0x0152}
0x6b98…6bae Head {h00=0x0012, h01=0x0050, text=» RF(NZ) FOR080«, t00=0x0044, t01=0x016a}
0x6bae…6bd4 Head {h00=0x0022, h01=0x0050, text=» LDKL A2,/3268 SELECT HOPPER 2«, t00=0x0044, t01=0x0180}
0x6bd4…6c06 Head {h00=0x002e, h01=0x0050, text=»FOR075 ST A2,DWTDEV+DWTHOP,A6 STORE IN DWT«, t00=0x0045, t01=0x0016}
0x6c06…6c1c Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSSM «, t00=0x0045, t01=0x0048}
0x6c1c…6c2e Head {h00=0x000e, h01=0x0050, text=» RF FOR110«, t00=0x0045, t01=0x005e}
0x6c2e…6c46 Head {h00=0x0014, h01=0x0050, text=»FOR080 SUK A1,1 «, t00=0x0045, t01=0x0070}
0x6c46…6c5c Head {h00=0x0012, h01=0x0050, text=» RF(NZ) FOR090«, t00=0x0045, t01=0x0088}
0x6c5c…6c84 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,/316C DESELECT HOPPER 1«, t00=0x0045, t01=0x009e}
0x6c84…6c96 Head {h00=0x000e, h01=0x0050, text=» RF FOR095«, t00=0x0045, t01=0x00c6}
0x6c96…6cae Head {h00=0x0014, h01=0x0050, text=»FOR090 SUK A1,1 «, t00=0x0045, t01=0x00d8}
0x6cae…6cd2 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) FOR010 REQUEST ERROR«, t00=0x0045, t01=0x00f0}
0x6cd2…6cfa Head {h00=0x0024, h01=0x0050, text=» LDKL A2,/326C DESELECT HOPPER 2«, t00=0x0045, t01=0x0114}
0x6cfa…6d2c Head {h00=0x002e, h01=0x0050, text=»FOR095 ST A2,DWTDEV+DWTHOP,A6 STORE IN DWT«, t00=0x0045, t01=0x013c}
0x6d2c…6d42 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSRM «, t00=0x0045, t01=0x016e}
0x6d42…6d66 Head {h00=0x0020, h01=0x0050, text=»FOR110 LDKL A3,DWTDEV+DWTHOP«, t00=0x0045, t01=0x0184}
0x6d66…6d8a Head {h00=0x0020, h01=0x0050, text=» CF A5,SEND SEND HOPPER MODE«, t00=0x0046, t01=0x0018}
0x6d8a…6d96 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x003c}
0x6d96…6dac Head {h00=0x0012, h01=0x0050, text=» IFT FORMPA=1 «, t00=0x0046, t01=0x0048}
0x6dac…6dca Head {h00=0x001a, h01=0x0050, text=» RF FOR120 END OF REQ.«, t00=0x0046, t01=0x005e}
0x6dca…6dd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x007c}
0x6dd4…6df0 Head {h00=0x0018, h01=0x0050, text=»* TABULATION PART «, t00=0x0046, t01=0x0086}
0x6df0…6dfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00a2}
0x6dfa…6e0e Head {h00=0x0010, h01=0x0050, text=»TAB010 EQU *«, t00=0x0046, t01=0x00ac}
0x6e0e…6e36 Head {h00=0x0024, h01=0x0050, text=» LDK A3,0 SET UP BUFFER POINTER «, t00=0x0046, t01=0x00c0}
0x6e36…6e60 Head {h00=0x0026, h01=0x0050, text=»TAB020 CF A15,GETCHR GET CHARACTER«, t00=0x0046, t01=0x00e8}
0x6e60…6e82 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A1 END OF BUFFER ?«, t00=0x0046, t01=0x0112}
0x6e82…6ea6 Head {h00=0x0020, h01=0x0050, text=» RB(Z) FOR010 REQUEST ERROR «, t00=0x0046, t01=0x0134}
0x6ea6…6eca Head {h00=0x0020, h01=0x0050, text=» LDR A4,A2 KEEP CHAR. IN A4 «, t00=0x0046, t01=0x0158}
0x6eca…6eea Head {h00=0x001c, h01=0x0050, text=» LDK A2,/80 BLOCK LENGTH«, t00=0x0046, t01=0x017c}
0x6eea…6f0e Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0047, t01=0x000c}
0x6f0e…6f32 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP10 JMP IF ERROR «, t00=0x0047, t01=0x0030}
0x6f32…6f58 Head {h00=0x0022, h01=0x0050, text=» ANK A4,1 SET OR CLEAR TABS. ?«, t00=0x0047, t01=0x0054}
0x6f58…6f84 Head {h00=0x0028, h01=0x0050, text=» RF(Z) TAB050 CLEAR ALL TABULATIONS «, t00=0x0047, t01=0x007a}
0x6f84…6fb8 Head {h00=0x0030, h01=0x0050, text=»TAB030 CF A15,GETCHR GET TABULATION POSITION«, t00=0x0047, t01=0x00a6}
0x6fb8…6fca Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0047, t01=0x00da}
0x6fca…6fee Head {h00=0x0020, h01=0x0050, text=» RF(Z) FOR120 END OF REQUEST«, t00=0x0047, t01=0x00ec}
0x6fee…7010 Head {h00=0x001e, h01=0x0050, text=» LDR A4,A2 TAB. POS. IN A4«, t00=0x0047, t01=0x0110}
0x7010…7036 Head {h00=0x0022, h01=0x0050, text=» CF A5,KONVER KONVERT TO ASCII«, t00=0x0047, t01=0x0132}
0x7036…7056 Head {h00=0x001c, h01=0x0050, text=» SC A2,DWTDEV+DWTTAB,A6 «, t00=0x0047, t01=0x0158}
0x7056…708c Head {h00=0x0032, h01=0x0050, text=» SC A4,DWTDEV+DWTTAB+2,A6 STORE TAB POS IN DWT«, t00=0x0047, t01=0x0178}
0x708c…70aa Head {h00=0x001a, h01=0x0050, text=» SRL A4,8 SHIFT RIGHT «, t00=0x0048, t01=0x001e}
0x70aa…70e0 Head {h00=0x0032, h01=0x0050, text=» SC A4,DWTDEV+DWTTAB+1,A6 STORE TAB POS IN DWT«, t00=0x0048, t01=0x003c}
0x70e0…7106 Head {h00=0x0022, h01=0x0050, text=» LDR A4,A3 KEEP COUNTER IN A4 «, t00=0x0048, t01=0x0072}
0x7106…711c Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSHPA«, t00=0x0048, t01=0x0098}
0x711c…713a Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTTAB«, t00=0x0048, t01=0x00ae}
0x713a…7166 Head {h00=0x0028, h01=0x0050, text=» CF A5,SEND SEND HORIZONTAL POS ABS.«, t00=0x0048, t01=0x00cc}
0x7166…717c Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSHTS«, t00=0x0048, t01=0x00f8}
0x717c…71aa Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SET TAB POS AT ACTIVE POS «, t00=0x0048, t01=0x010e}
0x71aa…71cc Head {h00=0x001e, h01=0x0050, text=» LDR A3,A4 RESTORE COUNTER«, t00=0x0048, t01=0x013c}
0x71cc…71ec Head {h00=0x001c, h01=0x0050, text=» RB TAB030 GET NEXT POS «, t00=0x0048, t01=0x015e}
0x71ec…7200 Head {h00=0x0010, h01=0x0050, text=»TAB050 EQU *«, t00=0x0048, t01=0x017e}
0x7200…7222 (73, 0, 400) Head {h00=0x001e, h01=0x0050, text=» LDK A3,/33 CLEAR ALL TABS«, t00=0x0049, t01=0x0004}
0x7222…724e Head {h00=0x0028, h01=0x0050, text=» SC A3,DWTDEV+DWTTAB,A6 STORE IN DWT«, t00=0x0049, t01=0x0026}
0x724e…7264 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSTBC«, t00=0x0049, t01=0x0052}
0x7264…7282 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTTAB«, t00=0x0049, t01=0x0068}
0x7282…72b0 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND CLEAR ALL TABULATION POS. «, t00=0x0049, t01=0x0086}
0x72b0…72d8 Head {h00=0x0024, h01=0x0050, text=»FOR120 CF A5,ENDBLK END OF BLOCK«, t00=0x0049, t01=0x00b4}
0x72d8…7302 Head {h00=0x0026, h01=0x0050, text=»ERGP10 ABL(NZ) ERGP15 JMP IF ERROR«, t00=0x0049, t01=0x00dc}
0x7302…732e Head {h00=0x0028, h01=0x0050, text=» ABL TSTSTA CHECK STATUS & END REQ. «, t00=0x0049, t01=0x0106}
0x732e…733a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0132}
0x733a…7348 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x013e}
0x7348…737a Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0049, t01=0x014c}
0x737a…7384 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x017e}
0x7384…73aa Head {h00=0x0022, h01=0x0050, text=»* ORDER 38 : RELEASE DOCUMENT «, t00=0x0049, t01=0x0188}
0x73aa…73b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x001e}
0x73b4…73e6 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x004a, t01=0x0028}
0x73e6…7402 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x004a, t01=0x005a}
0x7402…7416 Head {h00=0x0010, h01=0x0050, text=»RELDOC EQU *«, t00=0x004a, t01=0x0076}
0x7416…7436 Head {h00=0x001c, h01=0x0050, text=» CF A5,GTSTAT GET STATUS«, t00=0x004a, t01=0x008a}
0x7436…7448 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x004a, t01=0x00aa}
0x7448…7466 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) REL20 ERROR ? «, t00=0x004a, t01=0x00bc}
0x7466…7486 Head {h00=0x001c, h01=0x0050, text=» LDK A2,/F BLOCK LENGTH «, t00=0x004a, t01=0x00da}
0x7486…74aa Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x004a, t01=0x00fa}
0x74aa…74ce Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP14 JMP IF ERROR «, t00=0x004a, t01=0x011e}
0x74ce…74e4 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSVPA«, t00=0x004a, t01=0x0142}
0x74e4…7518 Head {h00=0x0030, h01=0x0050, text=» LDKL A3,DWTDEV+DWTDL SEND LF TO END OF PAGE«, t00=0x004a, t01=0x0158}
0x7518…752c Head {h00=0x0010, h01=0x0050, text=» CF A5,SEND «, t00=0x004a, t01=0x018c}
0x752c…7558 Head {h00=0x0028, h01=0x0050, text=» LDK A3,/F SET UP LINE FEED COUNTER «, t00=0x004b, t01=0x0010}
0x7558…757a Head {h00=0x001e, h01=0x0050, text=»REL10 LDK A2,LF LINE FEED «, t00=0x004b, t01=0x003c}
0x757a…7590 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x004b, t01=0x005e}
0x7590…75b4 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP14 JMP IF ERROR «, t00=0x004b, t01=0x0074}
0x75b4…75e2 Head {h00=0x002a, h01=0x0050, text=» SUK A3,1 DECREMENT LINE FEED COUNTER «, t00=0x004b, t01=0x0098}
0x75e2…7606 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) REL10 ANY MORE LF ? «, t00=0x004b, t01=0x00c6}
0x7606…7628 Head {h00=0x001e, h01=0x0050, text=» CF A5,ENDBLK END OF BLOCK«, t00=0x004b, t01=0x00ea}
0x7628…764c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP14 JMP IF ERROR «, t00=0x004b, t01=0x010c}
0x764c…767a Head {h00=0x002a, h01=0x0050, text=» CF A5,GTSTAT GET STATUS FROM PRINTER «, t00=0x004b, t01=0x0130}
0x767a…76a8 Head {h00=0x002a, h01=0x0050, text=» CM DWTDEV+DWTALN,A6 RESET ACTUAL LINE«, t00=0x004b, t01=0x015e}
0x76a8…76da Head {h00=0x002e, h01=0x0050, text=» CM DWTDEV+DWTRLN,A6 RESET REQUESTED LINE «, t00=0x004b, t01=0x018c}
0x76da…770c Head {h00=0x002e, h01=0x0050, text=» CM DWTDEV+DWTCO1,A6 CLEAR COLUMN COUNTER «, t00=0x004c, t01=0x002e}
0x770c…772e Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 GET RETURN CODE«, t00=0x004c, t01=0x0060}
0x772e…7758 Head {h00=0x0026, h01=0x0050, text=»REL20 ANKL A2,/100 PRINTER RESET ?«, t00=0x004c, t01=0x0082}
0x7758…7772 Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) RCTP YES «, t00=0x004c, t01=0x00ac}
0x7772…779a Head {h00=0x0024, h01=0x0050, text=» CF A5,RESREC RESET RECOVERY BIT«, t00=0x004c, t01=0x00c6}
0x779a…77ba Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END REQUEST «, t00=0x004c, t01=0x00ee}
0x77ba…77c6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x010e}
0x77c6…77d4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x011a}
0x77d4…7818 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x004c, t01=0x0128}
0x7818…7822 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x016c}
0x7822…7834 Head {h00=0x000e, h01=0x0050, text=»* R C T P«, t00=0x004c, t01=0x0176}
0x7834…783e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0188}
0x783e…787c (77, 0, 398) Head {h00=0x003a, h01=0x0050, text=»* RECOVERY ROUTINE REPEATS RUNNING REQUEST AT POWER ON«, t00=0x004d, t01=0x0004}
0x787c…7886 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0042}
0x7886…78ca Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004d, t01=0x004c}
0x78ca…78dc Head {h00=0x000e, h01=0x0050, text=»RCTP EQU *«, t00=0x004d, t01=0x0090}
0x78dc…790a Head {h00=0x002a, h01=0x0050, text=»RCTP07 LDKL A1,/7FFF SET DEVICE BUSY «, t00=0x004d, t01=0x00a2}
0x790a…7928 Head {h00=0x001a, h01=0x0050, text=» ANS A1,DWTST,A6 BUSY «, t00=0x004d, t01=0x00d0}
0x7928…794a Head {h00=0x001e, h01=0x0050, text=» LDKL A5,DWTSB2 STACK BASE«, t00=0x004d, t01=0x00ee}
0x794a…795c Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x004d, t01=0x0110}
0x795c…7998 Head {h00=0x0038, h01=0x0050, text=» LD A1,DWTDEV+DWTSYST,A6 INTERN. SYSTEM START IND. «, t00=0x004d, t01=0x0122}
0x7998…79be Head {h00=0x0022, h01=0x0050, text=» RF(Z) RCTP10 NO SYSTEM START «, t00=0x004d, t01=0x015e}
0x79be…79cc Head {h00=0x000a, h01=0x0050, text=» * «, t00=0x004d, t01=0x0184}
0x79cc…7a06 (78, 0, 400) Head {h00=0x0036, h01=0x0050, text=» CM DWTDEV+DWTSYST,A6 SET SYSTEM START INDICATOR «, t00=0x004e, t01=0x0004}
0x7a06…7a3a Head {h00=0x0030, h01=0x0050, text=» LDKL A4,STDNCV GET STANDARD NAT. CHAR. SET «, t00=0x004e, t01=0x003e}
0x7a3a…7a68 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BIANARY TO ASCII«, t00=0x004e, t01=0x0072}
0x7a68…7a9e Head {h00=0x0032, h01=0x0050, text=» ST A4,DWTDEV+DWTDCS,A6 SET CHAR. SET DOCUMENT«, t00=0x004e, t01=0x00a0}
0x7a9e…7ad6 Head {h00=0x0034, h01=0x0050, text=» ST A4,DWTDEV+DWTPCS,A6 SET CHAR. SET CONT.STAT.«, t00=0x004e, t01=0x00d6}
0x7ad6…7b02 Head {h00=0x0028, h01=0x0050, text=» LDKL A4,PAGLEN STANDARD PAGE LENGTH«, t00=0x004e, t01=0x010e}
0x7b02…7b30 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x004e, t01=0x013a}
0x7b30…7b6a Head {h00=0x0036, h01=0x0050, text=» ST A4,DWTDEV+DWTPL,A6 SET PAGE LENGTH CONT.STAT. «, t00=0x004e, t01=0x0168}
0x7b6a…7ba4 Head {h00=0x0036, h01=0x0050, text=» LDKL A4,DOCLEN GET STANDARD PAGE LENGTH DOCUMENT «, t00=0x004f, t01=0x0012}
0x7ba4…7bd2 Head {h00=0x002a, h01=0x0050, text=» CF A5,KONVER CONVERT BINARY TO ASCII «, t00=0x004f, t01=0x004c}
0x7bd2…7c0a Head {h00=0x0034, h01=0x0050, text=» ST A4,DWTDEV+DWTDL,A6 SET PAGE LENGTH DOCUMENT «, t00=0x004f, t01=0x007a}
0x7c0a…7c40 Head {h00=0x0032, h01=0x0050, text=» LDKL A4,MATRIX GET STANDARD CHAR MATRIX FONT «, t00=0x004f, t01=0x00b2}
0x7c40…7c60 Head {h00=0x001c, h01=0x0050, text=» ORK A4,ZERO MAKE ASCII «, t00=0x004f, t01=0x00e8}
0x7c60…7c96 Head {h00=0x0032, h01=0x0050, text=» SC A4,DWTDEV+DWTCMT,A6 STORE IN DWT (TRACTOR)«, t00=0x004f, t01=0x0108}
0x7c96…7cce Head {h00=0x0034, h01=0x0050, text=» SC A4,DWTDEV+DWTCMF,A6 STORE IN DWT (FRONT/FRI)«, t00=0x004f, t01=0x013e}
0x7cce…7d06 Head {h00=0x0034, h01=0x0050, text=» LDKL A4,DENSIT GET STANDARD CHAR DENSITY/PITCH «, t00=0x004f, t01=0x0176}
0x7d06…7d26 Head {h00=0x001c, h01=0x0050, text=» ORK A4,ZERO MAKE ASCII «, t00=0x0050, t01=0x001e}
0x7d26…7d5e Head {h00=0x0034, h01=0x0050, text=» SC A4,DWTDEV+DWTCMT+1,A6 STORE IN DWT (TRACTOR)«, t00=0x0050, t01=0x003e}
0x7d5e…7d98 Head {h00=0x0036, h01=0x0050, text=» SC A4,DWTDEV+DWTCMF+1,A6 STORE IN DWT (FRONT/FRI)«, t00=0x0050, t01=0x0076}
0x7d98…7dc8 Head {h00=0x002c, h01=0x0050, text=» CF A5,GTSTAT DUMMY ST., CLEAR RESET BIT«, t00=0x0050, t01=0x00b0}
0x7dc8…7ddc Head {h00=0x0010, h01=0x0050, text=»RCTP10 EQU *«, t00=0x0050, t01=0x00e0}
0x7ddc…7e02 Head {h00=0x0022, h01=0x0050, text=» LDR A4,P GET PROGRAM COUNTER «, t00=0x0050, t01=0x00f4}
0x7e02…7e28 Head {h00=0x0022, h01=0x0050, text=» ADK A4,6 MAKE RETURN ADDRESS «, t00=0x0050, t01=0x011a}
0x7e28…7e4c Head {h00=0x0020, h01=0x0050, text=» ABL SENPAR SEND PARAMETERS «, t00=0x0050, t01=0x0140}
0x7e4c…7e86 Head {h00=0x0036, h01=0x0050, text=» CM DWTDEV+DWTALN,A6 CLEAR ACTUAL LINE (FRONT/FRI)«, t00=0x0050, t01=0x0164}
0x7e86…7eb6 Head {h00=0x002c, h01=0x0050, text=» LDKL A1,/20 INDICATE POWER OFF OCCURED «, t00=0x0051, t01=0x000e}
0x7eb6…7ed0 Head {h00=0x0016, h01=0x0050, text=» ORS A1,DWTDEV,A6 «, t00=0x0051, t01=0x003e}
0x7ed0…7ef8 Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTECB,A6 RUNNING REQUEST«, t00=0x0051, t01=0x0058}
0x7ef8…7f28 Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) ACT020 YES , REPEAT THE REQUEST«, t00=0x0051, t01=0x0080}
0x7f28…7f4a Head {h00=0x001e, h01=0x0050, text=»RCTP20 ABL LENDIS DISPATCH«, t00=0x0051, t01=0x00b0}
0x7f4a…7f58 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x00d2}
0x7f58…7f9c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0051, t01=0x00e0}
0x7f9c…7fa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0124}
0x7fa6…7fb6 Head {h00=0x000c, h01=0x0050, text=»* GTSTAT«, t00=0x0051, t01=0x012e}
0x7fb6…7fc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x013e}
0x7fc0…7fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0148}
0x7fca…800c Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE SENDS 'DEVICE STATUS REPORT TO THE PRINTER «, t00=0x0051, t01=0x0152}
0x800c…8016 (82, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0004}
0x8016…8054 Head {h00=0x003a, h01=0x0050, text=»* AND ANALYZES THE DEVICE STATUS SENT FROM THE PRINTER«, t00=0x0052, t01=0x000e}
0x8054…805e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x004c}
0x805e…8080 Head {h00=0x001e, h01=0x0050, text=»* AT EXIT A1 = RETURN CODE«, t00=0x0052, t01=0x0056}
0x8080…808a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0078}
0x808a…80ce Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0052, t01=0x0082}
0x80ce…80e2 Head {h00=0x0010, h01=0x0050, text=»GTSTAT EQU *«, t00=0x0052, t01=0x00c6}
0x80e2…8110 Head {h00=0x002a, h01=0x0050, text=» CM DWTDEV+DWTRC,A6 RESET RETURN CODE «, t00=0x0052, t01=0x00da}
0x8110…8130 Head {h00=0x001c, h01=0x0050, text=» LDK A2,/5 BLOCK LENGTH «, t00=0x0052, t01=0x0108}
0x8130…8154 Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x0052, t01=0x0128}
0x8154…8178 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP14 JMP IF ERROR «, t00=0x0052, t01=0x014c}
0x8178…81a4 Head {h00=0x0028, h01=0x0050, text=» LDKL A3,CSDSR DEVICE STATUS REPORT «, t00=0x0052, t01=0x0170}
0x81a4…81ca Head {h00=0x0022, h01=0x0050, text=»GTST02 LCR A2,A3 GET CHARACTER«, t00=0x0053, t01=0x000c}
0x81ca…81e2 Head {h00=0x0014, h01=0x0050, text=» ANK A2,/FF MASK«, t00=0x0053, t01=0x0032}
0x81e2…81fe Head {h00=0x0018, h01=0x0050, text=» SLL A2,8 SHIFT LEFT«, t00=0x0053, t01=0x004a}
0x81fe…822c Head {h00=0x002a, h01=0x0050, text=» RF(N) GTST04 END OF CONTROL SEQUENSE «, t00=0x0053, t01=0x0066}
0x822c…824a Head {h00=0x001a, h01=0x0050, text=» SRL A2,8 SHIFT RIGHT «, t00=0x0053, t01=0x0094}
0x824a…8260 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0053, t01=0x00b2}
0x8260…8284 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) ERGP14 JMP IF ERROR «, t00=0x0053, t01=0x00c8}
0x8284…82a4 Head {h00=0x001c, h01=0x0050, text=» ADK A3,1 INCR. ADDRESS «, t00=0x0053, t01=0x00ec}
0x82a4…82ca Head {h00=0x0022, h01=0x0050, text=» RB GTST02 GET NEXT CHARACTER «, t00=0x0053, t01=0x010c}
0x82ca…82f2 Head {h00=0x0024, h01=0x0050, text=»GTST04 CF A5,ENDBLK END OF BLOCK«, t00=0x0053, t01=0x0132}
0x82f2…831c Head {h00=0x0026, h01=0x0050, text=»ERGP14 RF(NZ) ERGP15 JMP IF ERROR «, t00=0x0053, t01=0x015a}
0x831c…833e Head {h00=0x001e, h01=0x0050, text=» LDR A1,A6 SAVE DWTADDRESS«, t00=0x0053, t01=0x0184}
0x833e…835c Head {h00=0x001a, h01=0x0050, text=» LDKL A4,DWTDEV+DWTTP «, t00=0x0054, t01=0x0016}
0x835c…8374 Head {h00=0x0014, h01=0x0050, text=» ADR A4,A6 TIMER«, t00=0x0054, t01=0x0034}
0x8374…839e Head {h00=0x0026, h01=0x0050, text=» CF A15,SETIMP SET TIMER, 10 SEC. «, t00=0x0054, t01=0x004c}
0x839e…83cc Head {h00=0x002a, h01=0x0050, text=» DATA ERGP00,TIME RETURN ADDRESS,TIME «, t00=0x0054, t01=0x0076}
0x83cc…83f8 Head {h00=0x0028, h01=0x0050, text=»GTST05 LDKL A4,TAB GET TABLE ADDRESS«, t00=0x0054, t01=0x00a4}
0x83f8…840c Head {h00=0x0010, h01=0x0050, text=»GTST10 EQU *«, t00=0x0054, t01=0x00d0}
0x840c…842a Head {h00=0x001a, h01=0x0050, text=» LDK A3,0 RESET INDEX «, t00=0x0054, t01=0x00e4}
0x842a…8458 Head {h00=0x002a, h01=0x0050, text=» CF A5,INPUT READ STATUS FROM PRINTER «, t00=0x0054, t01=0x0102}
0x8458…847a Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FF GET CHARACTER «, t00=0x0054, t01=0x0130}
0x847a…84a2 Head {h00=0x0024, h01=0x0050, text=» CCK A2,/5C5C STRING TERMINATOR «, t00=0x0054, t01=0x0152}
0x84a2…84bc Head {h00=0x0016, h01=0x0050, text=» RF(E) GTSEND YES «, t00=0x0054, t01=0x017a}
0x84bc…84da (85, 0, 400) Head {h00=0x001a, h01=0x0050, text=» LDR A7,A7 ORDER /00 ?«, t00=0x0055, t01=0x0004}
0x84da…84f4 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) GTST15 NO «, t00=0x0055, t01=0x0022}
0x84f4…851a Head {h00=0x0022, h01=0x0050, text=» CCK A2,/3B STRING SEPARATOR ?«, t00=0x0055, t01=0x003c}
0x851a…8534 Head {h00=0x0016, h01=0x0050, text=» RF(NE) GTST15 NO «, t00=0x0055, t01=0x0062}
0x8534…8562 Head {h00=0x002a, h01=0x0050, text=» IM DWTDEV+DWTSER,A6 IND. STRING SEP. «, t00=0x0055, t01=0x007c}
0x8562…8582 Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTDEV+DWTSER,A6 «, t00=0x0055, t01=0x00aa}
0x8582…85ae Head {h00=0x0028, h01=0x0050, text=» SUK A2,2 TWO SEPARATORS RECEIVED ? «, t00=0x0055, t01=0x00ca}
0x85ae…85d8 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) GTST30 NO, READ NEXT CHAR.«, t00=0x0055, t01=0x00f6}
0x85d8…860c Head {h00=0x0030, h01=0x0050, text=» CF A5,INPUT CHECK IF SERVICE STATUS PRESENT«, t00=0x0055, t01=0x0120}
0x860c…8624 Head {h00=0x0014, h01=0x0050, text=» ANK A2,/F MASK «, t00=0x0055, t01=0x0154}
0x8624…8636 Head {h00=0x000e, h01=0x0050, text=» CCK A2,/A«, t00=0x0055, t01=0x016c}
0x8636…865e Head {h00=0x0024, h01=0x0050, text=» RB(NL) GTST10 NO SERVICE STATUS«, t00=0x0055, t01=0x017e}
0x865e…8690 Head {h00=0x002e, h01=0x0050, text=» LDKL A4,TAB+20 INCR. ADDR. TO SERV. STAT.«, t00=0x0056, t01=0x0016}
0x8690…86be Head {h00=0x002a, h01=0x0050, text=»GTST15 LCR A3,A4 GET MASK RETURN CODE «, t00=0x0056, t01=0x0048}
0x86be…86d0 Head {h00=0x000e, h01=0x0050, text=» ANR A2,A3«, t00=0x0056, t01=0x0076}
0x86d0…86fe Head {h00=0x002a, h01=0x0050, text=» LDKL A3,/3AC0 SHIFT LEFT CIRCULAR A2 «, t00=0x0056, t01=0x0088}
0x86fe…871a Head {h00=0x0018, h01=0x0050, text=» LC A3,1,A4 A3 TIMES«, t00=0x0056, t01=0x00b6}
0x871a…8742 Head {h00=0x0024, h01=0x0050, text=» EXR A3 EXECUT SHIFT INSTRUCTION«, t00=0x0056, t01=0x00d2}
0x8742…8760 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A7 ORDER /00 ?«, t00=0x0056, t01=0x00fa}
0x8760…877a Head {h00=0x0016, h01=0x0050, text=» RF(NZ) GTST20 NO «, t00=0x0056, t01=0x0118}
0x877a…87a0 Head {h00=0x0022, h01=0x0050, text=» CW A4,TAB+20 SERVICE STATUS ?«, t00=0x0056, t01=0x0132}
0x87a0…87b8 Head {h00=0x0014, h01=0x0050, text=» RF(L) GTST20 NO«, t00=0x0056, t01=0x0158}
0x87b8…87ee Head {h00=0x0032, h01=0x0050, text=» ORS A2,ECBCW,A8 SERVICE STAT. IN CONTR. WORD «, t00=0x0056, t01=0x0170}
0x87ee…8800 Head {h00=0x000e, h01=0x0050, text=» RF GTST30«, t00=0x0057, t01=0x0016}
0x8800…8842 Head {h00=0x003e, h01=0x0050, text=»GTST20 ORS A2,DWTDEV+DWTRC,A6 SAVE RETURN CODE TEMPORARILY«, t00=0x0057, t01=0x0028}
0x8842…886a Head {h00=0x0024, h01=0x0050, text=»GTST30 ADK A4,2 INCREMENT ADRESS«, t00=0x0057, t01=0x006a}
0x886a…8896 Head {h00=0x0028, h01=0x0050, text=» RB GTST10 GET NEXT STATUS CHARACTER«, t00=0x0057, t01=0x0092}
0x8896…88aa Head {h00=0x0010, h01=0x0050, text=»GTSEND EQU *«, t00=0x0057, t01=0x00be}
0x88aa…88d8 Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTDEV+DWTRC,A6 GET RETURN CODE«, t00=0x0057, t01=0x00d2}
0x88d8…890c Head {h00=0x0030, h01=0x0050, text=» CM DWTDEV+DWTSER,A6 CLEAR STRING SEP. IND. «, t00=0x0057, t01=0x0100}
0x890c…892a Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTDEV+DWTTP,A6«, t00=0x0057, t01=0x0134}
0x892a…8956 Head {h00=0x0028, h01=0x0050, text=» RF(Z) GTST40 CHECK IF ALLREADY ZERO«, t00=0x0057, t01=0x0152}
0x8956…897e Head {h00=0x0024, h01=0x0050, text=» CM* DWTDEV+DWTTP,A6 RESET TIMER«, t00=0x0057, t01=0x017e}
0x897e…89b4 Head {h00=0x0032, h01=0x0050, text=»GTST40 CM DWTDEV+DWTTP,A6 RESET TIMER POINTER «, t00=0x0058, t01=0x0016}
0x89b4…89c8 Head {h00=0x0010, h01=0x0050, text=»GTST50 EQU *«, t00=0x0058, t01=0x004c}
0x89c8…89d8 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0058, t01=0x0060}
0x89d8…89e6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0058, t01=0x0070}
0x89e6…8a2a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0058, t01=0x007e}
0x8a2a…8a34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00c2}
0x8a34…8a72 Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE CONVERTS A BINARY VALUE TO ASCII CODE«, t00=0x0058, t01=0x00cc}
0x8a72…8a7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x010a}
0x8a7c…8a92 Head {h00=0x0012, h01=0x0050, text=»* REGISTERS : «, t00=0x0058, t01=0x0114}
0x8a92…8ab0 Head {h00=0x001a, h01=0x0050, text=»* A1= WORK REGISTER «, t00=0x0058, t01=0x012a}
0x8ab0…8acc Head {h00=0x0018, h01=0x0050, text=»* A4= BINARY INPUT«, t00=0x0058, t01=0x0148}
0x8acc…8aec Head {h00=0x001c, h01=0x0050, text=»* A2,A4= ASCII OUTPUT «, t00=0x0058, t01=0x0164}
0x8aec…8af6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0184}
0x8af6…8b00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x018e}
0x8b00…8b14 Head {h00=0x0010, h01=0x0050, text=»KONVER EQU *«, t00=0x0059, t01=0x0008}
0x8b14…8b2c Head {h00=0x0014, h01=0x0050, text=»* BINARY TO DEC.«, t00=0x0059, t01=0x001c}
0x8b2c…8b46 Head {h00=0x0016, h01=0x0050, text=» LDK A2,0 CLEAR A2«, t00=0x0059, t01=0x0034}
0x8b46…8b68 Head {h00=0x001e, h01=0x0050, text=» CWK A4,100 VALUE > 100 ? «, t00=0x0059, t01=0x004e}
0x8b68…8b80 Head {h00=0x0014, h01=0x0050, text=» RF(L) KONV05 NO«, t00=0x0059, t01=0x0070}
0x8b80…8b94 Head {h00=0x0010, h01=0x0050, text=» SUKL A4,100«, t00=0x0059, t01=0x0088}
0x8b94…8bbe Head {h00=0x0026, h01=0x0050, text=» LDKL A2,/100 LEFT BYTE OF A2=X=1 «, t00=0x0059, t01=0x009c}
0x8bbe…8bec Head {h00=0x002a, h01=0x0050, text=»KONV05 CWK A4,10 ARE THERE ANY TENS ? «, t00=0x0059, t01=0x00c6}
0x8bec…8c04 Head {h00=0x0014, h01=0x0050, text=» RF(L) KONV04 NO«, t00=0x0059, t01=0x00f4}
0x8c04…8c16 Head {h00=0x000e, h01=0x0050, text=» SUK A4,10«, t00=0x0059, t01=0x010c}
0x8c16…8c4c Head {h00=0x0032, h01=0x0050, text=» ADK A2,/1 NUMBER OF TENS IN RIGHT B. OF A2=Y «, t00=0x0059, t01=0x011e}
0x8c4c…8c64 Head {h00=0x0014, h01=0x0050, text=» RB KONV05 NEXT «, t00=0x0059, t01=0x0154}
0x8c64…8c8a Head {h00=0x0022, h01=0x0050, text=»KONV04 ORKL A2,/3030 XY IN A2 «, t00=0x0059, t01=0x016c}
0x8c8a…8ca6 (90, 0, 400) Head {h00=0x0018, h01=0x0050, text=» ORK A4,/30 Z IN A4 «, t00=0x005a, t01=0x0004}
0x8ca6…8cc0 Head {h00=0x0016, h01=0x0050, text=» SRC A2,8 YX IN A2«, t00=0x005a, t01=0x0020}
0x8cc0…8cd2 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x005a, t01=0x003a}
0x8cd2…8cf6 Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/FF00 KEEP Y IN A1 «, t00=0x005a, t01=0x004c}
0x8cf6…8d28 Head {h00=0x002e, h01=0x0050, text=» ANK A2,/FF KEEP X IN R. BYTE OF A2. ASCII«, t00=0x005a, t01=0x0070}
0x8d28…8d4a Head {h00=0x001e, h01=0x0050, text=» ORR A4,A1 YZ IN A1. ASCII«, t00=0x005a, t01=0x00a2}
0x8d4a…8d5a Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005a, t01=0x00c4}
0x8d5a…8d68 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005a, t01=0x00d4}
0x8d68…8d8a Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x005a, t01=0x00e2}
0x8d8a…8da4 Head {h00=0x0016, h01=0x0050, text=»* RESET RECORVERY «, t00=0x005a, t01=0x0104}
0x8da4…8dae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x011e}
0x8dae…8dc2 Head {h00=0x0010, h01=0x0050, text=»RESREC EQU *«, t00=0x005a, t01=0x0128}
0x8dc2…8de8 Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTDEV,A6 DEVICE STATUS«, t00=0x005a, t01=0x013c}
0x8de8…8e06 Head {h00=0x001a, h01=0x0050, text=» ANKL A4,/20 RECOVERY?«, t00=0x005a, t01=0x0162}
0x8e06…8e20 Head {h00=0x0016, h01=0x0050, text=» RF(E) RESRTN NO. «, t00=0x005a, t01=0x0180}
0x8e20…8e52 Head {h00=0x002e, h01=0x0050, text=» XRS A4,DWTDEV,A6 YES. RESET RECOVERY BIT «, t00=0x005b, t01=0x000a}
0x8e52…8e88 Head {h00=0x0032, h01=0x0050, text=» ORKL A1,/100 INDIC. RECOV. IN RET. CODE BIT7 «, t00=0x005b, t01=0x003c}
0x8e88…8ea4 Head {h00=0x0018, h01=0x0050, text=»RESRTN RTN A5 RETURN«, t00=0x005b, t01=0x0072}
0x8ea4…8eae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x008e}
0x8eae…8eb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0098}
0x8eb8…8ef2 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x005b, t01=0x00a2}
0x8ef2…8efc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00dc}
0x8efc…8f2e Head {h00=0x002e, h01=0x0050, text=»* ERROR ROUTINE FOR STABLK,OUTPUT, ENDBLK «, t00=0x005b, t01=0x00e6}
0x8f2e…8f42 Head {h00=0x0010, h01=0x0050, text=»* AND TIMER.«, t00=0x005b, t01=0x0118}
0x8f42…8f4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x012c}
0x8f4c…8f60 Head {h00=0x0010, h01=0x0050, text=»ERGP00 EQU *«, t00=0x005b, t01=0x0136}
0x8f60…8f86 Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RESTORE DWTADDRESS «, t00=0x005b, t01=0x014a}
0x8f86…8fb6 Head {h00=0x002c, h01=0x0050, text=» CM DWTDEV+DWTTP,A6 RESET TIMER POINTER «, t00=0x005b, t01=0x0170}
0x8fb6…8fc8 Head {h00=0x000e, h01=0x0050, text=» RF ERGP20«, t00=0x005c, t01=0x0010}
0x8fc8…8fdc Head {h00=0x0010, h01=0x0050, text=»ERGP15 EQU *«, t00=0x005c, t01=0x0022}
0x8fdc…9010 Head {h00=0x0030, h01=0x0050, text=» ANK A1,/1A OUTP. ERR, SOFTW. T-OUT,LRC-ERR «, t00=0x005c, t01=0x0036}
0x9010…9034 Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) RCTP YES, RECOVERY «, t00=0x005c, t01=0x006a}
0x9034…9048 Head {h00=0x0010, h01=0x0050, text=»ERGP17 EQU *«, t00=0x005c, t01=0x008e}
0x9048…905e Head {h00=0x0012, h01=0x0050, text=» IFF REQEND=1 «, t00=0x005c, t01=0x00a2}
0x905e…907a Head {h00=0x0018, h01=0x0050, text=» ABL LDISP DISPATCH «, t00=0x005c, t01=0x00b8}
0x907a…9086 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x00d4}
0x9086…90ae Head {h00=0x0024, h01=0x0050, text=»ERGP20 LDK A1,1 SET NOT OPERABLE«, t00=0x005c, t01=0x00e0}
0x90ae…90d6 Head {h00=0x0024, h01=0x0050, text=»ERGP30 ABL LENDIS END OF REQUEST«, t00=0x005c, t01=0x0108}
0x90d6…90e4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005c, t01=0x0130}
0x90e4…9124 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x005c, t01=0x013e}
0x9124…912e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x017e}
0x912e…9140 Head {h00=0x000e, h01=0x0050, text=»* S E N D «, t00=0x005c, t01=0x0188}
0x9140…914a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x000a}
0x914a…917a Head {h00=0x002c, h01=0x0050, text=»* THIS ROUTINE SENDS AN CONTROL SEQUENCE«, t00=0x005d, t01=0x0014}
0x917a…9192 Head {h00=0x0014, h01=0x0050, text=»* TO THE PRINTER«, t00=0x005d, t01=0x0044}
0x9192…919c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x005c}
0x919c…91a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0066}
0x91a6…91ba Head {h00=0x0010, h01=0x0050, text=»* AT ENTRY :«, t00=0x005d, t01=0x0070}
0x91ba…91e0 Head {h00=0x0022, h01=0x0050, text=»* A2 = CONTROL SEQUENCE ADRESS«, t00=0x005d, t01=0x0084}
0x91e0…9218 Head {h00=0x0034, h01=0x0050, text=»* A3 = DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC «, t00=0x005d, t01=0x00aa}
0x9218…9222 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00e2}
0x9222…922c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00ec}
0x922c…9240 Head {h00=0x0010, h01=0x0050, text=»* AT EXIT : «, t00=0x005d, t01=0x00f6}
0x9240…9260 Head {h00=0x001c, h01=0x0050, text=»* A1,A2,A3 IS DESTROYED «, t00=0x005d, t01=0x010a}
0x9260…926a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x012a}
0x926a…9274 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0134}
0x9274…927e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x013e}
0x927e…92a6 Head {h00=0x0024, h01=0x0050, text=»SEND EQU * SEND CONTROL SEQUENCE«, t00=0x005d, t01=0x0148}
0x92a6…92dc Head {h00=0x0032, h01=0x0050, text=» ST A3,DWTDEV+DWTDISP,A6 SAVE DWT-DISPLACEMENT«, t00=0x005d, t01=0x0170}
0x92dc…9314 Head {h00=0x0034, h01=0x0050, text=» ST A2,DWTDEV+DWTSTR,A6 CONTROL SEQUENCE ADRESS «, t00=0x005e, t01=0x0016}
0x9314…9328 Head {h00=0x0010, h01=0x0050, text=»SEND10 EQU *«, t00=0x005e, t01=0x004e}
0x9328…9364 Head {h00=0x0038, h01=0x0050, text=» LD A3,DWTDEV+DWTSTR,A6 GET CONTROL SEQUENCE ADRESS «, t00=0x005e, t01=0x0062}
0x9364…9384 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x005e, t01=0x009e}
0x9384…93a6 Head {h00=0x001e, h01=0x0050, text=» ANK A2,/FF MAKE CHARACTER«, t00=0x005e, t01=0x00be}
0x93a6…93d0 Head {h00=0x0026, h01=0x0050, text=» SLL A2,8 END OF CONTROL SEQUENCE «, t00=0x005e, t01=0x00e0}
0x93d0…93f2 Head {h00=0x001e, h01=0x0050, text=» RF(N) SENDEND YES,RETURN «, t00=0x005e, t01=0x010a}
0x93f2…941c Head {h00=0x0026, h01=0x0050, text=» CWK A2,/3000 LINE NO,CHAR.SET,ETC«, t00=0x005e, t01=0x012c}
0x941c…9436 Head {h00=0x0016, h01=0x0050, text=» RF(E) SEND30 YES «, t00=0x005e, t01=0x0156}
0x9436…9462 Head {h00=0x0028, h01=0x0050, text=» SRL A2,8 PREPARE TO SEND CHARACTER «, t00=0x005e, t01=0x0170}
0x9462…9486 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x005f, t01=0x000c}
0x9486…94aa Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ERGP15 JMP IF ERROR «, t00=0x005f, t01=0x0030}
0x94aa…94be Head {h00=0x0010, h01=0x0050, text=»SEND20 EQU *«, t00=0x005f, t01=0x0054}
0x94be…94f6 Head {h00=0x0034, h01=0x0050, text=» IM DWTDEV+DWTSTR,A6 INC. CONTROLSEQUENCE ADRESS«, t00=0x005f, t01=0x0068}
0x94f6…9512 Head {h00=0x0018, h01=0x0050, text=» RB SEND10 GET NEXT «, t00=0x005f, t01=0x00a0}
0x9512…9526 Head {h00=0x0010, h01=0x0050, text=»SEND30 EQU *«, t00=0x005f, t01=0x00bc}
0x9526…955c Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTDEV+DWTDISP,A6 GET DWT-DISPLACEMENT «, t00=0x005f, t01=0x00d0}
0x955c…9580 Head {h00=0x0020, h01=0x0050, text=» ADR A3,A6 GET PROPER VALUE «, t00=0x005f, t01=0x0106}
0x9580…95a0 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER«, t00=0x005f, t01=0x012a}
0x95a0…95c4 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x005f, t01=0x014a}
0x95c4…95e8 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ERGP15 JMP IF ERROR «, t00=0x005f, t01=0x016e}
0x95e8…961e (96, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IM DWTDEV+DWTDISP,A6 INC. DISPLACEMENT ADRESS«, t00=0x0060, t01=0x0004}
0x961e…963a Head {h00=0x0018, h01=0x0050, text=» RB SEND20 GET NEXT «, t00=0x0060, t01=0x003a}
0x963a…9650 Head {h00=0x0012, h01=0x0050, text=»SENDEND EQU * «, t00=0x0060, t01=0x0056}
0x9650…9660 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0060, t01=0x006c}
0x9660…966e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0060, t01=0x007c}
0x966e…96b2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0060, t01=0x008a}
0x96b2…96bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00ce}
0x96bc…96cc Head {h00=0x000c, h01=0x0050, text=»* SENPAR«, t00=0x0060, t01=0x00d8}
0x96cc…96d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00e8}
0x96d6…971c Head {h00=0x0042, h01=0x0050, text=»* THIS ROUTINE SENDS THE PRINTER PARAMETERS TO THE SUBDEVICE«, t00=0x0060, t01=0x00f2}
0x971c…9726 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0138}
0x9726…973a Head {h00=0x0010, h01=0x0050, text=»SENPAR EQU *«, t00=0x0060, t01=0x0142}
0x973a…974e Head {h00=0x0010, h01=0x0050, text=» LDK A2,/1A «, t00=0x0060, t01=0x0156}
0x974e…9764 Head {h00=0x0012, h01=0x0050, text=» CF A5,STABLK «, t00=0x0060, t01=0x016a}
0x9764…978e Head {h00=0x0026, h01=0x0050, text=»ERGP16 RB(NZ) ERGP15 JMP IF ERROR «, t00=0x0060, t01=0x0180}
0x978e…97a4 Head {h00=0x0012, h01=0x0050, text=» IFT SPEEDY=1 «, t00=0x0061, t01=0x001a}
0x97a4…97ba Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSSM «, t00=0x0061, t01=0x0030}
0x97ba…97d8 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTHSP«, t00=0x0061, t01=0x0046}
0x97d8…9802 Head {h00=0x0026, h01=0x0050, text=» CF A5,SEND SEND SELECT HIGH SPEED«, t00=0x0061, t01=0x0064}
0x9802…980e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x008e}
0x980e…982a Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0061, t01=0x009a}
0x982a…9850 Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTDEV,A6 GET DWTINDEX «, t00=0x0061, t01=0x00b6}
0x9850…9862 Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x0061, t01=0x00dc}
0x9862…9878 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEN10 «, t00=0x0061, t01=0x00ee}
0x9878…9884 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0104}
0x9884…98aa Head {h00=0x0022, h01=0x0050, text=» LDKL A3,CSRM SET TRACTOR MODE«, t00=0x0061, t01=0x0110}
0x98aa…98be Head {h00=0x0010, h01=0x0050, text=» CF A5,SEN40«, t00=0x0061, t01=0x0136}
0x98be…98d6 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,CSSLPL «, t00=0x0061, t01=0x014a}
0x98d6…98f4 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTPL «, t00=0x0061, t01=0x0162}
0x98f4…9922 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND SELECTED PAGE LENGTH «, t00=0x0061, t01=0x0180}
0x9922…9938 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSSNV«, t00=0x0062, t01=0x001e}
0x9938…9956 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTPCS«, t00=0x0062, t01=0x0034}
0x9956…9986 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND NATIONAL CHAR VARIATION«, t00=0x0062, t01=0x0052}
0x9986…999c Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSCPL«, t00=0x0062, t01=0x0082}
0x999c…99ba Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTCMF«, t00=0x0062, t01=0x0098}
0x99ba…99e8 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND CHAR. MATRIX & PITCH «, t00=0x0062, t01=0x00b6}
0x99e8…99fa Head {h00=0x000e, h01=0x0050, text=» RF SEN20 «, t00=0x0062, t01=0x00e4}
0x99fa…9a04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x00f6}
0x9a04…9a20 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0062, t01=0x0100}
0x9a20…9a34 Head {h00=0x0010, h01=0x0050, text=»SEN10 EQU * «, t00=0x0062, t01=0x011c}
0x9a34…9a4a Head {h00=0x0012, h01=0x0050, text=» IFT SINHAN=0 «, t00=0x0062, t01=0x0130}
0x9a4a…9a74 Head {h00=0x0026, h01=0x0050, text=» LDKL A3,CSSM SET FRONT FEED MODE «, t00=0x0062, t01=0x0146}
0x9a74…9a88 Head {h00=0x0010, h01=0x0050, text=» CF A5,SEN40«, t00=0x0062, t01=0x0170}
0x9a88…9a94 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0062, t01=0x0184}
0x9a94…9ab0 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0062, t01=0x0190}
0x9ab0…9ac8 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,CSSLPL «, t00=0x0063, t01=0x001c}
0x9ac8…9ae6 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTDL «, t00=0x0063, t01=0x0034}
0x9ae6…9b14 Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND SELECTED PAGE LENGTH «, t00=0x0063, t01=0x0052}
0x9b14…9b2a Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSSNV«, t00=0x0063, t01=0x0080}
0x9b2a…9b48 Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTDCS«, t00=0x0063, t01=0x0096}
0x9b48…9b78 Head {h00=0x002c, h01=0x0050, text=» CF A5,SEND SEND NATIONAL CHAR VARIATION«, t00=0x0063, t01=0x00b4}
0x9b78…9b8e Head {h00=0x0012, h01=0x0050, text=» LDKL A2,CSCPL«, t00=0x0063, t01=0x00e4}
0x9b8e…9bac Head {h00=0x001a, h01=0x0050, text=» LDKL A3,DWTDEV+DWTCMT«, t00=0x0063, t01=0x00fa}
0x9bac…9bda Head {h00=0x002a, h01=0x0050, text=» CF A5,SEND SEND CHAR. MATRIX & PITCH «, t00=0x0063, t01=0x0118}
0x9bda…9be6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x0146}
0x9be6…9c0e Head {h00=0x0024, h01=0x0050, text=»SEN20 CF A5,ENDBLK END OF BLOCK «, t00=0x0063, t01=0x0152}
0x9c0e…9c32 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ERGP16 JMP IF ERROR «, t00=0x0063, t01=0x017a}
0x9c32…9c48 Head {h00=0x0012, h01=0x0050, text=» ABR A4 RETURN«, t00=0x0064, t01=0x000e}
0x9c48…9c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0024}
0x9c52…9c60 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0064, t01=0x002e}
0x9c60…9c96 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0064, t01=0x003c}
0x9c96…9ca0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0072}
0x9ca0…9ce2 Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE SENDS A CONTR. SEQ. WITHOUT DWT REFERENCE«, t00=0x0064, t01=0x007c}
0x9ce2…9d12 Head {h00=0x002c, h01=0x0050, text=»* AT ENTRY : A3= CONTROL SEQ, ADDRESS «, t00=0x0064, t01=0x00be}
0x9d12…9d1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00ee}
0x9d1c…9d34 Head {h00=0x0014, h01=0x0050, text=»SEN40 LCR A2,A3 «, t00=0x0064, t01=0x00f8}
0x9d34…9d4c Head {h00=0x0014, h01=0x0050, text=» ANK A2,/FF MASK«, t00=0x0064, t01=0x0110}
0x9d4c…9d68 Head {h00=0x0018, h01=0x0050, text=» SLL A2,8 SHIFT LEFT«, t00=0x0064, t01=0x0128}
0x9d68…9d8c Head {h00=0x0020, h01=0x0050, text=» RF(N) SEN50 END OF SEQUENSE«, t00=0x0064, t01=0x0144}
0x9d8c…9daa Head {h00=0x001a, h01=0x0050, text=» SRL A2,8 SHIFT RIGHT «, t00=0x0064, t01=0x0168}
0x9daa…9dc0 Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0064, t01=0x0186}
0x9dc0…9de4 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ERGP16 JMP IF ERROR «, t00=0x0065, t01=0x000c}
0x9de4…9e04 Head {h00=0x001c, h01=0x0050, text=» ADK A3,1 INCR. ADDRESS «, t00=0x0065, t01=0x0030}
0x9e04…9e24 Head {h00=0x001c, h01=0x0050, text=» RB SEN40 GET NEXT CHAR.«, t00=0x0065, t01=0x0050}
0x9e24…9e52 Head {h00=0x002a, h01=0x0050, text=»SEN50 RTN A5 RETURN & SEND PARAMETERS «, t00=0x0065, t01=0x0070}
0x9e52…9e60 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0065, t01=0x009e}
0x9e60…9ea4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0065, t01=0x00ac}
0x9ea4…9eae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00f0}
0x9eae…9ebe Head {h00=0x000c, h01=0x0050, text=»* BINARY«, t00=0x0065, t01=0x00fa}
0x9ebe…9ec8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x010a}
0x9ec8…9f04 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CONVERTS ASCII CODE TO A BINARY VALUE«, t00=0x0065, t01=0x0114}
0x9f04…9f0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0150}
0x9f0e…9f22 Head {h00=0x0010, h01=0x0050, text=»* REGISTERS:«, t00=0x0065, t01=0x015a}
0x9f22…9f3c Head {h00=0x0016, h01=0x0050, text=»* A1= ASCII INPUT «, t00=0x0065, t01=0x016e}
0x9f3c…9f58 Head {h00=0x0018, h01=0x0050, text=»* A2= WORK REGISTER «, t00=0x0065, t01=0x0188}
0x9f58…9f74 Head {h00=0x0018, h01=0x0050, text=»* A3= BINARY OUTPUT «, t00=0x0066, t01=0x0014}
0x9f74…9f7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0030}
0x9f7e…9f88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x003a}
0x9f88…9f92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0044}
0x9f92…9fb4 Head {h00=0x001e, h01=0x0050, text=»BINARY SUR A3,A3 CLEAR A3 «, t00=0x0066, t01=0x004e}
0x9fb4…9fd6 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 MAX. LINE ASCII«, t00=0x0066, t01=0x0070}
0x9fd6…9fe8 Head {h00=0x000e, h01=0x0050, text=» SRL A2,8 «, t00=0x0066, t01=0x0092}
0x9fe8…9ffc Head {h00=0x0010, h01=0x0050, text=» SUK A2,/30 «, t00=0x0066, t01=0x00a4}
0x9ffc…a00e Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0066, t01=0x00b8}
0xa00e…a020 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0066, t01=0x00ca}
0xa020…a032 Head {h00=0x000e, h01=0x0050, text=» SLL A2,3 «, t00=0x0066, t01=0x00dc}
0xa032…a044 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A2«, t00=0x0066, t01=0x00ee}
0xa044…a056 Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0066, t01=0x0100}
0xa056…a07a Head {h00=0x0020, h01=0x0050, text=» ADR A3,A1 MAX. LINE BINARY «, t00=0x0066, t01=0x0112}
0xa07a…a08a Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0066, t01=0x0136}
0xa08a…a098 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0066, t01=0x0146}
0xa098…a0be Head {h00=0x0022, h01=0x0050, text=»LINNUM EQU *-2 NUMBER OF LINES«, t00=0x0066, t01=0x0154}
0xa0be…a0de Head {h00=0x001c, h01=0x0050, text=» DATA /3135,/3138,/3234 «, t00=0x0066, t01=0x017a}
0xa0de…a104 Head {h00=0x0022, h01=0x0050, text=» DATA /3235,/3330,/3333,/3335 «, t00=0x0067, t01=0x000a}
0xa104…a12a Head {h00=0x0022, h01=0x0050, text=» DATA /3336,/3438,/3530,/3531 «, t00=0x0067, t01=0x0030}
0xa12a…a150 Head {h00=0x0022, h01=0x0050, text=» DATA /3630,/3636,/3730,/3732 «, t00=0x0067, t01=0x0056}
0xa150…a15a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x007c}
0xa15a…a164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0086}
0xa164…a16e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0090}
0xa16e…a178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x009a}
0xa178…a1b2 Head {h00=0x0036, h01=0x0050, text=»NCVTAB EQU *-2 NATIONAL CHARACTER VARIATION YABLE «, t00=0x0067, t01=0x00a4}
0xa1b2…a1d8 Head {h00=0x0022, h01=0x0050, text=» DATA /3031,/3032,/3033,/3034 «, t00=0x0067, t01=0x00de}
0xa1d8…a1fe Head {h00=0x0022, h01=0x0050, text=» DATA /3035,/3036,/3037,/3038 «, t00=0x0067, t01=0x0104}
0xa1fe…a224 Head {h00=0x0022, h01=0x0050, text=» DATA /3039,/3130,/3131,/3131 «, t00=0x0067, t01=0x012a}
0xa224…a244 Head {h00=0x001c, h01=0x0050, text=» DATA /3133,/3134,/3135 «, t00=0x0067, t01=0x0150}
0xa244…a280 Head {h00=0x0038, h01=0x0050, text=»TAB EQU * MASK TABLE FOR STATUS REPORT FROM PRINTER «, t00=0x0067, t01=0x0170}
0xa280…a2a2 Head {h00=0x001e, h01=0x0050, text=» DATA /C0,/C0,/C0,/2CC * «, t00=0x0068, t01=0x001c}
0xa2a2…a2c4 Head {h00=0x001e, h01=0x0050, text=» DATA /2CF,/1C8,/C0,/C0 * «, t00=0x0068, t01=0x003e}
0xa2c4…a2e4 Head {h00=0x001c, h01=0x0050, text=» DATA /C0,/C0,/FC8,/FC0 «, t00=0x0068, t01=0x0060}
0xa2e4…a2fa Head {h00=0x0012, h01=0x0050, text=» DATA /C0,/C0 «, t00=0x0068, t01=0x0080}
0xa2fa…a32a Head {h00=0x002c, h01=0x0050, text=»PRITAB EQU * BRANCH ADDRESSES ORDER /24 «, t00=0x0068, t01=0x0096}
0xa32a…a33e Head {h00=0x0010, h01=0x0050, text=» DATA PRI50 «, t00=0x0068, t01=0x00c6}
0xa33e…a352 Head {h00=0x0010, h01=0x0050, text=» DATA PRI40 «, t00=0x0068, t01=0x00da}
0xa352…a366 Head {h00=0x0010, h01=0x0050, text=» DATA PRI30 «, t00=0x0068, t01=0x00ee}
0xa366…a37a Head {h00=0x0010, h01=0x0050, text=» DATA PRI20 «, t00=0x0068, t01=0x0102}
0xa37a…a3aa Head {h00=0x002c, h01=0x0050, text=»FROTAB EQU * BRANCH ADDRESSES ORDER /24 «, t00=0x0068, t01=0x0116}
0xa3aa…a3c6 Head {h00=0x0018, h01=0x0050, text=» IFT SINHAN+FFDEV=1 «, t00=0x0068, t01=0x0146}
0xa3c6…a3da Head {h00=0x0010, h01=0x0050, text=» DATA FRO50 «, t00=0x0068, t01=0x0162}
0xa3da…a3ee Head {h00=0x0010, h01=0x0050, text=» DATA FRO40 «, t00=0x0068, t01=0x0176}
0xa3ee…a402 Head {h00=0x0010, h01=0x0050, text=» DATA FRO30 «, t00=0x0068, t01=0x018a}
0xa402…a416 Head {h00=0x0010, h01=0x0050, text=» DATA FRO20 «, t00=0x0069, t01=0x000e}
0xa416…a422 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x0022}
0xa422…a44a Head {h00=0x0024, h01=0x0050, text=»LINTAB EQU *-2 LINE SPACE TABLE «, t00=0x0069, t01=0x002e}
0xa44a…a476 Head {h00=0x0028, h01=0x0050, text=» DATA /3033,/3034,/3036,/3038,/3132 «, t00=0x0069, t01=0x0056}
0xa476…a496 Head {h00=0x001c, h01=0x0050, text=» DATA /3136,/3234,/3438 «, t00=0x0069, t01=0x0082}
0xa496…a4a2 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0069, t01=0x00a2}
0xa4a2…a4a6 Head {h00=0x4004, h01=0x0000}
0xa4a6…a4aa 00 69 00 ae ┆ i ┆
0xa4aa…a4b2 (106, 2, 8) 40 04 00 00 00 6a 00 04 ┆@ j ┆
0xa4b2…a4ba (107, 1, 8) 20 04 00 00 00 6b 00 04 ┆ k ┆
0xa4ba…a50a (108, 0, 400) 01 01 8f 20 33 06 f7 a1 29 d4 86 35 82 55 00 02 87 1c 50 24 a3 20 70 00 54 14 83 58 00 02 23 80 50 0c 83 54 00 28 50 06 03 80 e3 55 00 28 22 ff b2 5d 00 22 f7 a1 27 34 e2 59 00 06 8f 20 10 80 87 1c 54 02 87 14 84 5c 00 0e 50 0e ee 10 58 18 ┆ 3 ) 5 U P$ p T X # P T (P U (" ] " '4 Y T P X ┆
0xa50a…a55a 83 50 00 10 50 0a 84 0c 5f 0e 86 5d 00 0e 57 04 86 51 00 10 a0 59 00 10 5f 32 84 40 23 0c 1c 02 54 08 97 a0 00 02 28 40 80 3e 20 bf 85 50 23 0c 58 14 ec 20 00 0a 52 14 03 40 f0 55 00 0a 53 06 03 00 f7 a1 27 34 83 55 00 26 57 04 f0 55 00 0a ┆ P P _ ] W Q Y _2 @# T (@ > P# X R @ U S '4 U &W U ┆
0xa55a…a5aa 86 34 58 36 ee 20 00 01 58 3c a0 35 02 00 f7 a1 28 62 5f 46 81 3f 81 40 29 f4 11 02 e9 20 31 c6 54 04 81 20 29 f6 81 41 29 f4 82 25 81 3e 97 a0 00 02 80 3e 29 f4 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ 4X6 X< 5 (b_F ? @) 1 T ) A) % > >) ┆
0xa5aa…a5fa 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0xa5fa…a64a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 28 00 00 11 00 00 02 01 00 20 00 89 28 20 00 00 00 00 00 00 00 00 00 00 ┆ ( ( ┆