Epson ActionPrinter 3250 User Manual download pdf (Page 9)

PSB No: P-0082

Page: 3 of 14

10 INPUT “Point Size”;A$

B=VAL(A$)*2

RESTORE 70

22 FOR X=1 TO 16

23 READY

IF B=Y THEN GOTO 30

25 NEXT X

26 CLS

27 PRINT A$ ” is not a valid point size choice.”

20 GOTO 10

30 C=VAL(A$)

40 LPRINT CHR$(27);“X”;CHR$(1);CHR$(B);CHR$(0);”These are “;A$;” point

characters”

LPRINT CHR$(27);“(v”;CHR$(2);CHR$(C);CHR$(C);CHR$(0)

GOTO 10

70 DATA 0,16,20,21,24,28,32,36,40,42,44,48,52,56,60,64

Line 10 -

allows you to specify the point size desired.

Line 20 -

computes the value for “n1” in the ESC X command.

tine 21 -

check to ensure that a valid point size was input

If the point size is

valid, the program jumps to line 30.

If the point size is not valid, the

program prints a message on the screen and starts over again.

Line 30 - computes the value for “n1” for advancing paper using the ESC ( v

command.

Line 40 -

sends the “Set Pitch and Point Size” command to the printer. (Note: The

pitch is set for proportional spacing for all point sizes to ensure proper

character spacing regardless of the point size.)

Line 50 -

sends the “Set Relative Vertical Position” command to the printer. This

command advances the paper in preparation for printing the next line.

Line 60

causes the program to start again at the beginning.

NOTE: To halt the program, hold down the “Ctrl” key and press the “C” key.

1 2 3 4 5 6 7 8 9 10 11 12 13 14 ... 21 22

No comments

Epson ActionPrinter 3250 User Manual Page 9