Epson FX-286 User Manual - Page 88

If N>=0 Then Lprint Chr$n;: Got0 610, Read P, R: For J=l To -n

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

Page 88 highlights

After plotting all the dots as in Figure 6-4, you calculate the num- bers for each pin pattern by dividing the design grid into separate print lines. For the arrow design, the grid was divided into three lines, each seven dots high. Then each column was examined and the sums of the pin values determined. This process for the first line is shown in Figure 6-5. The pin values are on the left side and the sums are at the bottom of each column. Figure 6-5. First line of arrow figure The numbers for the second and third lines were calculated in the same manner. Once the numbers for the pin patterns are calculated, they go in DATA statements, separated by commas. First is the whole program and its printout, then an explanation of two techniques not used before: NEW 90 WIDTH "LPT1:",255 100 LPRINT CHR$(27)"A"CHR$(7) 590 FOR K=1 TO 3 600 LPRINT CHR$(27)"Y"CHR$(50) CHR$(0); 610 READ N: IF N=128 THEN 650 620 IF N>=0 THEN LPRINT CHR$(N);: GOT0 610 630 READ P,R: FOR J=l TO -N 632 LPRINT CHR$(P)CHR$(R);: NEXT J 640 GOT0 610 650 LPRINT: NEXT K: LPRINT CHR$(27)"@": END 800 DATA 8, 4, 10, 1, -6, 8, 0, 4, 0, 2, 0, 1, -9, 0, 0, 0 805 DATA 23,8,4,2,1,-2,0,0,0,128 810 DATA 0,0,0,0,64,32,17,10,4,0,-6,0,0,-10 815 DATA 64,0,0,0,0,64,32,17,10,4,128 820 DATA 2,4,10,16,34,64,-5,2,0,4,0,8,0,16 825 DATA 0,-9,32,0,61,2,4,8,16,32,64,0,0,0,128 6-13

  • 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
  • 159
  • 160
  • 161
  • 162
  • 163
  • 164
  • 165
  • 166
  • 167
  • 168
  • 169
  • 170
  • 171
  • 172
  • 173
  • 174
  • 175
  • 176
  • 177
  • 178
  • 179
  • 180
  • 181
  • 182
  • 183
  • 184
  • 185
  • 186
  • 187
  • 188
  • 189
  • 190
  • 191
  • 192
  • 193
  • 194
  • 195
  • 196
  • 197
  • 198
  • 199
  • 200
  • 201
  • 202
  • 203
  • 204
  • 205
  • 206
  • 207
  • 208
  • 209
  • 210
  • 211
  • 212
  • 213
  • 214
  • 215
  • 216
  • 217
  • 218
  • 219
  • 220
  • 221
  • 222
  • 223
After plotting all the dots as in Figure
6-4,
you calculate the num-
bers for each pin pattern by dividing the design grid into separate print
lines. For the arrow design, the grid was divided into three lines, each
seven dots high. Then each column was examined and the sums of the
pin values determined. This process for the first line is shown in Figure
6-5.
The pin values are on the left side and the sums are at the bottom
of each column.
Figure 6-5. First line of arrow figure
The numbers for the second and third lines were calculated in the
same manner. Once the numbers for the pin patterns are calculated,
they go in DATA statements, separated by commas.
First is the whole program and its printout, then an explanation of
two techniques not used before:
NEW
90 WIDTH "LPT1:",255
100 LPRINT CHR$(27)"A"CHR$(7)
590 FOR K=1 TO 3
600 LPRINT CHR$(27)"Y"CHR$(50) CHR$(0);
610 READ N: IF N=128 THEN 650
620 IF N>=0 THEN LPRINT CHR$(N);: GOT0 610
630 READ P,R: FOR J=l TO -N
632 LPRINT CHR$(P)CHR$(R);: NEXT J
640 GOT0 610
650 LPRINT: NEXT K: LPRINT CHR$(27)"@": END
800 DATA 8, 4, 10, 1, -6, 8, 0, 4, 0, 2, 0, 1, -9, 0, 0, 0
805 DATA 23,8,4,2,1,-2,0,0,0,128
810 DATA 0,0,0,0,64,32,17,10,4,0,-6,0,0,-10
815 DATA 64,0,0,0,0,64,32,17,10,4,128
820 DATA 2,4,10,16,34,64,-5,2,0,4,0,8,0,16
825 DATA 0,-9,32,0,61,2,4,8,16,32,64,0,0,0,128
6-13