_________________________________________________________________________

           Title: Master Worm
         Version: 1.0
          Author: Magnus Lonn
     Description: 

This wormgame needs a skilful player.
Everytime you move your space will be smaller and smaller, and, if you are
touthing the bar, you're history. The same happends if you don't blow up the
"apples" in time.
How to play:
To start; press (1). Then press 8,6,4 or 2.
The worm starts running. To stop him; press AC/on, EXE, and then the direction
you want the worm to get (8=up, 2=down, 4=left, 6=right). Your mission is to
catch the three spots. Two of them are not "real"!

NOTE; you must wate to stop the worm until you see it's moving becouse of the
more data the program have to handle, which makes it slightely slower than Worm.
                  
_________________________________________________________________________

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 1:
___________________________________________________________________________

'MASTERWORM EXE'
Goto 6
Lbl 1
Plot X,Y
Isz Y
X>B=>Goto 7
Y/=H=>Goto 1
X/=G=>Goto 1
Goto 5
Lbl 2
Plot X,Y
Dsz X
X<J=>Goto 7
X/=G=>Goto 2
Y/=H=>Goto 2
Goto 5
Lbl 3
Plot X,Y
Dsz Y
X<L=>Goto 7
Y/=H=>Goto 3
X/=G=>Goto 3
Goto 5
Lbl 4
Plot X.Y
Isz Y
Y>K=>Goto 7
Y/=H=>Goto 4
X/=G=>Goto 4
Lbl 5
1->A
V+20->V
Plot G,H
Plot 10sin (V)+G,10cos (V)+H
Line
V<65=>Goto 5
Line_
"TURNES"
T-1_
Lbl 6
A=1=>Prog 2
T=0=>"START"
J+2->J
L+2->L
B-2->B
K-2->K
Isz T
X->M
Y->N
?->D
Plot J,K
Plot B,K
Line
Plot B,L
Line
Plot J,K
Plot J,L
Line
Plot B,L
line
K<H=>Goto 8
L>H=>Goto 8
B<G=>Goto 8
J>G=>Goto 8
M->X
N->Y
D=6=>Goto 1
D=4=>Goto 2
D=2=>Goto 3
D=8=>Goto 4
Prog 2
Goto 6
Lbl 7
1->A
"BADONK!...CRASH!"
Goto 9
Lbl 8
1->A
"SORRY...TOO LATE"
Lbl 9

___________________________________________________________________________
Store in program 2:
___________________________________________________________________________

'RESET
Range 0,94,,0,62
0->A
0->C
0->G
0->H
0->T
94->B
62->K
0->J
0->L
-90->V
Plot 0,62
Plot 94,62
Line
Plot 94,0
Line
Lbl 1
Isz C
Int 80Ran#+6->E
Int 50Ran#+6->F
Plot E,F
Int 3Ran#+1->I
I=1=>Goto 2
C>2=>Goto 3
Goto 1
Lbl 2
E->G
F->H
C<3=>Goto 1
Lbl 3
G=0=>Goto 2
Int 80Ran#+6->X
Int 50Ran#+6->Y

_________________________________________________________________________