Figure 4.7 sample program 3 – AMT Datasouth 41AY89AR777 User Manual
Page 93
Attention! The text in this document has been recognized automatically. To view the original document, you can use the "Original mode".
1 0 0
l i o
1 2 0
130
140
150
160
170
180
190
2 0 0
2 1 0
220
230
240
250
260
270
280
290
300
310
320
330
340
350
360
370
THIS PROGRAM DOWN-LOADS A USER DEFINED
MEMO CHARACTER IN PLACE OF THE '=' CHARACTER
LPRINT CHRÍI27)5"*F9;i3."i
LPRINT CHR$(27) ;"?f"}CHR$<0) ;
LPRINT CHR$t61)JCHR$161);
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
LPRINT
CHR$(128);
CHR*(2)}CHR$(4)ICHR»(2)}
CHR$(8) JCHR$(2) ;CHR*(16)
CHR$<2);CHR$<32);CHR$(2);
CHRÍ(64);CHRi(2);CHR$(32);
CHR$(2) ;CHR$(16) 5CHR$(2)
CHR$(8);CHR$(2);CHR$(4);
CHR$(2)5
C H R $ ( 2 7 ) ; j c H R $ ( 1 ) ; c H R $ ( 0 ) ;
"USER DEFINED CHARACTERS.....'
; c H R * ( 0 > ; c H R * ( 0 ) ;
"STANDARD ROM CHARACTERS................ '
END
■&C"5
SET FTN 9 TO MEM
ENTRY ESCAPE SEG
“ = = “ RANGE
DESCENDER DATA
COLUMNS
1-3
DA
COLUMNS
4-6
DA
COLUMNS
7-9
DA
COLUMNS 10-12 DA
COLUMNS 13-15 DA
COLUMNS 16-18 DA
COLUMNS 19 DA
SELECT USER CHAR
SELECT ROM CHARA
CLEAR USER CHARA
USER DEFINED CHARACTERS
................ A A A A A
STANDARD ROM CHARACTERS...............
= = = = =
Figure 4.7 Sample Program 3
4-34