Star Micronics 10X User Manual page 193

I
• •
• •
• •
• •
• •
• •
• •
• •
• •
• •
• •
•
Commodore VIC-20 & C-64
10 DPEN4,4,5:C"D4
20
PRINT CHR$(lb3)jCHR$(161';
30
PRINT CHR'(27);"A";CHR$(6)
40 PRINT CHR$(lb2)jCHR$(160);
50 PRINT CHR'(27)j
I
2"
60 PRINTI4:CLOSE4:END
I
Figure C-S is the circle program presented in Chapter 7, amended for the
Commodore computer.
10
OPEN4,4.5:C~D~
20 PRINT TABll':CHR$(163';CHR$(27Ij"A"jCHR$(6)
30 PRINT CHRS(160 '
'0
PRINTI4:CLOSE4
50
END
Figure C-6 is the tilde program presented in Chapter 7 amended for the
Commodore computer.
10 OPEN4!4,5:C"D4
20 PRINT TAB(20);RN";CHRS(13);
30 PRINT TAB{201;CHRS(lb41iCHR${13:;
10
PRINT
TAB(18):"W·;CHRS(166):CHRS(32)iC~R!(lb7);·E·;CHR${t3\:
50 PRINT TAB(20);CHR$(165);CHR$(131;
bO
PRINT
TAB(201;"S'
70
PRINTI4:CLOSE4
Figure C-7 is the map program presented in Chapter 7 amended for the
Commodore computer.
185