Epson ActionPrinter 4000X User Manual - Page 112

FOR C=1 TO 10; RESTORE, NEXT C, you see below.

Get Epson ActionPrinter 4000X PDF manuals and user guides View all Epson ActionPrinter 4000X manuals
Add to My Manuals
Save this manual to your list of manuals

Page 112 highlights

Graphics 10 WIDTH "LPT1:",255 20 LPRINT CHR$(27)"*"CHR$(39)CHR$(42)CHR$(0); 30 FOR x=1 To 126 40 READ N 50 LPRINT CHR$(N); 60 NEXT X 70 LPRINT 80 DATA 0,0,63,0,0,127,0,0,255,0,3,255,0,15,255,0,31,255 90 DATA 0,127,255,0,255,255,1,255,255,3,255,255,7,255,255,15, 255,255 100 DATA 31,255,254,31,255,252,31,255,248,31,255,240,31,255, 224,31,255,192 110 DATA 31,255,0,31,252,0,31,240,0,31,224,0,31,128,0,31,240,0 120 DATA 31,255,192,28,255,224,28,127,240,28,15,248,30,0,252, 31,0,126 130 DATA 15,128,15,7,192,7,3,240,7,1,254,7,0,255,7,0,127,135 140 DATA 0,31,199,0,7,231,0,1,247,0,0,255,0,0,127,0,0,63 In this program, line 20 assigns the graphics option (24-pin tripledensity) with code 39. Code 42 sets the number of pin columns at 42. Lines 80 through 140 contain 126 bytes of data (42-pin columns x 3 bytes) for each pin column. Lines 30 through 60 print the design that you see below. Notice that the dots overlap quite a bit. This design was printed using the triple-density, 24-pin graphics option because the density is the same (180 dots per inch) in both directions. Adding the following lines to the preceding program causes the pattern to print 10 times in a row as shown below. 15 FOR C=1 TO 10; RESTORE 65 NEXT C 4-16 Software and Graphics

  • 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
  • 224
  • 225
  • 226
  • 227
  • 228
  • 229
  • 230
  • 231
  • 232
  • 233
  • 234
  • 235
  • 236
  • 237
  • 238
  • 239
  • 240
  • 241
  • 242
  • 243
  • 244
  • 245
  • 246
  • 247
  • 248
  • 249
  • 250
  • 251
  • 252
  • 253
  • 254
  • 255
  • 256
  • 257
  • 258
  • 259
  • 260
  • 261
  • 262
  • 263
  • 264
  • 265
  • 266
  • 267
  • 268
  • 269
  • 270
  • 271
  • 272
  • 273
  • 274
  • 275
  • 276
  • 277
  • 278
  • 279
  • 280
Graphics
10 WIDTH "LPT1:",255
20 LPRINT CHR$(27)"*"CHR$(39)CHR$(42)CHR$(0);
30
FOR
x=1 To 126
40 READ N
50 LPRINT CHR$(N);
60 NEXT X
70 LPRINT
80 DATA 0,0,63,0,0,127,0,0,255,0,3,255,0,15,255,0,31,255
90
DATA
0,127,255,0,255,255,1,255,255,3,255,255,7,255,255,15,
255,255
100 DATA 31,255,254,31,255,252,31,255,248,31,255,240,31,255,
224,31,255,192
110 DATA 31,255,0,31,252,0,31,240,0,31,224,0,31,128,0,31,240,0
120 DATA 31,255,192,28,255,224,28,127,240,28,15,248,30,0,252,
31,0,126
130
DATA
15,128,15,7,192,7,3,240,7,1,254,7,0,255,7,0,127,135
140 DATA 0,31,199,0,7,231,0,1,247,0,0,255,0,0,127,0,0,63
In this program, line 20 assigns the graphics option (24-pin triple-
density) with code 39. Code 42 sets the number of pin columns at 42.
Lines 80 through 140 contain 126 bytes of data (42-pin columns x 3
bytes) for each pin column. Lines 30 through 60 print the design that
you see below.
Notice that the dots overlap quite a bit. This design was printed
using the triple-density, 24-pin graphics option because the density
is the same (180 dots per inch) in both directions.
Adding the following lines to the preceding program causes the
pattern to print 10 times in a row as shown below.
15 FOR C=1 TO 10; RESTORE
65
NEXT C
4-16
Software and Graphics