L%hh LHH` X% " ӠӠΠǠ ˮԠˠǠӬĠӠ٠٠ϠŮ+JJJJ ,,,L Lک ٥ҥ>ӥ? ( ㆭ  ؆` | A""""""QQQYV <"<Q '(h((QQQ`@GHOHO $"!$q}T@` `@@``p0 8p@@`00 |0@` `pppPox`D3 < p?|@@@|@`f ppn|>0p  qcs6<, 3['Nxxxpp0` ```@vl  ?`@:3q  AcqcCyO@  0p`@@q @p?|`3cC ? ?>|xp`p`@Acwsssssss__????????~^^ ?~~~~~~~?>~||xpp`@~| xyy{~|@`pp xpp`@yyyyyyyx~ ~x`|xpxqa` cqx|||||||cCC?>>>??<<|||~?`ppxx||<||xxpp`|||||||| |?|p`@@@@`p|? OOGgccqpxsssssssppxxx|<<~?>~||xxxxppp```@@@`?~|x|~|||||||p@@p|~><|xp`@>|x|xpx}yyyyyyyAA?~|xpp`ppx|~? ?? 33@``@@glloLL LlOgloloG @`@glolo@@gLLL GaamGGlg`GGlg`G  xL| x@@xMLLxMyyM MyxAxMx|Yq @lllLglllgG LlL`@GLOLo033366m~0>3>33~G<`G}rccb``acccq{{{{8008????~ |lL COoooog CgoooocCFFLLXXPpqa88`}}}}>????~ | ~FCCFL ____|GG|GGccp{{{{ ;1q``qp`aas{{{{8008 0y| |}}}}AAQg((h' $C@0j ed`y < I1@@q q s8EE9EE8> ` `$DC0ANPQN@'h(' WPG((H@stq q8AyEx:NPQ@GhHHG#$p# @ (*Y9AyEy: QQQO~C%%C~_DDD qAAAaq9`ppxxx|xxx|AsGN8088 CcˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( t Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(` d ֠z# u`(8)):1-\(110(8))4Ğ:"TIME'S UP"::3300?-fS0:7170R-@ INSTRUCTIONSy-A::" TREASURE HOUSE"-B" -------- -----"-C:.J"YOU ARE IN A LARGE OLD HOUSE. WHEN THE OLD MAN WHO LIVED THERE DIED, HE HIS0!,"OK TYPE IN YOUR GUESS"C,X14:MG$:B(X)(MG$)48:X^, X1:B(X)A(X)SS3e,Xw,X14:Y14, XY7220,*B(Y)A(X)SS1:Y4,4Y,X,>X14:B(X):,H" **";S;"**"-RS12ĺ"**ALL DONE**":TRTR(999999999 HIT A KEY TO CONTINUE":MG$=+X14:A(X)(19(8)):XY+X14:Y14:XY7130l+A(X)A(Y)V1+Y,X:V1V0:7110+"3 POINTS WILL BE GIVEN IF YOU CHOOSE RIGHT NUMBER IN RIGHT PLACE"+"1 POINT FOR RIGHT NUMBER, WRONG PLACE",TEST,IF YOU WIN..THE TREASURE"L*"IS YOURS,...IF YOU LOSE:";::"DEATH":w*"DO YOU WANT TO TAKE THE CHANCE?";MG$*MG$"Y"ĺ"OK..YOU HAVE DONE WELL":*"GOOD LUCK"*"THE CHEST HAS A LOCK ON IT"+"TO OPEN IT YOU MUST CRACK THE CODE "Y"STST(TRA):TRTRA(TRA):G)(14(8))3ĺ"*FOOL*":3300Q)6020a)X BOOBYTRAP)b"THE PREVIOUS OWNER OF THE TREASURE MADE")l"SURE THAT HIS SECRET WOULD REMAIN HIDDEN")v"FOR A LONG TIME,HE ALSO GAVE THE FINDER"*"ONE FINAL SCORE OF ";ST;" YOU NEED HELP!"O("SINCE YOU HAVE ";TR;" ITEMS OF TREASURE"r("I FEEL I DO A DEAL WITH YOU"(A(920(8)):A(TRA)("I'LL SELL YOU ONE UNIT OF ENERGY FOR EVERY ";A("PIECES OF TREASURE YOU GIVE ME...OK?";MG$$)MG$LAMP":L1'nA6ĺ"A KEY":K1D'xA7ĺ"A TIME WARP":TI$"000000"m'A8ĺ"A NUGGET":TRTR(1800(8))'A9ĺ"A GOOD LUCK CHARM":MO0:STST10'5160'p STRENGTH'qTR30ī3300'r'z"HMMM YOU SEEM TO BE OUT OF ENERGY" ("A GRAND&TRTRA:STST(A40)'&#T(X,Y,Z)0=&((19(8))2ıY&-"YOU HAVE ALSO FOUND:"k&2A(19(8))&<A1ĺ"A SWORD":STST(120(7))&FA2ĺ"BAD LUCK!":MO1&PA3ĺ"A POTION":STST(120(8))5&ZA4ĺ"AN AXE":STST7 'dA5ĺ"A %"AND YOU HAVE BEEN KIDNAPPED AND RELEASEDSOMEWHERE,BUT WHERE?"S%X(16(8))e%Y(16(8))w%Z(13(7))}%% TREASURE%A(1900(9))%"YOU HAVE FOUND ";A;" PIECES OF GOLD"% "DO YOU WANT THEM?";MG$%MG$"Y"ı W. CHRISTOPHER( z THE GAME OF BOGGLE80"HIT SPACE BAR TO START NEXT ROUND";1 4900; 2500^ \AV01V08:A:H01:9);:Ad y $X$:X$(3)ė: X$" "4900  PA03:B03 V0A2:H0B2 (B%(A,B)64); |B,A: 22:1::40);:22:1:: pBRUCEA03:B03)  I%(1)16:R%(I%)3100@ R%(I%)1:J%(1)6V B%(A,B)C%(I%,J%)_ H B,Ai 5200s (7) tI0T:J1T0:J,I I13:(7);:I <4700 5600 "HIT SPACE BAR TO VIEW BOARD FOR SCORING" h4900:5200 5600' L","P","E","U","S","T"4 4 "M","R","O","A","S","H"R  "N","P","H","S","E","I"p  "O","E","D","N","W","S" ` "P","C","A","E","M","D" ::V08:H016 ( :4700 R%(I)=0 MEANS AVAILABLE R%(I)=1 MEANS USED T I015:R%(I)0:I ,"A","I"&  "D","N","Z","V","A","E"D  "E","U","K","L","G","Y"b x "F","R","B","X","I","O"  "G","N","T","V","E","I" @ "H","F","Y","E","I","E"  "I","U","G","R","L","W"  "J","B","O","A","Q","M" l "K","T","U","O","N","D"  ")dB%(3,3),C%(15,5),R%(15)1I015:J05J,X$:C%(I,J)(X$)64SJ,I]::wX2:14:"B O G G L E"5:1:"ENTER TIME LIMIT IN SECONDS:";T T0829 "A","E","S","C","R","L" "B","L","Y","T","A","I" L "C","T","O","A"     "TIME..............";(TI$,2);":";(TI$,3,2);":";(TI$,2)h$SCMK100TR10(KL)10ST((TI$,4))z$CC5SCSC2$TF1SCSC2$"YOUR SCORE IS **";SC;"**"$$ KIDNAPPED$"WOOOOOOOOOOSH YOU'VE JUST FOUND A TRAVELAGENT!"A.........."#w.#|"STRENGTH..........";STK#"MONSTERS KILLED...";MKh#"TREASURE..........";TR#"KEY...............";K#"LAMP..............";L#"CLUES.............";CC1#"LEVEL.............";Z#"COORDINATES.......";X;",";Y<$" POINTS""<ST1ı"=4125P"@A(120(6)):A;" HIT POINTS ARE AT STAKE"~"J"CHOOSE A NUMBER BETWEEN 1 AND ";20A:B"TB(1(20A)(8))STSTA:"YOU WIN....":"^"HA HA YOU LOSE":STSTA"c"h STATUS #r"YOUR CURRENT STATUS IS...PUNCH FACTOR?";U:U1U94125$!0!"STSTUJ!'UU(15(7)):BBUz!,"YOUR PUNCH LEAVES THE ";MM$(A);" ONLY ";B!1"STRENGTH UNITS!"!6C(110(8))!8BBC:B1STSTB:"YOU WIN..":MKMK1: ":STSTC2:"HIS HIT LEAVES YOU WITH ";ST;DO??"2 "(1) RETREAT (2) ATTACK (3) GAMBLE";CD C1C34050Z C4080,4120,4160{ (13(8))2ĺ"ESCAPED": "A ";MM$(A);" DOES NOT LIKE CHICKENS" "HE ATTACKS,GOOD LUCK" "THE ";MM$(A);" HAS ";B;" HIT POINTS"!"WHAT'S YOUR YOU HAVE FAILED..NOW DIE":3300M "BRILLIANT YOU HAVE DONE WELL MY FRIEND"V TF1` 7000j4200p MONSTERSMO0ıA(129(8)):BA(14(8))"YOU HAVE JUST BEEN CONFRONTED BY A " MM$(A);": WHAT DO YOU WISH TO R IT"p T(X,Y,Z)0z ) COMBLOCK^ "YOU HAVE FOUND THE PLACE TO DEPOSIT YOURCLUES" "ARE YOU READY TO TRY?";MG$ MG$"Y"ı "ENTER THE CODE,AND AFTER CHECKING PRESS " "*****";CH$:CH$" "CH$ CH$CL$ĺ"WRONG.... BODY!!!"9 "THE TREASURE LIES HIDDEN,YOU HAVE FAILED"g "YOUR FINAL STATUS IS.................."q 4220w H CLUER "YOU HAVE FOUND A CLUE..."\ CCCC1:CC5ĺ"THE LAST ONE YOU'LL NEED!"f "THE NUMBER IS....";(CL$,CC,1);" REMEMBE0 STST(15(9)).: (19(8))4İ40008D 2950>N J PIANOv "CONGRATULATIONS,YOU HAVE FOUND A KEY" T(X,Y,Z)2ĺ"BUT THEN AGAIN MOST PIANOS HAVE KEYS!!!" 2950  END  "HA HA...THE HOUSE HAS CLAIMED ANOTHER T(X,Y,Z)1250,2300,2400,2500,2600,3400,35003 B CUPBOARDu L0ĺ"IT'S TOO DARK TO SEE,YOU NEED A LAMP": (19(2))4ĺ"YOUR LAMP'S BLOWN OUT!":L0: 2950  CLOCK& "CREEEEEEEK,THE DOOR IS STIFF AND THIS WEAKENS YOU"19(7))3ĺ"THE KEY IS JAMMED IN THE LOCK":K06 AT DESKZ^ (15(8))22950h "THE DESK IS JAMMED,DO YOU WISH TO FORCE IT?";MG$r MG$"Y"ı| STST(110(8)):"UGGGGH, OPENED IT!" T(X,Y,Z)0ĺ"WASTE OF TIME,IT'S EMPTY":- LUCK":2530Z  DOORF M(X,Y,Z)3ĺ"OK THE DOOR IS OPEN":` "THE DOOR IS LOCKED" K1ĺ"YOU WILL NEED A KEY TO OPEN IT": "DO YOU WISH TO UNLOCK IT?";MG$ MG$"Y"ĺ"SUIT YOURSELF!": M(X,Y,Z)3:"THE DOOR IS OPEN"0 ( YOU'RE IN FOR FUN NOW!":MO1# 9( CELLAR ENTRANCEE- Z1ır2 "WELL WELL WELL LOOK WHAT YOU'VE FOUND"3 "YES THE CELLAR ENTRANCE!"7 "DO YOU WANT TO GO IN?";MG$< MG$"Y"ĺ"OK":F L0ĺ"TOUGH,YOU'LL NEED A LAMP!": P Z0:"GOODREYOU CAN BUY USED APPLE SOFTWARE AT" d"ANAZING PRICES OR SELL YOUR OWN UNNEEDEDUSED SOFTWARE. WE HOPE THAT YOU WILL ENJOY OUR PRODUCTS AND SERVICES.":23) ANDEXCHANGED."::"WE ALSO SELL MAPS/CLUES/SOLUTION/TRIVIA BOOKS TO MANY POPULAR COMPUTER ADVENTUREGAMES FOR ONLY $2.65 PER TITLE POSTPAID.OUR HINT BOOKS ARE THE BEST!"% Z:"WRITE US FOR INFORMATION ABOUT THIS OR ALSO ABOUT OUR USED SOFTWARE LISTS WHE PER DISK WHICHINCLUDES RETURN POSTAGE. OR WE CAN SELLYOU THE BLANK DISKS NEEDED FOR AN" F"ADDITIONAL FEE OF $1.10 EACH. WE CAN COPY SINGLE-SIDED OR DOUBLE-SIDED. ALL OUR THOUSANDS OF PROGRAMS ARE IN THE" P"PUBLIC DOMAIN AND CAN BE FREELY USED7L1:"THE LAMP IS YOURS":T(X,Y,Z)0:m "OH DEAR THIS LAMP WASN'T FOR SALE! YOU'VE GOT TROUBLE...."y 2500: TRIGGER MO1ı "WELL DONE.......IDIOT" "YOU'VE JUST DISTURBED ALL THE 'ORRIBLE LITTLE BUGS!!!!" "BELIEVE MEELF":>$ (19(7))3ĺ"THE KEY'S YOURS":K1:T(X,Y,Z)0:Y. " ****BOOM****"u8 " BOOBYTRAPPED!"B 2220L ` LAMPj "AH HA,ONE LAMP YOURS FOR THE TAKING"t "DO YOU WANT IT?";MG$~ MG$"Y"ĺ"NO!":' (19(8)),150,82,73,113,14,14,4,0,36,36,53,37,21,46,62,159,45,53,63,14,245,30,39,55,39,23,7,32,39,45,5,56,63,44,60,12,37,53,6,0,60,54,45,36,60,63,54,54,45,45,36,36,4,0232,0:233,317680A%(30,17):HS1000:N$""2Y OF 50).(23:1:"PLEASE STAND BY."II76807702: SOUND ROUTINEWK:I,K: 169, 8,133,255,173,48,192,136,208,4,198,255,240,8,202,208,246,166,232,76,4,30,96I79368001: SHAPE TABLESK:I,K:3,0,8,0,20,0,51,0,28,28,28,28:"THE TIME LIMIT OF 1000. YOU WILL HAVEY:"TEN TARGETS TO HIT. TO DIRECT THE BALL:"PRESS THE '.' KEY TO DISPLAY A '";(220);"' AND:"THE '/' KEY TO DISPLAY A '/'. :"IF YOU'RE IN TROUBLE PRESS 'ESC'(BUT"::"THERE IS A TIME PENALT( A%(X%,Y%)0A%(30X%,17Y%)0770.; 255::H*3:1:0`4:17:"DEFLECTO":>9);"WRITTEN BY CARLOS COSTAH16);"JULY 1980 R:\"RULES? ";:A$:A$"Y"940f6:":"p:"TO PLAY, TRY TO HIT THE TARGET WITHIN *z:2A$"Y"Ģ23:1:"PLEASE STANDBY.":110WA$"N"ĺ"Y OR N, PLEASE.":670o"BYE-BYE...LOVE":::"SO SORRY,BUT YOUR TIME HAS RUN OUT."670 FIND AT RANDOM AN EMPTY PART ON SCREEN.X%(1)272:Y%(1)142A$N$ĺ"CONGRATULATIONS ";A$:"ON BEATING YOUR OLD LOW SCORE.":670kv"CONGRATULATIONS ";A$:N$""650"ON BEATING THE LOW SCORE OF ";N$N$A$:670"NOT ";:"A NEW LOW SCORE, SO SORRY.""DOES ANYONE WANT TO TRY ANOTHER GAME? ";:A$;10HIT;" TO GO!"!I11500:*180@ SCORING SECTIONd::"YOUR TIME OF ";SC;" IS ";&HSSCāI140:7680:I:6600HSSC:I1010010:255,I:7684:ID"A NEW LOW SCORE!"N:"WHAT IS YOUR NAME? ";A$X:b24:1El%(X%,Y%)2T%DH%:DH%DV%1:DV%T%1:340W A%(X%,Y%)3T%DH%:DH%DV%:DV%T%:340e HITHIT1~ HIT9SCTIME%:540 I130:T(16336)(16336)(16336): A%(X%,Y%)0 2X%95,Y%95 3XO%95,YO%95:"HIT# ";HIT;", "ROUTINE ^X%X%DH%:Y%Y%DV%Q hTIME%TIME%1:TIME%1000Ĺ255,255:7684:720d r21:23:TIME%z |A%(X%,Y%)0410 3X%95,Y%95:3XO%95,YO%95:XO%X%:YO%Y% 250 A%(X%,Y%)1DH%DH%1:DV%DV%1:X%X%DH%:Y%Y%DV%:340+ AME%50:770:TIME%1000360: CHECK FOR NO TIME LEFT.e 6K127(K174K175)A%(X%,Y%)0360 @K175A%(X%,Y%)2:16::1X%95,Y%95:T%DH%:DH%DV%1:DV%T%1:0:340 JA%(X%,Y%)3:1X%95,Y%95:T%DH%:DH%DV%:DV%T% T7680: SOUND ;N$:"LOW SCORE: ";HS; 770> 2(30X%)95,(17Y%)95T A%(30X%,17Y%)4w 3X%95,Y%95:XO%X%:YO%Y% X%X%DH%:Y%Y%DV%  GET KEY AND DRAW  APPROPRIATE SLASH,  OR DO 'ESC'. "K(16384):16368,08 ,K155TIME%TIxI017:A%(0,I)1:A%(30,I)1:C I129:A%(I,0)1:A%(I,17)1:S DH%1:DV%0^ 34,20 :::(7):"TO TRY YOUR SKILL PRESS RETURN. ";:A$ 0,0275,0275,1580,1580,0 :"HITS: ";HIT,"TIME: ";TIME% N$""ĺ:"LOW SCORER: "  WRITTEN BY CARLOS COSTA0 879-17086K( A.B.C. MEMBERQ2h< HIMEM IS CHANGEDF TO 7680 IN LINE 1020.P800: INITILIZEZ INITILIZE ARRAYSd AND DRAW SCREENnI030:J017:A%(I,J)0:J,I:HIT0:SC0:TIME%0      STSTAD"YOU ARE LUCKY,YOU ARE STILL ALIVE,BUT ONLY JUST!"n"TREAD MORE CAREFULLY IN FUTURE...."t~ KEY "YOU HAVE JUST FOUND A KEY,HOWEVER IT MAYWELL BE BOOBYTRAPPED!" "DO YOU WANT IT?";MG$ MG$"Y"ĺ"NO..OK SUIT YOURSR DOWN?" H" 1 OR 2"5RA:A1A22130b\(A1Z3)(A2Z1)ĺ"YOU CAN'T!":2130qfA1ZZ1kA2ZZ1p TRAP"CONGRATULATIONS,YOU'VE JUST FOUND A TRAP"A(2030(7)):A;" OF YOUR STRENGTH UNITS ARE USED UP" 2500,2600,1250,1250,5100) OPEN_M(X,Y,Z)1930,2700,2700,1930,2900,3000,3100,3200M(X,Y,Z)1M(X,Y,Z)9M(X,Y,Z)42050"I'VE NEVER OPENED A ";D$(M(X,Y,Z))"AND I DON'T INTEND TO START NOW!"4 STAIRS>"CLIMB UP OM(X,Y,Z)3İ2700:18009M(X,Y,Z)2İ2700:M4ıb((M(X,Y,Z)1M(X,Y,Z)4)M4)M0ı(M(X,Y,Z)4M(X,Y,Z)3)(M5M3)ıM(X,Y,Z)2M4ıXXB:YYCl EXPLOREvM(X,Y,Z)4İ2100:1930T(X,Y,Z)2200,2300,2400, (3)OPEN (4)STATUS"Y5^A:A1A3İ4200:1600KhA1700,1900,2000Qr\ MOVE"(1)NORTH (2)SOUTH (3)WEST (4)EAST"A:A1A41730A1C1:B0A2C1:B0A3C0:B1A4C0:B1MM(XB,YC,Z)M0ı1500%MM(X,Y1,Z):A$"SOUTH "/15005H DESCRIPTIONSq((M(X,Y,Z)1M(X,Y,Z)4)M4)M0ı(M(X,Y,Z)4M(X,Y,Z)3)(M5M3)ıM(X,Y,Z)2M4ıA$;" OF YOU IS A ";D$(M)@ YOUR CHOICEJ"(1)MOVE (2)EXPLORE(9)):D(13(6))>pT(B,C,D)0M(B,C,D)5M(B,C,D)81391MqT(B,C,D)6TrAZthx OPTIONSnyMM(X,Y1,Z):A$"NORTH"1500MM(X1,Y,Z):A$"WEST"1500MM(X1,Y,Z):A$"EAST"1500MM(X,Y,Z):A$"BY THE SIDE"ND","GUARDIAN","ORC","ELF"0hT129:MM$(T):RiXX(16(8)):YY(17(7))}jA16:B16:C03:T(A,B,C)01388k(17(7))5T(A,B,C)8l(14(7))2T(A,B,C)0T(A,B,C)(14(8))mC,B,AnA14oB(16(8)):C(16 "0929151B1B1B3F1B3F1B1B130909092D092D0909111B3F3F3F1B3F3F1F1300"m"363F24272C253C2C2D2E2E3E372E3E00"730909092D2D0D0909111B1B3F3F3F3F3F1B1309292D2D2D2D2D0D"  "111B3F3F1B3B1B3B3F13292D2D090D292D2D153F3F3F3F3F3F3F3F37292D2D2D292D2D2D151B3F3F3F3F3F3F3F"  "1309292D0909092D0D111B1B3F3B3F1F3F1B13292D2D2D2D2D2D2D153B1F1B3F1B3F1B3B17290D092D092D" E8D005CE0103F009CAD0F5AE00034C020360"E "05000C00210036004700EA00"w"0D090909111B3B1B1B1309090929311B1B3B3B1300" "2D2D2D2D353F3F3F3F372D2D2D2D353F3F3F3F3700" "09290D111B3B1F132D2D2D353F3F3F3700" 8"09092D2D292D0D09111B1B1B3B1F3F1B1B11 )B50)100)HA019698(:"WHAT WAS THE CITIZEN POPULATION? ";BF(B11975d(:"WHAT WAS THE FOREIGN"("WORKER POPULATION? ";C(C01980(:"HOW MANY SQUARE MILES OF FARM LAND"("WERE OWNED? ";D(D01990(DD1000(100)X5X5ICE AND HAVE BEEN"3'"DECLARED A NATIONAL HERO."R'R((A200(D1000))3000)r'::"YOUR RATING IS ";R|'1590'':"HOW MANY YEARS WERE YOU PREVIOUSLY"'"IN OFFICE? ";X5'X501960':"HOW MUCH WAS IN THE TREASURY? ";A (K AND WHITE TV, FAKE";)"IT....."::9L770:1870EL16384[MX19:1870:MXa&iNA$zXI1(A$)2bAD((A$,I,1))48lAD9ADAD7vCH((A$,I1,1))48CH9CHCH7L,AD16CHLL1:I$ "AD30C08"EACH TIME YOU FIRE 10 UNITS ARE USED."Y"THE LASER CONSTANTLY RECHARGES ITSELF.":"BLUE MARTIANS ARE WORTH 5 POINTS, WHITE""MARTIANS ARE WORTH 10 POINTS, AND RED""MARTIANS ARE WORTH 15 POINTS EACH. IF""YOU ARE USING A BLACOMMIT SUICIDE. THE CHOICE IS YOURS."Q&"IF YOU CHOOSE THE LATTER, PLEASE TURN"}& "OFF YOUR COMPUTER BEFORE PROCEEDING."&:1590&l&n&&"CONGRADULATIONS,"&:&"YOU HAVE SUCCESSFULLY COMPLETED YOUR ";N5'"YEAR TERM OF OFF70%B5F121515%G%:"MONEY WAS LEFT OVER IN THE TREASURY"s%"WHICH YOU DID NOT SPEND. AS A RESULT"%"SOME OF YOUR COUNTRYMEN DIED OF "%"STARVATION. THE PUBLIC IS ENRAGED AND"%"YOU HAVE BEEN FORCED TO EITHER RESIGN"$&"OR C" $15905$"HAVE ALSO BEEN DECLARED A NATIONAL"]$"CRIMINAL AND ENEMY OF THE STATE."g$1590m$s$$"OVER ONE THIRD OF THE POPULATION HAS"$"DIED SINCE YOU WERE ELECTED TO OFFICE."$"THE REMAINING POPULATION HATES YOU."%15ANAGMENT,"6#P"YOU HAVE NOT ONLY BEEN IMPEACHED AND"[#Q"THROWN OUT OF OFFICE, BUT YOU"m#VM6((1)10)}#YM631670#^M661680#cM6101690#"ALSO HAD YOUR LEFT EYE GORGED OUT."#1590$"HAVE ALSO GAINED A VERY BAD REPUTATION.""(1).51580="&"YOU HAVE BEEN THROWN OUT OF OFFICE"d"'"AND ARE NOW RESIDING IN PRISON."n"*1590","YOU HAVE BEEN ASSASSINATED.""6"8"<2046"@"B"JB5" CITIZENS HAVE DIED IN ONE YEAR." #O"BECAUSE OF THIS EXTREME MISM0!B3431700&!(A4100)518004!CB1550F!N51X51900P! 2000V!\!!:"THE NUMBER OF FOREIGN WORKERS HAS"!"EXCEEDED THE NUMBER OF COUNTRYMEN."!"AS A MAJORITY, THEY HAVE REVOLTED"""AND TAKEN OVER THE GOVERNMENT." 1450, "THE MINERAL BATHES ARE BEING"R "RUINED BY THE WATER POLLUTION."\ 1450 "UNPLEASANT SMOG IS DISCOURAGING" "SUN BATHING." 1450 "HOTELS AND BUSINESSES ARE DEGENERATING" "FROM SMOG GRIT." 1450!B5200160G161470 G1814751G1101480BA(AV1V2)b23:"PRESS ANY KEY. ";:Z$l1500"THE FISH POPULATION HAS DWINDLED""DUE TO WATER POLLUTION."1450"AIR POLLUTION IS KILLING THE""GAME BIRD POPULATION."(W3))3d"THE HARVEST SOLD FOR "(Q)" RALLODS."@nA(AQ)bxV1(((BP1)33)((1)5000))x}V2((2000D)15)"YOU GENERATED "((V1V2))" RALLODS""FROM THE TOURIST TRADE."V201450G110(1)G121460G1414650U20$1D2000J(((1)2)3J)P2(JU2)" SQUARE MILES WERE HARVESTED."_<U201370o@T121370F"HARVESTS WERE SHORT DUE TO "KT101365P"INCREASED ";U"AIR AND WATER POLLUTION"W"FROM FOREIGN INDUSTRY."ZQ((JU2)N ";P101275$"CAME TO ";.1280<"LEFT ";O"THE ISLAND."] B(BP1)k C(CC1)U2((((2000D)(((1)1.5)2))))(COUNT2)U2(J.25COUNT2)((J)" SQUARE MILES WERE PLANTED.",JU21328.U2J0D200H01250/C1(H1.4((1)10)((1)20))=C01230JC1C120qC1" WORKERS CAME TO THE COUNTRY."P1((((I100B)10)(K25)((2000D)50)(F12)))D2000P1((I100B)10(K100)(D2000)((1)2)3F12)(P1);" COUNTRYME) 11853"YOU WERE FORCED TO SPEND "(F19)W"RALLODS ON FUNERAL EXPENSES."aB5F1sA(A(F19))(A0)1194"INSUFFICIENT FUNDS WERE IN THE TREASURY,SO FARM LAND WAS SOLD TO INDUSTRY."D(D(AW))A0B(BB5) DIED FROM CARBON";u"MONOXIDE AND FROM DUST INHALATION."T~((I100)B)01170cF101180m1200"YOU WERE FORCED TO SPEND ";((F1(B(1100)))9)"RALLODS ON FUNERAL EXPENSES."B5(F1(B(I100)))A(A((F1(B(I100)))9)936:4A(AK)&A4A>L(I100B)01120QQI100501700ZS:3V(B(I100))" CITIZENS DIED FROM STARVATION."`F1((1)(2000D))aD2000F10b(K25)1130eF1(F1(K25))j(F10)1150tF1" CITIZENS THE TREASURY."&510)X(H0)1002:Z(I0)1002K\(J0)1002\^(K0)1002baf"IF YOU WISH TO CONTINUE THIS GAME"g"AT A LATER DATE, TYPE IN 'AGAIN' WHEN"h"ASKED WHETHER YOU DESIRE INSTRUCTIONS.":j600ALLODS""IN THE TREASURY."(4050K08A0B1000MAAU1_COUNTCOUNT1:"HOW MANY RALLODS DO YOU WISH ""TO SPEND ON POLLUTION CONTROL? "K (K0)510(KA)1000:"YOU HAVE ONLY "A" RALLODS""IN J0405(JB2)426Y:"EACH COUNTRYMAN CAN PLANT":"2 SQUARE MILES.":405n(JD1000)430:"YOU HAVE ONLY "D1000" SQUARE""MILES OF FARM LAND.":405U1(JV9)(U1A)500(U1A)490:"YOU HAVE ONLY "A" RARE MILES OF FARM":"LAND POSSIBLE TO PLANT: "X9y:"COST TO PLANT ONE":"SQUARE MILE: "V9:"TOTAL COST TO PLANT""ALL POSSIBLE LAND: "X8"HOW MANY SQUARE MILES WILL""YOU PLANT?"J0h(IA)380m7r"YOU HAVE ONLY "A" RALLODS"Ot"IN THE TREASURY."Xw322`|J0hK0pA0z1000A(AI)D1000B2X9D1000D1000B2X9B2AV9X9X8V9X9AV9X9X8(AV9)V9X9X8V9::"SQU"FARM LAND BECAUSE FOREST IS NOT"F"ECONOMICAL TO STRIP MINE."LTX1]+200j,D(DH){6A(A(HW))B:"RALLODS NEEDED: "B100J"NUMBER RALLODS DISTRIBUTED"O"TO CITIZENS?"TIVI0322^(IA)40A(AZW)9"HOW MANY SQUARE MILES WILL YOU"Z"SELL TO FOREIGN INDUSTRY?"aHnH0200HD1000300:"YOU HAVE ONLY "D1000" SQUARE""MILES OF FARM LAND.":X0200"FOREIGN INDUSTRY WILL ONLY PURCHASE"%"FARM LAND PER SQUARE MILE: "W,::R"HOW MANY SQUARE MILES WILL YOU"y"PURCHASE FROM FOREIGN INDUSTRY?"ZZ0199Z0ĺ:170A(ZW)195:"YOU HAVE ONLY "A" RALLODS":"IN THE TREASURY.":170D(DZ) EASURY: "A=n"CITIZEN POPULATION: "(B)XsV9((((1)2)1010))"FOREIGN WORKERS: "(C)"SQUARE MILES OF FARM LAND: "D1000"SQUARE MILES OF FOREST: 1000":"PRICE TO PURCHASE OR SELL""SUCCESSIVE PLANTING."7A23:"PRESS ANY KEY. ";:Z$:^PA(60000(5000(1))(5000(1)))UB(400(10(1))(10(1)))ZD2000dW20(10(1))100e936::" ***** YEAR ";X5;" OF OFFICE *****"f::g""i"RALLODS IN TRION CONTROL."7 2:"(3) BUYING OR SELLING LAND WILL "c 3" RESULT IN A POPULATION INCREASE." 5:"(4) LAND PRICE VARIES FROM 100 TO 300" 6" RALLODS PER SQUARE MILE." 8:"(5) EACH HARVEST DISMINISHES WITH LAND"9" SALES AND WITH '23:"PRESS ANY KEY. ";:A$L ):"YOUR GOAL WILL BE TO COMPLETE YOUR "N5h *"YEAR TERM OF OFFICE." ,::"NOTE THE FOLLOWING:" .:"(1) YOU MAY BUY OR SELL FARM LAND." 0:"(2) SELLING LAND TO INDUSTRY INCREASES" 1" THE COST OF POLLUTORESTS.":5 "YOUR FARM LAND HAS MINING POTENTIAL"d !"AND MAY BE SOLD TO FOREIGN INDUSTRY FOR" ""STRIP MINING. THEY THEN IMPORT AND" $"SUPPORT THEIR OWN WORKERS. CROPS COST" %"BETWEEN 10 AND 15 RALLODS PER SQUARE" &"MILE TO PLANT." "THE MONETARY SYSTEM IS BASED UPON THE"X "RALLOD AND EACH CITIZEN MUST HAVE 100" "RALLODS PER YEAR TO SURVIVE. YOUR" "COUNTRY'S INCOME IS PRIMARILY DERIVED" "FROM FARMING AND FROM TOURISM BASED ON" "HUNTING AND FISHING IN YOUR F BEEN"1 "ELECTED PREMIER OF SETATS DETINU, A"^ "SMALL COMMUNIST ISLAND OF 2100 SQUARE" "MILES. YOUR JOB WILL BE TO DECIDE UPON" "THE COUNTRY'S BUDGET AND TO DISTRIBUTE" "FUNDS TO YOUR FELLOW COUNTRYMEN FROM THECOMMUNAL TREASURY.":+!+:::6:10:"***** PREMIER *****"T23:"DO YOU WANT INSTRUCTIONS? ";Z$]N57fX51sS16336 Z$"Y"Z$"YES"Z$"N"Z$"NO"Z$"AGAIN"1 Z$"N"Z$"NO"80 Z$"AGAIN"1955  "CONGRATULATIONS! YOU HAVE JUST             ANY AS YOU CAN BEFORE THEY"I|"SHOOT YOU 5 TIMES OR REACH YOUR BATTLE"Y"STATION.":"IN THIS MAMMOTH LASER BATTLE YOU USE""THE GAME PADDLE TO MOVE AND THE BUTTON""TO FIRE YOUR LASER.":"YOU START WITH 250 CHARGE UNITS, AND"+768,10:769,5:7700.ST,156ST,EN4?K12JJ14Q"J^,5ST,ENh6J:Kq@1:wJT" WELCOME TO INVADERS"^" MP SOFTWARE, 1980"h:"THE ALIENS ARE COMING! THE OBJECT IS TO"r"SHOOT AS Md768,103:769,250:770"n1140:x(16384)2161139Ay5SST(NX1)98jSTSTNX(NX2)2~ST,NY19ST,EN768,20:769,5:7700ST,NY19ST,EN(16384)21611396ST2((XX2))4ST,156ST,EN0:4I,140$C(TM):4I,130<768,50:769,5:770L0:41,130` C(TM):4I,140fw0:3XX,156~(721I,156:1I3,156<768,87:769,100:770F768,103:769,50:770P768,78:769,50:770Z768,87:769,100:770:769,5:770 jLX2:TM1:1190.s16368,0ht20::958:" WANTA PLAY AGAIN? >-Y-OR-N->";:A$|~(A$,1)"Y"60(A$,1)"N"1140::I(LX1)9PX93(PXLX1)C(TM):4I,1400:4I,140IPX9J1101Ē1:1PX92,EN1070-ENI19:1480F768,100:769,5:770P1550rMNMNM%(PX1,I)5:23:MN,HNM%(PX1,I)0$0:4PX9,(I1)19.TITI1:TI118008CH16ğBCHCH5:24:"CHARGE=";CH;" ";:1LV360 `768,30fM%(PX1,8)0I8:1010*pI411@zW%(PX1,I)0950GIUI711lM%(PX1,I)01010sIEN0:1480:1070EN133I4:1480768,175:769,5:7700:W%(PX1,I)PX92,ENW%(PX1,I)W%(PX1,I)1W%(PX1,I)92,ENW%(NX,I)W%(NX,I)1BW%(NX,I)1Ē1:1(NX1)92,ENT  PLAYER MOVE^TILEo 0:3XX,156*XX(0)1.055:7:3XX,1564PX((0).117)>(16287)1281070HCH101070RCH31ğ\CHCH10:24:"CHARGE=";CH;" ";:1:PX((0).117)bI14/lW%(NX,I)07205vFEN159:1400XNXPX1780q768,150:769,5:770{1550HNHN123:MN,HNHNMX1130780EN1334I:1400768,175:769,5:77015500:W%(NX,I)(NX1) LXI:0 TMM%(LX,LY)A M%(LX,LY)0:4(LX1)9,(LY1)19a NYLY(AD):NY8LY8NY8p NY81190 NX((1)5)2LX &NX30NX1540 0M%(NX,NY)TM :C(TM):4(NX1)9,(NY1)19 D0:3XX,156 NXX(0)1.055:7:3XX,156X56! rXX(0)1.055:7:3XX,1565 |PX((0).117)B ILX30V M%(I,LY)0490\ w LYLY1:LX1:LY0360 I3303 M%(I,1)(((1)91)) C(M%(I,1)):4(I1)9,0  LELE1:LE10LE10:ADAD.5:AD4AD4 LY8:780 005:3XX,156 "LX1:LY4% ,:22V 6"GAME LEVEL (1-EASIEST, TO 10-HARDEST)?";LEp @:22:"SCORE","HITS"~ JMN0:HN0 T23:MN,HN ^24:"CHARGE=";CH;" ";:1 c MARTIANS' MOVE MOVE BATTLE STATION ACCORDING TO PADDLE SETTING. h0:3XX,1ISTRIBUTION OF COLORS TO 3 BLUE AND 5 WHITE FOR EACH RED MARTIAN.R I3303] J14x M%(I,J)(((1)91)) C(M%(I,J)) 4(I1)9,(J1)19 J:I  DRAW BATTLE STATION, MORE INITIALIZATION: 7:PX((0).117) XX(0)1.ME": FW%(30,4),M%(30,8)5 PC(1)6:C(2)7:C(3)5? Z1:0H dMX5Q nAD1\ xCH250r } SET UP THE WALLx  3 I2305 JII1 K14 W%(J,K)2 2(J1)92,1334K K:J:ID SET MARTIANS LINE 230 SETS THE Dn7 INVADERS,MARK PELCZARSKI,1980 S SOFTSIDE APPLE EDITONt VOL. 1, ISSUE 25, MAY 1980 1610:1800" (*) PRESS SPACE BAR TO CONTINUE (*)";:A$(2232,0:233,64 <20:958::" PRESS X TO EXIT THE GA            :H2H2.2+ H1.058370, "YOU STAGGER AWAY.":8050, "YOU ARE DOWN!":, "HE CLOSES IN FOR THE KILL."M, XX11000:XXe, (1).1E1208400, "YOU STRIKE A LUCKY THRUST.", "HE IS DEAD.":, "YOU ARE KILLED.", 3870,VE SLASHED HIS ARM."*! W2W2H23:W3W3H25+# 8250 +& "YOU SCORE TO HIS BODY."7+5 W2W2.1:W3W3.25=+: N+; W2.1W2.1_+? W3.058050+D :"HE IS DOWN!":XX1800:::"YOU FINISH HIM OFF."+` 5000+b + "YOU ARE HIT!"+ H1H1.2YOU DUCK UNDER HIS SWORD TO ATTACK.")8175*"YOU PARRY, THEN ATTACK!"$*I11H36*(1).18190S*"YOU MISSED HIM!":8250j*X11(2.999(1))* X18200,8220,8230* "YOU GOT HIS LEG."* W2W2H25:W3W3H25* 8250* "YOU HA8090,8100,8110("HE TAKES A WILD CUT!"(8120)"HE STRIKES AT YOUR BODY."))8120E)"HE TRIES A HEAD CUT."`)(1).5.3H2W28340u)X11(2.5(1)))X18150,8160,8170)"YOU PARRY HIS BLOW.":"YOU BACK AWAY.")8050)"1'8W21.3(1)';H32(E1)!(@:"IT IS A GIANT TROLL."::"THE BATTLE BEGINS."P(r:"YOU CIRCLE FOR POSITION.":XX11000:_(s:I1120k(tX1(1)q(u(wW3W3.05:H1H1.05(yH2H2.05(|"HE ATTACKS!"(X11(2.9999(1))(X1"THE WOMEN ARE SENT TO HIS DUNGEON."':"YOU ARE TRANSFORMED INTO A TOAD.":3870D':"HE TAKES YOUR SWORD.":E11.5h':"YOU ARE THROWN INTO A PIT."r'6110x''4700''X:"**** GIANT RATS ****"'b4700'l'6W32:H11:H2500:%Q3715:&V:"YOU ARE RESCUED BY A WOMAN."::"SHE JOINS YOU." &WW1W11&&XG&:"**** NECROMANCER ****"Y&(1).66392i&F116326&:"THE NYMPH IS ENCHANTED."&W1W11:F10&E116375&W106350&W10&: IS TOO DEEP TO CLIMB."::"YOU YELL FOR HELP."%6200%$:"YOU CLIMB OUT.":;%8:"HELP HELP HELP HELP!"E%;5000W%<(1).36200%=:"A ROPE IS LOWERED AND YOU ESCAPE."%>5000%?P30%BY1(3(1).9999)%GY16220,6225,6230%L4.5İ3490 $:"YOU MUST ESCAPE."::"1. CLIMB OUT."::"2. YELL FOR HELP. ";:A$:"":$A$"1"A$"2"6120G$X1(A$)P$ P70b$ X16160,6200z$(1).5P7106180$:"YOU FALL WHILE CLIMBING OUT."$(1).2İ3490$P7P71$:"IT dB,Aj e "TROLL","GHOST","IMP","BAT","GIANT","ZOMBIE","GROCKLE","HOUND","DEVIL","KOBOLD","RAT","XORN" f "GOBLIN","ORCUS","HYDRA","SERPENT","BASILISK","PHEONIX","MEDUSA","SALAMANDER"g "GARGOYLE","BEHOLDER","JUBILEX","GOLEM","VAMPIRE","HELL HOUK0:X3:Y6:Z1:L0:TF0Q ( "HALL","DOOR","DOOR","STAIRCASE","DESK","CUPBOARD" 2 "CLOCK","PIANO","CHAIR","STATUE","FIREPLACE","BOOKCASE" <A112:D$(A):A FMO0:ST100:CL$((10008999(7))):CC1 PA16:B16 ZM(A,B,0)(58(8))F jC03:A16:B160 tM(B,A,C)01180I ~M(B,A,C)(58(3))T B,A,C_ D12q A(16(7)) B(16(7)) C(13(5)) M(A,B,C)5M(A,B,C)81200 D1T(A,B,1)5 D2T(A,B,C)7 D   OTHER BITS (3,A,B)1 A,B$ A(16(7))= B13:M(A,3,B)4:B} $ 2,2,1,1,2,3,4,1,5,2,6,2,3,1,4,2,5,2,6,4,4,5,4,6,5,4,6,4,9 .F13: 8A:A91120 BB(1A(9)) LC1B:D,E:C:M(D,E,F)(22(5)) V(BA)1080 [D,E:BB1:1110 `,MM$(30),A(4),B(4) " (1000, 21300M 7"PRESS ANY KEY TO PLAY":J$^ 8TI$"000000"d <n F1400x P1600 Z(16(8))4İ4000 dST1İ6000 nZ0XXXYYYİ5000 70  SET UP HOUSE DETAILS B13:A16 M(A,3,B)1:M'! *************************A ** TREASURE HOUSE **a ** TRANSLATED ** ** FOR APPLE II BY ** ** M GANNHOLM ** *************************8000 HOUSE MK I M(7,7,3),T(7,7,3),D$(12)         ʘmR=a:VP~pppp     #% !$'*- #&*-14pppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppp  0000000@@@@@@@PPPPPPPP````````````ppppppppppppppppppppppppppppppp````````````PPPPPPPP@@@@@@@0000000 OPYRIGHT 1982 DON'T ASK - ALL RIGHTS l buffer to disk, XON sent to resume. :͜ - TrEEsfer ASCII file to remote :: ’5͜ - Send local control character to remote 5͜ - Next character will be used for local control ͫ Default DriveALIAE)ʽA LbI8 ALIA5ʼAE)LIALI*LQI,LbIʽC DFLIE9LIʼA蹚E))AE)CALIAE)LGA`E)@AE) C0ʘCLIO"Z L "CANC A DFLIOPۨE)+C&A AE)C DFLIA0ʽAE*ALAI9,ALJI蹚E)LIALIʼA蹚E)LIALI ʽA<LI&ALIHAʹE) LIKALI<AʹE) LI?A`AC 0 WBL!G0XBLG`A`E)L*G),C0X DF0X DFL*GALGE)2$,%(C0X DF0X DFL*GALG`E)CE)  DFL#I @$ $$ $ `` 6FʈAABBCCABC =F`C@ n@D IE*Q ALFIE*DQ ALFD @ /e`CLF-IIEAAAAUAIEUORLWYWRLWYMNNDQSSFT//ZZVDC*J***EAOAOUB**D**G**G**P**T**K**K**UUU*****YHHEAHOHXXRXHXXXXH******XX**H*HHX*H*HH*****YYYWWW*********X***********X**LMNDDDDDLLLHL@@@@@@DDDDH@LDNNNNNNNNNNNNKKKKKKKKKKKK*123456789 .?,             options followed by the speed e.g., 300, 1>>0. EXAMPLE: SBO1T.600 will set the modem to run at EFG1&1EFG KLM(4(2  9:;&78!  678*+ # 1&  9:; ?@A KAEN NAW4 OW4N YOHR OW3N KAA4PIY AHV SAE5M. YOH4R KUMPYUW3TER IHZ REH4DIY TUX TAOK." 490 GOSUB 5 500 END CS 2:SETCOLOR 2,0,0:?# FACTOR !* "Щ&6A7 @@ @`@HH@) @@@, @ hh@` @ @ @ @ Ȭ@@, @ , @ ALIA fLIA _ @ vF @7 G I G c &G @b @?`APA /cB cL_678 EFG )  YOU AND TAKE THE WOMEN.""3870#:"THE WOMEN ARE CAPTURED."!#(1).035310:#:"THEY CURSE YOU."D#C25S#(1).3ıx#:"THE SATYRS KILL YOU ANYWAY."#3870#:"YOU FALL INTO AN ENCHANTED WELL."#5000#P31#(1)! :"WILL YOU FIGHT THEIR CHAMPION? ";!3000"I15200,5160"(7990+"-(1).252001"2b"P:"THE SATYRS WANT YOUR FEMALE COMPANIONS."|"UW10:F10:R11R12"Z:"WILL YOU ALLOW THIS? ";"d3000"nI15240,5260"x:"THEY KILL (1).05E1.4İ3490  \:"YOU FLEE."!fL1L14S1((1).7)"!pT1T115!u(1).7İ6100;!zH!I1110T!X1(1)\!I1b!~!:"**** SATYRS ****"!E115130!(1).55130!:"THEY RUN FROM YOUR SWORD."!TROLL ****":"WILL YOU FIGHT? ";3000 I14540,4560 4700 , E104580J :"THE TROLL RUNS AWAY."P h (1).3E1.54610z (1).34590 3490  :"YOU ARE KILLED." 2990 :"YOU KILL THE TROLL."ET POVERTY"::"AND LIVE UNHAPPILY EVER AFTER.": R124305:"YOU ALLOWED THE PRINCESS TO BE CAPTURED":"BY WILD SATYRS AND ARE TORTURED TO DEATH"::"BY HER FATHER, THE KING.":3870:"YOU HAVE FAILED IN YOUR QUEST.":4247:"**** 3500hL10ımR114275o:"YOU SURVIVED."r:"YOU ARE A HERO."+wG124240K|:"YOU MARRY THE PRINCESS"s:"AND LIVE HAPPILY EVER AFTER."::"YOU ARE TOO POOR TO MARRY THE PRINCESS.":"YOU LIVE OUT YOUR LIFE IN QUIED.":"YOU LOSE.": (:"YOU ARE GIVEN TO THE SATYRS."2513033752-R104200N:"YOU ARE AT THE ENTRANCE"g:"TO THE DUNGEON.":"THERE IS A GUARD."7990R11:W1W11:"YOU HAVE RELEASED THE PRINCESS." -=# GOOD LUCK #=-"G 22:8:"- HIT ANY KEY TO START -";:A$:M THE BALLS MOVEMENT SIMPLY TILT THE PLANE. NOT SO SIMPLE AFTER ALL!!"| :"CONTROL THE BALL WITH PADDLES/JOYSTICK.": :" A TIMER ADDS THE FOURTH DIMENSION ANDA METHOD BY WHICH TO RATE YOUR SKILL LE TILT"::"BLACKHOLE TILT IS A REAL-TIME ACTION GAME THAT INVOLVES TIMING/COORDINATION. THE OBJECT OF THE GAME IS TO GET THE BALL INTO AN INCREASINGLY SMALLER HOLE. SIMPLE ENOUGH!"I :" THE BALL IS ON AN IMAGINARY PLANE IN MEMORY. TO CONTROL 005- A140:P(16336):BA211:B:A7 F1:K SS1:S61999p C11S211:C:3:2SX,SY:C YM0:XM0:30 16368,0 24:" DO YOU WANT TO PLAY AGAIN?";:A$:A$"N"2020 :10 ::"BYE BYE": 14:"BLACKHO7Y147:YMYM54 uHB(0)4.04100:VB(1)5.450; x0J yOHHB123X z1OH,157g {OVVB125u |1275,OV }0:1OX,OY ~OXX:OYY:OVVB:OHHB 22:17:"TIME=";(T10)10;" ":TT.1 80 SX(1)20039:SY(1)10029 F012:X2:OY2:OX2:HB101:VB97:OH101:OV974 F1:0O P3:1HB,157:1275,VB] U3:1X,Yp Z(234)01000 dXMXM((0)128)300:YMYM((1)128)300 nXXXM:YYYM pX2X2:XMXM5 qX264X264:XMXM5 rY2Y2:YMYM5 sY14164,154:101,151101,154:108,151108,152:116,151116,153:124,151124,152:132,151132,154 .140,152:148,152148,153:156,152 /269,50269,97272,97:270,92:270,86271,86:270,80:270,74272,74:270,68:270,62271,62:270,56:270,50272,50* 2YN768,2:769,0:770,6:771,0:772,12:773,0:774,39:775,45:776,54:777,63:778,7:779,0:780,36:781,45:782,54:783,63:784,0233,03:232,0  3000:1:0:31000#3:0,0266,0266,1490,1490,0] -101,151164,151   " SOLDIER--HIT AND KILLED!":S8S81:S9S91:R(P(1,1),9)R(P(1,1),9)1:R(P(1,1),8)R(P(1,1),8)1:R(P(1,1),7)R(P(1,1),7)1fR(P(1,1),7)0S90:R(P(1,1),7)0p2780:2710zD1(4(1)):P(P1,2)P(P1,2)D1:" A HIT!":P(P1,2)0ĺ" A KILLING ":P(1,1)0:2280[4:"WHAT IS YOUR COMMAND?";A$::C9114:(A$,(CM$(C9)))CM$(C9)830i9C9:1640>C91020,1110,1680,1420,1830,2130,1490,1580,1550,1160,1230,1430,1330,2200HA1A1D1(((1)7)3):A10ĺ" A MISS!":D10:RP15890}\P(4,1):R131((1)12):P(P1,1)R1,P1UR1(30(0)1):R(R1,6)1R(R1,6)0i T8:D(1)1800:"THE FORCE FINALLY GAVE UP ON YOU."::810 :"THE DEATH STAR JUST EXPLODED.":"UNFORTUNATELY, YOU WERE STILL ABOARD":*"YOU ARE DEAD..17409P1(5(1)1):P15ĭP(1,1)(P(P1,1))700"A SOLDIER FIRES AT ";N$(P1):A1S(S,2):D1S(S9,1):J54:P15D1P(P1,2):P(P1,4)0J1D1D1J:2750840:P(1,1)0810S$P123:P(1,1)P(4,1)P(P1,1)P(4,1)P(4,1)0R1P(4,6)1670x"DARTH VADER SWINGS AT YOU WITH HIS LIGHT SABRE!":2800:A1P(4,2):D1P(1,2):P11:840:P(1,1)0810680"DARTH VADER SWINGS AT YOU WITH HIS FIST!";:A1P(4,2)2:D1P(1,2):P11:840:P(1,1)0810S90750S1S9:(1)":E1.8P31ĺ:"THEY THROW YOU BACK INTO THE PIT." 3705$D9(3(1).9999)4G1D93850W:"THE GOBLIN LORD FREES YOU"w:"FOR "D9" BAGS OF GOLD."G1G1D93752 W103880:"YOU ARE ENSLAVED AND EVENTUALLY KILL5v:"YOU TRY TO MOVE ON."yF57ı~:"YOU STARVE TO DEATH.":38705:"**** GOBLINS ****"EE113800:"THEY DESIRE YOUR SWORD."::"WILL YOU GIVE IT TO THEM? ";3000I13800,3750:"THEY TAKE IT AND LET YOU LIVE."YOU MUST REST." :"YOU HAVE TRAVELED "I2S110" MILES." T10 5000, D3D31W1F1A D34W1F13700Q D403650o :"YOU ARE OUT OF FOOD." D41:C2C2(1) 3700BF5F51LC2C2(1).2F1t(1)1(I2F8)100371TO THE SATYRS." 840 * A$:"":A$"Y"A$"N"ĺ:"TYPE Y (YES) OR N (NO). ";:30003 I11D A$"Y"I12J o :"THE NYMPH IS VERY OFFENDED."! :"SHE GOES AWAY."& F10( W10+ C2C210  :"YOU ARE HURT." :E JOINS YOU."5000W1W11L20840 L1L1L0.85L120İ4000-"C31520>,(1).9520Q6(1).5İ6100~;:"YOU REACH A DEAD END AND TURN BACK."=5000@L2L2L0OL1L1L0PC30840@ :"YOU ARE SOLD ((1)3)1F11ĺ:"GREED IS VERY DANGEROUS.":3100:1490]X1((1)3)1E11ĺ:"THE GOLD IS HEAVY."::"YOU DROP YOUR SWORD.":E1.8:1490mG1G1(X1)T1102F1İ3500(1).051540:"YOU COME UPON A DAMSEL IN DISTRESS."::"SH0İ6300W101460(1).95(C2C3)50İ5100(1).951500,:"$$$$ GOLD $$$$"W:"HOW MANY SACKS WILL YOU TAKE? ";X1(1).1X115ĺ:"**** DEVIL ****"::"YOUR GREED BANISHES YOU TO HELL."::"YOU ARE DAMNED.":3870X1:"YOU FIND AN ENCHANTED SWORD."5000 C2C2.2:E11((1).5(F1C3).95960I:"**** GIANT SNAKE ****"S3490_T1T11}(1).8(C2C3)30İ4500(1).95İ7000(1).03İ6100P30F(1).99(C2I210)102. ";:A$:"":A$"1"A$"2"740X1(A$) X1(X1.0001)X12X11740( D008X1C1820R C2C2(1)(.5(1))[*C30d/840q4C2C2.2{>C31HT10890zL2L2S1I2I21E10940(1).15.2F1940SHE SAYS "C1l740:"SHE CANNOT HELP."740+:"WILL YOU CAST LOTS TO DECIDE? ";53000EI1740,680`:"THE LOT ADVISES ";w(1).5C210700X1C1730C12X11C11X12X1:"CHOOSE PATH 1 OR FORK IN THE PATH." C1(2(1).9999)Z1W1F1:S18Z1G1(1Z1)"S14S14;3.5(1)C2L1L11L!L2720(1)V&L0L2d0F10660::"WILL YOU ASK THE NYMPH FOR HELP? ";D3000NI1660,600X(1).5C250650b:"4:R(P(1,1),X)01620U+6R(P(1,1),X)0ĺ"ACROSS A WIDE CHASM":R1R(P(1,1),X):1610h+@R1R(P(1,1),X)+J930:"TO THE ";P$(X);" IS THE":S$+TX:S$A$+^9,h"I AM THE FORCE. I WILL DO THESE THINGS--":" GET AN OBJECT":" DROP AN OBJECT":" OF EACH WEAPON.":820J*"OK.":P(1,3C1)P(1,3C1)1:P(C1,3C1)1:2710*"OK, SCATTER":X311:Y(4(1)1):R(P(1,1),Y)0P(X,1)P(1,1)P(X,1)R(P(1,1),Y)*:X23:P(X,1)P(1,1)P(X,1)0P(X,1)P(X,1)*":R1P(1,1):1750+,A$S$:X1"DO YOU WANT TO GIVE A SHIELD OR A":" BLASTER (S OR B)?";A$p)(A$,4)"LEIA"İ3000:A$(A$,A1):A01510)C11:(A$,1)"B"C12)P(1,3C1)0ĺ"YOU DON'T HAVE ONE TO GIVE":820*P(C1,3C1)0ĺ"SORRY, BUT A FOLLOWER CAN ONLY CARRY ONE ON A REMARKABLE ESCAPE.":2280@(3000:A0A$(A$,A1):1499("DO YOU WANT TO GIVE TO THE PRINCESS OR":" THE WOOKIE (P OR W)?";A$(C1:(A$,1)"W"C2(P(1,1)P(C1,1)ĺ:N$(C1);" ISN'T HERE!":820(3000:A1A$(A$,A1):1515?)S TAKING OFF.":"LEAVING HANGER NOW.":"APPROACHING TRACTOR BEAM."K'255'R(9,6)0R(28,6)0Ğ:"THE TRACTOR BEAM LATCHES ON.":"STRESSES TEAR THE MILLENIUM FALCON INTO ITSY-BITSY PIECES."::810("TRACTOR BEAM IS INOPERABLE.":"CONGRATULATIONS U JUST STARTED THE DEATH STAR'S SELF-DESTRUCT DEVICE.":T8(10(1)3):"UH--YOU'D BETTER GET OUT OF HERE.":D(1)1x&&D(3)D(3):2800:2710&P(1,1)1ĺ"HOW CAN YOU TAKE OFF FROM THE":4);S$;"?":820&2740B'150:"THE MILLENIUM FALCON IP(1,1),6)2P(1,1)28ĺ"WHY? THE ROOM'S ALREADY IRREPAIRABLY DESTROYED.":820[%P2760%ZR(P(1,1),6)R(P(1,1),6)(3(1)):R(P(1,1),6)2R(P(1,1),6)2%dY(37):6%n2640:Y1r&xR(P(1,1),6)2P(1,1)28(1).25İ2770:"CONGRATULATIONS. YO8109$"THE ROPE HELD, LUCKY YOU":P(1,1)30M29:1300B$ M30L$2720r$X311:P(X,1)P(1,1)P(X,1)M$(X:1750$2R(P(1,1),7)0P(1,1)P(4,1)1030$<R(P(1,1),5)10(R(P(1,1),5)10)1ĺ"THERE'S NOTHING TO SABOTAGE HERE":820Q%FR(W DO YOU EXPECT TO SWING ON THE ROPE FROM THE ";S$;"?":820#J1:"THE PEOPLE SWINGING ARE--":" YOU":X12:P(1,1)P(X1,1)ĺ4);N$(X1):JJX$X:"OKAY, NOW":150:". . . UP, UP, AND AWAY--":255:J(4(1)1)Ğ:"EGAD, THE ROPE BROKE"::PE SWINGS--FLIES--AND ";:255:(1).5ĺ"MISSES.":"BETTER LUCK NEXT TIME.":r""CATCHES.":"GOOD SHOT!":D(2)1"Y(37):6"2650:Y1:"R(P(1,1),7)0P(1,1)P(4,1)1030"D(2)0ĺ"THE ROPE ISN'T UP!":820?#P(1,1)29P(1,1)30ĺ"HOC)R(P(1,1),7C)1:P(1,3C)P(1,3C)1:2820:2710;~ A$"BAD":2490R; A$"FAIR":2490f; A$"GOOD":2490; A$"VERY GOOD":2490; A$"INCREDIBLY GOOD":2490; A$"ABSOLUTELY UNBELIEVABLE"; "ALL IN ALL,":"YOU WERE ";A$< :23:X12000:X::(4AIRED.":S8S83P(2,1)5P(3,1)|:B R13:R1,A$:7,WEAPONRY MACHINERY ROOM,13,COMMAND CONTROL ROOM,28,POWER MACHINERY ROOM:L R(R1,6)0ĺ"THE ";A$;" WAS DAMAGED":S8S810:V R ;` :"YOUR FINAL SCORE WAS ";S8:((S8)25)12420,2430,2440,2450,2460,,1)0ĺ"YOU KILLED DARTH VADER.":S8S825f9$ D(1)1ĺ"YOU DESTROYED THE DEATH STAR!":S8S8100:24009. P(1,1)0:P(2,1)0:P(3,1)0:X130:S9R(X,6)1:P(S9,1)P(S9,1)1:X:8 P(2,1)P(3,1);" ROOMS WERE DAMAGED, HOWEVER,":P(2,1);" OF THEM COULD BE REPU KILLED ";S8;" IMPERIAL SOLDIERS."b8P(1,1)1ĺ"YOU DIDN'T MAKE IT OUT ALIVE.":S8S810:23208"YOU ESCAPED ";:S8S810:P(2,1)1ĺ"WITH THE PRINCESS!";:S8S8258 P(3,1)0P(3,7)ĺ:"YOU ABANDONED THE WOOKIE, YOU CAD!";:S8S8258 )9 P(4OU WANT ";N$(P):" TO SHOOT, ATTACK OR DO NOTHING":" (S,A, OR N)?";A$:C13:(A$,1)("SAN",C,1)ĴC2240,2260,22707:22307P(P,5)0ĺN$(P);" HAS NO BLASTER":22307C1:1890:22707C3:18907P:#8"LET'S SEE HOW YOU DID.":"YO180,21906oC1:2150G6pP(C1,5)1ĺN$(C1);" HAS NO BLASTER":820[6zPC1:C1:1890o6PC1:C3:18906"OK.":P(C1,1)P(C1,1):6F11:1840:P23:P(1,1)(P(P,1))22706S9022306P(1,1)P(4,1)ĺ"NO ENEMIES":2270y7"DO YT NOW.":820.5_3000:A0A$(A$,A1):2155r5f"IS THE ORDER TO SHOOT, ATTACK, OR WAIT":" (S,A, OR W)?";A$5k(A$,4)"LEIA"İ3000:A$(A$,A1):A021505m(A$,2)"TO"İ3000:A$(A$,A1):A021506nC113:(A$,1)("SAW",C1,1)ĴC12160,2820442800"4>A1P(P,2):84074HA1P(P,2)2:840Y4R3000:A0A$(A$,A1):21374W"WHO ARE YOU ORDERING, PRINCESS LEIA":" OR THE WOOKIE (P OR W)?";A$4YC1:(A$,1)"W"C2 5\P(1,1)P(C1,1)ĺ"YOU CAN'T GIVE ORDERS TO":N$(C1);" RIGH20 32750%3P(1,1)P(4,1)202083P(4,4)02030F3D1D154Y3A1P(P,3):840l3P(1,6)020703"YOU DON'T HAVE A LIGHT-SABRE!":F118503 8203D(3)021003 "YOU KNOW, IT HELPS IF YOU TURN ON YOUR LIGHT-SABRE":F118504*4,1)1910;2l"ATTACKING DARTH VADER":P14:D1P(4,2):1950J2vS901940h2"NOBODY TO ATTACK":F1ıq28202"ATTACKING AN IMPERIAL SOLDIER":P15:D1S(S9,1)2C1960,2040,21202P(P,5)019902"YOU DON'T HAVE A BLASTER!":F1185038A$,1)"W"1845171855h1:"WANT TO ATTACK WITH BLASTER, SABRE, OR":" HAND-TO-HAND (B,S, OR H)?";A$1?C13:(A$,1)("BSH",C,1)ĴC1860,1860,18901AC:18501DP(1,4C)018901N"YOU DON'T HAVE A ";W$(C1):F118501X820 2bP(1,1)P(UT."::810\0"FORTUNATLEY, HE DECIDES TO JOIN UP WITH YOU.":P(3,1)P(1,1):P(3,7)1:2720~0R1P(1,1):930:S9R(P(1,1),7)0S1S9:S(S,1)(16(1)):S(S,2)(16(1)):S0X1100::25100&F1000P1053000:A0185016A$(A$,A1):(YOU FOUND THE PRINCESS.":"SHE THANKS YOU AND FOLLOWS YOU.":P(2,1)P(1,1):2720i/P(1,1)P(3,1)1800/P(3,7)P(3,1)P(1,1):1800 0"YOU ARE GREETED BY A LARGE, EXTREMELY DANGEROUS-LOOKING WOOKIE.":(1).25Ğ:"HE CHARGES AND RIPS YOUR ARMS O"DO YOU WANT TO MOVE NORTH, EAST, WEST,":" OR SOUTH (N,E,W,S)?";A$k.C14:(A$,1)("NEWS",C,1)1710x.C:1690.R1R(P(1,1),C):R10ĺ"YOU CAN'T GO THAT WAY.":820."OK".C311:P(C,1)P(1,1)P(C,1)R1.CO/P(1,1)P(2,1)ĺ"M":" SWING ON THE ROPE ACROSS THE CHASM":" TAKE-OFF IN THE MILLENIUM FALCON":" SABOTAGE THE EQUIPMENT IN THE ROOM"-" CHARGE! ALL GOOD GUYS ATTACK"-255:820-R(P(1,1),7)0P(1,1)P(4,1)1030-3000:A0A$(A$,A1):1695D. MOVE NORTH, EAST, WEST, OR SOUTH":" SABRE ON OR OFF",r" ATTACK WITH SABRE, BLASTER, OR HANDS":" ORDER PRINCESS OR WOOKIE":" GIVE TO PRINCESS OR WOOKIE":" LOOK AROUND":" FLEE (EVERYBODY RUNS AWAY)"{-|" TOSS ROPE TO CROSS THE CHASAT'S-EYE*VIEW":13:16:"OF*MAZES"M:20:6:"PRESS 'ESC' IF YOU GET LOST!"S;Z>7H23:FX36:"MAZE SIZE-FROM 3X3 TO 35X27(H,V)";H,VLH2H36V2V28850N"2F 868:k>P R(P(1,1),5)10(R(P(1,1),5)10)1ĺ"EQUIPMENT--";D$(R(P(1,1),6)1);:868:>Z P(1,1)29ĺ"CHASM TO SOUTH--";>d P(1,1)30ĺ"CHASM TO NORTH--";>n P(1,1)29P(1,1)30ĭD(2)ĺ"ROPE IS UP";:868:?x P(1,1)29P(1,1)LST.";:868:]= P24:P(1,1)(P(P,1))ĺ"P:";:P24:P(1,1)(P(P,1))ĺ" ";::N$(P);:k= :868:=( "IN ROOM--";:S9ĺS9;" SOLDIERS ";=2 R(P(1,1),8)R(P(1,1),9)ĺR(P(1,1),8);" SLD. ";R(P(1,1),9);" BLST."; >< S9R(P(1,1),8)R(P(1,1),9);"RUN ADVENTURE HELLO"< :A< 1:X((40(S$))2):X1X1P< X::S$:< "DOORS OPEN TO";:X14:R(P(1,1),X)0ĺ" ";P$(X);< ::T$"OFF":D(3)T$"ON"< "CARRYING--";:P(1,6)0ĺ"SABRE ";::T$;::" ";= P(1,4);" SLD. ";P(1,5);" Bz#?Xǵ    ӠŮʠҠçӠŠӠŠ;ӠĠ٠!Š̠ ŠŠ)Ӡ ŠŠ !Ҡ Ӡ ˠ1"ϠҠ#ӠŠΠˠǰ!̠ ŠԠ ŠŠ(ϠŠACEK1555700: ESC)(500:50208P LEFT <-KZFF1:F1F4Ud5350e RIGHT ->xFF1:F4F1F5361,5362,5363,5364R0:S1:5370R1:S0:5370R0:S1:5370R1:S0:53705500 FORWARD"ZM(R1:S0+"LEFT ARROW <- TO TURN LEFT."P"RIGHT ARROW -> TO TURN RIGHT."p"SPACE BAR TO GO FORWARD."y100 GET KEYSTROKEK(16384):K128510016368,0K1365200: <- K1495300: -> K1605400: SP2! ADD REDUNDANT BITS5X1MH:Y1MVT$IXYFX:M(I)M(I)M(I)16^BY:Xj PLAY RANDOM INITIAL DIRECTIONF((1)4)1:F5011,5012,5013,5014F1:R0:S1R0:S1:5020R1:S0:5020R0:S1:50201 M(N2)03400, DRAW SOUTH WALL5 X,YB XHZ,YVH M(N4)03500lM DRAW EAST WALLuR X,Yz X,YVZ I J MARK RAT'S POSITION XHHZ1:YVVZ1 X1,Y1 XHZ2,YVZ2 XHZ2,Y X1,YVZ H1H:V1V 5008 23:12:"MAZE COMPLETED. ":500B 3600c DISPLAY TOP VIEW OF MAZE~D CALC DISPLAY SCALEN HZ(278MH):VZ(158MV) :3 1HZ,1VZ 1HZ,MVVZ1 J1MV I2MH NM(IJFX):XIHZ1:YJVZ:S2:2400SS1:DD:2400)RRD@` M(RSFX)152000J 1000[ ".";:IWALKi MHH:MVV RANDOM PT AT SOUTH AS STARTING POINT I((1)(MH1))2 M(I1FX)0 III2FX:M(II)M(II)M(M(II)8)8 H((1)(MH1))2 )M(Q)M(M(Q))2500, MOVE SOUTHGM(Q)M(Q)M(M(Q)2)2ZSS1:QRSFXu&M(Q)M(Q)M(M(Q)8)8:2500l SCAN FOR UNUSED PT.D12100RH2300SV2200R2:S2:24004R22300>SV2200 HRHESTM(Q)M(Q)M(M(Q))-RR1:QRSFXHM(Q)M(Q)M(M(Q)4)4R2500e@ MOVE NORTHJM(Q)M(Q)M(M(Q)8)8TSS1:QRSFX^M(Q)M(Q)M(M(Q)2)2r2500 MOVE EASTM(Q)M(Q)M(M(Q)4)4RR1:QRSFXM(Q100II1:CUT(I)11LM(R(S1)FX)151200DVII1:CUT(I)2]M(R1SFX)151300pII1:CUT(I)3M(R(S1)FX)151400II1:CUT(I)4xI02000I1I((1)I1)QRSFXCUT(I)1500,1600,1700,1800 MOVE W S 2 1 8 45 W 1 8 4 2= dR(H21):S(V21):M(RSFX)15:"GENERATING MAZE.";:500 GENERATE RANDOM MAZE ALGORITHM HERE FROM ROGERS AND STRASSBERGERIWALK1NIZM(R1SFX)151M(IJJ)8:M(IFX)21J2V:M(IJFX)15:J:IR MAZE VALUES, FACING NORTHd 8=TOP WALLx 4=RIGHT WALL 2=BOTTOM WALL 1=LEFT WALL  FACE TOP RIT BOT LFT N 8 4 2 1 E 4 2 1 8),CUT(5),DX(8),YU(8),YD(8)HfJ1V1:JJJFX:M(1JJ)4:M(H1JJ)1:JxkMX279:MY157:VX(MX2):VY(MY2)40:XVXp COMP. PERSPECTIVE PTSzJ18:DX(J)X:YU(J)VY(XVYVX):YD(J)VY(X(MYVY)VX):X(X710):JJJ(V1)FXI2H:2 2150$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$F"TO THE PROGRAM AUTHORS":11)"AND CONTRIBUTORS."b (::6)"";:A$: 2"ANY OF OUR PUBLIC DOMAIN PROGRAM DISKS FROM OUR LARGE LIBRARY CAN BE COPIED ONTO YOUR BLANK DISKS SENT TO US FOR A"Y <"COPY FEE OF ONLY 75 CENTSZ ::3:16)"75 CENT":6)"PUBLIC DOMAIN PROGRAM DISKS":::12)"DISTRIBUTED BY:"::12)"ASPEN SOFTWARE"::6)"729--1/4 E. PORTLAND STREET":8)"PHOENIX, ARIZONA 85006":7)"TELEPHONE: (602) 253-0651"1 ::10)"WITH SPECIAL THANKS":8)  T$(I)" OPERATIONAL.":D(I)1:J11800:@(1).2D(I)D(I)1u:EE(50(1)):SHSH(35(1)):OO1:O1O1E0SH10ė:11:9)"ENERGY LEVEL IS ZERO.":9)"LIFE SUPPORT FAILS.":9)"CREW DEAD. FINAL LOG,":9)"STARDATE: "SD100:24:/I21:I31:FK0:ZL0:ZX0/Z19:X(Z)0:SFK0:24:1:"ENTER COMMAND: ";hI$:I$"0"1930C(I$):C1C10415D(C)0ė:T$(C)" INOPERATIVE.":I11300::330C530,580,780,1110,1160,1190,1260,1310,1380'I19:D(I)0ė:";::")":390""OPERATIONAL)"(:"0 END GAME"ZL1ZX1Ģ1:31:"WARNING!!":2:31:"COMPUTER":3:31:"TRANSFERED":4:31:"EMERGENCY":5:31:"ENERGY"ZL1Ģ5:38:"TO":6:31:"SHIELDS"ZX1Ģ6:31:"FROM":7:31:"SHIELDS"V"STARDATE - "SD100MW"LAST MANEUVER DURATION - "(SDPSD)100:PSDSDxX"ENTERPRISE IN QUADRANT - ";CY;" ";CXY" SECTOR - "EY" "EX:^10);AL$(AL)crSDSD1|I19:I" "T$(I);:27:"(";:D(I)0ğ:"INOPERATIVE 1I1400:::"";:1260? 6FKK(Q)KK0(2(1))11750O @I11800:} J460::K(Q)0FKK(Q)(O(1))111750 OE(E):SH(SH) Q"ENERGY - "E:"TORPEDOES - "PT:"SHIELDS - "SHT"KLINGONS TO DESTROY - "TK:"KLINGONS DESTROYED - "KDK(3(1))1:K(I)K(I)K:TKTKK. B3240A B(I)1:TBTB1N S3250c S(I)(3(1))1p P3260 P(I)(2(1))1  I15:X(64(1))1:KB(X)KB(X)1: TK30200 "TB152010 ,1640:1::I224:40):Z10125::"COMPUTER":O1 O3 O$(1)"KLINGON WARSHIP":O$(2)"STARBASE":O$(3)"PLANET":O$(4)"STAR":O$(5)"STARSHIP":O$(6)"KLINGON BASE STAR" I164:K((1)15)1:P((1)13)1:S(9(1))1:B(20(1))1 TK29290 I28K3230! K(I)0 A$(4)" * ":A$(5)"<*>":A$(6)")=("3 E$" " I19:D(I)1::T$(1)"WARP DRIVE":T$(2)"IMPULSE ENGINES":T$(3)"PHASERS":T$(4)"PHOTON TORPEDOES":T$(5)"DEFLECTOR SHIELDS":T$(6)"LONG RANGE SENSORS":T$(7)"SHORT RANGE SENSORS":T$(8)"ALERT":T$(9)8,8),KB(64),K(64),B(64),P(64),S(64),B1(8,8):AL$(0)"CONDITION GREEN":AL$(1)"YELLOW ALERT":AL$(2)"RED ALERT!":SD3000(200(1)):DL11045((1)200):E3000:PT3:SH500:Q28 PSDSD:TNSD A$(0)" - ":A$(1)"=+=":A$(2)">!<":A$(3)" O ":CX4:CY4&/  :: -1,-1,0,-1,1,-1,-1,0,0,0,1,0,-1,1,0,1,1,1,14,255,13,121,254,0,40,18,65,62,2,211,255,16,254,00,00,62,1,211,255,65,16,254,24,232,201,-1I19:A,B:x:Z1800::1::I111:" ***** MEGA-TREK *****"::Z150:: }KK(          ANGLE"3 O"IS THE RATIO OF THE SIDE OPPOSITE THE"W P"THE ANGLE TO THE HYPTENUSE.'"l Q"NO KIDDING!!!" R"IF ALL THIS PUFFY PHRASEOLOGY DOES'T" S"JOG YOUR MEMORY DONT DESPAIR" T"JUST BE AWARE THAT THE DISTANCE A" U"PROJECTILE WILL TRAVN 'SINE' SO"7 I"YOU MATH MAJORS IN OUR MIDST SHOULD"e J"ENJOY IT. BUT FOR THE REST OF US; HERE" K"IS A BRIEF REVIEW." L"ACCORDING TO WEBSTER, 'SINE' IS DEFINED" M"AS 'THE TRIGONMETRIC FUNCTION THAT" N"FOR AN ACUTE ANGLE IN A RIGHT TRI" 12:"***************"- D12000:D7 936? 10h ("DO YOU WANT A DESCRIPTION?(Y OR N)p 2Q$ <Q$"N"Q$"NO"200 F"THIS GAME SIMULATES THE SHOOTING OF A" G"CANNON AT A SHIP. THE PROGRAM USES THE" H"TRANSCENDENTAL FUNCTIO *** ELEVATE ***)936:7D12:"***************"_12:"* *"z 12:"* *" 12:"* *" 12:"* ELEVATE *" 12:"* *" 12:"* *" 12:"* *       ! !30:0,39Y:Y)$12:Y3139:0,39Y:Yd.13:X23:Y9294:Y,Y5X:X1,Y:Y,Y5X3:XX1:Y89:Y2933:34,38Y:Y:34,28:38,28B8:X1721:16,35X:XL4:10,280V9,291`8,302j8,303tY49:7,31Y:Y ~Y1011X223:X:" *******";:33:"*******":;912|24:5:".......PRESS ";::"RETURN";::" TO BEGIN.......";777:104016384,128:(16384)1411020777:16368,0:16304,0:16300,0:16301,0:16298,0::7 Y0ECT!"8CAUGHT15ĺ"STOP SNOOPING AND PLAY THE GAME!">V CHECK FOR PADDLESy(16287)127(16286)127ı"GAME PADDLES ARE NECESSARY TO PLAY THIS GAME. PLUG THEM IN AND THEN RUN AGAIN."5:" RUN":4198::::63999:"PRETTY AWFUL!":HCAUGHT3CAUGHT7ĺ"NOT TOO GOOD..."cRCAUGHT6CAUGHT10ĺ"ABOUT AVERAGE"\CAUGHT9CAUGHT13ĺ"ABOVE AVERAGE!"fCAUGHT13CAUGHT14ĺ"EXCELLENT!!"pCAUGHT15SKL5ĺ"PERFECT!!!"zCAUGHT15SKL5ĺ"ABSOLUTELY PERF800:: EVALUATE'"PLAY AGAIN? ";A$-QA$(A$,1):A$"Y"A$"N"750b A$"N"Ĭ30:"THANKS FOR PLAYING!":  EVALUATE SCORE*"YOUR SCORE OF ";::" "CAUGHT" ";::" IS ";4CAUGHT0ĺ"RIDICULOUS?!?">(CAUGHT)CAUGHT4SOUND (CAUGHTCAUGHT1: GOT ITt110:1:37,38X:777:SO15:S(16336)(16336)::12:37,38X:120DROPDROP1:30016300,0: GO TO PAGE1S110:198:16300,0:16301,0::2216368,0: CLR KEYBOARD0:250:: NINE*: DROP APPLES STEP SKLDDT115:XX(T):YY(T)TN4:Y,Y1X~XS(16336)(16336): CLICK SPEAKERbY1Y138SKL:C1X,Y1):C2X,Y11)l1:Y1,Y11X:110:777:C1:X,Y1:C2:X,Y11:120v:A1XA2X650680:E&200:210:220:270:280:: TWOH200:210:220:250:: THREEd260:210:250:: FOUR200:260:210:290:220:: FIVE200:230:220:290:210:: SIX200:250:: SEVEN&200:210:220:230:250:: EIGHT0200:210:260,550,560:NUM0İ4701N10(DROP10)(DROP9)BN24:190:6ON1440bN24:480:450pN24:470NUMDROP:NUMNUM10(NUM9):N32:NUM480,490,500,510,520,530,540,550,560:NUM0İ470200:220:230:250:: ZERO240::ON,6 , PRINT SCORE7 6CAUGHT10N10: NO 1ST DIGITU @CAUGHT9N11:1ST DIGITx JN1:190:3:ERASE LAST NUMBER TN1360 ^N1:480:370 hN1:470 r SECOND DIGIT |NUMCAUGHT:NUM9NUMNUM10N9:NUM480,490,500,510,520,530,54UMBER N,N641:: TOP LINE; N,N644:: MID LINEY N,N647:: BOTTOM LINEt 41,47N:: LEFT SIDE 41,47N3:: MIDDLE 41,47N6:: RIGHT SIDE 41,44N:: 4,5,9 45,46N:: 2 41,44N6:: 2 "45,46N6:: 512:A,A339:37,38A:37,38A3:T LINE 100 DRAWS BASKET, LINE 200 ERASES ITe START GAMEv 16302,0:0 Y4047:0,39Y: 310: PRINT SCORE PAUSE1(50(1))50:110:777:120::570 0:M4147:N,N14M:::ERASE OLD N5)::0,0)750" (920:970:60, 21210; <34,20:22 F"ENTER SKILL LEVEL 1-3 (EASY-HARD):";SKL$:SKL(SKL$):SKL1SKL370 PSKLSKL(SKL2)2(SKL3) Z:140 d16300,0::::: nA((0)7):15:A,A339:37,38A:37,38A3:# xL(X$):I1L:511I,((X$,I,1))128::72,0:144 X$"340:CE 39 03 CE 3C 03 CA D0 EE A5 68 85 1A A4 67 84 19 A0 01 B1 19 F0 10 18 65 08 91 19 AA 88 B1 19 85 19 86 1A C8 D0 EC 4C 66 D5 N 300G":2 SIR ISAAC'S APPLE (AS) 1270 X(15),Y(1(P3072:6,(P256):7,203(P9999)X$"300:A5 06 A8 38 E9 09 B0 03 4C 00 00 85 08 18 65 B0 C5 74 B0 F4 A6 B0 8E 39 03 8D 3C 03 A6 07 86 67 A6 AF 86 6B 86 6D 84 68 85 B0 85 6A 85 6C 85 6E 38 E5 06 AA E8 A0 00 B9 00 00 99 00 00 C8 D0 F7 N D823G"6           Y(M(I))6IMI%I18BS(M(I))S(M(I))Y(M(I))IIRI1]L18jI18LS(M(I))S(M(I1))1090$HM(I).M(I)M(I1)8M(I1)HBILLVTS(M(8))`I18jBS(M(I))S(M(I1))tB01190Y(M(I))S17880) Y(M(I))S37900? *Y(M(I))S57920U 4Y(M(I))77S940k >Y(M(I))S92960z HY(M(I))7 R970 \Y(M(I))1 f970 pY(M(I))2 z970 Y(M(I))3 970 Y(M(I))4 970 Y(M(I))5 970  Q(J),P(J) P(J)16702 P(J)100000690N " YOU CANT DO THAT!"W 630^ Jd { "1 2 3 4 5 6 7 8" 255:"*****START*****":50 I1N MI M(I)M Y(M(I))(100(1)1) Y(M(I))10860 S(R(I).5) N" V$(5)"JOLLY"( V$(6)"HORSE"B &V$(7)"JELLY DO NOT"X 0V$(8)"MIDNIGHT"c :N18 DV$(N),N" "RD(N);":1" NN X"----------------------------------------" b"PLACE YOUR BETS...HORSE # THEN AMOUNT" lJ1C vW$(J);  rA | 9363 "HORSE","NUMBER"" ODDS"9 N I18:S(I)0:IW R0b A18y D(A)(10(1)1) A A18 RRD(A) A 50 V$(1)"JOE MAW" V$(2)"L.B.J." V$(3)"MR.WASHBURN" V$(4)"MISS KARE YOU MAY BET ANY + AMOUNT UNDER $100000 ON ONE HORSE." ""DURING THE RACE, A HORSE WILL BE SHOWN BY ITS NUMBER. THE HORSES RACE DOWN THE PAPER!" 6 @:"HOW MANY WANT TO BET "; JC T:"WHEN A ? APPEARS, TYPE NAME" ^A1C hW$(A)  936!d15);"HORSERACE"+x::[|"----------------------------------------"eS(8)"WELCOME TO SANTA ANITA":"DO YOU WANT INSTRUCTIONS ";X$X$"NO"320 9 "UP TO 10 MAY PLAY. A TABLE OF ODDS WILL BE PRINTED.   "HARVEST" TIME 4 DON'T YA KNOW!) P l -PUBLIC DOMAIN-  OCTOBER, 1980   ** BY JIM GANZ **  ) 8 REQ: JOYSTICK (OR T GAME PADDLES) p AND APPLESOFT   OBJECT:USE PDL(0)  TO CATCH AS MANY  FALLING APPLES  AS YOU CAN (IT'S D, HOWEVER,&rIJWHEN THE "YOUNGSTERS"<|IJBEAT YOUR SCORE!BIJ]IJROUTINE TO POKE MACH.tIJLANG. BY S.H. LAM  SIR ISAAC'S APPLE  --- ------- -----  A LO-RES GAME FOR  LITTLE APPLE FOLK L -APPLE INDEPTH:,IJALL ABOUT APPLESOFT."2IJHIJAUTHOR: JIM GANZ_IJ 82 SPRING LANEv"IJ WEST HARTFORD,,IJ CONN. 061076IJ@IJTHIS PROGRAM IS AJIJNICE WAY TO INTRODUCETIJYOUNGSTERS TO THE^IJAPPLE. YOU MAY BE hIJEMBARRASSEINES 0-3 OF&òTHIS PROGRAM MUST NOTAòBE TAMPERED WITH;THEY[òRELOCATE THE PROGRAMvòABOVE PAGE 2 AND THENòCOMMIT SUICIDE ("DEL"òTHEMSELVES).THE ROU-òTINE WAS WRITTEN BYòWES HUNTRESS AND ISòFOUND ON PAGE 31 OFò"CAL 00 8D 00 03 68 CD 00 ":1260:144+ 30EPò********************\Zò PAGE SWITCHINGo_ò ROUTINEdò BY CHARLIE KELLNERnòFULLY DOCUMENTED INxòVOLUME 5 OF THEòAPPLE SOFTWARE BANK.ò********************ò òWARNING: L?A$A$"ND823G":I1(A$):511I,((A$,I,1))128::72,0:A$"0300:00 AD A9 80 2C 63 C0 F0 FB AD 54 C0 A0 00 B9 00 04 99 00 08 B9 00 05 99 00 09 B9 00 06 ":1260:144#A$"031D:99 00 0A B9 00 07 99 00 0B C8 D0 E5 AD 55 C0 60 04 C6 01 D0 02 A92:8,30Y:Y#9,2913:11,2714114,2415Z8:X14:Y11152:Y,Y1X:XX1:Yh13,1519v15,1622T1:TX((1)2710):Y((1)14):X,Y)4X,Y1)41220Y,Y1X:X(T)X:Y(T)Y:TT1:T161220INITIALIZE1P3\A2P2fA3P1,pA4P19zA6P2_I1131:8:I:W$;:Z10110::(W$"-"KK(PX,PY)EA)B1(PX,PY)0950A6W$"-"EN((1)500)((1)800):EAEN950A6W$"^"950EEE14:8:32EE:(A$(A),1);:SS1EE E9E%E100E9100P'"ENERGY AVAILABLE: ";E9100:"ENERGY AIMED? ";EA_(EA0330*EEA100ĺ"INSUFFICIENT ENERGY.":Z11000::3304EEEA>B1(PX,PY)0ė:8:8:A$(5);:P10:900HAB1(PX,PY)::8:8:A$(5);:32:A$(A)RAHE ENTERPRISE DOCKS AT THE STARBASE.","STARDATE: "SD100:NYNYDY:NXNXDX:I12600::E2800:SH700:PT3:I19:D(I)1::SDSD9:700 W$"-"::605::"PHASER COURSE (X,Y)? ";PY,PXPY1PY8PY(PY)PX1PX8PX(PX)330PXEXPYEY330ES WITH A HOSTILE KLINGON BASE STAR. THE ENTERPRISE AND THE BASE STAR ARE TOTALLY DESTOYED.","FINAL LOG, STARDATE: "SD100:23:A4ė:"THE ENTERPRISE COLLIDES WITH THE STAR AND IS TOTALLY CONSUMED. FINAL LOG,","STARDATE: "SD100:23::"TEACHED AND CASUALTIES ARE HIGH. MAJOR REPAIRS REQUIRED.","STARDATE: "SD100:23:A3ė:"THE ENTERPRISE COLLIDES WITH THE PLANET.THE CREW IS DEAD AND THE SHIP IS TOTALLYDESTROYED. FINAL LOG, STARDATE: "SD100:23:A6ė:"THE ENTERPRISE COLLIDNY):A2SI770:A1ĺ"THE ENTERPRISE AND A KLINGON WARSHIP COLLIDE IN SPACE AND BOTH ARE DESTROYED.FINAL LOG, STARDATE: "SD100:RA2S1ė:"THE ENTERPRISE COLLIDES WITH THE STARBASE DURING THE DOCKING MANEUVER. BOTH HULLS ARE BR1S(S)330$:I1D:DY,DX:1D5330ZNXEX:NYEY:I1S:NXNXDX:NYNYDYNX8NY8NX1NY1ĺ"USE WARP DRIVE TO LEAVE QUADRANT.":320B1(NX,NY)0720B1(EX,EY)0:B1(NX,NY)5EXNX:EYNY:EES25:330AB1(NX,?]D(7)0ė:"SHORT RANGE SENSORS INOPERATIVE.":J1700::ebI18:J18:AB1(I,J):A0ĺ"";lI2:(J1)51:A$(A);:::I1372:1:I:"-=";:17:I:"-=";::::"1 2 3":"4 * 6":"7 8 9 DIRECTION, SPEED? ";D,S:D9D1D5D(D)ST93*S98T9T93(+S97T9T93:-S96T9T93L/S95T9T93^1S94T9T93p3S93T9T935S92T9T937SDSD(((((XCX))2((YCY))2))T9):CXX:CYY:EE(WFB1):XX1:NQ(X8)Y:QNQ:1640:1260DN605:640F10330e!WFWF25:B(Q8):Y1B:X1QB8:B1(XX1)(YY1):WFB1Eĺ"INSUFFICIENT ENERGY.":320#(1)(WF25).006ė:J13:11:13:"ASTEROID DAMAGE":I1600:::I1300:::1820:D(1)0330%T91:S9WF25'S910T9T93)S99T9SH010EE100SHSHE2:EE2.3:ZL1:490YSH0E100SHSH50:EE60:ZL1:490nKDTKBD51930~SDDL1930:::"QUADRANT (X,Y)? ";Y,X:X8X1X(X)Y8Y1Y(Y)(XCXYCY)330:"WARP FACTOR (1-10)? ";WF:WF1WE010SHSH100EESH2:SHSH2.3:ZX1:480[E0SH100EE50:SHSH60:ZX1:480SH0E10ė:11:9)"SHIELDS COLLAPSE.":9)"VELOCITY IS IN EXCESS":9)"OF HULL STRESS POINT.":9)"ENTERPRISE DESTROYED,":9)"STARDATE: "SD100:24:-LE: 45.3"6"OK !! NOW IF YOUR READY TO PLAY"J"PUSH RETURN "RQ$b936:10:"THE MAXIMUM RANGE YOU CAN""SHOOT IS 46500 YARDS.""DISTANCE TO THE SHIP IS:"R430003000(1)A(R) "IS APPROXIMATELY ""YOUR JOB IS TO GUESS THE PROPER"M"ELEVATION TO HIT THE SHIP. A HIT"q"WITHIN 100 YARDS WILL DO IT.""FOR MORE RANGE INCREASE ELEVATION.""IF YOU OVERSHOOT - LOWER THE ELEVATION.""ENTRIES ARE IN DEGREES." ".....EXAMP d"AT ANY RATE HERES HOW THE GAME GOES..."2 gW i"YOU ARE ON DUTY WITH A BOSTON"} n"COSTAL DEFENSE BATTERY AND YOU" s"ARE TRYING TO SINK AN APPROACHING SHIP." x"AN ARTILLERY SPOTTER GIVES YOU THE" }"APPROXIMATE DISTANCE TO THE SHIP"%EL CAN BE PREDICTED"C V"IF THE UPWARD ANGLE AT WHICH IT IS SHOT"q W"IS KOWN. HERE, OF COURSE, WE DO IGNORE" X"A FEW THINGS SUCH AS VELOCITY,WIND" Y"RESISTANCE, THE WEIGHT OF THE ROUND ETC" Z"PUSH RETURN TO CONTINUE" ]Q$ _936:3,G NUCLEAR CHAIN REACTION CONSUMES MOST OF THE SECTOR ANDTHE ENTERPRISE IS TOTALLY DESTROYED.","STARDATE: "SD100:23:#V:PT0ĺ"ALL PHOTON TORPEDOES EXPENDED.":320$[PTPT1:W$"^":605::"1 2 3":"4 * 6":"7 8 9 TORPEDO DIRECTION? ";TD:TD9TRISE'S CAPTAIN IS ARRESTED AND COURT-MARTIALED.","STARDATE: "SD100:23:"8A6ė:"KLINGON BASE STAR DESTROYED.":B1(PX,PY)0:BDBD1:320"BB1(PX,PY)0ė:"THE SHOT MISSED.":320x#L:"THE ENTERPRISE ACHIEVES A DIRECT HIT ON THE STAR. THE RESULTINT A STARBASE!":"BOY, CAPTAIN, THAT WAS";:Z1800::" B";:Z1800::" A";:Z1800::" D";:Z1800::" !":Z1800::2080!.A3ī1080I"/:"THE PLANET IS DESTROYED BY A DIRECT HIT.BILLIONS OF INNOCENT FEDERATION CITIZENSARE KILLED. THE ENTERP1:1:"KLINGON WARSHIP DESTROYED.":K(Q)K(Q)1:KDKD1:B1(PX,PY)0:K(Q)0āI11900::1750f 320 :W$"-"A$"PHASER":1045 A$"TORPEDO" A01060 1:1:"THE "A$" MISSED.":K(Q)0āI11900::1750 320!$A2ė:"YOU FIRED ASTAR APPEARS TO BE INVULNERABLETO PHOTON TORPEDO ATTACK.":Z12400::320hW$"-"KK(PX,PY)EA1000{8:32:" ";A11030W$"-"EAKK(PX,PY)Ģ1:1:"THE KLINGON SHIELDS HOLD.":KK(PX,PY)KK(PX,PY)EA:I11900::1750] KK(PX,PY)0::" ";::9EE:33:" ";:8EE:33:(A$(A),2,1);:8:SS1EE:" ";:Z(A$(A),1);:EEy4:33:" ";:8:20:19);I1131:8:I:" ";:J110::W$"-"A6EAENĢ1:1:"THE BASE STAR SHIELDS HOLD.":320JW$"^"A6Ģ1:1:"THE BASE T1$(I)" ":I"6400:,*********************6* PLAY OF THE HAND *DJ********************_^Y50:M50:C0:S90:G0mhM02050}rY541680|M5427202050"YOUR PLAY ";20:C$(X):C$"G"1720nx1420 "I HAVE ";S1;" POINTS - YOU HAVE ";S2;" POINTS"1550&260,G"I WIN ";S1;" TO ";S2MW1520]y"YOU WIN ";S2;" TO "S1"WANT ANOTHER GAME (Y/N) ";UP$UP$"Y"200I1611450X11180,650,1390K14LV(B9,K) J14W(K,J)M(L,J)%J,K;"MY CARDS ARE":FK14SLW(K,1)^C$(L)e KsW(5,4)T9{C0(47002S1S1P<S11211450F:P;" POINTS":dX1650,870Q16T1$(Q)C1$(Q):Q6400"HOW MANY POINTS ";P9DPP9)$D01090P."NOT WITH THAT HAND! - TRY AGAIN"Y8990fBS2S2P9xLS21211490VD01170`S1S1Djt"MUGGINS FOR ";D;" POINTS"~S112 *P;" POINTS"4S1S1P>S11211450H1390RX13\990!fK1,pI16:zII3950HII4950SJ14eW(K,J)Y(I,J)lJvKK1}IW(5,4)T9C04700384:"UP CARD IS ";UP$:380155020N"YOU SCORE FIRST "XX11b870 l"I SCORE FIRST "vX1211809"THE CRIB CARDS ARE"?JI14ZC$(C(I,1))aIlI14wJ14W(I,J)C(I,J)J,IC1W(5,4)T94700 X1800,850I3I4I40I47(I4)I4460"NOW REALLY "3606400- CRIB%J148C(1,J)M(I1,J)KC(2,J)M(I2,J)^C(3,J)Y(I3,J)qC(4,J)Y(I4,J)xJ- GENERATE THE UPCARD&44700- PLAY OF THE HAND:1590DM060:5600 - SHUFFLE AND DEAL 5420:5860,"- FIND THE BEST 4 CARDS - DISCARD THE OTHER 2\,:"I'M LOOKING AT MY HAND AND THINKING..."f63670v@- DISCARDSJI1V(B9,5):I2V(B9,6)^h"YOUR DISCARDS ";I3,I4rI30I37(I3)I3& :::"C R I B B A G E" :"CONTRIBUTED BY S.GREENFARB" 6170:200) 16368,0F X(1):(16384)12830h (16368,0:X(16384):X42Ās -(X);y 2 : S10:S20 - SHUFFLE THEN CUT FOR DEAL - LOW CARD DEALS 542                )11310(#AC(AC$)1((ALAC1:AC3O3:330@(21340:330F(<e(FEQE(18):EEEQ:SHSHEQ(PI13:12:14:"RED ALERT!":Z101180::12:14:" ":J1180::(ZO7:f)d::"1 - SCAN FOR KLINGON WARSHIPS.":"2 - SCAN FOR STARBA OF QUADRANT ";('Q9Q10:Q21:1280J'Q2(Q8):Q1Q(Q28):Q2Q21a'Q18(Q18)Q18p' Q64Q28}'Q1","Q2'"PRESS ANY KEY. ";:A$:330(:"1 - GREEN",,,"2 - YELLOW",,,"3 - RED",,,"ENTER NEW ALERT COMMAND. ";:AC$:(AC$)3(AC$ LOCATED IN QUADRANT "CY","CX" - SECTOR "EY","EX".":@&1301k&CC1CC8I1I8ĺ"UN-EXPLORED ";:&WL((CC1)8)I:WKK(WL):WBB(WL):WPP(WL):WSS(WL)&I","CC" "WK" "WB" "WP" "WS" ";:&:605::D(7).000001320'"SHORT RANGE SCAN";ET6%EET50ESH50ĺ"INSUFFICIENT ENERGY.":320O%SHSHET:EEET:330%:5:"K B P S";:18:"K B P S";:31:"K B P S"::CCCX1CX1:ICY1CY1:1230::::6&:"LONG RANGE SENSOR SCAN. STARDATE: "SD100::"THE ENTERPRISE IS CURRENTLYD1TD(TD)TD5PTPT1:320[$`:PXEX:PYEY:I1TD:DY,DX::I12:PXPXDX:PYPYDY$jPX1PY1PX8PY8ĺ"THE TORPEDO MISSED.":320$tB1(PX,PY)0830$y$~830$Z8E50:Z80Z80%:"ENERGY AVAILABLE: "Z8:"ENERGY TRANSFERED?  PPR9  J1C J(J10)J(CJ1) J K1I1 LK1I6 J(K10)J(L10)3580D XJ(K10)X J(K10)J(L10)f J(L10)Xo L,K| K1I1 $J(K10)J(K11)13650 .K 8R9I B L********************* OR 31 OR 2,3,4 OF A KIND AND RUNS ********************** P0 C134805 S915S931PP2N FT2:(C2)2FTC2] ICFT1t J(I)J(I1)3390 PP2(CI1)4 I> RUNSR C23480\ R90p I3Cz 3490 I(M520)I9 J(C)M(I9,4) S9S9M(I9,2), "MY CARD IS THE ";C$(M(I9,1));" S=";S9;" P=";P94 F2A& S1S1P9S0 S11211450d: S9313160uD F0:C0:S90N 1650X C$"O"2050b 1650l **********************v * CHECK FOR 1513010@ Q0J QQ1T I9V(B9,Q)^ - DON'T PLAY A 5 FIRST"h M(I9,2)529802r I(M520)I9C| J(C)M(I9,4)L P90[ S9M(I9,2)e 3080s Q42890 I9V(B9,1) 2930 J91K9 I9I(J930) I(I9)P93050 J9 I"GO" G1 1650 F02820  F12790& "I GET 1 POINT FOR LAST CARD"2 S1S11C S11212820M 1450r "YOU GET 1 POINT FOR LAST CARD"~ S2S21 S21211490   CC1" M5M51, C130106 M5  "I GET 1 POINT FOR LAST CARD"  C0:S90 S1S11# S11211450- 1650= Y542680C( n2 "I'LL GIVE YOU 1 POINT FOR LAST CARD"t< F S2S21P S21211490Z C0:S90:G0d C$""n 2050x G11650  M502350 J91M5 QI(20J9)2450$ J9. H9M(Q,2)312450$8 K9K915B S9H9M(Q,2)EL J(C)M(Q,4)O` 3180^j PP9P9Pit I(Q)Px~ I(K930)Q Q62270 CC9 S9H9 K902840 C$"O"2590 G12600HS2S21RS21211490\F0:C0:S90f1650#p"I GET 1 POINT FOR LAST CARD")z5S1S11GS11211450XF0:C0:S90b1650pK90:P90yC9CCC1H9S9Q0QQ1I(Q)0QI12450QI22450RDED THAT CARD - TRY AGAIN ";1690"ALREADY PLAYED - TRY AGAIN ";1690M"THAT TOTALS MORE THAN 31 - TRY AGAIN ";W1690gM542220v Y542720C$"O"1650 *F221604"YOU GET 1 POINT FOR LAST CARD">Y51:I(10Y5)C6DCC1NJ(C)Y(C6,4)XT1$(C6)" PLAYED "&b3180Zv"YOU PLAYED THE ";C$(Y(C6,1));" S=";S9;" P=";PbF1nS2S2Px6400S21211490S9312050F0:C0:S90:G02050"YOU DISCA20::C$(X):C$"O"20501740"":C6X48C61C6617608"INVALID PLAY - TRY AGAIN ";B1690RC6I31990bC6I41990qY501820}J1Y5I(10J)C62010JS9Y(C6,2)312030&S9S9Y(C6,2)0Y5I;") ";C$(Y(I,1))/T1$(I)(I)" = "C$(Y(I,1))0C1$(I)C$(Y(I,1))0I 0F0 "A","2","3","4","5","6","7","8"a0 "9","10","J","Q","K"011:5:"I AM SHUFFLING..."0D(52,4),I(52),W(5,4),M(6,4),Y(6,4),C(4,4),V(15,7),J(52),C$(52),T1$( **.**********.M05910/"YOU ARE DEALING " / 5920"/"I AM DEALING ",/ M1M2/4H/>"YOUR CARDS ARE"N/Hh/f COMPUTER'S HAND 1-6/p PLAYER'S HAND 7-12/zI16:J14/M(I,J)D(I,J)/Y(I,J)D(I6,J)/J/"(";-JI1-D"YOUR CARD IS THE ";C$(D(I,1)).l" MY CARD IS THE ";C$(D(J,1))1.vD(I,4)D(J,4)5820I.D(J,4)D(I,4)5790[."CUT AGAIN "e.5630|. - COMPUTER DEALS.M0.. - PLAYER DEALS.M1..**********.** DEALD(I,3)((J1)13)1,D(I,4)J13((J1)13)!-D(I,2)10:D(I,4)10D(I,2)D(I,4)(-I.-F-******************^-** CUT FOR DEAL **v-******************-"HIT ANY KEY TO CUT FOR DEAL":20:-X(X(16384))-I(50(1)2)P4:+PP3:+J(1)1J(2)15370 ,J(3)1J(4)15370,+,"********************E,,* SHUFFLE THE DECK *_,6********************k,^I152~,hJ(52(1))1,rXZ(J):Z(J)Z(I):Z(I)X,|I,I152,JZ(I),D(I,1)J,00*dJ(2)1J(3)15380*nJ(1)1J(4)15370+xJ(1)1J(4)15340"+S453300+S35320H+J(1)0J(2)05310`+J(2)0J(3)05310x+J(3)0J(4)05310+PP12:+PP9:+PP8:+PP5:+S35360+PP6:+P SORT HAND INTO ASCENDING ORDER)I14*JI15*W(I,4)W(J,4)5140'*XW(I,4)9*W(I,4)W(J,4)F* W(J,4)XO*J,Ie*- CHECK FOR RUNSt*(S0:I14*2J(I)W(I1,4)W(I,4)*<J(I)1SS1*FI*PS25400*ZJ(2)1J(3)154VS15PP2)`- CHECK FOR 2/3 CARD 15 SUMS AND PAIRS)jI14)tJI157)~W(I,2)W(J,2)15PP2U)SW(I,2)W(J,2)15PP2n)W(I,4)W(J,4)PP2w)J,I)- CHECK FOR 4 CARD SUMS OF 15)I15)SW(I,2)15PP2)I)-'W(I,3)W(I1,3)4930'I(- CRIB SCORES ONLY FOR 5 CARD FLUSH$(C04910.(PP4G(W(4,3)W(5,3)4930Q(PP1[($4930t(.W(4,3)W(5,3)4930~(8PP5(B- CHK FOR 5 CARD SUM OF 15(LSW(1,2)W(2,2)W(3,2)W(4,2)W(5,2)(THE 5 CARD HAND&f*********************2'p- CHECK FOR A JACK OF SAME SUIT AS UP-CARD (EXCEPT CRIB):'zP0H'C14810S'I14h'W(I,4)114800'W(I,3)W(5,3)4800'PP1'4810'I'- CHECK FOR 4 OR 5 CARD FLUSH'I13$(D(13,1))%I14%W(5,I)D(13,I)%I&T9W(5,4)&W(5,4)114680*&M04650B&"2 POINTS FOR ME "N& S1S12`&S11211490f& &*"2 POINTS FOR YOU "&4S2S22&>S21211490&H&R*********************&\SCORE I)$I$K0$I1J$&J(I)P94420%0KK1%:B9I(I)%DI%%NK14450-%X:3%bM%l********************g%v* GENERATE UP CARD *%********************%%384:"THE UP CARD IS THE ";C$(D(13,1)):380%%UP$CIF THIS POINT REACHED#rB9(J(1))1#|B9I(B9)$>$- BEST HAND WILL BE WHICHEVER HAS MOST OF CARD "C9"G$P90S$I115^$J(I)0e$Ip$IIJ{$K14$LV(I(I),K)$M(L,4)C94340$J(I)J(I)1$K$J(I)P9P9J(NGLE BEST HAND. SEARCH FOR KEY CARDS#- CHECK FOR 5'S#C95:4240'#- CHECK FOR 8'S6#C98:4240K#- CHECK FOR 7'SZ#C97:4240q#- CHECK FOR JACKS#"C911:4240#@- CHECK FOR ACES#JC91:4240#h- RANDOMLY CHOOSE A BEST HAND UATE THE HAND!C0!4700! V(Z9,7)P"PP9P9P"Z98"(- FIND ALL HANDS WITH MAX SCORE (P9)@"2J0L"<I115a"FV(I,7)P93940k"PJJ1v"ZI(J)I}"dI"nJ13990"x- THIS IS SINGLE BEST HAND"B9I(1)""- NO SI VFIND BEST 4 CARD HAND!`********************* !jP90!tZ9115%!~I1V(Z9,1)4!I2V(Z9,2)C!I3V(Z9,3)R!I4V(Z9,4)]!J14p!W(1,J)M(I1,J)!W(2,J)M(I2,J)!W(3,J)M(I3,J)!W(4,J)M(I4,J)!W(5,J)25!J!- EVALFT TRAPS FOR THE"n/h"UNWARY, SO GO CAREFULLY. ALSO, THINGS MAY NOT ALWAYS BE AS THEY SEEM."/r:::"GO CAREFULLY MY FRIEND, AND GOOD LUCK.":/|::"YOU'RE GOING TO NEED IT, HEH,HEH,HEH"// **********THE END*********BD ALL HIS WORLDLY GOODS IN THE".T"HOUSE. HE ALSO HID A HOARD OF TREASURE (VALUED AT $4,000,000 !). TO FIND THIS TREASURE YOU MUST FIND VARIOUS CLUES AND, MORE IMPORTANTLY, THEPLACE TO PUT THEM..."/^:"BE WARNED";::", HE ALSO LEYES"380d 11 FM(I)EZ9;"PLACE HORSE NO.";F;" AT "RD(F);":1"R Z9Z91Y(Id2J1Cy<Q(J)M(8)1370FNQ(J)KPW$(J);" WINS $"(RD(N))P(J)ZJ\"DO YOU WANT TO BET ON THE NEXT RACE? "^"YES OR NO ";O$`O$" ~A1B&S(M(I))271240-A8M(I);?IMA128TSZAw255:"*****FINISH*****"}"---------------------------------------"50:T28720255:"THE RACE RESULTS ARE:"Z91I8402J363502;20);T1$(I):63602T1$(I);3I3380B3" I HAVE ";S1;"- YOU HAVE ";S2;" "H3x3CP(37)1:37,0:T3$:TS0:BS5:6430:62403TS5:BS23:6430:37,CP:T3$:332,0:33,403<34,TS:35,BS3FA" OF DIAMONDS"1>C$(I26)C$" OF HEARTS"2?C$(I39)C$" OF SPADES"2@I02BI152:Z(I)I:I62L<2VD2`J0s2j" YOUR CARDS ARE "}2t3842~I162II3II463602JJ12J263302J163502636),C1$(6),Z(52) 1T3$" "$1I1:K15:LK1631"M0:J16E1$JKJL6185X1&MM1:V(I,M)J_1)J~1.V(I,5)K:V(I,6)L:V(I,7)018II1:L,K1:I1131;C$1<C$(I)C$" OF CLUBS"1=C$(I13)C$ND "BD" OUT OF 5 KLINGON BASE STARS."Y5:"MISSION DURATION: "(SDTN)100" STARDATES."5S(BD4KD)100:S.48S(((S100)((SDTN)100))37)5:"RATING: "S:5S100ĺ"THE FEDERATION WILL FALL TO THE KLINGON EMPIRE.":23:#6"THE ENTERPRIRPRISE AND CREW WERE DESTROYED BY A HOSTILE KLINGON WARSHIP.","STARDATE: "SD100:23:4:4:"ENTERPRISE...":"STARFLEET CALLING.":"COMMODORE FITZPATRICK SPEAKING,":::%5"I HAVE OBSERVED YOUR RECORD OF","DESTROYING "KD" OUT OF "TK" WARSHIPS","A1:D(I)D:"DAMAGE TO "T$(I):DC183b:DC0WD101850>3g\3l"PRESS ANY KEY. ";:A$:3vEE14:8:32EE:"<";:SS1EE:" ";::9EE:33:" ";:8EE:33:"*";:8:SS1EE:" ";::">":3w4:33:" ";:8:20:19);:K11200:W4{:"THE ENTEDED.":ZL0ĺ"COMPUTER ACTIVATES EMERGENCY":"ENERGY TRANSFER TO SHIELDS."U21830[2|2&WD0:I1O9:D(I)0WDWD120:WD619302:CRTCRT1:CRT719152?DC0:I19:(4(1))218902DI5I818902ND(I)01890!3XD(9(1))1:"THE ENTERPRISE'S SHIELDS HOLD.":SHSHX:3201SHXZL0ė:"SHIELDS CRITICAL.":"COMPUTER ACTIVATES EMERGENCY":"ENERGY TRANSFER TO SHIELDS.":SHSHX:Z11700::3201CRT0:APXSH:AP20019101SHSHSH5:1813:330K2:"SHIELDS OVERLOAX2(8(1))1:Y2(8(1))1:B1(X2,Y2)01740F0B1(X2,Y2)6::Y0I28I3832002040::FKFK1:8:8:A$(1);:32:A$(5)08:11:"*";:I1130:Z10120::8:I:" *";::8:31:" ";01XKK(P1,P2)3:KK(P1,P2)KK(P1,P2)X:SHXZL0Ģ1:0/B1(BX,BY)2:$/P(Q)017102/I1P(Q)g/PX(8(1))1:PY(8(1))1:B1(PX,PY)01700y/B1(PX,PY)3:/S(Q)01730/I1S(Q)/SX(8(1))1:SY(8(1))1:B1(SX,SY)01720/B1(SX,SY)4:/KB(Q)0ı/I1KB(Q)200:B1(I,J)0:::EX4:EY4:B1(4,4)5:K(Q)01670>.mI1K(Q)s.rKX(8(1))1:KY(8(1))1:B1(KX,KY)01650.wB1(KX,KY)1:KK(KX,KY)(500(1))(750(1))2.|.B(Q)01690.I1B(Q)/BX(8(1))1:BY(8(1))1:B1(BX,BY)0168IS A "O$(B1(I,J))".":B1(I,J)1ĺ"READING "(KK(I,J)1)" UNITS OF ENERGY.":Z1500::1620-OB1(I,J)5ĺ"READING "E" UNITS OF ENERGY.":Z1500:-TZ12600::I2:(J1)51:A$(B1(I,J));:K1922:K:1:40);::::13010.hI18:J18:KK(I,J)(X8)Y",":"QUADRANT "Y","X1{,,"KLINGONS - "K(NQ):"STARBASES - "B(NQ):"PLANETS - "P(NQ):"STARS - "S(NQ)::1301,6:605:D(7)0330,;I18:J18:B1(I,J)0Ă::1301,@I2:(J1)51::A$(B1(I,J));:[-J19:1:"OBJECT AT "J","I" Q2Q21:I8(I8)Q183+Q18Q28Q11Q21ıI+"("Q1","Q2") ";O+t+:"ARE THE POSITIVE QUADRANTS."+:1301+IQ9Q7:1430::IQ1Q1:1430::IQ7Q9:1430::1520+:"QUADRANT (X,Y) ?";Y,X+X1X81550,XX1:NQ((Q1)8)Q8(Q8)ĺ"TOO CLOSE TO EDGE OF GALAXY TO SCAN LONGRANGE.":320^*EE110:1540y*C1440,1450,1460,1470*K(I)01510*1480*B(I)01510*1480*P(I)01510*1480*S(I)01510*1480+Q2(I8):Q1I(Q28):SES.":"3 - SCAN FOR PLANETS.":"4 - SCAN FOR STARS.":"5 - SCAN A QUADRANT.":"6 - BROAD RANGE SCAN.")n:"ENTER COMMAND: ";:Z$:::Z$"1"Z$"2"Z$"3"Z$"4"Z$"5"Z$"6"330)sC(Z$))xC51550)}C61590L*Q81Q864(Q1)8к"A DRYAD WISHES TO GUIDE YOU."2:"WILL YOU LET HER? ";<3000FI180,120(PF10;Z(1).2İ3100Dd200MxF11WW1F1:"THERE ARE THREE PATHS INTO THE FOREST.":"ONE IS CORRECT."C1(3(1).9999)Y1(3(1).9 :: D10:F90:D20:D30 X10:V10:F10:C10:C20" D40:F50:E10:F805 G10:I20:P30> 180_ 5:10)"SWORDS AND SORCERY"q XX1500:XX ::"GOOD LUCK ON YOUR QUEST." : 5000 DIGITS1 (1).7200 (                      P(4,1)P(1,1)610$DP(4,1)0610ONX(4(1)1):R1P(4,1):R(R1,X)1590XR1R(R1,X):P(4,1)R1:R1P(1,1)ğ:"***DARTH VADER HAS ARRIVED***"::2800:2710bC99620lT8(10(1))Ğ:"TIME IS ALMOST OUT":v820:P(1,1)P(4,1)680D,DAMAGED BUT CAN BE REPAIRED,IRREPAIRABLY DAMAGEDKP770788:A:P,A: 173,48,192,136,208,4,198,1,240,8,202,208,246,166,0,76,2,3,96I114:CM$(I):GE,D,M,SABR,A,O,GI,L,F,TO,SW,TA,SAB,C&R11:01750:T8(50(1)76)11:AND,HANGER,EAST DETENTION,WEST DETENTION,BROWN,GREEN,BLUE,YELLOW,RED,ORANGE,BLACK,WHITE WEST END,MIDDLE,EAST END,SOUTH END,NORTH END,NORTH,EAST,WEST,SOUTH,PRINCESS LEIA,THE WOOKIE,DARTH VADER,IMPERIAL SOLDIER,SHIELD,BLASTER,LIGHT SABRE2 UNDAMAGE"(HIT ANY KEY TO BEGIN YOUR MISSION)";:A$:tA12:R$(A)::A13:B$(A)::A14:E$(A)::A18:C$(A):A15:O$(A)::A14:P$(A)::A25:N$(A)::A13:W$(A)::A13:D$(A):WMACHINERY,CONTROL,TRACTOR BEAM,POWER,WEAPONRY,COMM:"AS WITH ANY JEDI HOPEFUL, YOU WILL ACT THROUGH THE FORCE. YOU WILL DO SO BY GIVING COMMANDS FOR YOUR ACTIONS. SIMPLYHITTING 'RETURN' LISTS ALL OF THE LEGAL COMMANDS":"YOU HAVE A LIMITED AMOUNT OF TIME.":"MAY THE FORCE BE WITH YOU!":0EM TO PRISONERS YOU":"RELEASE.":"TO ESCAPE, YOU MUST RENDER THE TRACTOR BEAM INOPERABLE BY EITHER SABOTAGING THEPOWER MACHINERY ROOM OR THE TRACTOR BEAMROOM. YOU MUST THEN RETURN TO THE":"HANGER DECK AND TAKE OFF IN THE""MILLENIUM FALCON."INERY ROOM IN SUCH A WAY AS TOMAKE THE DEATH STAR SELF-DESTRUCT!"r20:"(HIT ANY KEY FOR FURTHER ORDERS)";:A$":"YOU ARE EQUIPPED WITH A LIGHT SABRE AND A BLASTER SHIELD. YOU MAY USE ANY":"BLASTERS YOU STRIP FROM DEAD SOLDIERS ORYOU MAY GIVE THROUBLE.BUT YOU ARE ALSO IN A POSITION TO DO GOOD THINGS FOR THE REBELLION, SUCH AS DAMAGING THE DEATH STAR, ELIMINATING IMPERIAL SOLDIERS, KILLING DARTH VADER, OR RESCUING PRINCESS LEIA"A"YOU MIGHT EVEN BE ABLE TO SABOTAGE THE POWER MACH(1)301):R(R1,7)10350GhR(R1,7)R(R1,7)1:S:D13:D(D)0::S80r:3:"REBEL ";N$(1);"--"::"YOU ARE ABOARD THE MILLENIUM FALCON":"WHICH HAS JUST BEEN DRAGGED ABOARD THE INFAMOUS ";::"DEATH STAR"::|"THIS OF COURSE MEANS YOU ARE IN T4H ,P(1,1)1:P123:R1((1)1231):P(P1,1)R1::P(2,1)P(3,1)300 6R1(29(1)2):P(4,1)R1:P114:X23:P(P1,X)(10(1)11):: @P(3,2)P(3,2)2:P(1,4)1:P(1,6)1:P(4,4)1:P(4,6)1 JR(19,7)3:R(26,7)3 TS1(20(1)5)^R1(,23,35,32,25,272,24,36,31,26,472 " 25,19,0,27,421,26,0,28,29,552,0,27,0,0,211,27,0,0,-30,252,-29,0,0,1,452,0,25,0,0,14,0,24,0,0,24,0,23,0,0,34,0,0,23,0,44,0,0,24,0,54,0,0,25,0,64,0,20,0,0,74,0,21,0,0,84,0,22,0,0,94,0,0,22,0,104,0,0,21,0,114,0,0,20,0,12,0,7,5,0,302,0,0,6,0,311,5,0,0,9,412,8,0,0,0,111,11,0,0,5,212  14,12,0,10,123,0,13,11,0,222,0,0,12,0,121,15,0,0,11,512,0,0,16,14,133,0,15,17,0,232,18,16,0,0,433,19,0,0,17,242,20,0,26,18,321,21,42,37,19,462,22,41,38,20,262,0,40,39,21,562,0,34,33,24,572OWN==> ",X,40)r A110:(16384)155Ĺ16368,0:13:868:X11:A11z : 13:"WHAT IS YOUR NAME?";N$(1) R1142:X15:R(R1,X)::= 30,2,0,0,4,3,4,1,0,102,0,0,0,2,221,0,5,2,0,202,10,6,4,8,103$(3),D$(3) CM$(14)7 I142:J19:R(I,J)0::V I14:J17:P(I,J)0:: :5:15);"WELCOME TO"::16::"STAR WARS"::5 X1100:13:1:(" <==A SCIENCE FICTION ROLE-PLAYING GAME BY DONALD BR9d/// STAR WARS!n///=x///A ROLE-PLAYING GAMEY/// (C) COPYRIGHT 1979s/// BY DONALD BROWN|170CN1CF:TAABAE:0,TA:1,DN:770:TA,CN: R(42,9),P(4,7),D(3),S(10,2),R$(2),B$(3),E$(4),C$(8),O$(5),P$(4),N$(5),W                        HERO--"/\ "THAT ROUND MAY HIT CAMBRIDGE!!!"7n C1Ax 2630W 3)"NEWS FLASH!"q "CAMBRIDGE COW HIT!" "BY MYSTERY MISSILE"  C0  "THATS TO LOW..." "KEEP YOU ELEVATIONS BETWEEN 1 AND 180."  2500C14HERE!" D1200:D" I110/ J11006 JC( 15)"."J2 I[< 13)"BOOM!"eA 6000F "WHEW! THAT WAS CLOSE!!"G "LETS TRY AGAIN ..BUT - BE CAREFUL!"K P 2500Z "WOW!!--YOU JUST SHOT BACKWARDS"[ "THAT SHOULD MAKE YOU A;A;" YARDS."L0F "WHAT ELEVATION DO YOU WANT TO TRY?";En :"OK - NOW PUSH RETURN TO FIRE!!"v Q$ 5000 LL1 E884000 E92E1812650 E1807000 " YOU SHOT NEARLY STRAIGHT UP..." ".. LET'S GET OUT OF DONATED TO ** APPLE PI USER'S GROUP ** P.O.BOX 17467 ** DENVER-COLORADO 80217 ** *****************************#APPEARED IN APRIL 19818#ISSUE OF MICROCOMPUTING>#Y#COMPLETELY FRUSTRATEDr# PLAYERS MAY WISH TO# YIELD TO THE TEMPTATION# OF THE ESCAPE KEY#& :::::::::::::::::::::::::::$Pò*********************** ** NTEGER BASIC VERSION$"hWRITTEN BY*"mB"r BRIAN MC CARSON]"|2922 W HARTFORD DRIVEt"PHOENIX, AZ 85023z""PROGRAM CONVERTED TO" APPLESOFT BY"" LINDA HARDY"1504 CONSTITUTION AVE"FT COLLINS, CO 80521"7,94,101,80,145,94,170,200,177,94,240,10,101,81,145,94,134,94,133,95!144,231,76,108,214,56,181,0,101,80,149,0,181,1,101,81,149,1,96,255,76!I816976:N:I,N:I!!@::::::::: RATS:::::::::!JA RAT'S-EYE VIEW!T OF MAZES!Y"^I5,175,229,103,168,165f 176,229,104,170,24,101,149,133,149,200,208,1,232,232,200,32,195,211,162,105 32,193,3,162,175,32,193,3,162,103,32,193,3,162,121,32,193,3,165,185 201,2,240,5,162,184,32,193,3,165,103,164,104,133,94,132,95,160,0,56D!172) X,YNW(X &LOMEM:rb169,76,141,245,3,169,64,141,246,3,169,3,141,247,3,96,169,164,32,192 l 222,32,103,221,32,82,231,165,103,133,150,165,176,133,151,198,150,56,165,80 v133,148,229,103,133,80,165,81,133,149,229,104,133,81,16'RE OUT IN ";NM;" STEPS.""z5006VV1:HH1:3100P DRAW PATHED WALKEDrXHHZ(HZ2):YVVZ(VZ2){X,YN1NMN5006300FWALK(N)F1VV1F2HH18F3VV1QF4HH1jXHHZ(HZ2):YVVZ(VZHVFX)#'TZ2(F1):TM(T128)16T05450I; BUMPED INTO WALLX@500:5100xJNMNM1:22:32:"MOVE ";NMONM500WALK(NM)FTHHR:VVShV2ī6000|1005100D ESCAPEN3100X5100p:"CONGRATULATIONS, YOU,"I:"AND READING "(KK(I,J)1)" UNITS OF ENERGY.":I11900::7 "YOU ARE ARRESTED AND COURT-MARTIALED. STARDATE: "SD100:23:ISE HAS SAVED THE FEDERATION.":23:86Q515TB:I1Q5W6X(64(1)):B(X)02020q6B(X)1:TBTB1::3006:5:18:A$(1);6II28:JI38:KK(I,J)0Ă:I31:6 I2I:I3J1:I38I31:I2I21@7P1I:P2J:12:1:"OBJECT IS AT SECTOR "J":"CHOOSE PATH 1, 2, OR 3. ";A$:"":A$"1"A$"2"A$"3"400X1(A$)1X13X11400EL1100((1)1)TX1C1444iC2C22:L1L150uC2C21~T10C2C2.5(1)F1P1.2V1(5.1V1)C30:"YOU HAVE COME TO AARE DAMNED.":3870V1(V1)"V12(1)320':"THE ORACLE IS OFFENDED."),C2C21@@V1F110(1)350JJ3100X^C20388qh(1).4(V110)388r:"THE ORACLE SAYS PATH ";Y1|P11}400:"THE SIGNS ARE UNCLEAR."999)(1).4Y1C1:"DO YOU WISH TO CONSULT AN ORACLE? ";3000(I1400,260V:"HOW MANY VIRGINS WILL YOU SACRIFICE?"^V1(1).1V120ĺ:"**** DEVIL ****"::"YOUR BLOODTHIRSTY NATURE BANISHES"::"YOU TO HELL."::"YOU  140 LEFT BACK3 WM(AS(BR)FX)FFH M(W128)0140W RL1:300j RIGHT SIDE~ M(Z64)0150 RL1:400 160 RIGHT BACK WM(AS(BR)FX)FF M(W128)0160 RL1:300 BACK TEST M(ZION AVAILABLE IN INTEGER BASIC/ c800I dDRAW 3-D VIEW AT H,VQ e } fH,V = CURRENT LOCATION COORDINATES gS,R = FACING (F) iN2:AH:BV:FF2(F1) l:3 nZM(ABFX)FF x LEFT SIDE zM(Z16)0130 |RL1:400/RATS! A 3-D MAZE PERSPECTIVEq7000:816:16384: MOVE PROGRAM ABOVE HIRES GRAPHICS SCREEN PLAY BY BRUCE CARLSONSEE LINES 8000-8230& 2M(A)(((A)2)2(A)): FUNCTION REPLACES MOD FUNCT     01680JhAR(AY),AS(AY))J|AX11700EACXE0:5,1018:34,2917E2:0,390:0,3939:0,390:0,3939EE21:"PLAYER 1 PLAYER 2":" ";P1;36);P2;" ":EP151540EP251540F0A5:B20:Cк"' 3 ' BOTH SIDES COMPUTER ASSISTED"::"' 4 ' TWO PLAYERS UNASSISTED"`D"TYPE (1 TO 4) ";SSfDDW215:Q193:Z218:S211:P208:L204:I187:K174:SP250:TT0:AW0D,O16384:4D@ZZ1460DTAB((1)AF)Dh"THERE ARE ";AB;" OBSTACLES"+'CAR(800):AS(800):AU(800):AV(800)C" DO YOU WANT OBSTACLES ";:A$:(A$,1)"Y"ZZ1:"WHAT IS THE MAXIMUM AMOUNT OF OBSTACLES ";:AFGD:8:"' 1 ' RIGHT SIDE OF KEYBOARD AGAINST ME"::"' 2 ' LEFT SIDE OF KEYBOARD AGAINST ME":: ' "9B<" A-+-S L-+-; "gBA" ' ' "BF" Z . "BK" "BPBdE$" 215193218211"BxF$" 208204187174"BCAUSE YOUR WALL TO TUMBLE.":KA" THE FOLLOWING KEYS CONTROL THE WALLS"{A(:"LEFT WALL RIGHT WALL"A,A-" "A2" W P " B7" ' @ MADE FOR APPLES .@ OF B.C.F@ BY RANDY WRIXONL@n@ ::4:14);"T H E W A L L"A::" THE OBJECT OF THIS GAME IS SIMPLE. TO"::" WIN YOU MUST 'WALL IN' OR 'OUTLAST'"::" YOUR OPPONENT. HITTING ANYTHING WILL"::"      ((1)3)1:R1090,1092,1094KNB"YOUR DAUGHTERS ARE SAFE AT LAST! ":2000ND"WHO IS GOING TO BREAK THE NEWS":"TO MRS. WUMPUS AND THE KIDS? (!)":2000NF"I HOPE YOU'RE SATISFIED. ":"WHAT DID THE WUMPUS EVER DO TO YOU?":2000OL"SORRY, YOU HAVE THE BATS."&MW((1)Q)1:WM490/M990zM."HE'S IN A BOTTOMLESS PIT, BUT HE'S CLINGING TO THE SLIPPERY WALLS."M0A101075M1R((1)3)1:R1249M3"WAIT!...HE'S SLIPPING....HE'S GONE!!"M8"YOU GOT HIM! THE WUMPUS IS DEAD!"N=R8;L"THE WUMPUS IS AWAKE! HE'S MOVING":F1VLI1Q1:A%(I,W)M490]LIzLR((1)Q1)1:WA%(R,W)LJ12:WB2(J)1040LWP2(J)1070LJ:249L"TRYING TO DOUBLE BACK, EH? ";:A5%(I)0:830 M"HE WENT ELSEWHERE WITH4I1K1:JI1K:A5%(I)A5%(J)10300K9J,I;K>I1KGKHJ1Q1fKRA5%(I)A%(J,A5%(I1))920mK\JKf"MISDIRECTED ARROW!":JIK:R((1)Q1)1:A5%(J)A%(R,A5%(J1)):JKA5%(I)M1110KA5%(I)W1080KIL"YOU MISSED! ";:F1245%(0)MJS0:KK1'J16368,0:Z0BJZ(16384):Z127741WJZ176Z185750`J790iJ790J"THERE'S NO SUCH CAVE. TRY AGAIN. ":X90:300JZ172800J715::820J(Z128);:SS10Z176:740J (Z128);:715:K8Q1737'KBE BACK IN TIME FOR WASHING UP.":2000?I(Z128);:A10720mI"ORRY PAL, NO MORE ARROWS. BETTER MOVE."I"IF YOU'RE LUCKY THE WUMPUS WILL FALL DOWN A PIT.":"WHICH CAVE NEXT? ";:310IS0740ISQ745IA5%(K)P%(S):JA1A11:K0:A)Q)1:"BAT CAVE!!":"ELSEWHEREVILLES FOR YOU!!":410H0R((1)3)1:"YOU ARE FALLING DOWN A BOTTOMLESS PIT!":R570,580,590H:"SPLAT!!! OOPS, NOT SO BOTTOMLESS AFTER ALL!":2000HD"I HOPE YOU KNOW SOME GOOD SOLITARE GAMES.":2000&IN"TRY TO GI:245XGWM:"CHOMP!! YOU HAVE JUST BEEN EATEN BY A WUMPUS!":"HE FOUND YOU ";}GR((1)4)1:R510,520,530,540G"DELICIOUS.":2000G"A BIT STRINGY.":2000G"SOMEWHAT SALTY.":2000G"SADLY IN NEED OF A BATH.":20006H&Z((105 F0302F1(Z128);(F216368,0/F6SCJJ1:200RCP%(J)I:U%(I)JYCIbCH10oCF0249}CA10248CR((1)2)1:R1249C"THE WUMPUS MOVES AGAIN!!":950C:"#";(H11);" YOU ARE IN CAVE #";(U%(M))9DI1Q1:A5%(BiI1Q:P%(I)0:I/BnW((1)Q)1:P%(W)1:BsI12aBxB2(I)((1)Q)1:P%(B2(I))1120qB}P%(B2(I))1BP2(I)((1)Q)1:P%(P2(I))1130BP%(P2(I))1BIBM((1)Q)1:P%(M)1135BI1Q:P%(I)0:I CI1Q:R((1)(QI1)),M1%(25),W1%(25)@AA"WHICH CAVE SYSTEM: 20 OR 12:";:16368,0ZAFZ(16384):Z12770hAGZ17874vAHZ17775AJ"20":80AK"12":90APQ20:Q13:I160:A:I:100AU6000::50AZQ12:Q15AdI1Q1:J1Q:A%(I,J):J,IAgA13:F0@*** WUMPUS ***+@ BY TOM WALDOCK1@}@:"THE WUMPUS HUNT"::"DO YOU WANT INSTRUCTIONS (Y/N) ? ";:16368,0@ Z(16384):Z12712@ Z20645@Z21785@12@-" NO "@2X90A<A%(5,20),P%(