/N?S*0D:\0 oN  ):.01z# =,X:X:I:11 ,11 ;"GAME OVER" N7,0;" THE ALIEN HAS JUST ENJOYED A VERY TASTY MEAL !" 1I=-40(40(:.1}L,I:I:2005 d95:5:2::I=31-1 nRX=20-20-1:.01z# =,X:X:I:11 ,11 ;"WELL DONE" s17,0;" YOU HAVE JUST ESCAPED !!" x:I=40(-40(-1:.1}L,I:I:2005 X03:3:7::I=13 bIX=-2020:.01z# =,X:X:I:11 ,11 ;"GAME OVER" gK7,0;" THE SPACE CRAFT HAS JUST SELF DESTRUCTED !!" l1I=-40(40(:.1}L,I:I:2005 @ J"ALIEN"5 T 5 yBJ"" z# =IEN T&$& W P P PM3333//4*0e3Zv>~B~>~Bx&|B>B~B~>~BxBB>~<<D>@@B~><<<<@@~<$!~JBN@J|~@HB@@F@@FD&BBBD@DB@@@DBFBB@BB@BB@ZBBFB@@F@@FDZBBBD@BBD@@BBB@BF@ZB@BDBBBBBD$$@BBBB@@@B$BFB$B@F@BBDB~>~B@>~Bx&<<BB~BB@@~x@$>BBBB~>~B@>~Bx$B>~<<B>~~<<B~~><<<<~~~<">BBx~B<~<~<<<~@@@x~~|BBBBBBBB@H@BBBD@bB@BBfBB@B @@Bf@@BBB@@@@B@@Bf@BBbBBBbB@'BbDB@bB@BBbBB@@@BBB@BBDB@@@Bf@BBbB@@D@@BB@B B|Bx~B<~<~<<B@~BB~<~~x~~BB~<@>~B|B~<B@B@@bBBBb@D@BBBbB@$BfBDBBB@DBB@@~|B@|R|BBR@(|BBBR@|$BBB@BBZ|(BBB@BBB|<B@~@@JBBBJ@@B|BJ@@$||BN|~BB|~B@B~B@B@B@@FBBBF@@BDBFB@#@DBBDBBB@BB@DB$@BB~B~>~B|<~<# # <@T\\\t #t%%4\iX![!`PP!!W K SR P>23658j\,8:0:0:7::2000 0:T=0:SP=1:0:7:0::l=1:x=16:y=17:0,5;6;"A L I E N F I E N D" O=0:C=0:B=0:G=0:U=0:S=0:J=13 :L=13 :K=16:M=16:2,0;5;"TIME";4,0;"CARRYING";2,14;"TIME LIMIT ";3;TL:P=(*7):P=P+7  430 -74:y,x;4;"":1/10 ,30 2Fy,x;4;"":IP=57342:IO=64510:IU=65022 5NIP=190ƫ(y,x+1)6x=x+1:y,x-1;" ":60< 7DIP=189ƫ(y,x-1)6x=x-1:y,x+1;" " JJ=J+1 YKK=K+1 Y=JX=KL,M;" ":1500 0L,M;" ";J,K;3;"":L=J:M=K:502 ?(Y,X)="N"SP=SP+10 :X=16:Y=18:420 >(Y,X)="S"SP=SP-10 :X=16:Y=9 :420 =(Y,X)="E"SP=SP+1:X=6:Y=14:420 >(Y,X)="W"SP=SP-1:X=25:Y=14:420 (Y,X)=31500 F(Y,X)=71G4,10 ;7;"":O=1:502 E(Y,X)=54,12 ;7;"":C=1:502 F(Y,X)=66B4,18;7;"":U=1:502 F(Y,X)=70F4,14;7;"":B=1:502 F(Y,X)=68D4,16;7;"":G=1:502 F(Y,X)=94^4,20;7;"":S=1:502  900 hSP=121,0;6;1;1;" ESCAPE POD ":450 iSP=1421,0;6;1;1;" CONTROL ROOM ":450 iSP=-221,0;6;1;1;" STORE ROOM ":450 iSP=2821,0;6;1;1;" OXYGEN ROOM ":450 Q21,0;6;1;1;" METAL ROOM " 6SPPL=13 :J=13 :K=16:M=16 /SP=-2SP=0SP=11000 1SP=28SP=21SP=201060$ <SP=18SP=8SP=10 SP=11 1040 ;SP=7SP=9 SP=12 SP=13 1020 $SP=6SP=1710808 %SP=14SP=191090B ;SP=OOO=013 ,16;7;1;"" 2SP=CCC=013 ,16;5;"" ;SP=BBB=013 ,16;6;1;"" ;SP=GGG=013 ,16;4;1;"" ;SP=UUU=013 ,16;2;1;"" DSP=SSS=013 ,16;6;3;1;"" =Y,X;4;"":O+C+B+U+S=5SP=16500d X 45-  I=216-1:I,0;2;1;1;"":.002xn,30+I:7:I,0;" ":I 5P=(*7):P=P+8:P=14P=18  6:7,5;"":i=112 :7+i,5;"";7+i,25;"":i:7+i,5;"" $7,14;5;"NNN":  6:9 ,2;"":i=10 18:i,2;"";I,29;"":i:18,2;"" 12 ,2;5;"W";13 ,2;"W";12 ,29;"E";13 ,29;"E";14,29;"E";14,2;"W"   6:7,4;"":i=820:i,4;"";I,27;"":i:20,4;"" 5;12 ,4;"W";13 ,4;"W";14,4;"W";14,27;"E";12 ,27;"E";13 ,27;"E" =5;7,14;"NNN";20,14;"SSS": $6:7,5;"":i=112 :7+i,5;"";7+I,25;"":i:7+i,5;"" .%20,14;5;"SSS": 86:7,2;"":i=820:i,2;"";I,29;"":i:20,2;"" =Q5;14,29;"E";15,29;"E";13 ,29;"E": B6:7,5;"":i=112 :7+i,5;"";7+I,25;"":i:7+i,5;"" GN5;14,5;"W";15,5;"W";13 ,5;"W": L "G=0G=10 6000p SG=1G=10 :4,16;" ":I=040(:.002xn,I:I ;G=10 P=(*7):P=P+7:P=SP1510  502   5000 P0:7:0::0,5;6;"A L I E N F I E N D" څ:"YOU ARE TRAPPED ON A SPACE SHIP WITH AN ALIEN FIEND WHICH TRIES TO KILL YOU. THE ONLY WAY FOR YOU TO SURVIVE IS TO COLLECT :-" }:"1 AN OXYGEN PACK":"2 A CAT":"3 A BASKET":"4 A GUIDENCE COMPUTER":"5 SOME SUPPLIES":"6 A FLAME GUN (OPTIONAL)" c:"AND THEN RETURN TO THE ESCAPE POD. THE FLAME GUN WILL DETER THE ALIEN, BUT ONLY FOR ONCE." :"PROGRAM BY PAUL DAVIES." $I=030:.01z# =,I:I ):5;" PRESS C TO CONTINUE" "C"2050  P0:7:0::0,5;6;"A L I E N F I E N D" :"THE CONTROL KEYS ARE :-":  " UP.Q" *" DOWN.A" 4" LEFT.O" >" RIGHT .P" H.:"TO PICK UP AN OBJECT JUST BUMP INTO IT." M$I=030:.01z# =,I:I R):5;" PRESS C TO CONTINUE" \"C"2140\ fP0:7:0::0,5;6;"A L I E N F I E N D" p:"PRESS GAME OPTION :-": z$" OPTION TIME LIMIT OBJECTS": " 1 550 FIXED 2 550 RANDOM 3 600 RANDOM 4 600 FIXED 5 500 RANDOM 6 450 RANDOM" K15,0;"REMEMBER, IN SPACE NO ONE CAN HEAR YOU SCREAM ." A$=:A$""2300  2190 A$="1"TL=550&:OO=28:CC=6:BB=19:GG=21:UU=14:SS=-2:.1}L,0:10 A$="4"TL=600X:OO=28:CC=6:BB=19:GG=21:UU=14:SS=-2:.1}L,0:10 4A$="2".1}L,0:TL=550&:2500 4A$="5".1}L,0:TL=500:2500 4A$="6".1}L,0:TL=450:2500 4A$="3".1}L,0:TL=600X:2500 $1,-20:2190 2600( OO=NO 2600( NO=OO2510 CC=NO 2600( NO=OONO=CC2525 BB=NO 2600( NO=OONO=CCNO=BB2540 GG=NO 2600( %NO=OONO=CCNO=BBNO=GG2540 UU=NO 2600( +NO=OONO=UUNO=CCNO=BBNO=GG2540 SS=NO:10 (NO=(*9 ) 2NO=0NO=28: <NO=1NO=17: ANO=2NO=6: FNO=3NO=-2: KNO=4NO=19: PNO=5NO=0: UNO=6NO=20: ZNO=7NO=21: _NO=8NO=14: I=18 B$ X=07  Y:B$+X,Y X:I : "O",0,24,60<,126~,102f,102f,126~,126~,"C",17,14,14,68D,78N,46.,46.,30,"B",0,126~,231,195,255,126~,126~,60< "I",255,129,189,165,165,189,129,255,"G",0,0,0,255,31,1,0,0,"U",255,129,255,255,219,255,219,255 Ξ"K",28,28,8,126~,157,29,20,546,"J",129,90Z,36$,60<,24,255,219,153 p02:2:7::I=13 zIX=-2020