DO
RANDOMIZE TIMER
SCREEN 9
COLOR 9
a = 100
b = 100
FOR i = 1 TO 400
CLS
CIRCLE (a, b), 30
PAINT (a, b)
a = a + 1
FOR d = 1 TO 100
NEXT d
NEXT i
FOR f = 1 TO 200
CLS
CIRCLE (a, b), 30
PAINT (a, b)
b = b + 1
FOR x = 1 TO 100
NEXT x
NEXT f
FOR t = 1 TO 400
CLS
CIRCLE (a, b), 30
PAINT (a, b)
a = a - 1
FOR y = 1 TO 100
NEXT y
NEXT t
FOR x = 1 TO 200
CLS
CIRCLE (a, b), 30
PAINT (a, b)
b = b - 1
FOR v = 1 TO 100
NEXT v
NEXT x
LOOP