globs1.bas

SCREEN 13: DO: X = RND * 320: Y = RND * 240: C = 31: R = RND * 25 + 10: CS = C / R / 2.3: FOR I = 1 TO R: CIRCLE (X, Y), I, C: CIRCLE (X, Y - 1), I, C: C = C - CS: NEXT: LOOP