20.02.2013 Views

ZX Computings - OpenLibra

ZX Computings - OpenLibra

ZX Computings - OpenLibra

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

1220<br />

\225<br />

230<br />

250<br />

,L NEED m 270<br />

WAY I N"\<br />

280<br />

28 5<br />

\2 90<br />

300<br />

310<br />

320<br />

330<br />

350<br />

360<br />

370<br />

<strong>ZX</strong>80 adventure<br />

IF W < 1 AND RND(IO) > 8 THEN GOTO 17 30 420<br />

IF W < 1 THEN LET W = 1<br />

PRINT "twospaceTHIS IS FOOTPATH " ;W 4 50<br />

IF W * 10 THEN GOTO 1690 460<br />

PRINT "SO YOU ARE " ; CHR$(128);CHRg 470<br />

(166 - W);CHR$(128);" FROM THE PALACE' 475<br />

PRINT 480<br />

IF S < 1 THEN LET S = RND(5) 500<br />

PRINT "YOU HAVE $";S;" IN YOUR POCKETS"<br />

LET X » X + 1 530<br />

PRINT 540<br />

PRINT "five shift S THIS IS PROBLEM ";X<br />

PRINT<br />

LET K = 1 + RND(5)<br />

PRINT<br />

PRINT "YOURE FACING ";CHR$(128);CHR$<br />

(156 + K);CHR$(128);"space";<br />

LET A = RND(4)<br />

IF A " 2 THEN PRINT "SHOPS"<br />

"CROSSINGS"<br />

IF A = 4 THEN PRINT "TUBE STATION",,<br />

"ENTRANCES"<br />

PRINT<br />

PRINT "WHICH ONE WILL YOU USE?"<br />

INPUT B<br />

IF B > K OR B < 1 THEN GOTO 470<br />

GOSUB 1610<br />

IF RND(10) < 4 OR B - A THEN GOSUB<br />

1170<br />

LET C = RND(4)<br />

IF C = 1 THEN PRINT "FOOL";

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!