Name    : D
Length  : $00BD (189)
Load at : $0801 (2,049)

   10  HOME 
   15  REM  THIS PROGRAM PUTS DOTS RANDOMLY ON YOUR SCREEN.
   20  GR 
   30  COLOR= 4
   40  FOR X = 1 TO 100
   50    I = INT (100 * RND (1)) + 1
   60    IF I > 39 THEN 
           I = INT (I / 4)
   70    Y = INT (100 * RND (1)) + 1
   80    IF Y > 39 THEN 
           Y = INT (Y / 4)
   90    PLOT I,Y
  100  NEXT X
  110  END