Advertisement
~
Gemini User's Manual
10 PRI 1
20
PRINT CHRS
(27)
,">";
30
PRINT CHRS
(103);
CHRS
(lOll;
CHRS
(271;"A
n ,
CHRS
(61
40
PRINT CHRf
(162);
CHRS
(160),
CHRS
(27),"2"
50
PRINT CHRS
(27),":":
PRI
0,
END
Figure A-5 is the circle program presented in chapter 7, amended for the
Apple
/I
computer.
10
PRJ
I
30 PRINT CHRf (3211 CHRf (271,")1; CHRS (163), CHRt (27) I "AI, CHRf
(61
40
PRINT CHRS
(160)
50
PRINT CHRt
(27),"·"
60 PRI 0: END
Figure
A-6
is the tilde program presented in Chapter
7
amended for the
Apple
/I
computer.
1
PR#
1
10
PRINT TAB( 20);"N"
15
PRINT TAB(
20);
CHRt
(27);"}";
CHRS
(164);
CHR$
(27);':"
20 PRINT TAB( 17);'W";
25 PRINT CHRS (27);">"; CHRS (166); CHRS (27);":';
30 PRINT·
'; CHRS (27);")"; CHRS (167); CHRS (27)j":';'E"
35 PRINT TAB(
20);
CHRS (27);")"; CHRS
!l65);
CHRS (27);":"
40 PRINT TAB(
20);"5·
45
PR.
0: END
Figure A-7 is the map program presented in Chapter 7 amended for the
Apple /I computer.
10 REK NY LARGE LETTERS
20
PRI 1
25 PRINT CHRf (27);"U", CHRS (1);
30 PRINT CHRt (27) ,"A", CHRS (Ill
40 FOR
J :
1 TO
q
50 FOR I : 1 TO 12
60
READ A
70 PRINT CHRS
(27),">",
CHRS (A);
158
• •
I
• •
• •
• •
• •
I
• •
• •
•
I
• •
• •
I
Advertisement
