REM Terry-Ann McFarlane                                                       rem Terry-Ann

REM program number
REM description

CLS
SCREEN 1
REM head
CIRCLE (50, 30), 20, 1
REM eye
CIRCLE (60, 30), 2, 1
REM nose
CIRCLE (71, 35), 2, 1
REM mouth
LINE (55, 45)-(45, 40), 1
REM ear
LINE (45, 30)-(45, 32), 1
REM body
LINE (50, 48)-(50, 140), 1
REM one arm
LINE (50, 48)-(70, 70), 1
REM hand
CIRCLE (70, 70), 2, 1
REM other hand
LINE (50, 48)-(60, 75), 1
REM hand
CIRCLE (60, 75), 2, 1
REM a leg
LINE (50, 100)-(80, 140), 1
REM a foot
CIRCLE (50, 140), 2, 1
REM another foot
CIRCLE (80, 140), 2, 1
REM bottom of skirt
LINE (50, 120)-(65, 120), 1
REM goal
LINE (210, 40)-(300, 150), 1, B
REM the net
LINE (220, 40)-(220, 150), 1
LINE (230, 40)-(230, 150), 1
LINE (240, 40)-(240, 150), 1
LINE (250, 40)-(250, 150), 1
LINE (260, 40)-(260, 150), 1
LINE (270, 40)-(270, 150), 1
LINE (280, 40)-(280, 150), 1
LINE (290, 40)-(290, 150), 1
LINE (210, 60)-(300, 60), 1
LINE (210, 80)-(300, 80), 1
LINE (210, 100)-(300, 100), 1
LINE (210, 120)-(300, 120), 1
LINE (210, 140)-(300, 140), 1
COLOR 0
x = 95
y = 140
move:
CIRCLE (x, y), 10, 9
PAINT (x, y), 10, 9
FOR t = 1 TO 1000
NEXT t
CIRCLE (x, y), 10, 0
x = x + 1
IF x > 230 THEN GOTO bottom
GOTO move
bottom:
PRINT "GGGGOOOOAAAALLLL!!!!"