IN$(20)S "":A$(1)"VOYAGE TO ATLANTIS":A$(2)"BY":A$(3)"GREG HASSETT" A$(4)"CONVERTED TO PET BY JOHN O'HARE" I14:20((A$(I))2));A$(I): NW$"THERE IS NO WRITING THERE."CO$"THE CLAM FLIES OPEN AND SOMETHING FALLS OUT, BUT IT SNAPS SHUT AGAIN!!!"LLM$"I KNOW NOT HOW TO LOAD SUCH A THING."uSH$"AND EATS ME UP!!! I'M DEAD."SC$"THE SPEAR THEN TURNS TO PLATINUM!!!":PS$">>>PLATINUM SPEAR<<<" M0$"I DON'T SEE IT HERE.":M1$"I'M NOT HOLDING IT.":M2$" WON'T LET ME."MM3$"DON'T BE RIDICULOUS.":M5$"DON'T BE FUNNY.":M6$"OKAY."D1$"I DON'T KNOW WHAT "(34):D2$(34)" IS."DO$"PLEASE SUPPLY A DIRECT OBJECT."NA$"HELP! NO AIR!!! CROAK."SV$"THE SPEAR VANISHED IN MIDWATER!"ROH$"THE SPEAR PLUNGES INTO THE OCTOPUS' HEART AND THEN VANISHES ALONG"wOH$OH$" WITH THE OCTOPUS!!!!"MH$"THE SPEAR HITS THE MINOTAUR, AND HE VANISHES!!!":172017070:NO9NO0(VB0VB1VB27)VB1<((VB15)(VB16)(VB5)(VB6)((N1$)0)(NO0)D1$;N1$;D2$:30r2N1$""(VB8VB2)VB22VB15VB30DO$:30{<350FTT1:"---> WHAT SHOULD I DO ";CM$KCM$"""":70PVB$"":NO$"":VB0:NO0ZLC(CM$):I1LC:A$(CM$,I,1):A$" "VB$VB$A$:I5d(VB$)1(CM$)NO0:120InNO$(CM$,LCI)wxN1$NO$:V1$VB$:VB$(VB$,3):NO$(NO$,3)yI1NV:VB$VB$(I)VBI:150zI:VB0N1$""NO$VB$VB0:160VB$CM$NO0:NO$"":I1NN:NO$NO$(I)NOI:I:NO0:NO$"":S"":II0:(P$(CP),1)"*"P$(P$(CP),(P$(CP))1):II1hCP29F11:190xCP31F21CP51F41:200CP6F31II1210P$"I'M IN "P$(CP)CP1OB(31,0)1"";NA$:I11000:I:1480P$".":K0:I1LO:OB(I,0)CP260;K0"VISIBLE ITEMS: ";V3(0)(OB$(I))39nOB$(I)". ";:KK1|I:K0CP31"":K0:"OBVIOUS EXITS ARE: ";:I03:P(CP,I)03102(0)(D$(I))39:19);:300!"K0", ";3,D$(I);:KK1O6I:".":ZZ2CP5340x@I1LO:OB(I,0)1I31OB(I,0)29JI:"THE WHIRLPOOL SUCKED ALL MY BELONGINGS DOWN!!!":ZZ1T"":^VB0360NaVB370,440,29,560,600,660,710,730,740,800,810,930,940,1040,1050,1070cVB161480,1080,1120,1190,1210,2200,1270,1310,1350,440,370,1380,1410,1440h"I NEVER LEARNED HOW TO ";(34);V1$;(34);" SOMETHING":30rNO0"I NEED A DIRECTION.":30|NO81270#NO4NONO4kNONO1:P(CP,NO)0"THERE IS NO WAY TO GO IN THAT DIRECTION.":30CP30GF0"THE GATE IS LOCKED.":30CP25NO0GF0"THERE'S A GATE THAT BARS MY WAY.":"IT'S LOCKED.":30 PRINT"OKAY, I WENT"D$(NO)".":CP=P(CP,NO):GOTO29-CPP(CP,NO):29HCPOB(NO,0)M0$:30NO10NO13NO14NO16NO18NO22NO36NO42M5$:30NO27NO29"IT'S TOO HEAVY.":30NO17OB(16,0)CP"MANTA";M2$:30NO19OB(18,0)CP"SQUID";M2$:30(NO35OB(36,0)CP"OCTOPUS";M2$:30HOB(10,0)CP"EEL";M2$:30sNO44OB(42,0)CP"MINOTAUR";M2$:30NO32"IT IS BEYOND MY REACH.":30ZZ17"I'M CARRYING TOO MUCH.":30OB(NO,1)0CP1TSTS1&ZZZZ1:OB(NO,0)1:M6$:3000ZZ0"I'M NOT CARRYING ANYTHING.":30j5"CURRENTLY I'M CARRYING: ";:I1LO:OB(I,0)1590:3(0)(OB$(I))39DOB$(I)", ";NI::30Xb"":"SAVING..."lA$"":1,1,1:I1LO:1,OB(I,0):I&v1,CP:1,GF:1,ZZ:1,F1:1,F2:1,F3:1,F4:1,T:1,OB(34,1)W{1,OB(37,1):1,NO$(22):1,OB$(34):1,OB$(37)]f 30l"":"RESTORING.....":I1LO:1,OB(I,0):I1,CP,GF,ZZ,F1,F2,F3,F4,T,OB(34,1),OB(37,1),NO$(22),OB$(34),OB$(37) 30SC0:I1LO:OB(I,0)1SCSCOB(I,1)OI:"YOU HAVE"SC"POINTS OUT OF A MAXIMUM OF""170. PLUS, YOU CAN GET A BONUS UP TO 30 POINTS WHEN YOU QUIT, MAKING";" THE ACTUAL":"MAXIMUM 200.":30"DO YOU REALLY WANT TO QUIT NOW";X$:(X$,1)"Y"1480 "I DIDN'T THINK SO.":307 OB(NO,0)1M1$:30m NO34"SORRY, I CAN ONLY THROW THE SPEAR.":30 OB(9,0)1(OB(36,0)CPCPOB(42,0))SV$:ZZZZ1:OB(34,0)0:30 CP4790 OH$:OB(36,0)0:OB(34,0)51:ZZZZ1:307!MH$:OB(42,0)0:SC$:OB$(34)PS$:OB(34,1)11:OB(34,0)CP:ZZZZ1:30c! "YOU'LL HAVE TO BE MORE SPECIFIC.":30!*OB(NO,0)1OB(NO,0)CPM0$:30!4(NO43)(NO11)(NO12)(NO17)(NO21)(NO28)(NO32)(NO38)NW$:30!>"IT SAYS:"-"HNO11"WHAT IS THOUGHT TO BE, ISN'T WHAT YOU SEE! NORI"R"RNO12"CAPTAIN AHAB WAS HERE."|"\NO17R1$:R2$:"SCRAPE IRON. NORI""fNO21"LEE SAID POW AND DIED.""pNO28"USE CRUST TOOTHPASTE FOR SHARPER TEETH. (SNAP!)"#uNO28"SQUIDS HATE LOUD NOISES (W O P T O N)"T#zNO32"BRING >>>TREASURES<<< HERE & DROP THEM. SAY SCORE."#NO43"BEWARE THE FIERCE MINOTAUR! MINOS WAS AN EVIL KING!!"#NO38"PUT SHOT IN GUN."#30#"USE COMPASS POINTS, PLEASE.":302$(NO40)(NO35)(NO14)"I DON'T KNOW HOW TO OPEN SUCH A THING.":30U$NO40"TRY UNLOCK GATE.":30f$NO351010$OB(26,0)1"YOU DON'T HAVE THE NECESSARY RESOURCES.":30$OB(36,0)CP"OCTOPUS"M2$:30$OB(38,0)0"OK. IT'S EMPTY.":30.%"OK. TWO THINGS FALL OUT!":OB(38,0)CP:OB(39,0)CP:30g%OB(33,0)1"YOU DON'T HAVE THE RIGHT TOOLS!":30%OB(37,0)0"THE CLAM OPENS AND SHUTS. IT'S EMPTY.":30%CO$:OB(37,0)CP:30%"I'M NOT THE DESTRUCTIVE TYPE MYSELF...":30&OB(18,0)CP"NOTHING HAPPENED.":30Z&$"THE SQUID WAS SO STARTLED HE RAN AWAY!!!":OB(18,0)0:30p&."OKAY..."N1$:30&8NO29LM$:"SAY RESTORE TO START UP A SAVED GAME.":30&BCP12M0$:30&LOB(20,0)1"I HAVE NOTHING TO LOAD IT WITH!!":30!'V"OK.":OB(20,0)2:ZZZZ1:30g'`(NO10)(NO14)(NO16)(NO18)(NO22)(NO23)(NO36)M3$:30'j(NO22)(NO16)"IT'S NOT HUNGRY.":30'tNO161170'~OB(30,0)1"I HAVE NO FOOD!!!":30("THE PARANAHS GULP DOWN THE CUP AND......";1("MUCH TO THEIR SUPRISE...THEIR TEETH FALL";_("OUT!!! THEY ARE NOW RENDERED HELPLESS."(OB(22,0)0:OB(23,0)CP:NO$(22)"'":OB(30,0)0:ZZZZ1:OB(24,0)CP:30(OB(23,0)1"HE LIKES THE IDEA...";SH$:I11500:I:1480&)"THE MANTA SWALLOWS UP THE PARANHAS AND SWIMS AWAY."L)ZZZZ1:OB(16,0)0:OB(23,0)0:30y)OB(25,0)1"I HAVE NO SCISSORS.":30)"THE SCISSORS ARE TOO DULL TO CUT ANYTHING.":30)(NO40)(NO35)"HOW?":30)NO35"TRY OPEN.":30 *(CP25)(CP30)M0$:301*GF1"IT IS ALREADY OPEN!!!":30b*OB(26,0)1"YOU DON'T HAVE THE KEY.":30t*M6$:GF1:30*NO27"HOW?":30*CP9CP31M0$:30* CP9CP31:1300*CP9*29*NO29"HOW?":30*(CP12M0$:30%+2OB(20,0)2"IT'S NOT LOADED.":30U+<M6$;"..POW!!!!":OB(20,0)29:OB(10,0)0:30+FNO30"COME NOW...BE SERIOUS.":30+POB(30,0)1M1$:30+Z"SMAK! GOOD!":ZZZZ1:OB(30,0)0:30+dOB(NO,0)1M1$:30,nZZZZ1:M6$:OB(NO,0)CP:CP1OB(NO,1)0TSTS1,x30E,OB(NO,0)1OB(NO,0)CPM0$:30n,NO37M6$" NOTHING HAPPENED.":30,"WAIT A MINUTE...THIS STATUETTE ISN'T","IRON...IT'S GOLD!!":OB$(37)">>>A GOLD STATUETTE<<<":OB(37,1)16:30-CP31"GEE! FUN!":30-X((1)4)1:X21470+-CP9:29b-"WHOOOOOOOA...THUD. I'M DEAD.":I11000:I:1480-"":1670:I1LO:(OB(I,0))1FSFSOB(I,1)-I:T500FSFS5-T400FSFS5-T310FSFS10-FS200FS200 ."YOU SCORED"FS"POINTS OUT OF 200."U.FS0"YOU ARE A PEE WEE CLASS ADVENTURER (THE LOWEST RANK)":1610.FS30"ARE YOU VEGETABLE OR MINERAL? RANK 8":1610.FS50"NOT TOO GOOD, PAL! RANK 7":1610/FS90"YOU HAVE HAD A TASTE OF ADVENTURE. ---RANK 6":1610I/FS110"YOU ARE A MASTER ADVENTURER CLASS C ---RANK 5":1610/"FS150"YOU ARE A MASTER ADVENTURER CLASS B ---RANK 4":1610/,FS170"YOU ARE A MASTER ADVENTURER CLASS A ---RANK 3":161006FS190"WOWEE! YOU ARE GREAT! YOU'LL SOON BE AN"U0;FS190"ADVENTURER GRANDMASTER! ONE RANK AWAY...---RANK 2":16100@FS201"TUM TUM-TUM TUM...TUM TE TUM TE DUM DE"0EFS201"TUM...A REAL ADVENTURER GRANDMASTER..."0GFS201"BOY OH BOY! CAN I SHAKE YOUR HAND???"1HFS201"YOU SHOULD:":R1$:R2$61J::"PLAY AGAIN (Y/N)"R1TA$:A$"Y"A$"N"1640\1^1620j1hA$"Y"z1rR1$:R2$:1|"":1F1FSFS21F2FSFS21F3FSFS21F4FSFS412CP1:NP51:LO44:NN44:NV30:P$(NP),P(NP,3),OB(LO,1),OB$(LO),NO$(NN)@2 VB$(NV):I131:J03:P(I,J):J:I2A$"NEW IMPROVED VERSION !!"::21((A$)2));:I1(A$)2(A$,I,1);:X(9999):I2P$(1)"MY SUBMARINE DOCKED IN THE CITY OF ATLANTIS"2P$(2)"A CORRIDOR FILLED WITH WATER"3P$(3)"AN ALCOVE"-3P$(4)"A CORAL REEF"T3 0,0,2,0,8,0,3,1,9,0,4,2,10,0,5,3l3P$(5)"A WHIRLPOOL"3P$(6)"THE HALL OF SPIRITS (MORE COMMONLY CALLED A GRAVEYARD)"3P$(7)"*DEAD END"3P$(8)"A DINING ROOM"4 11,0,0,4,13,0,7,0,0,8,0,0,7,2,9,0-4P$(9)"*I'M ON THE STREET"X4P$(10)"*I'M AT THE END OF THE STREET"q4P$(11)"A DARK CAVE"4P$(12)"THE FORTRESS OF ATLANTIS"4 15,3,10,8,0,4,11,9,0,5,12,10,0,0,0,114P$(13)"CAPTAIN AHAB'S QUARTERS"5P$(14)"A BARREN CHAMBER"!5P$(15)"A BARBER SHOP"?5P$(16)"AN OLYMPIC FIELD"l5 16,6,0,0,17,0,15,0,0,9,0,14,22,13,17,05P$(17)"A SUPPLY ROOM"5P$(18)"THE SQUID'S CHAMBER"5P$(19)"THE DRAWING ROOM"5P$(20)"THE ROYAL COLLISEUM"6 23,14,18,16,24,0,19,17,25,0,20,18,0,0,21,19/6P$(21)"A TEMPLE"F6P$(22)"A HALLWAY"b6P$(23)"AN OLD LIBRARY"6P$(24)"THE CLAM ROOM. THE WALLS ARE MADEOF CLAMSHELL"6 26,0,0,20,27,16,0,0,0,17,24,0,29,18,0,23 7P$(25)"A RAIL STATION (SO >THIS< IS HOW THEY GOT AROUND!)"7 P$(26)P$(24)97 P$(24)"THE TOWN HALL"R7P$(27)"THE KITCHEN"o7P$(28)"THE DINING HALL"7 30,19,0,0,0,21,0,0,0,22,28,0,0,0,0,277P$(29)"THE ELECTRIC EEL'S ROOM"7P$(30)"THE JAIL. THERE IS A GATE TO THE SOUTH"B8P$(31)"AT THE TOP OF A POST. LOOKING DOWN I SEE ONLY THE STREET. THE"y8P$(31)P$(31)" WATER ISTOO MISTY TO SEE FAR AWAY"8 0,0,30,0,0,25,0,0,0,0,0,088 N,S,E,W,NOR,SOU,EAS,WES,THR,EEL,BOO,PAP,TRA,CLA,MED,MAN,PLA,SQU,COI39 SHO,JOU,PAR,PAR,TEE,SCI,KEY,POS,NEW,CAN,CUP,TAN,SIG,PIC,SPE,CHE,OCT|9  STA,NOT,PEA,GAT,GO,GET,LOO,INV,SAV,RES,SCO,QUI,THR,KIL,REA,ENT,OPE9" HIT,YEL,SAY,[,LOA,FEE,CUT,UNL,HEL,CLI,FIR,EAT9$9&I140:NO$(I):I:I1NV:VB$(I):I: TAK,SWI,DRO9( SCR,JUM:*:,:.[:0A SPEAR THROWER,AN ELECTRIC EEL,A SMALL BOOK,A PAPER WITH WRITING ON IT:2 A,A GIANT CLAM,>>>A JADE MEDALIAN<<<,A BLACK MANTA:4>>>A PLATINUM PLAQUE<<<,A GIANT SQUID,>>>MANY COINS<<<,AN IRON SHOTPUT:6 CAPTAIN AHAB'S JOURNAL;85;: SOME FIERCE PARANHAS,SOME HELPLESS PARAHNAS{;< >>>SOME VALUABLE PARANAH TEETH<<<,>>>A PAIR OF GOLD SCISSORS<<<;> >>>A SILVER KEY<<<,A TALL POST,AN OLD NEWSPAPER,AN OLD CANNON<@ A PEANUT BUTTER CUP,AN AIR TANK,A SIGN,>>>A PLATINUM PICK<<<>>A GLISTENING PEARL<<<vP$(33)"PROMETHEUS' CHAMBER IN OLYMPIA"u>xP$(34)"A STRANGE ROOM WITH WALLS THAT SEEM TO COME ALIVE AS I MOVE ABOUT">zP$(35)"*I'M ON THE EDGE OF A CLIFF. THE WATER BELOW ME IS TOO MISTY TO" ?|P$(35)P$(35)" SEE FAR DOWN. THERE MIGHT BE LIFE DOWN THERE..."?~:_?P$(36)"A DEEP, DARK, CORRODOR. I CAN SEENO CEILING FROM HERE, ONLY MURKY"?P$(36)P$(36)" WATER. THE WATER SEEMS TO BE MOVING EAST OF ME."? 0,34,32,0,33,36,37,35,0,0,34,0,34,0,5,0?:?:)@P$(37)"THE HALL OF MIRRORS. ALL DIRECTIONS LOOK THE SAME"I@P$(38)P$(37):P$(39)P$(37)j@P$(40)"AN AWKWARD CORRODOR"@ 37,38,39,34,37,38,38,38,40,39,39,37,42,39,0,0@:@I4150:P$(I)"A LABYRINTH OF PASSAGES OBVIOUSLYDESIGNED BY KING MIN"5AP$(I)P$(I)"OS. IT IS RUMOUR THAT THE MINOTAUR IS NEAR...":IA 43,41,42,41,44,40,42,41,47,41,43,43,48,42,45,44,49,45,45,44,50,51,0,0A 47,43,48,47,48,44,48,47,0,45,50,0,0,46,0,49A:AP$(51)"*DEAD END": 46,0,0,0AI32NP:J03:P(I,J):J:I,BI41NN:NO$(I),OB$(I),OB(I,0),OB(I,1):IlB APP,>>>A GOLDEN APPLE<<<,33,10,MIN,A FIERCE MINOTAUR,51,0B SCR,AN ANCIENT SCROLL,40,0,FLE,>>>A GOLDEN FLEECE<<<,51,44BR1$"TRY SOME OTHER ADVENTURES BY GREG HASSETT! THEY ARE:"(13)FCR1$R1$"-JOURNEY TO THE CENTER OF THE EARTH"(13)"-THE HOUSE OF SEVEN"CR1$R1$" GABLES"(13)"-ENTRY INTO KING TUT'S TOMB"(13)"-SORC"CR1$R1$"ERER'S CASTLE"(13)"-ENCHANTED ISLAND"CR2$"THE ABOVE AVAILABLE FOR TRS-80 & APPLE."(13)3DR2$R2$"ALSO AVAILABLE FOR PET FROM JOHN O'HARE."IDI117:IN$(I):WD2020:29aD"";D ***ADVENTURE VERSION 6.5***,COPYRIGHT (C) 1980,-BY GREG HASSETT-D "P.O. BOX 914, NO. CHELMSFORD, MA, 01863" E,,WELCOME TO THE WONDERFUL WORLD,OF,ADVENTURERE " ","","","",""E "","",""EI117:20((IN$(I))2));IN$(I)EI9D1125:DEIE::::::E " HIT RETURN TO CONTINUE"FA$:A$(13)2065F""+FQ$(34)WF"IN THIS "Q$"ADVENTURE"Q$" YOU ARE TO"F "EXPLORE THE LOST CITY OF ATLANTIS IN"F%"SEARCH OF TREASURES. I WILL BE YOUR EYES";F*"AND HANDS DURING THE ADVENTURE. DIRECT"G/"ME WITH ORDINARY ENGLISH SENTENCES OF"7G4"ONE OR TWO WORDS. SOME EXAMPLES:"tG9Q$"GET TANK"Q$" , "Q$"INVENTORY"Q$" , "Q$"KILL MANTA"Q$zGRG\"USE ANY NOUN/VERB COMBINATION YOU CAN"Ga"THINK OF, BECAUSE IN THIS GAME, "Gf"*ANYTHING* GOES! IF THIS ADVENTURE IS"&Hk"TAKING A LONG TIME TO SOLVE, DON'T"UHp"FRET. IT WAS DESIGNED TO DO SO. TO SAVE"Hu"A GAME, TYPE "Q$"SAVE"Q$", TO RESTORE A"Hz"GAME, TYPE "Q$"RESTORE"Q$"."HH"PRESS THE SPACE BAR TO BEGIN..."HA$:A$" "2190HI"I CAN ONLY REPEAT THE INSTRUCTIONS."EI"WOULD YOU LIKE THAT";:" Y";QQ$dI(QQ$,1)"N""OKAY.":30rI2020:29