Seiko TM-L60 Operator's Manual Page 64

  • Download
  • Add to my manuals
  • Print
  • Page
    / 85
  • Table of contents
  • BOOKMARKS
  • Rated. / 5. Based on customer reviews
Page view 63
********
Program List
********
100
110
120
130
140
150
160
170
180
190
200
210
220'
230
240'
250
260
270
280
290
300
310
320
330
340
350
360
370
380
390
400
in MS-DOS BASIC
HOST COMPUTER:EPSON PC-286
OPEN "COM1:N81NN" AS #1
PRINT #1,CHR$(27);"@";
PRINT #1,"ABCDEF";CHR$(10);
PRINT #1,CHR$(27);"!";CHR$(1);
PRINT #1,"ABCDEF";CHR$(10);
PRINT #1,CHR$(27);"!";CHR$(48);
PRINT #1,"ABCDEFGHIJK";CHR$(10);
PRINT #1,CHR$(27);"!";CHR$(O);
PRINT #1,"ABCDEFGHIJK";CHR$(10);
FOR I=240 TO 255
PRINT #1,CHR$(I);
NEXT I
PRINT #1,CHR$(27);"t";CHR$(1);
FOR I=240 TO 255
PRINT #1,CHR$(I);
NEXT I
PRINT #1,CHR$(91);CHR$(92);CHR$(93);CHR$(94);CHR$(10);
PRINT #1,CHR$(27);"R";CHR$(1);
PRINT X1,CHR$(91);CHR$(92);CHR$(93);CHR$(94);CHR$(10);
PRINT #1,CHR$(27);"@";
PRINT #1,CHR$(29);"H
n
;CHR$(2);
PRINT #1,CHR$(27);"$";CHR$(40);CHR$(0);
PRINT #1,CHR$(29);"k";CHR$(2);"01234567890l";CHR$(O);
PRINT #1,CHR$(27);"p";CHR$(0);CHR$(10);CHR$(100;
PRINT #1,CHR$(27);"u";CHR$(0);
A$=INPUT$(1,#1)
IF A$=CHR$(0) THEN PRINT "DRW:L"
IF A$=CHR$(1) THEN PRINT "DRW:H"
CLOSE #1
-57-
Page view 63
1 2 ... 59 60 61 62 63 64 65 66 67 68 69 ... 84 85

Comments to this Manuals

No comments