Date:         Thu, 23 Oct 2003 15:45:25 +0100
From: pixel <p.ixel@NTLWORLD.COM>
Subject: Missing Sub Routines
To: WRYTING-L@LISTSERV.UTORONTO.CA


1 LET VAR =3D COORD
2 LET VAR "WRITE" 0,0=20
5 LET WRITE =3D xy xy / xXy
.
.
10 CLS
20 PRINT "at" X400, Y300" "Welcome to the Game""
30 PRINT CHR$ "1 - read instant"
40 IF CHR$ "1; THEN GOSUB 300
50 PRINT CHR$ "2 - Choose player"
60 IF CHR$ "2; THEN GOSUB 500
70 PRINT "at" X 600, Y200"  "Adventure starts here"
80 IF CHR$ "8 THEN GOSUB 100, IF CHR$ "5 THEN GOSUB 110
.
100 PRINT" "There is treasure here"
110 PRINT" "You are in a maze of twisty little passages"; THEN GOSUB 130
120 PRINT" "You are in a maze of twisty little passages"; THEN GOSUB 300
130 PRINT" "You are in a twisty little maze of passages"; THEN GOSUB 310
.
.
.
.
300 PRINT" "Start again"
310 PRINT" "There is treasure here"
.
420 RETURN 50
.
.
.
.
500  - 1
.
.
.
.
1000 CLS