Epson FX-185 User Manual - Page 25

Ticket Program, FOR X=1 TO 11: READ D: LPRINT G-K@D;: NEXT X

Page 25 highlights

feed the paper through. If you use single sheets of paper, the paperout sensor will cause a beep and stop the printing whenever the bottom edge passes the sensor. You can shut off the sensor by changing DIP switches as shown in Chapter 1. 3. Turn the printer and computer on and load a short BASIC program. Then send a listing to the printer (using LLIST, LIST "P", or whatever your computer's listing command is). You should get a single-spaced listing. If the printout is double-spaced or printed without line spacing, you'll have to change a DIP switch. Since there are many implementations of the BASIC programming language, it is impossible to write one set of programs that will work on every computer system. This means you may need to modify our programs to suit your system. In Appendix F we discuss such compatibility problems and suggest solutions for several popular computers. Ticket Program Here is an example program, written in BASIC, that shows off a lot of the FX printer's features. The program can give you a good survey of print control. If you don't understand one or more features, you can check the index to find what part of this manual covers it. 10 N=29: E$=CHR$(27): H$=CHR$(137) 20 LPRINT E$"1";E$"D"CHR$(26)CHR$(1); 30 LPRINT E$":"CHR$(0)CHR$(0)CHR$(B); 40 LPRINT E$"%"CHR$(1)CHR$(0); 50 LPRINT E$"&"CHR$(0)"0:"; 60 FOR Y=1 TO 11: LPRINT CHR$(1l); 70 FOR X=1 TO 11: READ D: LPRINT G-K@(D);: NEXT X 80 NEXT Y: LPRINT E$"U1"; 90 FOR X=1 TO N: LPRINT CHR$(95);: NEXT X: LPRINT E$"A"CHR$(6) 100 LPRINT "7"H$" " 9"; E$"1" 110 LPRINT "7 ";: FOR X=1 TO 25: LPRINT ":";: NEXT X: LPRINT H$" 9" 120 LPRINT "7 :"H$": 9" Figure Easy-1. FX ticket program 8

  • 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

feed the paper through. If you use single sheets of paper, the paper-
out sensor will cause a beep and stop the printing whenever the
bottom edge passes the sensor. You can shut off the sensor by
changing DIP switches as shown in Chapter
1.
3.
Turn the printer and computer on and load a short BASIC pro-
gram. Then send a listing to the printer (using LLIST,
LIST “P“, or
whatever your computer’s listing command is). You should get a
single-spaced listing. If the printout is double-spaced or printed
without line spacing, you’ll have to change a DIP switch.
Since there are many implementations of the BASIC program-
ming language, it is impossible to write one set of programs that
will work on every computer system. This means you may need to
modify our programs to suit your system. In Appendix F we dis-
cuss such compatibility problems and suggest solutions for several
popular computers.
Ticket Program
Here is an example program, written in BASIC, that shows off a lot
of the FX printer’s features. The program can give you a good survey
of print control. If you don’t understand one or more features, you
can check the index to find what part of this manual covers it.
10
N=29: E$=CHR$(27): H$=CHR$(137)
20 LPRINT E$"1";E$"D"CHR$(26)CHR$(1);
30
LPRINT
E$":"CHR$(0)CHR$(0)CHR$(B);
40 LPRINT E$"%"CHR$(1)CHR$(0);
50 LPRINT E$"&"CHR$(0)"0:";
60
FOR Y=1 TO 11: LPRINT CHR$(1l);
70
FOR X=1 TO 11: READ D: LPRINT G-K@(D);: NEXT X
80
NEXT Y: LPRINT E$"U1";
90
FOR X=1 TO N: LPRINT CHR$(95);: NEXT X:
LPRINT E$"A"CHR$(6)
100 LPRINT "7"H$"
"
9"; E$"1"
110
LPRINT
"7
";:
FOR X=1 TO 25: LPRINT ":";:
NEXT X: LPRINT
H$" 9"
120 LPRINT "7 :"H$": 9"
Figure Easy-1. FX ticket program
8