29.12.2012 Views

spectrum utility - OpenLibra

spectrum utility - OpenLibra

spectrum utility - OpenLibra

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

LET d*=z»(a: FOR x-1 TO rnd: READ p«:<br />

NEXT x<br />

711 LET run-run+1<br />

715 LET x-x-1<br />

720 IF p (x) Or AND run-1 THEN<br />

GO TO 710<br />

722 IF p ( x)< >r THEN RETURN<br />

725 IF x-2 AND NOT wake THEN L<br />

ET wake=l: PRINT "The guard wak<br />

es up.": RETURN<br />

726 IF NOT wake AND x=2 THEN R<br />

ETURN<br />

730 RESTORE 30:<br />

RND*10>: FOR y»l<br />

: NEXT y<br />

733 LET y-y-1<br />

740 IF o(y)-r THEN PRINT '<br />

"Jp»*" takes the "|o*I LET<br />

-13+x: RETURN<br />

(SPECTRUM ADVENTURE<br />

LET rnd-l+INT (<br />

TO rnd: READ o»<br />

•The<br />

o (y)<br />

743 IF NOT o(y) THEN PRINT *"T<br />

he "|p«|" takes the "Jo«|""froHi<br />

you.": LET o(y)-13+x: RETURN<br />

730 IF o(y>-13+x THEN PRINT<br />

The •|p«|• drops a "fo»: LET o(y<br />

)=r: RETURN<br />

760 IF wake AND r=»2 AND NOT k (2<br />

) AND x-2 AND RND

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

Saved successfully!

Ooh no, something went wrong!