Epson FX manuals
Computer Equipment > Printer
When we buy new device such as Epson FX we often through away most of the documentation but the warranty.
Very often issues with Epson FX begin only after the warranty period ends and you may want to find how to repair it or just do some service work.
Even oftener it is hard to remember what does each function in Printer Epson FX is responsible for and what options to choose for expected result.
Fortunately you can find all manuals for Printer on our side using links below.
268 pages 1.99 Mb
2 FCC COMPLIANCE STATEMENTFOR AMERICAN USERS Copyright© 1984 by Epson America, Inc Torrance, California 3 Preface4 PR#130 FOR D=1 TO 17: PRINT "ROW";D 39 FOR D=1 TO LPRINT CHR$(27);CHR$(52) 5 10 LPRINT CHR$(27)"G";"DOUBLE-STRIKEPRINT10 LPRINT CHR$(27)"GDOUBLE-STRIKEPRINTWhen the presence of one or more blank spaces in a program line is SAMPLE STRINGmeans that you should type in one blank space for each LPRINT "AND EASY TO TURN OFF 10 LPRINT CHR$(27)"@" 'Reset Code 99' Data lines for graphicsWe use the caret symbol (ˆ) to indicate exponents. For example: x = Yˆ2 6 Yˆ2When we refer to an FX mode by name, we capitalize it: Compressed Mode Italic Mode Pica Mode Script Modes 7 FX Series Printer User’s ManualVolume 1 ContentsConventions Used in This Manual List Figures List of Tables Introduction Inside Programmer’s Easy Lesson First Ticket Program Ticket Program Description The FX Printers Supplies and Accessories Printer Covers DIP switches Ribbon Paper FX-80: built-intractor feed FX-80and FX-100:friction feed FX-80and FX-100:removable 8 2BASIC and the PrinterBASIC Communications Character strings BASIC print commands ASCII and BASIC basics Control codes Change Commands Reset Code Mode cancelling codes DELete and CANcel Alternate Formats for ESCape Sequences Dot-MatrixPrinting Main columns Intermediate positions Modes for Pitches Pica and Elite Modes Compressed Mode Mode priorities Pitch Mode Combinations Expanded Mode Multiple print pitches on one line 4 Print Quality Bold Modes Double-StrikeMode Emphasized Mode Proportional Mode Mixing Modes 5 Dress-UpModes and Master Select FourModes Underline Mode Script Modes: Super and Sub Italic Mode More Mode Combinations Master Select Master Select combinations 9 Special Printing FeaturesInternational Immediate-PrintMode (FX-80only) Line Spacing and Line Feeds Forms Control Form Length 10 Margins and TabsMargins and pitches Right Variable horizontal tabs 10 Introduction to Dot Graphics Print Head Slash Large Wave Varieties of Graphics Density Graphics and low ASCII codes Density High-Speed Double-DensityGraphics Mode Low-Speed Double-DensityGraphics Mode Quadruple-DensityGraphics Mode More Graphics Programming Tips Nine-PinGraphics Mode 11 12 Design Your Own GraphicsPlanning 13 Plotter Graphics 14Symmetrical Graphics Patterns 15User-DefinedCharacters 12 Combining User-DefinedCharactersGiant Letters: Double High and Double Wide Business Application 999 REM: The End 13 List of Figures17 List of Tables18 Introduction•Program debugging mode (hexadecimal dump of codes received from the computer) •Fast print speed-160characters per second-forrapid processing of documents •2K print buffer for smooth operation •Adjustable tractor unit for narrow forms •Both friction- and tractor-feedcapability •Replaceable print head •Easy-to-reachDIP switches to customize printer features •Epson reliability, quality, and support that 19 Inside the PrinterInside This Manual 24 Programmer’s Easy Lesson25 70FOR X=1 TO 11: READ D: LPRINT G-K@(D);:NEXT90FOR X=1 TO N: LPRINT CHR$(95);: NEXT X: LPRINT E$"A"CHR$(6) Figure Easy-2.Ticket to success 27 Ticket Program Description30 Uses the ESCape ":” sequence to copy the entire ROM character set into RAM 40 Designates RAM as the source for the active character set 50 Prepares the printer to redefine characters “0” through “:“ 80 Turns on the Unidirectional Print Mode back to 7/72-inch 28 120 Prints another line of borders150 Produces two more border lines and 2 produces the top of the 180 Prints the bottom half of the FX letters 190Turns OFF the codes, prints PRINTERS in Subscript, then prints a border 200 Prints borders 250Prints the outside borders and the bottom of the inside border 260Prints the outside borders and sets line spacing to 1/72-inch 270Prints the bottom of the outside border 30 ChapterThe FX Printers33 Additional Supplies and AccessoriesThe following items may be purchased separately from your Epson dealer: Printer cable or interface kit Printer paper Ribbon cartridge replacement Print head replacement Roll paper holder Printer Location 34 Printer PreparationNote: The printer should be turned OFF during all set-upoperations Paper separator 54 BASIC and the PrinterCommand 55 Computer56 Character stringsBASIC print commands 57 Activating commands61 Change Commands10 LPRINT CHR$(27)“4” 30 LPRINT CHR$(27)"5";Now use RUN to make sure that both ESCape sequences work as before You can also shorten your programs by storing the ESCape code in character string. If you enter 3Ø LPRINT A$"5"; A$"5";This technique can help if you use the ESCape code frequently 64 Summarycontrol 65 Here are the DIP switches that we mentioned in this chapter:Switch Controls the beeper printer spaces at the end of a print line CHR$(7) CHR$(27) CHR$(27)“4” CHR$(27)”@” CHR$(27)“5” CHR$(127) Causes a beep Prepares the printer to accept other control codes (Escape code) Turns Italic Mode ON Resets the printer to its defaults (Reset Code) Turns Italic Mode OFF DELetes the latest text character in the print buffer CHR$(24) 66 Print Pitches78 Print QualityDouble-StrikeMode 79 Emphasized Mode80 40 LPRINT CHR$(27)"GCOMBINED THEY CAN'T BE BEATProportional Mode "!!!!!PROPORTIONAL OFF 81 !!!!!PROPORTIONAL OFF82 Mixing Modesthe printer will prove that Double-Strikehas been turned on all the time Add lines 30 and 50, and make some changes to line 70: 83 30 LPRINT CHR$(27)"G";50 LPRINT "WHEN PROPORTIONAL GOES 70 LPRINT "!!!!!!!!!!!!!OFF, DOUBLE-STRIKECAN COME ON !!!!!!!!!!!!PROPORTIONAL ONWHEN PROPORTIONAL GOES ! ! ! ! ! ! ! ! ! ! ! ! O F F , DOUELE-STRIKECAN COME ON Figure 4-3shows the priorities for the modes we‘ve covered so far Note: Each mode takes precedence over the modes beneath it Figure 4-3.Mode priorities Table 4-1shows the modes we have covered so far Table 4-1.Summary of modes 84 Type of modeMode nameAllows you to change the weight default from Single-Striketo Emphasized Here are the commands that we introduced in this chapter: CHR$(27) “G” Turns Double-StrikeMode ON. Double Strike prints in Half-Speed “H” Turns Double-StrikeOFF “E” Turns Emphasized Mode ON. Emphasized prints in Half-Speed CHR!$(27) “F” Turns Emphasized OFF CHR$(27) “p1” or CHR$(27) CHR$(112)“1” CHR$(27) “p0” or CHR$(27) CHR$(112)“0” Turns Proportional OFF 86 Dress-UpModes and Master SelectUnderline ModeCHR$(27)"-"CHR$(1)or CHR$(27)"-"CHR$(0)or 87 UNDERLINING IS SIMPLE TO TURN ON/OFF90 Master Select91 160 DATA 32,33,36,40,-1,-1,48,49,52,56,-1,-110 LPRINT CHR$(27)"-1"CHR$(27)"S0"CHR$(27)"4"; 8 SNGL-STRIKE EMPHASIZED PICA 1 6 D O U B L E - S T R I K E P I C A 24DEL-STRIKE EMPHASIZED PICA EMPHASIZED 92 PICA3 2 S I N G L E - S T R I K E E X P A N D E D P I C A 36 SINGLE-STRIKEEXPANDED COMPRESSED 4 0 S N G L 4 8 D O U B L E - S T R I K E E X P A N D E D P I C A 4 9 D O U B L E - S T R I K E E X P A N D E D E L I T E E X P A N D E D E L I T E5 2 D O U B L E - S T R I K E E X P A N D E D C O M P R E S S E D 5 6 D B L - S T R I K E E M P H A S I Z E D E X P A N D E D P I C A 93 Master Select combinations96 Here are the commands that we introduced in this chapterCHR$(27) “-1” CHR$(27)“-0” CHR$(27)“S1” Turns Underline Mode ON Turns Underline OFF CHR$(27)“S0” CHR$(27)“T” CHR$(27)"!“CHR$(n) or CHR$(27)“!n” Turns Superscript ON Turns either version of Script Mode OFF Turns Italic OFF 98 Special Printing Features110 Line Spacing and Line Feeds120 Forms ControlForm feed distanceFigure 8-1.Setting the top of form 121 LPRINT CHR$(12);Figure 8-2. Two-inch form feed 123 10 LPRINT CHR$(27)"C"CHR$(2);30 LPRINT "TWO-LINEFORM"CHR$(12);Figure 8-3. Two-lineform feed 124 Skip command125 10 LPRINT CHR$(27)"N"CHR$(6);30 LPRINT "SIX-LINESKIP . . . LINE";X 40 NEXT 127 10 LPRINT20 INPUT "HIT RETURN WHEN READY",A 30 FOR X=1 TO40 LPRINT "PRINTING WILL STOP BEFORE PAPER RUNS OUT 50 NEXT 10 LPRINT CHR$(27)"8When on; activates the beeper; when off, deactivates it When off, makes the paper-outsensor active; when on, deactivates it Check to see if you want to reset any switches before going on to Chapter Here are the commands we covered in this chapter: nate, high-orderversion CHR$(27)“C”CHR(0)CHR$(n) Sets the form length to n inches, where n is 1 CHR$(27)“C”CHR$(n) Sets the form length to n lines, where n is 1 CHR$(27)“O” Turns the automatic skip-over-perforation feature OFF CHR$(27)“8” Turns the paper-outsensor OFF 128 CHR$(27)"9Used in conjunction with CHR$(27)“8” turns the paper-outsensor back ON CHR$(27)“@” setting 130 Margins and Tabs148 Introduction to Dot Graphics160 Varieties of Graphics Density40 LPRINT A$;: FOR X=1 TO 100: LPRINT B$;: NEXT X 80 LPRINT CHR$(27)"@ 161 Graphics and the Reset CodeGraphics and low ASCII codes 162 40LPRINT A$;: FOR X=1 TO 25: LPRINT B$;: NEXT60LPRINT A$;: FOR X=1 TO 25: LPRINT B$;: NEXT 163 High-Speed Double-DensityGraphics ModeFigure 11-1. High-Speed Double-Densitydots 164 30B$=CHR$(127)+CHR$(42)50 LPRINT "PLOW-SPEED DOUBLE-DENSITYGRAPHICS 166 Quadruple-DensityGraphics ModeMore densities 20A$=CHR$(27)+"*"+CHR$(M)+CHR$(120)+CHR$(0) 60LPRINT A$;: FOR X=1 TO 60: LPRINT B$;: NEXT 167 Reassigning alternate graphics codesTable 11-1.Graphics Modes Modes 168 AlternateDescription Mode Density Head speed (in./sec.) 15 LPRINT CHR$(27)"?K"CHR$(M); 20 A$=CHR$(27)+"K"+CHR$(l2@l)+CHR$(@) 169 Nine-PinGraphics Mode170 Figure 11-5. Nine-pinusage171 20A$=CHR$(27)+CHR$(94)+CHR$(0)+CHR$(60)+CHR$(0)90 DATA 3,7,31,63,126,124,112,96,92,66,33,25,5,3 172 Repeated patterns173 Repeated DATA numbers90 DATA 8,28,62,93,28,28,28,28,28,28,93,62,28,8 174 90 DATA 8,28,62,93,-6,28,93,62,28,8100 READ R: FOR J=1 TO -N 110 LPRINT CHR$(R);: NEXT J 120 X=X-N-1:GOT0CHR$(27)”*“CHR$(m)CHR$(n1)CHR$(n2) mis mode 0 - 6. Width = n1+(256*n 2), where n1 is 0 - 255 and n2 is 0 CHRS(27)“Y“CHR$(n1)CHR$(n2) =n1 + (256*n1), where n1 is 0 - 255 and n2 is 0 175 CHR$(27)“L”CHR!$(n 1)CHRS(n 2)=n1+(256*n2), where n1 is 0 - 255 and n2 is CHR$(27)“Z”CHR!$(n 1)CHR$(n2) CHR$(27)“?s”CHR$(n) CHRS(27)"^"CHR$(d)CHR$(n1)CHR$(n2) 176 Design Your Own Graphics177 620 IF N>=$ THEN PRINT CHR$(N;: GOTO650 LPRINTFigure 12-1.STRATA layout 640 GOT0 178 GOT0179 840 DATA 0,32,16,64,8,64,-15,8,32,72,16,32,64,-6l00 LPRINT CHR$(27)"1 610 READ N: IF N=128 THEN 620 IF N>=0 THEN LPRINT CHR$(N);: GOT0 640 GOT0 820 DATA 0,0,0,64,32,16,72,36,-3,16,4,3465,0,0,65,34, - 8,16,4,18,11,4,2,1,0, - 9,0,0,123 830 DATA -8,0,0,64,32,16,72,36,16,-74,16,36,65,0,0,1,66,36,16, - 3 4,16,4,18,11,4,2,1,-2,0,0,1280,0,0,127,0,0,127,0,0,0,128 Figure 12-3. STRATA program 180 Three-DimensionalProgram182 First version of 3D program29 G$=CHR$(27)+"L"+CHR$(51)+CHR$(3): GOSUB 183 170 FOR Y=1 TO 819: LPRINT CHR$(l);: NEXT Y180 LPRINT: NEXT X: RETURNNow RUN the first trial: 180)repeats the routine to print the line three times 80 FOR X=1 TO L: LPRINT CHR$(l);: NEXT 100 LPRINT CHR$(l)CHR$(2)CHR$(4)CHR$(8) CHR$(16)CHR$(32)CHR$(64); 110 FOR X=1 TO H: LPRINT CHR$(64);: NEXT 120 LPRINT CHR$(64)CHR$(32)CHR$(16) CHR$(8)CHR$(4)CHR$(2)CHR$(l);The next step is to add the READ portion of the program: 50 READ L,H H=H*7 70 IF L=0 THEN 90 IF H<0 THEN LPRINT: GOT0 184 40 LPRINT G$;190 DATA 3,20,2,3,12,3,22,14,8,14,6,-1 and RUN it The negative number at the end of line 190 signals the end of the print line 140 NEXT D: GOSUB 200 DATA 3,20,3,3,10,3,21,18,4,18,4,-1 210DATA 3,20,4,3,8,3,21,5,8,5,2,5,8,5,3,-1 220DATA 3,3,22,3,6,3,22,3,12,3,2,3,12,3,3,-1 230DATA 3,3,23,3,4,3,23,3,12,3,2,3,12,3,3,-1 240DATA 3,3,24,3,2,3,24,3,12,3,2,3,12,3,3,-1 250DATA 3,3,25,3,0,3,25,3,12,3,2,3,12,3,3,-1 260DATA 3,20,9,6,5,15,5,18,3,3,12,3,3,-1 270DATA 3,20,10,4,6,15,7,14,5,3,12,3,3,-1 280DATA 3,20,9,6,5,15,5,5,6,5,3,3,12,3,3,-1185 290 DATA 3,3,25,3,0,3,25,3,12,3,2,3,12,3,3,-1300 DATA 3,3,24,3,2,3,24,3,12,3,2,3,12,3,3,-1 310 DATA 3,3,23,3,4,3,23,3,12,3,2,3,12,3,3,-1 320 DATA 3,3,22,3,6,3,22,3,12,3,2,3,12,3,3,-1 186 FOR X=1 TO H: LPRINT CHR$(64);: NEXT188 110 FOR X=1 TO H: LPRINT CHR$(127);: NEXT12-1l 190 Plotter Graphics206 Symmetrical Graphics Patterns216 User-DefinedCharacters217 PreparationCharacter DefinitionCharacters are defined with the ESCape "&" command sequence. The format is: LPRINT CHR$(27)"&"CHR$(r)CHR$(c1)CHR$(c2); LPRINT CHR$(27)"&"CHR$(0)CHR$(65)CHR$(69); LPRINT CHR$(27)"&"CHR$(0)"AE"; 220 Attribute byteProportional print221 Figure 15-5. Attribute byte conversionsThe full 8-bitattribute byte, then, is composed of three parts: 1.Bit 7 determines which pins are used to print the character 2.Bits 4, 5, and 6 determine the starting column number 3.Bits 0, 1, 2, and 3 determine the ending column number 222 CHR$(27)"& but before you print the user-definedE, make it more visible by adding: 223 170 LPRINT CHR$(27)"!8";190 LPRINT CHR$(27)"!@Here are the lines you’ve typed so far: 130 LPRINT CHR$(27)"&"CHR$(0)"EE"; 180 LPRINT "EEEEE"; 140 LPRINT CHR$(137); 175 LPRINT CHR$(27)"p1"; 180 LPRINT "EPSON 224 110 LPRINT CHR$(27)" :"CHR$(0)CHR$(0)CHR$(0);1160 DATA 127,0,72,0,72,0,76,2,121,0,0: 'My R and make these changes: 130 LPRINT CHR$(27)"&"CHR$(0)"rt"; 140 FOR Y=1 TO 3: LPRINT CHR$(139); 160 NEXT Y 180 LPRINT "rst A R EThe attribute byte for each character is sent in line 140 and the other 225 Redefining Control CodesLPRINT CHR$(27)"6Let’s use this command to see how the ROM control codes can print. Add: 226 CHR$(27)"6CHR$(27)"7 STOP 165 LPRINT CHR$(27)"6 165 LPRINT CHR$(27)"I1 180 LPRINT CHR$(1)CHR$(2)CHR$(3) CHR$(27)“I1”. CHR$(27)“R” CHR$(27)“R” CHR$(27)"R 227 Italy228 1120 DATA 0,63,64,8,64,8,64,28,64,32,0: 'My F1130 DATA 0,32,64,0,64,63,64,0,64,32,0: 'My T Z$=CHR$(27)+"&"+CHR$(0) LPRINT Z$"AZ"; LPRINT Z$CHR$(l28)CHR$(159); 229 STRATA180, LPRINT “147646 12345678” S T R A T A S O F T W A R ESave the current program as STRATA 232 Combining User-DefinedCharacters80FOR x=1 TO 11: READ N: LPRINT CHR$(N);: NEXT 233 Figure 16-1. Side-by-sidecharacters234 Large Letters: Double HighLet’s stack two characters, one on top of the other, with these changes: 10 LPRINT CHR$(27)"1"CHR$(27)"U1"; 100 LPRINT "A 110 LPRINT "B Giant Letters: Double High and Double Wide 236 PatternExample50 FOR Y=0 TO 1: FOR Z=0 TO 1: A=L+128*Y+32*Z FOR Y=0 TO 1: FOR X=1 TO LEN(A$) 237 80FOR X=1 TO 11: READ N: LPRINT CHR$(N);: NEXTno space after the 0 and then press RETURN. The next prompt on the screen is: ENTER A MASTER PRINT MODE NUMBER Figure 16-4.Giant G 238 40 FOR W=1 TO 6: READ L: PRINT CHR$(L)90 NEXT Z: NEXT Y: NEXT W 239 190'SPACE200DATA210DATA 0,0,0,0,0,0,0,0,0,0,0 220DATA 0,0,0,0,0,0,0,0,0,0,0 230DATA 0,0,0,0,0,0,0,0,0,0,0 240DATA 0,0,0,0,0,0,0,0,0,0,0 310’ A 320 DATA330 DATA 0,0,1,0,1,0,6,24,32,92,0 340 DATA 67,32,24,4,3,0,0,0,0,0,0 350 DATA 0,65,32,7,24,33,64,32,16,0,8 360 DATA 8,97,24,7,0,97,24,7,0,1,0 380 DATA390 DATA 0,64,0,127,0,32,16,7,8,0,4 400 DATA 4,0,8,7,16,32,0,127,0,64,0 410 DATA 0,1,0,127,0,1,0,127,0,1,0 420 DATA 0,1,0,127,0,1,0,127,0,1,0 430’ E DATA 65,0,67,0,64,0,64,32,0,0,0 DATA 0,1,0,127,0,1,0,126,1,0,1 DATA 1,0,69,0,11,0,11,0,6,0,0 490’ S 500DATA 510 DATA 0,0,0,24,36,0,66,16,105,0,68 520 DATA 74,0,69,0,68,0,40,16,0,0,0 530 DATA 0,8,22,0,33,0,33,16,1,0,65 540 DATA 33,0,17,0,75,4,33,0,22,8,0 Figure 16-5.Data for AMES And RUN. This time respond to the prompts by typing: GAMES SEEM SAMEFigure 16-6.Games seem same MESSAGES Figure 16-7.Messages in three pitches You may want to SAVE the current program before proceeding 240 Core Sets100to 540. Now change: 60 LPRINT CHR$(27)"$"CHR$(0)"16"; 70 FOR Y=1 TO 6: LPRINT CHR$(139); 90 NEXT Y 241 100'SIX110 DATA 7,8,16,0,32,3,68,0,72,0,73 120 DATA 73,0,72,0,68,3,32,0,16,8,7 130 DATA 73,0,9,0,17,96,2,0,4,8,112 140 DATA 112,8,4,0,2,96,17,0,9,0,73 150 DATA 127,0,0,0,0,127,0,0,0,0,127 160 DATA 73,73,73,73,73,73,73,73,73,73,73 180 LPRINT "1 2 3 4 5 6 170 FOR Y=1 TO 180 READ P$: LPRINT P$ 190 NEXT Y 210 ' Tracks 220 DATA "62662620162016262050166 230 DATA "05005050505050505050500 240 DATA "05005630565050005630462 250 DATA "05005050505050505050005 260 DATA "05005046304636305046663 210 ' Pattern ' Pattern 242 Line Graphics130 LPRINT CHR$(27)"&"CHR$(0)"al"; 899 ’ <<< LINE GRAPHICS AND SHADING 900 DATA 0,0,0,0,15,0,8,0,8,0,8: ' a 910 DATA 8,0,8,0,15,0,0,0,0,0,0: ' b 920 DATA 8,0,8,0,120,0,0,0,0,0,0: ' c 930 DATA 0,0,0,0,120,0,8,0,8,0,8: ' d 940 DATA 8,0,8,0,120,0,8,0,8,0,8: ' e 950 DATA 8,0,8,0,15,0,8,0,8,0,8: 'f 960 DATA 0,0,0,0,127,0,8,0,8,0,8: ' g 1010 DATA 84,0,170,0,84,0,170,0,84,0,170: 243 NAME PHONE244 Business ApplicationsChange 245 10 FOR J=1 TO 3: FOR K=1 TO20READ MAX(J,K) 30NEXT K: NEXT J 40DATA 12,18,23,28,36,34,28,27,30 246 60 D$=CHR$(27)+"J"+CHR$(11): C$=CHR$(27)+"F200 LPRINT CHR$(60)CHR$(1);: H$=CHR$(137): Z=1 210 LPRINT H$;H$;" ABC CO. SALES: FIRST QUARTER 1995": LPRINT: LPRINT 800 FOR J=1 TO N: LPRINT A$;: NEXT J: RETURN 270 FOR M=1 TO 3: LPRINT H$; FOR R>MAX(M,P) THEN LPRINT 300 NEXT P: NEXT M: LPRINT B$;H$;"k";C$;: IF F=0 320 NEXT R: LPRINT H$;H$;B$;"g";H$;H$;H$;H$;"k 247 100 LPRINT CHR$(27) "3"CHR$(10) CHR$(27)"U1";110LPRINT CHR$(27) ":"CHR$(0)CHR$(0)CHR$(0); 130LPRINT CHR$(27)"&WR$(0)CHR$(94)CHR$(107); 190LPRINT CHR$(27)"D"CHR$(14)CHR$(19)CHR$(24) 210 LPRINT H$;H$; ABC CO. SALES: FIRST QUARTER 1995": LPRINT: LPRINT 248 ;ELSE LPRINTLPRINT H$;H$;B$;"k";H$;H$;H$;H$;"k 60 DAYS 90 DAYS 249 STRATA SOFTWARETHANK YOU250 110, 120, 150 andDelete lines 10 to 90. Make small changes to four lines: 130 LPRINT CHR$(27)"&"CHR$(0) "at"; 140 FOR Y=1 TO 20: LPRINT CHR$(139);160 NEXT Y: LPRINT CHR$(27)"C"CHR$(66);: GOSUB 170 to 1099 to FX-100 90 LPRINT CHR$(27)"QP"; 251 170 LPRINT CHR$(27)"!8";"mpsrpr mnopqrst"; CHR$(27)"!@";230 LPRINT: GOSUB 700: LPRINT H$;"DATA TOWN, U.S.A. 01248": GOSUB 252 500 FOR K=1 TO 5: READ L$(K),M$(K),N$(K),R$(K):LPRINT 253 1110 DATA 0,127,0,65,0,65,0,65,0,127,0: 'n1120 DATA 0,63,64,8,64,8,64,28,64,32,0: 'o - F 1130 DATA 0,32,64,0,64,63,64,0,64,32,0: 'p - T 1150 DATA 0,7,8,16,36,64,36,16,8,7,0: 'r - A 1160 DATA 0,127,0,72,0,72,0,76,2,121,0: 's - R 1170 DATA 0,62,65,8,65,8,65,28,65,34,0: 't - E "DESCRIPTION", "CHARGES "PAYMENTS","BALANCE 1370 DATA "CURRENT", "30 DAYS", "60 DAYS", "90 DAYS", "AMOUNT DUE 254 STATEMENT breaks down into several large blocks of routines and data:Lines Routine Prints the statement form The box subroutine The logo subroutine The STRING$ subroutine Data for line graphics Data for the logo Data for the box routine Line 170 prints STRATA SOFTWARE using Master Select to define the mode Lines 180 and 190 set vertical and horizontal tab stops Line 200 stores the tab command in H$ and prints STATEMENT in Expanded print Line 210 prints the second and third lines of the logo Line 260 sets new horizontal tab stops Line 390 resets all modes and ends the program The variables sent to the subroutine are: Cthe number of cells H the height of the cells F a flag for shading the headings FT a flag that allows a horizontal tab to adjust the left margin of the box 255 999 REM: The End256 INDEX
Also you can find more Epson manuals or manuals for other Computer Equipment.