_________________________________________________________________________

           Title: Real Soccer
         Version: 1.0
          Author: Magnus Lonn
            Size: 550 bytes
     Description: This game needs one goalkeeper and one penaltyshooter.
                  A hint: to shoot in the middle of the goal when there's 
                  no wind use an angle of 90 degrees. Height can be varied from
                  0 to 20. And the goalkeeper can move from about -20 to 20.
                  Shoot hard!
                  
_________________________________________________________________________

Command translation:

->              Single arrow (located on the keyboard)
=>              Double arrow (press: [shift] [prgm] [f1] [f1])
_               Display, -Disp- (press: [shift] [prgm] [f4])
<=              Less or equal (A <= B)
>=              Greater or equal (A >= B)
<>              Not equal (A <> B)
^               Raised to the power of
/               Division or fraction (explain which with a comment)

2rt()           Root (2rt(7) is the square root of 7)
4rt()           4th root
pi              pi (~3.14159265359, low case)
e()             e(1) (~2.7818281846, low case)
E               Exponent (5E4 gives 5*10^4) (located on the keyboard,
                [EXP])
_________________________________________________________________________

 Program :

Store in program S:
__________________________________________________________

"SOCCER EXE"
Range 1,95,99,-40,22,99
Plot 27,0
Plot 27,21
Line
Plot 69,21
Plot 69,0
Line
Plot 14,0
Plot 2,-20
Line
Plot 94,-20
Line
Plot 82,0
Line
"WIND->"
Int 21Ran#-10->W_
"ANGLE"
?->A
3cos A->E
3sin A->F
"HEIGHT"
?->H
"GOALKEEPER MOVE"
?->M
48->C
-34->D
Lbl 1
E+C+0.1W->C
F+D->D
Plot C,D
D<-36=>Goto 4
Goto 1
Prog T
C>P=>Goto 2
Goto 2
D<0=>Goto 2
D>20=>Goto 2
-F->F
Goto 1
Lbl 2
C<27=>Goto 3
C>69=>Goto 3
D<0=>Goto 3
D>20=>Goto 3
"GOAL!"
Goto 4
Lbl 3
"MISS!"
Lbl 4
" "

___________________________________________________________
Store in program T:
___________________________________________________________

'GOALKEEPER'
1->R
M<0=>-1->R
48+M->M
Plot M-4R,3
Plot M-4R,4
Plot M-3R,5
Plot M-3R,6
Plot M-2R,7
Plot M-2R,8
Line
Plot M-1R,8
Plot M-1R,16
Line
Plot M,17
Plot M,19
Line
Plot M,13
Plot M,4
Line
Plot M-1R,3
Plot M-1R,2
Plot M+1R,8
Plot M+1R,15
Line
Plot M+2R,14
Plot M+2R,15
Plot M+2R,12
Plot M+4R,14
Line
Plot M+5R,15
Plot M+5R,17
Line
M+2->P
M-2->Q

_________________________________________________________________________