Epson LX-80 User Manual - Page 83

Lprint, Chr$85chr$42, Kchr, Loochr$o, Cejr$42chr$85

Get Epson LX-80 - Impact Printer PDF manuals and user guides View all Epson LX-80 manuals
Add to My Manuals
Save this manual to your list of manuals

Page 83 highlights

30 LPRINT CHR$(27>"K"CHR$(lOO)CHR$(O); 40 FOR X-l TO 50: LPRINT CHR$(85)CHR$(42); 50 NEXT X If you run the program now, you'll see how one line of the pattern looks: To see a how more than one line combines to form a figure, enter and run the following program, which uses two of the lines you have already typed and adds several more. 10 LPRINT CHR$( 27) "1"; 20 FOR R-l TO 3 30 LPRINT CHR$(27>"~~"CWR$(lOo)CMR$~O); 40 FOR X=1 TO 50: LPRINT CHR$(85)CHR$(42); 50 NEXT X: LPRIN? 60 LPRIMT CHR$( 27) "K"CHR$( lOO)CHR$(O) ; 70 FOR X-l TO 50: LPRINT CEJR$(42)CHR$(85); 80 NEXT X: LPRINT: NEXT R 90 LPRINT CHR$( 27) "@'" Now run the program to see the six print lines combine into a pattern : The short and simple program that produced the pattern demonstrates many elements of graphics programming. Therefore, we'll explain each line. Line 10 changes the line spacing to 7-dot, which is the height of the dot patterns used in the program. Therefore, there is no space between the print lines. 79

  • 1
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • 11
  • 12
  • 13
  • 14
  • 15
  • 16
  • 17
  • 18
  • 19
  • 20
  • 21
  • 22
  • 23
  • 24
  • 25
  • 26
  • 27
  • 28
  • 29
  • 30
  • 31
  • 32
  • 33
  • 34
  • 35
  • 36
  • 37
  • 38
  • 39
  • 40
  • 41
  • 42
  • 43
  • 44
  • 45
  • 46
  • 47
  • 48
  • 49
  • 50
  • 51
  • 52
  • 53
  • 54
  • 55
  • 56
  • 57
  • 58
  • 59
  • 60
  • 61
  • 62
  • 63
  • 64
  • 65
  • 66
  • 67
  • 68
  • 69
  • 70
  • 71
  • 72
  • 73
  • 74
  • 75
  • 76
  • 77
  • 78
  • 79
  • 80
  • 81
  • 82
  • 83
  • 84
  • 85
  • 86
  • 87
  • 88
  • 89
  • 90
  • 91
  • 92
  • 93
  • 94
  • 95
  • 96
  • 97
  • 98
  • 99
  • 100
  • 101
  • 102
  • 103
  • 104
  • 105
  • 106
  • 107
  • 108
  • 109
  • 110
  • 111
  • 112
  • 113
  • 114
  • 115
  • 116
  • 117
  • 118
  • 119
  • 120
  • 121
  • 122
  • 123
  • 124
  • 125
  • 126
  • 127
  • 128
  • 129
  • 130
  • 131
  • 132
  • 133
  • 134
  • 135
  • 136
  • 137
  • 138
  • 139
  • 140
  • 141
  • 142
  • 143
  • 144
  • 145
  • 146
  • 147
  • 148
  • 149
  • 150
  • 151
  • 152
  • 153
  • 154
  • 155
  • 156
  • 157
  • 158
30
LPRINT
CHR$(27>"K"CHR$(lOO)CHR$(O);
40
FOR
X-l
TO
50:
LPRINT
CHR$(85)CHR$(42);
50
NEXT
X
If you run the program now, you’ll see how one line of the pattern
looks:
To see a how more than one line combines to form a figure, enter
and run the following program, which uses two of the lines you have
already typed and adds several more.
10
LPRINT
CHR$(
27)
“1”;
20
FOR
R-l
TO
3
30
LPRINT
CHR$(27>“~~“CWR$(lOo)CMR$~O);
40
FOR
X=1
TO
50:
LPRINT
CHR$(85)CHR$(42);
50
NEXT
X:
LPRIN?
60
LPRIMT
CHR$(
27)
“K”CHR$(
lOO)CHR$(O)
;
70
FOR
X-l
TO
50:
LPRINT
CEJR$(42)CHR$(85);
80
NEXT
X:
LPRINT:
NEXT
R
90
LPRINT
CHR$(
27)
“@‘”
Now run the program to see the six print lines combine into a
pattern :
The short and simple program that produced the pattern demon-
strates many elements of graphics programming. Therefore, we’ll ex-
plain each line. Line
10
changes the line spacing to 7-dot, which is the
height of the dot patterns used in the program. Therefore, there is no
space between the print lines.
79