Apple IIe - Page 247

10
HGR2
20
ROT=
1
PROG
Ill
30
FOR
J = 0
TO
7
40
HCOLOR
=J
50
FOR I
= 1
TO
40
60
SCALE
=
I
70
DRAW
1AT140
,
96
80
NEXT
I
90
NEXT
J
100
GOTO
30
Apple
li
e
Graphics 247