Escape  u Escape from the Underworld by J. Dury from Sinclair User, May 1986 Neither the program or the accompanying listing notes bother to say what the control keys are, but they seem to be: O/P=left/right, Q=thrust, Z=fire 23658j\,8 a(5) )23693\,7:0:0: ( n="a""h"+7:a:n,a:n 2G26,31,15,63?,15,8,8,24 0c=1na Gup=0:64510=254-bitup=1:flxn=xn-1 Ayn=yn+(57342=254-bit)-(57342=253-bit) ((x+1,y)=7xn=xn+.5 y1=y+yn:x1=x+xn yndr=yn:yn=0 *(x1,y1)<7xn=0:x1=x:y1=y :x,y;" ";x1,y1;6;(145+dr+up*(fl>0)) y1=316000p  x=x1:y=y1 %e65278=253-bittx=(65022=254-bit)-up:ty=dr:px=x+tx:py=y+ty:4000 *na<12200 /;a(c)=0c=c-(c=5)*5+1:2095/ 4xd=(x-a(c)) 9!ay=29-(5-c)*2 > ax=a(c)+xd C)xd=0ū(ax,ay)72130R H"a(c),ay;" ";ax,ay;5;"" M a(c)=ax RSa(c)=xƽ(y-ay)<11 tx=0:ty=(y-ay):px=a(c)+tx:py=ay+ty:4000 yfl>0fl=10 -23673y\:20,21;fl;"00 ":fl<1#0;9 ;1;"OUT OF FUEL" ]c:na=0n=217:n,30;" ":.0005vn,60<-n:n:na=-1  2000 *(px,py)74180T:4040 ;ppx=py*8+4:ppy=(21-px)*8+4 Kn=110 :px=px+tx:py=py+ty:(px,py)=7n:x1=100d  4180T n8:1:ppx,ppy:n*8*ty,n*8*-tx:ppx,ppy:n*8*ty,n*8*-tx:7:0 $n<1x1=100d4090 'atr=(px,py):atr=541506 atr=65100  px,py;" " px>9 4100 &(px+1,py)=74090 An=px+111 :(n,py)=2n>1n:4090 m=px+1 U(n,py)=7m,py;" ";n,py;2;"":m=m+1:n=n+1:4080  3n=px-11-1:(n,py)=2n <px,py;2;"";7;n+1,py;" ":4090 6 px,py;" " @n=(py-19)/2 Ena=na-1:a(n)=0 FG.004yn,20+5*n:sc=sc+150+502*n:7100 J V+px>18n=n-px+18:px=18 X(px<2n=n-2+px:px=2 Z+py>29n=n-py+29:py=29 \(py<3n=n-3+py:py=3 ` z20,21;"1000";21,23;cav:"":0,0;:n=019:n,0;31;" ":n 70,0;2;"";19,0;"" n=2292:m=0̺(*9 ):m,n;2;"":m:m=19-(*9 )19:m,n;2;"":m:n 2n=019:n,30;2;"":n   l=l-1  a$=""  Bm=15.25~:(x+1,y)=7x=x+1 ]tu=(m-m)*4+1:x-1,y;" ";x,y;6;a$(tu):.005y# =,60<-tu:m 1:15:.2~L,9 :3:.1}L,4:.1}L,4:.1}L,4:.4L,5:.2~L,4:20:.3,8:3:.3,9 l1000 (."":#0;10 ;"GAME OVER":30 2 sc>hh=sc <^(sc=h):21,0;" HIGH:000000";21,12 -h;h:0:sc=h7050 F 100d u x1,y1;" " z88,6;1;" CAVERN ";cav;" COMPLETED "  7050 Psc=sc+fl*100d*cav:20,21;"0000":7100:cav=cav+1 J10 ,9 ;1;" PRESS A KEY ":0:0:1000 n.1}L,0:.1}L,2:.1}L,4:.2~L,7:.1}L,4:.6,7: |20,12 -sc;sc:sc-sl10000'l=l+1:21,4+l;"":sl=sl+10000':.01z# =,10