Figure 4.3 sample program 1 – AMT Datasouth 41AY89AR777 User Manual
Page 89
Attention! The text in this document has been recognized automatically. To view the original document, you can use the "Original mode".

100
l i o
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
280
290
300
310
320
330
340
350
THIS PROGRAM DOWN-LOADS A USER DEFINED
DRAFT CHARACTER IN PLACE OF THE
CHARACTER
LPRINT CHR$(27);“$F9?10.';
LPRINT CHR$<27);'S’;CHR$<0);
LPRINT CHR$<61>;CHR$<61>;
LPRINT CHR$<128>; LPRINT CHR$<27);■%* ?CHR$<1);CHR$<0); LPRINT 'STANDARD ROM CHARACTERS.....' LPRINT • = = = = = = = • LPRINT CHR$<27>;'8C SET FTN 9 TO DRAf “==• RANGE DESCENDER DATA DA' COLUMNS 4-6 DA' COLUMNS 7-9 DA- COLUMNS 10,11 DA' SELECT USER CHAR< SELECT ROM CHARA( CLEAR USER CHARA( USER DEFINED CHARACTERS.... .A A A A A A A STANDARD ROM CHARACTERS.....= = = = = = = Figure 4.3 Sample Program 1 4-30
LPRINT CHR$<6>;CHR$<8);CHR$<18);
LPRINT CHR$<32)}CHR$<66> ÍCHR$<32)J
LPRINT CHR$<18);CHR^(8);CHR$<6);
LPRINT CHR*
LPRINT "USER DEFINED CHARACTERS...,.'
LPRINT • = = = = = = = •
LPRINT
LPRINT CHR$ < 27);■% *;CHR* < O);CHR$ < 0);
END
ENTRY ESCAPE SEQl
COLUMNS 1-3