!----------------------!=! RW-ADVENTURE #1 ![!UNCOMPACTIERTE VERSION!y! FERTIG AM 25.5.83 !!----------------------! 53281,.:53280,14:(142)(8)9000C$" """:53281,14(C$""82C$"ݰ"]<C$" "FC$" ":C$" "PC$" ݧ "ZC$" "dC$" "7nC$" "\xC$" ݫ ݫ "C$" ʱݧ ݧ "C$" "C$" ղ "C$"ɫ ݫ"C$" ʱ ":C$"ݭ"_C$""C$""C$" "C$" C Υʳ "C$" "C$""""";/C$"";;A127E"";K"T,""`6A122s@5)""33)""J:5)"";:A127:"";::"":L1$"":A123:L1$L1$" "::A$"":A14:A$A$A$::B$"":A14:B$B$B$:"^P$"":R$"":T$(13)R$:450-hB12Dr""8)(A$,23)O|A16~S124,15:S15,.:S16,240:S1,5:S14,33S11,(1)250:I.10::S14,32F.8)(B$,2,23):F1F18)(A$,23):F.C$B$B$A$:A$C$::"";:A113:L1$::!L$" ",A159L$L$L$?OL$(L$,25)cL$""L$l630""L$:L$:L$:""14)"":7)" 0123456789A ":7)" ϒ "630C18781888&C,980360(:DC1877jDD640,690,1220,760,820,910,980,1070,1140,1190:C0C:C0,207:N198,.:P$R$"GET READY AND..."SR$"PRESS SPACE TO BEGIN."XA$:A$" "600l1340vA13000::P$R$""4R$"ݠɫ "UR$" ݠ "vR$""630:(P$,6)R$" "R$" ݫ ɫ"R$" ʱ "(P$,2)R$" "R$" "7R$" ݠ "B630:TZ$(P$,4)R$Z$" DO YOU NEED"(13)R$" INSTRUCTIONS ?" ""R$" (Y/N)"X$:X$"Y"X$"N"790 X$"N"C1887*4Z$"*TOP SECRET*TOP SECRET*"%>R$""FHR$"EAT ORDER AFTER READING"gRR$"SECRET AGENT BC-035AC:"\R$"YO HAVE TO UNCOVER THE"fR$"SECRET DEVELOPMENTS OF"pR$" THE MAD SCIENTISTS'"zR$" ASSOCIATION (MSA)."1310:Z$"OUR SATTELITES HAVE DE-"5R$"TECTED A MSA LABORATORY"UR$"AT THE MOON. THE CODE-"uR$"NAME FOR THIS STATION:"R$" "R$" 'WEGA'."1310:Z$"YOU WILL BE SENT TO THE"R$"STATION BY OUR NEW TE-"R$"LEPORTING DEVICE. IT IS"7R$"ADJUSTED EXACTLY TO THE"XR$"MSA-RECIEVER. AFTER THE"xR$"TELEPORTATION YOU WILL"R$"HAVE TO FIND A WAY BACK"R$"TO EARTH."$1310:.Z$"DON'T FORGET TO SEARCH"8R$"FOR DEVICES WHICH COULD"BR$"BE USEFUL FOR OUR ORGA-";LR$"NISATION BUT TERRIBLY"ZVR$"DANGEROUS IF THEY ARE"{`R$"USED FOR EVIL PURPOSES!"j1310:tZ$"YOU CAN USE TWO-WORD-"T$"COMMANDS EG: SAY HELLO,"~T$"EXAMINE BUTTON AND MANY"T$"OTHERS. LOOK WILL SHOW"OT$"THE SURROUNDING. SOME-"T$"TIMES HELP WILL GIVE"T$"USEFUL HINTS."T$"SCORE TELLS YOU, HOW"T$"MANY POINTS YOU HAVE"T$"ACCUMULATED."1310:Z$"INVENTORY TELLS YOU,"R$"WHAT THINGS YOU ARE"R$"CARRYING. YOU CAN ALSO"R$"USE ABBREVIATIONS FOR">R$"COMMANDS (THE FIRST 3"^R$"LETTERS): TAKBOT IS"R$"EQUAL TO: TAKEBOTTLE."R$"GOOD LUCK - AND BEWARE"R$" OF JOSEF..."1310:(P$,6)R$"" R$">COPYRIGHT (C) BY:<"5 R$"۲۲"j R$"۱RALF WERNER۳" R$"۳8400 REGENSBURG۳" R$"OTTERBACHWEG 19" R$"TEL.: (0941) 40 17 61" R$""!630:630:E!P$R$"PRESS 'SPACE'"[!(X$:X$" "1320a!2z!<"TELEPORTING NOW:"!F""15)""!PR$"     ""ZP$"":B500:T$"     " "dP$16)T$Q"iS124,15:S15,0:S16,240:S14,129:S1,10_"jS14,128i"n1420"xP$16)""R$:1420:BB30:B3001380"P$16)R$:1430"A.B::""OK. YOUR MISSION AT THE MOON BEGINS...""S124,0"630#:(142):1460:R%1:1710$#Y.4-#TR57#IT33A#LO18#CM25:A(A)1441A40(A3)3(A3)40(A6)3(A6)#R$(22),N$(LO),CM$(CM),IT$(IT),I$(IT),I%(IT),F%(IT),C%(IT):K%1:J%.:A1%1#RO%.::R.22:R$(R)#A:A11530$$A.CM$CM$(A) $".$,A.LO19$6N$(A)?$@K$JA.IT$TIT$(A),I$(A),I%(A),F%(A)::A.3:X%(A)::A19$^L%(A)::9000:9040:S24,.:S34,.:$hL(C$):A1L:(C$,A,1)" "$rC$(.)""%|C$(1)"":C$(.)(C$,A1):BA1L:A$(C$,B,1):A$" "/%C$(1)C$(1)A$5%%C$(2)C$(1):C$(.)(C$(.),3):C$(1)(C$(1),3):(C$(.),3)" "C$(.)(C$(.),2)%%"MY PRESENT LOCATION: "R$(R%)%8060%R%.1760%:R$:R0.&R(R0):R(R0)1R0R01:1740 &1800&:A.R%1:R$2&R:R11770A&:R0.:R$e&R(R0):R(R0)1R0R01:1790k&&"OBVIOUS EXITS: ";:A.R01:R(A)9R$(R(A)):1830&C%(20)"SECRET STORAGE ROOM&&15);&0'::"I CAN SEE";:S%.:A%.:A.IT:I%(A)R%1920''DA22A261890='NKA22:P(K)1920N'XP(K)1:1900c'bA20O%.1920}'lS%1:A%.":":A%1'vIT$(A)':S%." NOTHING SPECIAL IN HERE.";''R%91990'RO%1980("THERE'S A SECURITY-ROBOT AIMING AT ME WITH A DISINTEGRATOR!"-(RO%1:1990r(RO%4"SMOKING PIECES OF A DESTROYED ROBOT ARE LYING AROUND."{(J%.(R%11K%J%1(R%9RO%RO%4RO%RO%1(RO%32060(2460:"THE ROBOT FIRES IT'S GUN AT YOU!":C%(1).3810L)"YOU ARE PROTECTED BY A POWERFULL FORCE- FIELD WHICH REFLECTS THE BEAM."V)RO%4f)  GOSUB8060)F%.::"YOUR COMMAND .";C$:C$".""";:2010)) 1640:A.CM:C$(.)CM$(A):2100)*BA:ACM::2110**4"I DON'T UNDERSTAND THAT! (TRY 'LIST' FORCOMMANDS)":2460:2010U*>B.C$(1)"""WHERE TO .";C$(1)h*HB.B132140*RC$(1)"""I NEED TO KNOW WHAT! TRY AGAIN...":2460:2010+\B12500,2970,2970,3140,3140,3230,3580,3580,3580,3580,2230,3340,2100,3400,1710H+fB142280,2740,4220,4010,4170,2430,2170,2250,3250,3290,3281N+p+zR%132460:"HOW ? THROUGH THE FLOOR ?":2010+E%."NOTHING HAPPENS...":2010+B%2210,B%1:"THE SERVO-MECHANISM OF THE PLATFORM HAS RECOGNIZED YOUR COMMAND.",2480F,2480:"I'M MOVING DOWNWARDS...":R%14:2480:1710h,"I'M SORRY, I'M ILLITERATE."r,2010,R%142460:"I'M NOT A BIRD, YOU KNOW ?":2010,"I'M MOVING UPWARDS...",R%13:2480:2480:1710,"I'M CARRYING:"-N%.:C.IT:C%(C)IT$(C):N%14-:N%."NOTHING.>- 2010r- C.IT:C$(1)I$(C):"WHAT ?":F%1:2460:z- DC-$ CIT::C%(D)."I DON'T HAVE THAT.":F%1:2480:-. -8 C.IT:C$(1)I$(C):2720:-B DC-L CIT::R%I%(D) .V B132320.` D8R%228.j "I DON'T SEE IT HERE."I.t F%1:2460:S.~ 4190]. 2010. S24,32:S34,128:S124,15:S15,9:S16,0:S14,33. S1,75. S11,55:I0.50::S14,32. MO%S24,33:S34,129. S124,L0:/ S24,32:S34,1288/ S124,15:S14,33:S15,128:S16,192:S1,82h/ B0255.3:S11,B0:I0.10:::S14,32/ MO%S24,33:S34,129/ S124,L0:/ S24,32:S34,128/ S124,15:S15,0:S16,240:S1,5:S14,33 0 B0.20:S11,(1)25:I.40:::S14,32&0 MO%S24,33:S34,12960 S124,L0:j0 2700:R9.R01:C$(1)(R$(R(R9)),3):2680t0 R1R90 R9R01::R(R1)19C%(1)."TOO DANGEROUS! (RADIATION)":2460:20100 R(R1)92570 1 C%(5)C%(20)"THE HIDDEN DOOR OPENS.":2480:261081 C%(20)"THE DOOR WON'T OPEN...":2010B1 2680\1 C$(1)"STO"R%26101 "WHICH STORAGE (1 OR 3) 1";N$:N$"1"N$"3""":25801 R%2:N$"3"R%111( :"OK.":2450:171012 A1%266017 S124,0C2< "YOU WENT OUT OF THE SPACECRAFT. UNFORTU-NATELY THERE'S NO AIR (THE";c2F " DOCK DOORS ARE OPEN)!"2P "YOU HAVE AIR FOR 9 SECONDS.";2Z A9.1:A"";:53280,A:B1800:::38102d :F%."OK.":R%R(R1):2450:17103n 2010'3x F%."I CAN'T GO THERE!":246013 2010S3 A.LO:C$(1)N$(A):2720`3 ALO::3 "I DON'T KNOW THE WORD "(34)C$(2)(34)" ."3 F%1:2460:3 C%(4)27803 (1)Y27904 "I CAN'T GIVE YOU ANY HELP. I'M NOT A COMPUTER.":20104 (1)Y2790C4 BA%."...DOESN'T WORK. (NO POWER)":20104 R%12810,2850,2810,2860,2810,2810,2810,2920,2940,2910,2880,2840,2810,2890,29104 R%142810,2810,2810,2810,2810,2810,2810,29305 "THE SOLUTION TO THIS ADVENTURE CAN BE ORDERED FROM: RALF WERNER"25 14)"OTTERBACHWEG 19"5 14)"8400 REGENSBURG":11)"TEL.: (0941) 40 17 61":"...FOR ONLY 5 DM !!!":20105 "HE'S LOOKING %$'#! AND HUNGRY.":20105" "I WOULDN'T DRINK THAT! IT SMELLS BAD!":20106, O%."TRY 'OPEN SAFE' .":201066 2910>6@ "YOU'RE LOOKING HUNGRY...":2010^6J E%"READ AND ... !":20106T "SEEMS AS IF THERE'S NO ENERGY...":20106^ "OH GOD, WHAT A STUPID USER!!":20106h "TOUCH ME (HEHEHE)!":20107r "BE SURE TO HAVE EVERYTHING...":2010,7| C%(20)"ARE YOU BLIND ?":2010K7 "I CAN'T LOOK THROUGH..."U7 2010h7 2360:F%2010x7 F%(D)30007 "I CAN'T TAKE THAT!!":2460:31107 J%"JOSEF WON'T PERMIT. HE'S JUST LAUGHING.":31108 C%6"I CAN'T CARRY ANYMORE!":2460:31108 D43050*8 C%(.)13050z8 "BATTERIES FIT INTO THE COMPUTER.":C%(.).:BA%1:C%C%1:SC%SC%10:31008 R%2231008 D20SC%SC%98 D1D5D3D2SC%SC%108 D31009 C%(4)"BATTERIES CONNECTED.":BA%1:C%(.).:I%(D)1:SC%SC%10:C%C%1(9 C%(4)3110Z9 I%(D)1:C%C%1:2450:C%(D)1:"YOU GOT IT."d9& 2010n90 2720x9: 20109D 2320:F%20109I R%2232109N D20SC%SC%10:C%C%19X D1D2D3D5SC%SC%109b R%11J%.32109l D153210;:v "JOSEF GRABS SANDWICH, SAYS 'E=MC2' AND VANISHES.": K%.:J%.:I%(15)1:I%(16)I%(15):SC%SC%10:C%C%1:C%(D).:2450:2010: C%C%1: I%(D)R%:C%(D).:2450:2010: "USE ONE WORD ONLY...": 2480:2010: 2320:F%2010/; D14"I DON'T THINK THAT WOULD TASTE WELL!":20109; 2460a; "ARRGH! IT WAS PURE HCL...":3810; "YOU CAN USE THE FOLLOWING COMMANDS:"; "GO/GET/TAKE/DROP/THROW/SAY/PUSH/PRESS/ PULL/TOUCH/READ/OPEN/CLOSE/";"< "EXAMINE/LOOK/INVENTORY/HELP/QUIT/SAVE/LOAD/SCORE/ DRINK/EAT.,< 2010?< 2320:F%2010< D15"CHOMP... GOOD!":I%(D)1:C%C%1:C%(D).:SC%SC%10:2010< D11"I DON'T WANT TO BURN MY MOUTH!":2010< "YOU SHOULD CONSULT YOUR PSYCHATRIST!"< 2010= C$(1)"SAF""CAN'T OPEN "C$(2)"!":2010*= SF%3380o= "FIRST TRY EXAMINING THE LOCK - IT LOOKS VERY SOPHISTICATED..."=* SF%1:2010=4 "I SAID 'EXAMINE...'!"=> 2460:2010=H C$(1)"LOC"3440=R 2360:F%2010>\ D15"RROARR!!! (=YOUR STOMACHE...)":2010+>f "LOOKS RATHER ORDINARY...":2010k>p R%3"ARE YOU CRAZY? I DON'T SEE ONE HERE!!":2460:2010y>z IN%3500> "IT'S A 'SECURIOR 4064'-LOCK - THE BRAND-NEW MODEL WITH A TIMER."> "THAT MEANS YOU'VE ONLY GOT 25 SEC. TO OPEN!"D? "AFTER EACH TRY THE LOCK CHANGES IT'S CODE. AND AFTER 5 INCORRECT ";? "TRIES THE SAFE WILL BLOW UP AND VAPORIZE YOU...":IN%1? O%"YOU NEEDN'T DO THAT AGAIN.":2010? "PRESS 'Y' TO OPEN OR 'N' TO ABORT."? A$:A$"Y"A$"N"3520 @ A$"N"2010@ 4800O@ TR.O%.2460:"BOOM! THE SAFE EXPLODED!":3810m@ O%IT$(7)"AN OPEN SAFE"w@ 1710@ 2360:F%2010@D8"SILLY... NOTHING HAPPENS.":2010@R%22R%7"I DON'T SEE ONE!":2460:2010&AZ2:D$" (1=RED, 2=GREEN)":R%22D$" (1, 2 OR 3)":Z3\A$"WHICH ONE"D$;:C$:C(C$):C1CZ"";:3620lA.R%73670A8E%C1"DISPLAY SAYS 'REACTOR OFF'.":SC%SC%10:E%.:2010ABE%.C2"WELL DONE...":2480:E%1:SC%SC%10:2010 BL"NOTHING HAPPENS...":2010BVC3680,3750,3720-B`MO%36607Bj2480ABt9005gB~"ENGINE'S RUNNING.":MO%1:2010tBD%3660B"THE HUGE DOORS ARE OPENING...":D%1:A1%.:2480:2010BMO%.3660CC%(3)."AUTOPILOT NEEDS DATA-TAPE FOR NAVIGATION":2010;CS124,15:S15,0:S16,240:S14,129:S1,10:S24,32rCB0.200:S11,B0:I.40:::S14,128:S124,L0CSC%SC%1:D%"YOUR MISSION IS OVER.":3830C"YOU STARTED THE SPACECRAFT THROUGH THE 15-FEET-THICK DOORS OF THE";D" HANGAR."D:"YOU ARE DEAD."VD"YOU DIDN'T SUCCEED IN FULFILLING YOUR MISSION!!"gDSC%0SC%0D"YOU GOT"SC%"POINTS OUT OF 100 POSSIBLE."D9040D"MY COMMENT:"D (SC%10)3870,3880,3890,3900,3920,3930,3940,3950,3960,3970E"USER GO HOME!":3980>E"YOU'D BETTER PLAY CHESS...":3980TE("#$%&_!":3980E2"EAT A SANDWICH AND COME AGAIN!":3980E<"GO HOME AND PLAY WITH YOUR ZX-81, VC 20 OR YOUR CALCULATOR-WATCH!!"EF3980EP"...DON'T BE PROUD ABOUT!":3980"FZ"NOT BAD - BUT NOT GOOD!":39805Fd"GOOD.":3980MFn"VERY GOOD.":3980jFx"NEARLY PERFECT.":3980F"RALF, IS THAT YOU ???"F"CARE TO PLAY AGAIN ";C$:C$(C$,1):C$"Y"C$"N"3980FC$"Y"1450F G"DON'T WASTE DISK/TAPE SPACE!!":20103G"SAVE 1: -> DISK"rG6)"2: -> TAPE":6)"3: ABORT SAVE COMMAND"G"PLEASE SELECT 1";C$:C$"1"C$"2"C$"3""";:4040GC$"3""":2010GD$"DRIVE 0":C$"2"D$"TAPE #1BH"PRESS '*' WHEN "D$" IS READY.":"(PRESS '_' TO ABORT AND RESELECT)"aHA$:A$"*"A$"_"4080rHA$"_"4010HC$"2"4150H15,8,15H15,"I0":15,E0$,E1$,E2$,E2$:E0$"00"4150H""DISK ERROR #"E0$" ("E1$").""I,"PLEASE TRY AGAIN.":"PRESS '_' TO RESELECT.":15:4080*I6150I@;IJ"NO!"EIT2010qI^"YOUR SCORE UP TO NOW IS"SC%"POINTS."Ih"(100 POSSIBLE)":SC%99"OK. NOW YOU HAVE TO FIND YOUR WAY BACK TO EARTH...Ir J|4190::"DO YOU REALLY WANT TO QUIT N";Q$:Q$"N"2010J3820@JCORRIDOR,1,2,4,5,7,8,10,11,12,13,-1[JTELEPORT-CENTER,,2,-1wJ"STORAGE ROOM 1",,1,-1J"CAPTAIN'S ROOM",4,-1JH.Q.,,3,5,-1J"COMPUTER ROOM",,4,6,-1J"STORAGE ROOM 2",5,-1J"ENERGY CONTROL",,-1 KSOLARIUM,,9,-1-K"SECRET STORAGE ROOM",8,10,-1CKKITCHEN,,9,11,-1`K"STORAGE ROOM 3",,10,-1vKLABORATORY,,1,-1K"ELEVATOR PLATFORM",,-1K"ELEVATOR PLATFORM",15,-1K&CORRIDOR,14,16,17,18,19,20,-1K0"CREW QUARTERS",15,-1 L:"SERVICE CENTER",15,-1(LD"ENGINE CONTROL",15,-1BLN"REACTOR ROOM",15,-1aLX"HANGAR CONTROL",15,21,-1}Lb"HANGAR ZONE",20,22,-1Ll"SPACECRAFT (RATHER SMALL)",21,-1LvGO,GET,TAK,DRO,THR,SAY,PUS,PRE,PUL,TOU,REA,OPE,CLO,EXA,LOO,INV,HELMQUI,SAV,LOA,SCO,DOW,UP,DRI,EAT,LIS]MCOR,TEL,STO,CAP,H.Q,COM,ENE,SOL,SEC,KIT,LAB,ELE,CRE,SER,ENG,REA,HANfMSPAM"SOME RECHARGEABLE VARTA (TM) BATTERIES",BAT,17,1M"A PROTECTOR BELT",BEL,12,1M"A MULTIPLE INDICATOR ('MINC')",MIN,7,1N"A COMPUTER TAPE",TAP,9,1FN"A PORTABLE MICROCOMPUTER (EPSON HX-20)",EPS,11,1hN"A COMLOCK DEVICE",COM,19,1N"MANY TERMINALS",TER,5,N"A SAFE WITH AN ELECTRONIC LOCK",SAF,3,N"A CONSOLE WITH TWO BUTTONS (RED/GREEN) ON IT",BUT,7,,O"A DISPLAY WHICH SAYS 'SPEAK OUT CLEARLY'",DIS,13,`O"A DISPLAY WHICH SAYS 'UPWARDS ONLY'",DIS,14,O "A POT FULL OF HOT POTATOES",POT,10,1O"SOME GRAFFITTI ON THE WALLS",GRA,19,P "IT SAYS: 'FUCK HYPERNUCLEAR POWER', 'JOEIS GAY' AND '#%$!'.",,19,=P*"A BOTTLE FULL OF LIQUID (LOOKS LIKE H2O)",BOT,1,1[P4"A HAM SANDWICH",SAN,6,1P>"JOSEF, THE EVIL GHOST OF THIS ADVENTURE.(HE HATES 'SIMPLE' GAMES...)"PH,11,PR"BUTTON 1, LABELED 'START ENGINES'",,22, Q\"BUTTON 2, LABELED 'BLAST OFF'",,22,=Qf"BUTTON 3, LABELED 'OPEN DOCK DOORS'",,22,fQp"A PAIR OF X-RAY-GLASSES",GLA,3,1Qz"A SCREEN SAYS: 'HP IS THE BEST - FORGET THE REST'",,5,Q"A WRITING ON THE WALL: 'CRACKERS, GO HOME!'",,8,,R"THERE'S GRAFFITTI ON THE WALLS. IT SAYS:",,6,|R"'MIRROR, MIRROR ON THE WALLS, WHO HAS GOT THE GREATEST BALLS?'",,6,R"AND: 'KEEP ON KNOCKING...'.",,6,R"THERE'S A POSTER. IT SAYS: '??????? OPENS EVERYTHING!'",,1,S"THE NEW 'PLAYBOY'",PLA,16,1FS"AN OLD-FASHIONED POCKET-CALCULATOR",CAL,18,1bS"A SKELETON",SKE,8,1S"A MAP OF MOSCOW",MAP,4,1S"A SINGING PIG ('STARS AND STRIPES')",PIG,2,1S"AN OLD SHOE",SHO,21,1S"A SCREWDRIVER",SCR,20,1+T110,125,109,112,109,110,112,112,125,109,109,110,1127TTRTR1ETCR$(13)PT""eT15)""~T15)"CLOSED"T15)"":A17:15)" "::15)"":""16)"789456";3U"123"iU"THE LOCK"CR$"LOOKS VERY"CR$"STRANGE..."U"THIS TABLE"CR$"MIGHT HELP"CR$"YOU:"U""20)"TRIES LEFT:"TRU$17)" "V.17)"ݠ۽۠ۮ۠۽"#V819)"".VBE.29VLF.2VV136240EF,X%((1)4):::TM25:T4TI:"";V`"TIME LEFT:"Vj""TM((TIT4)60)" SEC. "VtTIT4(TM60)95090V~A$:A$"1"A$"9"4970VE(A$)"WP(A(E)):G.3:PX%(G):5040*WFGCWG3::FF1:F3F.TWA(E),X%(F)wWG19:(A(G))L%(G):5070WG9::4970W""17)" OPEN "WSC%SC%20:O%1:2480:5100W"TIME'S UP.":2460 XE.500:A$::X|MO%.80656X}R%22R%20L08:8066RX~R%21A1%L015:8066hXR%20L04:8066~XR%15L02:8066XL00XS124,L0:X(#S154272:S254279:S354286:X-#AT6:DL6:SU8:RE4:HH10X9#S15,16ATDL:S16,16SUREY:#S25,16ATDL:S26,16SURE#S2,.:S21,.Y?#S3,.:S31,.Y@#B0235YA#S11,B0YC#A0.2555:S1,A0YF#B019S21,B018:S2,A0YH#B025S31,B024:S3,A0ZK#B1.H:::ZM#S14,16:L08:3ZP#S24,32:S34,128BZW#B1.50:QZZ#S124,.:Q