PLANET P. ! Y# ;0:0:7:1:23658j\,8:  160  250 ( 300, 2 0 < F 390 P 430 Z 610b d 690 n 730 x 770 810* 890z 970 40,9 ;6;1;"PLANET PROTON" N3,3;"A Game For 2 to 4 Players."''7;" Mark Rawson 1986" Y'"Collect as many crystals as you can, Avoiding blocking yourself into a tight corner." Q"As you collect the crystals, youmake holes which cannot be crossed over." ȍ6;1;"Golden";7;0;" gems are worth the most":"points BUT greed is not the object of the game, strategy is." ["Try to block your opponents intoa small area whilst keeping a large area to yourself." %''10 ;1;"HAPPY MINING" 200  i="a""f"+7 a i,a i " ,"No. of players (2/4):";n$ 6n$<"2"n$>"4"300, @n=n$ J n<2n>4300, T#s(n):x(n):y(n):q(N):rp=(*n) ^ i=1n hs(i)=0:q(i)=0 ri | i=120 ,i,1;1;"" i  I=521 I,22;" "  I 255,128 -72H,0 0,-(N*32 ) 72H,0 0,(N*32 ) 0,0 175,0 0,175 -175,0 &0,-175 00I=128(128-(N*32 ))-32 : 255,I D-72H,0 NI X b2:7 l0,25;"1 2 3" v1,25;" \|/ " 2,25;"4-+-6" 3,25;" /|\ " 4,25;"7 8 9" 0:7  I=0(N-1) B6+(i*4),23;(i+3);"Player ";(i+1) i  i=0(n-1) O6+((i*4)+1),23;(i+3);"Score: ";(146+i) i  i=0(n-1)  A6+((i*4)+2),23;(i+3);"0 " i   * 4g=(*(n*3))+n > i=1g Hrnx=(*20)+1 Rrny=(*20)+1 \'RNX,RNY;6;0;145 fI p z I=1N RCX=(*20)+1 RCY=(*20)+1 &RCX,RCY;(I+2);(145+I)  X(I)=RCX  Y(I)=RCY I   I=1 I>N 970 .Q(I)=1I=I+1:QUIT"9"d$="5"1040 $d=d$ .+d<1d>9 d=51040 8#(1140t+(d-1)*10 ) Bmove=0 L 1230 Vdmove=0#0;1;"You can't move in that direction":1.2,-6:1030 ` i=i+1 j 980 tdx=-1:dy=-1: ~dx=-1:dy=0: dx=-1:dy=1: dx=0:dy=-1:  dx=0:dy=1: dx=1:dy=-1: dx=1:dy=0: dx=1:dy=1: O(x(i)+dx,y(i)+dy)=6s(i)=s(i)+502:.1}L,32 :1250 (x(i)+dx,y(i)+dy)65A x(i)=x(i)+dx y(i)=y(i)+dy  1340<  1360P  &x(i),y(i);i+2;(145+i) s(i)=s(i)+10 move=move+1 ( 1390n 2 1230 <x(i)-dx,y(i)-dy;32 F P.005y# =,x(i) Z.005y# =,y(i) d n34+((i*4)),23;(i+2);s(i) x check=0 d=19 #(1140t+(d-1)*10 ) d(x(i)+dx,y(i)+dy)=" "ū(x(i)+dx,y(i)+dy)65Aƫ(x(i)+dx,y(i)+dy)6check=check+1 d check=9 1480  &.4L,-4:.4L,-8 7#0;7;1;"Player ";i;" is trapped!" q(i)=1  100d  1550 ""  quit=0  c=1n "!q(c)=1quit=quit+1 ,quit=(n-1)1610J 6c @ J hs=0 T i=1n ^s(i)>hshs=s(i):player=i hi r"" |@#0;1,8;1;"Player ";player;" has won" i=010 .05|L,(i*4) i  100d "Another Game (Y/N):";a$ a$="n"a$="N"1830& "Same Players (Y/N):";a$ a$="n"a$="N"300,  340T  70F K24,60<,126~,255,126~,60<,24,0 I24,36$,90Z,165,90Z,36$,24,0 K60<,60<,24,255,24,36$,36$,102f O153,189,126~,60<,60<,126~,153,129 N60<,126~,219,255,189,66B,126~,60< J60<,60<,24,126~,60<,60<,24,60< X