Compucolor.org – Virtual Media

Listing of file='RNDCOL.BAS;01' on disk='vmedia/demos-sector.ccvf'

5 PLOT 12
10 C= RND (1)* 8+ 16
15 D= RND (1)* 8+ 16
20 X= RND (1)* 31
30 Y= RND (1)* 63
40 PLOT 30,D,29,C
50 PLOT 3,Y,X
60 PRINT "`";
70 GOTO 10