Death H H {' sk=0  2970  af=0:cig=0:spa=0:dri=0:lad=0:rop=0:sho=0:aqu=0:buc=0:a=11 :b=22:found=0:res=4:b1=5:light=200:col=850R:so=100d (_p(12 ):q(12 ):c(40(,27):e(25):w(8):w$(8,20) 2 3500 <0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 F0,1,4,1,1,1,1,1,1,1,1,4,1,1,4,1,1,1,3,1,4,0,2,0,2,0,0 P0,4,0,4,0,2,0,0,0,2,0,0,0,0,1,0,0,2,0,0,1,0,2,0,2,0,0 Z0,1,4,1,0,2,2,8,2,2,2,2,0,0,1,0,0,2,0,0,1,6,2,0,2,6,6 d0,1,0,0,0,0,0,0,0,0,0,2,0,1,1,1,0,5,0,0,4,0,2,2,8,0,0 n0,1,2,2,2,5,2,2,5,2,0,8,0,0,0,0,0,2,2,3,1,0,0,3,0,0,0 x0,1,0,0,0,0,0,0,0,2,0,2,1,1,6,1,1,2,0,0,1,0,0,2,0,0,0 0,1,2,2,3,2,2,2,0,2,2,2,0,0,0,0,0,2,0,0,4,0,0,2,8,2,6 0,1,0,0,1,0,6,0,0,8,0,6,6,6,3,3,1,5,0,0,1,0,2,2,0,0,0 0,4,4,1,1,0,2,0,0,8,2,2,2,2,0,0,0,2,2,0,1,0,2,0,0,0,0 0,1,0,0,0,0,0,0,0,2,0,0,0,0,0,0,0,2,0,0,4,0,6,6,6,6,6 0,1,2,2,2,3,6,6,2,2,2,2,3,5,2,2,2,2,0,0,1,0,0,0,8,0,0 0,1,0,0,0,0,6,0,0,3,0,0,0,0,0,8,0,6,0,0,4,0,1,1,1,0,0 0,3,0,3,2,2,4,1,1,1,8,1,1,1,1,2,0,0,0,0,1,0,5,0,0,2,6 0,1,0,2,0,0,0,0,0,0,0,24,24,2,2,2,2,2,24,24,4,0,1,1,1,2,0 0,1,0,2,2,2,6,2,2,2,2,24,24,2,24,6,24,24,24,24,1,0,0,0,0,2,0 0,3,0,0,8,0,0,8,0,0,2,24,2,3,24,2,2,3,2,24,1,0,2,2,2,2,0 0,1,0,0,2,0,0,2,0,0,6,24,24,2,2,2,24,24,2,24,1,0,3,0,3,0,0 0,1,1,1,1,1,1,1,1,1,1,24,2,6,24,2,2,24,5,24,1,0,2,2,2,2,0 0,4,0,0,2,0,2,0,2,0,1,24,24,6,24,24,5,24,5,24,1,8,2,0,2,0,0 0,1,0,0,2,2,2,2,2,0,1,0,2,6,24,2,2,24,5,24,4,0,2,2,2,2,6 0,0,0,0,0,0,0,0,0,0,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 "60<:y=123:c(1,y),c(2,y),c(3,y),c(4,y),c(5,y),c(6,y),c(7,y),c(8,y),c(9 ,y),c(10 ,y),c(11 ,y),c(12 ,y),c(13 ,y),c(14,y),c(15,y),c(16,y),c(17,y),c(18,y),c(19,y),c(20,y),c(21,y),c(22,y),c(23,y),c(24,y),c(25,y),c(26,y),c(27,y):.01z# =,y::y ,?x=2837%:y=320:c(x,y)=2:y:x 1'.05|L,5:.05|L,-5 6?x=127:y=2425:c(x,y)=0:y:x ;'.05|L,5:.05|L,-5 @.x=2838&:c(x,2)=0:x E'.05|L,5:.05|L,-5 J.y=323:c(38&,y)=0:y O'.05|L,5:.05|L,-5 T]x=2838&:c(x,21)=0:c(x,22)=0:c(x,23)=0:x Y'.05|L,5:.05|L,-5 ^Q19,19,19,19,6,19,19,19,19 hK19,6,6,6,6,0,6,0,19 rK19,0,6,0,0,6,6,6,19 |K19,6,6,6,6,6,0,6,19 K19,6,0,6,0,6,0,7,19 8y=2226:x=1927:c(x,y):x:y [c(37%,3)=12 :c(35#,9 )=12 :c(35#,13 )=12 c(37%,5)=14:c(37%,13 )=14:c(35#,19)=14:c(35#,5)=14:c(33!,11 )=14 \c(37%,7)=15:c(37%,15)=15:c(35#,17)=15 c(37%,11 )=16:c(37%,19)=16:c(35#,11 )=16:c(35#,3)=16:c(35#,7)=16 vc(37%,17)=17:c(37%,9 )=17:c(35#,15)=17:found>0460 %n=07:ro:"a"+n,ro:n 10010010 01111100| 00010000 001110008 01000100D 01000100D 01000100D 00000000 5lx=16+(*10 ):ly=1+(*20) c(lx,ly)=0460 c(lx,ly)=20 lx=1+(*15) ly=1+(*13 ) c(lx,ly)=0490 c(lx,ly)=20 clx=1+(*26):ly=1+(*20):c(lx,ly)=0c(lx,ly)=20520 c(lx,ly)=20 cheat=3  & t=0 0Qdx=1+(*26):dy=1+(*13 ):c(dx,dy)>05600 :c(dx,dy)=11 D#t=t+1:t<55600 Xfound>0705 vG4,2;"DO YOU WANT A STANDARD RANGE OF EQUIPMENT?" a$=:a$=""640 &a$="y".2~L,9 :31200 a$"n"640 o=1:n=25 .13~R,-10 4::0,1;"Choose from :-";2,28;"Key";3,27;"____":j=18:j+3,28;"(";j;")":j 0j=18:j+3,6;w$(j):j )o=0e=18:770 k20,5;1;n;" ";20,7;" Choice";:n>11;"s left" t" Which Item?";e:e<1e>821,10 ;2;"NOT LISTED":.1}L,-5:730 !21,10 ;" " 9.065}R,11 :1;e+3,28;"***" p"How many?";n$:n$<480ůn$>57921,10 ;2;"INVALID":.1}L,-5:750 no=n$ an=n-no:n<021,10 ;2;"TOO MANY":.1}L,-5:n=n+no:750 21,10 ;" " ).065}R,11 :.065}R,6 Oe=1cig=cig+no:;0;4,1;cig;4,28;" "  Oe=2spa=spa+no:;0;5,1;spa;5,28;" " *Oe=3dri=dri+no:;0;6,1;dri;6,28;" " 4Oe=4lad=lad+no:;0;7,1;lad;7,28;" " >Oe=5rop=rop+no:;0;8,1;rop;8,28;" " HOe=6sho=sho+no:;0;9 ,1;sho;9 ,28;" " RQe=7aqu=aqu+no:;0;10 ,1;aqu;10 ,28;" " \Qe=8buc=buc+no:;0;11 ,1;buc;11 ,28;" " fn>0720 ko=0e pWo=1:0,1;"You have with you:-":o=0:no=0:705 zo=0:no=0 1.1}L,5:.1}L,-5:1220 col<12580 light<12420t col<7503190v 613 ,10 ;" ";13 ,22;" " E13 ,2;"FITNESS:";col;13 ,15;"LIGHTS:";light 714,2;res;" RESCUER";:res>1"S"; " ";found;" FOUND" 16,0;" ";18,0;" ";19,0;" ";20,0;" ";21,0;" " c(a,b)=016,2;"UNEXPLORED TERRITORY-DANGER":score=score+502:col=col-75K:light=light-25:1090B .16,2;z$ 8 1705 Ba$=:a$=""1090B IA$="l"2810 Ja$="f"3180l K c(a,b)=0c(a,b)=2 La$="f"3180l Va$="g":8000@ [a$="c"5000 `c(a,b)=73150N j+a$="p"c(a,b+1)=73240 t*light=light-1:score=score-1 ~ a$="n"b=b-1:980  a$="s"b=b+1:980  a$="w"a=a-1:980  a$="e"a=a+1:980 b>211090B  1090B 7a<1a>38&b<1b>262490 #b>22a<192490 #b>22a>272490 ka>27b<38&0,0;2;"CAVE OF CHASMS-TAKE CARE":2:so=15 ta=2b<22b>10,0;1;"MAIN STREAM PASSAGE":1:so=30 tb=2a>1a<220,0;1;"MAIN STREAM PASSAGE":1:so=30 ua=21b>1b<220,0;1;"MAIN STREAM PASSAGE":1:so=30 a<12 a>2b>15b<220,0;2;"ENTRANCE SERIES":7:so=45-  a>2a<19b>11 b<150,0;6;"TRAMLINE SERIES":6:so=60< qa=23b=22xx=xx+1:xx=1q=110 :.01z# =,14:.01z# =,15:q a>19a<27b>21b<27c(a,b)70,0;2;1;" THE LOST CAVE":2:so=75K (a>17a<21b>2b<12 0,0;5;"THE DRY LINK":5:so=90Z 2a>12 a<20b>14b<220,0;3;" FALSE HOPE SERIES":3:so=105i <a>21a<28b>1b<220,0;0;"LADDER SERIES":0:so=130 Fa>2a<9 b>7b<11 0,0;3;"THE KEY":3:so=145 Pa>13 a<17b>2b<60,0;6;"THE LITTLE TEE":6:so=160 Za>2a<13 b>2b<70,0;2;"NORTH WEST TERRITORY":2:so=175 da>9 a<18b>6b<12 0,0;6;"CENTRAL PARK":6:so=190 n;c(a,b)=1z$="IN A STREAM PASSAGE":col=col-2 x8c(a,b)=2z$="IN A DRY PASSAGE":col=col-1 c(a,b)=32290 c(a,b)=42370B c(a,b)=52390V c(a,b)=62510 c(a,b)=726102 c(a,b)=82330 4c(a,b)=9 z$="PASSAGE CLEAR":c(a,b)=2 Xc(a,b)=10 z$="PASSAGE CLEAR-SHOVEL BROKE!":c(a,b)=2:.01z# =,-10 |c(a,b)=11 c(a,b)=26:q=13:.01z# =,12 :.01z# =,13 :q:dri=dri+1:705 |c(a,b)=12 q=13:.01z# =,12 :.01z# =,13 :q:spa=spa+2:c(a,b)=31:705 5c(a,b)=13 z$="ON A PITCH":col=col+-10 |c(a,b)=14q=13:.01z# =,12 :.01z# =,13 :q:rop=rop+1:c(a,b)=27:705 |c(a,b)=15q=13:.01z# =,12 :.01z# =,13 :q:sho=sho+1:c(a,b)=28:705 |c(a,b)=16q=13:.01z# =,12 :.01z# =,13 :q:lad=lad+1:c(a,b)=29:705 |c(a,b)=17q=13:.01z# =,12 :.01z# =,13 :q:buc=buc+1:c(a,b)=30:705 2c(a,b)=18z$="CLIMBING":col=col-10 "c(a,b)=192950 ,c(a,b)=20z$="I'M SAVED!":c(a,b)=2:score=score+1000:found=found+1:q=0 7:.01z# =,8:.01z# =,15:q:q:cheat=cheat-1 68c(a,b)=21z$="IN A STATIC SUMP":c(a,b)=5 @Gc(a,b)=22z$="FREE-CLIMBING":c(a,b)=8:col=col-20 JOc(a,b)=23z$="STRUGGLING ON A PITCH":c(a,b)=3:col=col-20 Tc(a,b)=243270 ^Tc(a,b)=25z$="SUMP BAILED-BUCKET BROKE":.05|L,-5:c(a,b)=5 h6c(a,b)=26z$="AT A FOOD DUMP":c(a,b)=2 r0c(a,b)=27z$="A ROPE!":c(a,b)=19 |2c(a,b)=28z$="A SHOVEL!":c(a,b)=19 2c(a,b)=29z$="A LADDER!":c(a,b)=19 2c(a,b)=30z$="A BUCKET!":c(a,b)=19 9c(a,b)=31z$="TWO SPARE LAMPS!":c(a,b)=19  990 a=1:1850: >:c(a-1,b)=1"..STREAM PASSAGE WEST " Tc(a-1,b)=201;"..LOST CAVER WEST";:0;" " <c(a-1,b)=2"..DRY PASSAGE WEST " <c(a-1,b)=3"..25'PITCH WEST " <c(a-1,b)=4"..SUMP WEST " <c(a-1,b)=5"..STATIC SUMP WEST " <c(a-1,b)=8"..CLIMB WEST " =c(a-1,b)=13 "..LADDERED PITCH WEST " c(a-1,b)=12 c(a-1,b)=14c(a-1,b)=15c(a-1,b)=16c(a-1,b)=17"..EQUIPMENT DUMP WEST " =c(a-1,b)=18"..ROPED CLIMB WEST " =c(a-1,b)=19"..CHASM WEST " Ac(a-1,b)=11 "..FOOD DUMP WEST " &<c(a-1,b)=6"..CHOKED PASSAGE WEST " 0=c(a-1,b)=24"..UNSTABLE BOULDERS WEST " 5a=40(1990 :<c(a+1,b)=1"..STREAM PASSAGE EAST " DTc(a+1,b)=201;"..LOST CAVER EAST";:0;" " N<c(a+1,b)=2"..DRY PASSAGE EAST " X<c(a+1,b)=3"..25' PITCH EAST " ]:c(a+1,b)=4"..SUMP EAST " b<c(a+1,b)=5"..STATIC SUMP EAST " l<c(a+1,b)=8"..CLIMB EAST " v=c(a+1,b)=13 "..LADDERED PITCH EAST " c(a+1,b)=12 c(a+1,b)=14c(a+1,b)=15c(a+1,b)=16c(a+1,b)=17"..EQUIPMENT DUMP EAST " =c(a+1,b)=18"..ROPED CLIMB EAST " =c(a+1,b)=19"..CHASM EAST " Ac(a+1,b)=11 "..FOOD DUMP EAST " <c(a+1,b)=6"..CHOKED PASSAGE EAST " =c(a+1,b)=24"..UNSTABLE BOULDERS EAST " b=12130R <c(a,b-1)=1"..STREAM PASSAGE NORTH " Rc(a,b-1)=201;"..LOST CAVER NORTH";:0;" " <c(a,b-1)=2"..DRY PASSAGE NORTH " <c(a,b-1)=3"..25' PITCH NORTH " <c(a,b-1)=4"..SUMP NORTH " <c(a,b-1)=5"..STATIC SUMP NORTH " <c(a,b-1)=8"..CLIMB NORTH "  =c(a,b-1)=13 "..LADDERED PITCH NORTH " c(a,b-1)=12 c(a,b-1)=14c(a,b-1)=15c(a,b-1)=16c(a,b-1)=17"..EQUIPMENT DUMP NORTH "  =c(a,b-1)=18"..ROPED CLIMB NORTH " *=c(a,b-1)=19"..CHASM NORTH " 4@c(a,b-1)=11 "..FOOD DUMP NORTH " ><c(a,b-1)=6"..CHOKED PASSAGE NORTH " H=c(a,b-1)=24"..UNSTABLE BOULDERS NORTH " Mb=272280 R<c(a,b+1)=1"..STREAM PASSAGE SOUTH " \Tc(a,b+1)=201;"..LOST CAVER SOUTH";:0;" " f<c(a,b+1)=2"..DRY PASSAGE SOUTH " p<c(a,b+1)=3"..25' PITCH SOUTH " z<c(a,b+1)=4"..SUMP SOUTH " <c(a,b+1)=5"..STATIC SUMP SOUTH " =c(a,b+1)=8"..CLIMB SOUTH " =c(a,b+1)=13 "..LADDERED PITCH SOUTH " c(a,b+1)=12 c(a,b+1)=14c(a,b+1)=15c(a,b+1)=16c(a,b+1)=17"..EQUIPMENT DUMP SOUTH " =c(a,b+1)=18"..ROPED CLIMB SOUTH " =c(a,b+1)=19"..CHASM SOUTH " Ac(a,b+1)=11 "..FOOD DUMP SOUTH " <c(a,b+1)=6"..CHOKED PASSAGE SOUTH " =c(a,b+1)=24"..UNSTABLE BOULDERS SOUTH " <c(a,b+1)=7"..DAYLIGHT SOUTH "  Nlad>0c(a,b)=13 :col=col-10 zlad=lad-1::705  0:  res>14,10 ;7;"NO LADDERS LEFT.";6,4;" YOU FREE-CLIMBED IT,";8,6;"BUT THE LAST MAN FELL!":c(a,b)=23:res=res-1:.5,-7:1,-15:500:col=col-20:4::705 4,1;7;"NO LADDERS LEFT. YOU TRIED TO CLIMB IT...BUT FELL!":.5,-7:1,-15:3320 Nrop>0c(a,b)=18:col=col-10 :rop=rop-1::705 $ 0: .res>14,2;7;"NO ROPES LEFT-YOU FREE-CLIMBED IT,BUT THE LAST MAN FELL!":col=col-20:c(a,b)=22:res=res-1:.5,-7:1,-15:500:4::705 84,2;7;"NO ROPES LEFT.YOU TRIED TO FREE-CLIMB IT...BUT FELL!":.5,-7:1,-15:3320 B4aqu>0z$="DIVING A SUMP":col=col-5: Ly0::4,1;7;"NO SUB-AQUA GEAR...YOU DROWNED":.5,-7:1,-15:3320 Vbuc>02780 `res>10::4,1;7;"YOU TRIED TO BAIL IT";6,4;"WITH HELMETS...";8,6;"BUT THE LAST MAN DROWNED!":c(a,b)=21:.5,-7:1,-15:res=res-1:col=col-10 :500:4::705 j0::4,1;7;"YOU TRIED TO BAIL IT WITH YOUR HELMET...BUT IT DIDN'T WORK!":.5,-7:1,-15:3320 t0:0::q=1200:q:4,0;7;"THE LIGHTS HAVE FAILED!";6,4;" ARE THERE ANY SPARES LEFT?" ~q=1200:q  spa02480 #4,14;7;"YES!" cig<1q=1200:q::4,1;7;"BUT THERE'S NOTHING TO LIGHT IT WITH!":.5,-7:1,-15:3320 q=1200:q:q=016:.05|L,q:q:5,0;7;"AND WE BROUGHT A LIGHTER!":q=1502:q:4::light=light+75K:spa=spa-1:c(a,b)19705:c(a,b)=2:705 T4,14;7;"NO!":.5,-7:1,-15:3320 d0::4,1;7;"YOU'RE LOST-FOR GOOD!":.5,-7:1,-15 3320 rsho=00::4,1;7;"YOU DUG IT OUT WITH YOUR BARE HANDS-BUT THE ROOF COLLAPSED" sho>02550 res>16,4;7;"ON THE LAST MAN!":.5,-7:1,-15:col=col-10 :c(a,b)=9 :res=res-1:400:4::705 W6,4;7;"ON YOU!":.5,-7:1,-15:3320 q=(*5) Iq=3sho=sho-1:c(a,b)=10 :col=col-5:705 -c(a,b)=9 :col=col-5:1220 q=13:.05|L,16:q:3::4,1;7;"OUT OF ENERGY-----";6,3;"ANY FOOD PACKS LEFT?":q=1100d:q 2:dri>0col=col+150:dri=dri-1:q=13:.05|L,15:.05|L,16:q::4,1;7;"MUNCH! MUNCH! THAT'S BETTER!":q=1502:q:4::705 (0::4,1;7;"OH NO-THERE'S NO FOOD! WHAT A MISERABLE WAY TO GO!":.5,-7:1,-15:3320 2,found=0z$="IN DAYLIGHT":990 <{cheat=3z$="COWARD! GET BACK IN THERE!":q=17:.05|L,-20:.05|L,-30:q:990 Ffound=1found=4found=7found=10 z$="THERE ARE TWO MORE YET!":q=17:.05|L,-20:.05|L,-30:q:990 Pfound=2found=5found=8found=11 z$="WHAT ABOUT THE OTHER ONE?":q=17:.05|L,-20:.05|L,-30:q:990 Z2::4,4;5;"YOU'VE DONE IT!";6,8;"WHAT A PERFORMANCE!":q=120:.05|L,16:.05|L,20:q dj5:res<48,4;"(PITY ABOUT YOUR ";:4-res=1"FRIEND!)":2670n i"4-res>1"FRIENDS!)" nq=1100d:q xfound=12 2750 :q=15:.05|L,16:.05|L,20:q:5:4,1;"WAIT! HERE'S A NEWSFLASH!":q=1100d:q  found=34,1;"POLICE REPORT THREE MORE CAVERS MISSING...NO TIME TO SEEK EXTRA MEN AND EQUIPMENT!":q=1200:q:2740 found=64,1;"MARK THATCHER,PRINCE CHARLES AND KOO STARK REPORTED TRAPPED IN DEAD MAN'S HOLE!":q=1300,:q::4,1;"COME BACK! IT'S YOUR DUTY!!":q=1200:q:2740 found=9 4,1;"NATIONAL EMERGENCY DECLARED! TERRY WOGAN,BRIAN CLOUGH AND MARY WHITEHOUSE TRAPPED IN DEAD MANS HOLE!":q=1200:q :b=b-1:410 V10 ,1;"(BET YOU CAN'T DO IT AGAIN!)":q=1300,:q:3320 col=col-5:b1=b1-1 Eb1=0b1=5:buc=buc-1:c(a,b)=25:705 $z$="STATIC SUMP BAILED":990 v=15:.05|L,-7:v:4::14,1;"WAIT A MINUTE,";15,5;"DID YOU HEAR SOMETHING?" v=1100d:v .t=a-3a+3:u=b-3b+3 "u<1u>212850" "t<1t>272850" c(t,u)=2028706 "u:t ,1::14,9 ;7;"NO,NOTHING":.5,-15:z=1100d:z:light=light-10 :col=col-20:4::705 6#6::v=1+(*4) @=v=14,1;"YES,I'M SURE I HEARD A VOICE!" JGv=24,1;"YOU'RE RIGHT,THERE'S SOMEONE NEARBY!" T5v=34,1;"YES,THAT WAS A SHOUT!" ^1v=44,1;"I BELIEVE I DID!!" h=v=54,1;"WHY YES,IT'S SOMEONE CALLING!" rAz=120:.05|L,-15:.05|L,-20:z |>light=light-10 :col=col-20:4::705 0::4,1;7;"YOU STEPPED INTO A CHASM!":.5,-15:1,-20:q=1502:q:3320 a=1a=2:"YES" :9 ,2;"The entrance to Death's Head Hole lies just half a mile from the sleepy village of Priddy, Somerset." 400: 9 ,2;"Over the years, Britain's finest cavers have faced up to the challenge posed by this forbidding pothole." 400: 9 ,2;"Many lives have been lost in the exploration of Death's Head Hole, but still, some of its further reaches are barely known." 500: 9 ,2;"Now, news has come of a potential major tragedy. Several parties of novice cavers are long overdue, and the Weather Centre has warned of the possibility of flash floods." 600X: O10 ,2;"The MRO has called out your newly-formed rescue team." 400: G7,2;"You are about to enter Death's Head Hole." 200 E10 ,2;2;"You may never be the same again!" C19,2;"Do you want additional instructions?" a$=:a$=""3011 a$="y"4000 a$="n"4500 3011 0no=0:o=0:n=0:cig=1:spa=4:rop=5:lad=5:sho=4:buc=2:dri=3:aqu=1 : :705 D?n=110 :.05|L,20:.05|L,15:n Na$="n"1140t Xa$="p"3240 b:10 ,1;"I'M SURE THAT WAS A SLIP OF THE FINGER!";14,4;"FOR MEN OF HONOUR,THE ONLY WAY IS NORTH!":q=1502:q:score=score-100d:1,-10 :a$=""::705 ldri>02590 q 1090B vh=1+(*25) {i=1+(*20) c(h,i)=1c(h,i)=4 c(h,i)=2c(h,i)=6 Dh=28+(*10 ):i=1+(*19):c(h,i)=19  C:4,4;"POINTS=";score:::"PRESS ENTER TO CONTINUE" a$=:a$=""3250 ".05|L,-16::705 q=(*5) q33310 ڣ0::4,1;7;"RUCKLE COLLAPSED";:res=17;" ON YOU!":0:.5,-15:1,-20:4::3320 6,3;7;"ON THE LAST MAN!":.5,-15:1,-20:col=col-5:4::res=res-1:z$="IN A BOULDER RUCKLE!":705 Lcol=col-5:score=score+20:z$="IN A BOULDER RUCKLE":990 f500:4::::"score=";score:found=12 found=3found=6found=9 #:"THE ONES YOU MISSED WERE AT.." >y=123:x=127:c(x,y)=20x,y x:y  xx=0:score=0:cig=0:spa=0:dri=0:lad=0:rop=0:sho=0:aqu=0:buc=0 1,"Cigarette lighter ",2,"Spare acetylene lamp",3,"Food pack ",4,"25' ladder ",5,"100' rope ",6,"Shovel ",7,"4 Sub-aqua kits ",8,"Bucket " .3510 :j=18:w(j),w$(j):j  :5,2;"During the game, you may view a basic survey of Death's Head Hole, showing your position, by pressing c." 920,2;4;"Press any key to continue."  0 :5,2;0;"If you choose novice status, the positions of the lost cavers will also be shown, but your fitness will be seriously affected." 920,2;4;"Press any key to continue."  0 W:10 ,2;0;"Please choose expert or novice status." a$="x" a$:a$"n"a$"e"4510 a$="e"sk=1:  a$="n"  4510 <:7:7:x=127:y=121 Xb>1a>0b<21a<28b-2,a;7;0;1;"" Qc(x,y)0c(x,y)24c(x,y)11 y-2,x;""; 2c(x,y)=20af=af+1:p(af)=x:q(af)=y y x sk=15039 j=13 Eq(j)>0p(j)>0q(j)-2,p(j);2;1;"" j col=col-350^  af=0 /q=13:p(q)=0:q(q)=0 q /21,1;"Press any key to continue" a$=:a$=""5040   4   705 @."You pressed 'g'. Did you intend to?" Ja$=:a$=""8010J Ta$="y"3320 ^ :705 #("Death H H"1 Aeipraohqua bouneighoRd? ? (+ץCigarette lighter Spare acetylene lampFood pack 25' ladder 100' rope Shovel 4 Sub-aqua kits Bucket cor