REM SUZETTE PRINGLE
REM 10-3
REM PROGRAMgra6
REM DESCRIPTION- BALL THROWN TO PERSON

SCREEN 1
COLOR 1
REM***HEAD***
CIRCLE (40, 40), 30, 1
REM***BODY***
LINE (40, 65)-(40, 150), 1
REM***LEFT ARM AND FINGERS***
LINE (40, 90)-(10, 90), 1
LINE (10, 90)-(0, 80), 1
LINE (10, 90)-(0, 100), 1
REM***RIGHT ARM AND FINGERS***
LINE (40, 90)-(60, 90), 1
LINE (60, 90)-(70, 80), 1
LINE (60, 90)-(70, 100), 1
REM***EYES***
CIRCLE (25, 35), 2, 1
PAINT (25, 35), 1, 1
CIRCLE (55, 35), 2, 1
PAINT (55, 35), 1, 1
REM***NOSE***
CIRCLE (40, 45), 1, 1
PAINT (40, 45), 1, 1
REM***MOUTH***
LINE (30, 55)-(50, 55), 1
LINE (30, 55)-(28, 50), 1
LINE (50, 55)-(52, 50), 1
REM***LEGS***
LINE (40, 150)-(0, 190), 1
LINE (40, 150)-(80, 190), 1
REM***ANIMATION***
MOVE:
SCREEN 1
COLOR 0
X = 300
Y = 0
MOVE2:
CIRCLE (X, Y), 5, 2
FOR T = 1 TO 2000
NEXT T
CIRCLE (X, Y), 5, 0
X = X - 8
Y = Y + 3
IF X < 60 THEN GOTO MOVE3
IF Y > 90 THEN GOTO MOVE3
GOTO MOVE2
MOVE3:
GOTO MOVE