Graphics Line Spacing; Variable Control - Epson FX-80 User Manual

2~
FOR L=l TO 2
3~
FOR
J=~
TO 9
5~
GOSUB
8~:
F=l-F: GOSUB
8~
I
Change F=l to F=l-F
6~ NEXT J: LPRINT: NEXT L
•••••• - •• " '"" ,',". ,,'-', ••• :" "ow'''' • •••• • ....... " ,_,," ••••• • .....
-···.w •••. "." . , .. .-', ",_ •••.•.
......
-
........................................ _ ......................................................
_
...........•
-
............ _
..... .
Line 50 makes F alternate between 0 and
1.
The
J
loop repeats pairs of
diagonals on one line. The L loop adds a second line.
Graphics Line Spacing
For most graphics programs, you'll want to change from the nor-
mal 12-dot line spacing to 7-dot (or 8-dot spacing if you use the eighth
bit). Change the line spacing in line 10 of your current program, which
will then look like this:
1~ F=~:
LPRINT CHR$(27)"1"
2~
FOR L=l TO 2
3~
FOR
J=~
TO 9
4~
LPRINT
CHR$(27)"K"CHR$(14)CHR$(~);
5~ GOSUB 8~: F=l-F: GOSUB 8~
6~ NEXT J: LPRINT: NEXT L
7~
LPRINT CHR$(27)"@": STOP
8~ FOR X=~ TO 6
9~ N=X: IF ?=1 THEN N=6-X
11~
LPRINT CHR$(2
A
N);
12~
NEXT X: RETURN
See what a big difference the line spacing makes? All of the multiple-
line graphics programs in this manual use this line spacing.
Variable Control
This next and final version of the program exercises even more con-
trol over the slashes. It varies not only their direction, but also their
139