Ptarmigan  [ 1:1:7: W 4,9 ;1;1;"STOP THE TAPE" 8,11 ;"Welcome" 10 ,13 ;"to" (a$="Ptarmigan" -n=1̱a$ 2"12 ,9 +n;2;"" 7.01z# =,20 <12 ,9 +n;a$(n) A(.01z# =,10 :.01z# =,-5 Fn P 1000 d(0,10 ;1;"Ptarmigan" n$1,7;"A 16K Adventure" x-2,3;"written by Angus Appleby" 5,0;"In days of old,a very advanced city named Ptarmigan disappearedinto the bowels of the Earth following a violent earthquake" 11 ,0;"The king of Ptarmigan,before he died,set up the pedestals of theGods,three in all.Two were of total destruction,the other had the power to restore the relics of the Great City" 1000 "The only thing which can triggerthe pedestals' mechanism is a golden ring.This must be placed on the correct pedestal for bestresults" {:"You alone must quest for this ring then carry out the above command,using what you find to help you in this task" 9:6;"The future of Ptarmigan lies in your hands" :4;"However due to central magnetic overload only one item may be left in any particular room. A problem?-but nothing's easy!!" 1000 ȣ"This adventure has the usual commands(get,help,score etc.)butyou must think to get past certian difficulties-remember ALWAYS READ THE ROOM DESCRIPION" e::"All I can say now is good luck and be very careful as things are not always what they seem" 1000 0:7:0: (0,6;"Ptarmigan awaits..." 400 *255,140:-502,-502 '0,140:502,-502 '126~,90Z:0,-90Z '137,90Z:0,-90Z "310 ,6;2;" " 'n=9 14 +"n-1,16;1;" " ,n,16;1;"" 6"n+1,16;1;"" ;".1}L,n:x=17:x @n J7:7 T2,0; ^"" h29000Hq a=144146 n=07 i:(a)+n,i n a  L0,0,32 ,116t,126~,255,255,255 N24,60<,189,153,189,255,255,60< J60<,60<,60<,60<,36$,66B,66B,195 821,3;1;"Press any key to continue" =""1010   "Ptarmigan"1 A Ptarmigan -Ptarmigan (#[*# #jj# <@ XX'' zx}\\\zzfN}S}zO[}l}l}#\(X![!PP!! pEЀ|$~0[=F[ K SR PH32603[:32600X,0:32601Y,0:o$("33","11") -4:0:4::t$("4","11")  ret="2070" 236099\,10 "421" n="1"̰"11"  q,o$(q):n (mg=-:ke=-:rb=-:ca=-:st=- r=  # "1000"+R ( r$,n,s,e,w 2"You are in ";r$ 7!r="13"r="7"r="21""2930" <''"Exits are "; Fnɧ-"north "; Psɧ-"south "; dwɧ-"west "; eeɧ-"east" i!o$(r,"1")=" "o$(r)="nothing" n'"There is here:";o$(r) sr="4""3450" yG"what now?>";d$:d$=""32600X,3:32601Y,19: zSd$="w"r="16"o$("16",13)="not"'''"Pay more attention.":"2930" {d$="w""2060" d$="i""2100" d$="n""2000" d$="s""2020" d$="e""2040" d$ǰ"2""120" +d$="help""10",;"Help yourself":ret 3d$="score""10",;"Scotland 1 England 0":ret x=̱d$ 'd$(x)=" "x$=d$("1"x-"1"):"170" x=d$x$=d$("1"x):"230" x y=x+"1"̱d$ *d$(y)=" "y=d$y$=d$(x+"1"y):"195" y y$<"3""2069" q$=y$(13) "9000" n="1"̰"15" c$,c x$=c$c n &"10","0";"What does ";x$;" mean?" "ret E"9","coin","11","magnet","6","magnet","5","key","2","umbrella" h"24","cassette","16","stick","23","apple","29","silver gun","33","golden ring","31","space suit"  R"an underground shaft which you fell down to arrive here","14","0","2","0" E"an old shop which sold many various items","15","0","3","1" V"a simply decorated room with a small round opening on the wall","0",rb,"0","2" _"a very dreary lookingroom with holes in the wall on either side of you","3","8","0","5" 5"an old locksmiths workshop","0","0","4","6" c"a chamber with blue walls,writing on the east wall says 'DO NOT GO SOUTH'","0","7","5","0" A"a bottomless pit. Don't you ever heed instrutions?",r,r,r,r 3"a very dead end",4,0,0,0 F"a room where much elastic is lying around","10","0","12","0" Y"a greyish looking room with hundreds of holes in the ceiling","11","9","0","0" ="a very attactive roomwith bare walls","0","10","0","0" "a room which was oncea living room,a table in the centre has SPODWORN written on it.--------WEST IS DEATH","13","0","14","9" "a sphere of poison",r,r,r,r 0"a crossroads junction","17","1","15","12" 7"a room with a keyholeto the east","0","2",ke,"14" V"an altar with a tree in the centre:1 sacrifice for another:","0","0","0","15" ^"a long rectangular hall,a crooked nail holds the door to the north",mg,"14","18","0" ."an east/west passage","0","0","19","17" R"an area which has a minature motor and slot to the north",ca,"0","20","18" Q"an electrical room with a plug with some writing on it","21","0","0","0" M"the lair of fiendish Carribundee crusher-and he is crushing you",r,r,r,r W"a very complex room which has a large tape recorder installed","0","0","23","0" ."a store room/pantry","24","17","0","22" >"a record and cassetterecording studio","0","23","0","0" /"an oddly shaped room","27","19","26","0" M"a large computer roomwith a sealing door to the east","0","0","0","25" D"a round room with a narrow hole to the north",st,"25","0","0" L"an old armoury which contains much silver weaponry","0","0","30","33" -"a time warped area","0","27","31","29" -"an astronaut's room","0","0","32","30" ="an airlock which goesout into beyond","0","0","0","31"  K"a very intricate roomfull of statues and paintings","0","0","29","0" n="0""2069" r=n "30" s="0""2069" r=s "30" e="0""2069" r=e "30"  w="0""2069" r=w "30" "10","0";"Don't be silly" n=̰"150":n  "30" 4 5"0","10";"Inventory" 6 "You have:" 9 n="1"̰"4" > "9";t$(n) Hn Rret k n="1"̰"4" pt$(n,/)=" ""2190" zn )"10","0";"You are carrying too much" ret 'q$=o$(r,̺)t$(n)=o$(r):o$(r)="" "30" o$(r,̺)="not""2220" %"10",;"You cannot do that here" ret  n=̰"4"  p$=t$(n) #t$(n,̺)=q$t$(n)="":"2240" n $"10","0";"You don't have a ";y$ ret  o$(r)=p$ "30" q$="app""2330" !"10",;"You can't eat a ";y$ ret  "3300" $yes="2360" 3 "2236" 8-"10",;"The apple was poisoned":"2930" `q$="umb""2420" jr="15""2450" k-r="32"q$="air":"NO OXYGEN!!!":"2930" o "2210" t "3300" u5yes="10",;"This umbrella is automatic":ret y "2236" y$="key" "3300" Myes="10",;"You open the door with the key":t$(t)="":ke="16":ret "2236" r="20"q$="plu""2510" "2210" ."10","0";"It says 'Buy 5D Software.":ret (q$="spa""2620" -q$="rin"q$="gol""2650" 2+"10","0";"You can't wear the ";y$:ret < "3300" FIyes="1""10","0";"You are now wearing a space-suit":t$(t)="":ret U "2236" Z "3300" dcyes="1""10","0";"You are now wearing the golden ring,but it's power is too great":"2930" x "2236" r="17"q$="mag""2720" "2210" "3300" Byes="10",;"The magnet pulls out the nail":mg="23":ret "2236" y$="snowdrop"r="26""2820" *r="26""10",;"Wrong password":ret "2210" y$="golden ring":3300 yes="2830" "2236"  $"The door slides open and reveals" n="40"̰"200"Ͱ"30" n,"50":"0","70" "n ,n="40"̰"200"Ͱ"60" 6n,"50":"30","0" ;n,"120":"30","0" @n J3"10","6";"1";"10","14";"2";"10","21";"3" TH"17","0";"Choose the pedestal to place the ring of power." ^="""2910" h="3""5000" |n="1"̰"300":n  "60","0":"0","70" "170","0":"0","70" "60","70":"110","0",- "12","8";"Here lies one" "13","11";"deceased" "14","10";"adventurer" "17","11";" " "18","11";" " J"1","0";"Would you like to return back to the dreaded underworld?" ="""3050" 0="n""10";"Ok!Goodbye":n="1"̰"40000":n  !r="3"r="19"r="27""3120" & "2210" 0 n="1"̰"4" :?q$="coi"r="3"t$(n,"1"̰"3")="coi"rb="4":t$(n)="":ret DAq$="cas"r="19"t$(n,"1"̰"3")="cas"ca="25":t$(n)="":ret NAq$="sti"r="27"t$(n,"1"̰"3")="sti"st="30":t$(n)="":ret Xn b "2069" q$="cas"r="22""3220" "2210" "3300" yes="1""3250" "2236" +"10",;"You hear:OXYGEN IS AVAILABLE" ret t=̰"4" !t$(t,̺)=y$(̺)yes=: t yes=  zy$="mag":"3300" 2yes="10",;"The spikes came out":"2930"  ,"10",;"It's just an ordinary ";y$:ret <#"10",;"You are too weak":ret "10","13";۰"1";"WOW" "11","12";ݰ"1";"GREAT"  "12","10";ٰ"5";"FANTASTIC" n="40"̰"50" ذ"116","80",n n  "3040" #("take","2150","get","2150","drop","2200","throw","2200","insert","3100","eat","2300","open","2400","read","2500","wear","2600","use","2700","type","2800","play","3200" #26"pull","3900","unlock","2400","examine",3500 '&"Ptarmigan"23550[,9000(#: p! nothing umbrella key magnet coin magnet nothing nothing stick apple cassette silver gun space suit golden ring1 e qr sew Rqa room which was oncea living room,a table in the centre has SPODWORN written on it.--------WEST IS DEATHDπ9999' Ptarmigan (#[[(#  8  10 21 Lt MM333g}3 P P P