symbol Example10 DIM A(6,2)
20 DATA 1, 7, -2, 16, 7, -1, 15, 4, -1, 21, 8, -1, 15, 12, -1, 16, 9, -1, 1, 9, -1
30 RESTORE
40 CLEAR SCREEN
50 GINIT
60 READ A(*)
70 MOVE 50,50
80 PEN 6
90 AREA PEN 7
100 SYMBOL A(*),FILL,EDGE
110 END
|