REM ronald cagua

REM description

CLS
SCREEN 1
CIRCLE (85, 43), 13, 9
PAINT (85, 43), 13, 9
CIRCLE (113, 42), 20, 9
PAINT (113, 42), 20, 9
CIRCLE (151, 42), 23, 9
PAINT (151, 42), 23, 9
CIRCLE (184, 53), 20, 9
PAINT (182, 53), 20, 9
CIRCLE (160, 68), 23, 9
PAINT (160, 68), 23, 9
CIRCLE (125, 68), 20, 9
PAINT (125, 68), 20, 9
CIRCLE (100, 68), 15, 9
PAINT (100, 68), 15, 9
CIRCLE (84, 63), 19, 9
PAINT (84, 63), 19, 9
COLOR 9
x = 110
y = 90
move:
CIRCLE (x, y), 3, 1
FOR t = 1 TO 1000
NEXT t
CIRCLE (x, y), 3, 0
y = y + 1
IF y > 199 THEN GOTO bottom
GOTO move
bottom:
COLOR 9
x = 90
y = 130
move1:
CIRCLE (x, y), 3, 1
FOR t = 1 TO 1000
NEXT t
CIRCLE (x, y), 3, 0
y = y + 1
IF y > 199 THEN GOTO bottom1
GOTO move1
bottom1:
COLOR 9
x = 170
y = 135
move2:
CIRCLE (x, y), 3, 1
FOR t = 1 TO 1000
NEXT t
CIRCLE (x, y), 3, 0
y = y + 1
IF y > 199 THEN GOTO bottom2
GOTO move2
bottom2: