Epson FX-286 User Manual - Page 95

Definition program 1, PRINT WHICH ROWS HAVE DOTS IN COLUMN;I

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 95 highlights

Definition program 1 The BASIC program below will help you translate your design into a character your FX-286 can print. Type in the program. Then follow the instructions given after the program. NEW 100 DIM F(9) 110 FOR I=1 TO 9 120 PRINT "WHICH ROWS HAVE DOTS IN COLUMN";I 130 INPUT R: IF R=0 THEN 150 140 F(I)=F(I)+2^(R-1) 150 IF R=0 THEN NEXT I ELSE GOT0 130 160 LPRINT CHR$(27) ":"CHR$(0)CHR$(0)CHR$(0); 170 LPRINT CHR$(27)"%"CHR$(1)CHR$(0); 180 LPRINT CHR$(27)"&"CHR$(0)CHR$(60)CHR$(60); 190 LPRINT CHR$(128); 200 FOR X=1 TO 9 210 LPRINT CHR$(F(X));: NEXT X 220 LPRINT CHR$(0)CHR$(0); 230 LPRINT "YouR CHARACTER IN PICA: < <

  • 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
Definition program 1
The BASIC program below will help you translate your design into
a character your FX-286 can print. Type in the program. Then follow
the instructions given after the program.
NEW
100 DIM F(9)
110 FOR I=1 TO 9
120 PRINT "WHICH ROWS HAVE DOTS IN COLUMN";I
130 INPUT R: IF R=0 THEN 150
140 F(I)=F(I)+2^(R-1)
150 IF R=0 THEN NEXT I ELSE GOT0 130
160 LPRINT CHR$(27) ":"CHR$(0)CHR$(0)CHR$(0);
170 LPRINT CHR$(27)"%"CHR$(1)CHR$(0);
180 LPRINT CHR$(27)"&"CHR$(0)CHR$(60)CHR$(60);
190 LPRINT CHR$(128);
200
FOR X=1 TO 9
210 LPRINT CHR$(F(X));: NEXT X
220 LPRINT CHR$(0)CHR$(0);
230 LPRINT "YouR C
H
ARACTER IN PICA: < < <"
240 LPRINT "IN EXPANDED EMPHASIZED PICA: ";
250 LPRINT CHR$(27)"!*< < <"
260 LPRINT CHR$(27) "!"CHR$(0)"YOUR DATA NUMBERS:"
270 FOR K=1 TO 9: LPRINT F(K);: NEXT K
300 LPRINT:
END
So that you can see how the program works, the next paragraphs
present the steps used to create the symbol for Mercury. First is the
grid used to design the character.
Figure 7-4. Design for character
7-4