ZXTape! 0Created with Ramsoft MakeTZXPOOL 77 7  U"39999":/:ڧ/:ç:ç:ٰ"6"::"":"":mc="57999":"57999",ç:"100" l(x)=x-256*h(x) h(x)=(x/256) x(x)=x y(x)=(x+1) &p(xӤ)=x+256*(x+1) 1DATA ROUND UP 2 b1=Z:b2=Z 4Pn=42831O43055/16:n,0:(n-11 )=060< 7n: <((n-10 )=1b1=b1+1: >&(n-10 )=2b2=b2+1 A F"xcr,24:0,41): H#152,ycr:63?,0: dç:exp=ç:"9400" e="y"Ŧ="Y""9470" f="N"Ŧ="n""104" g"101" h "9000" iP8:xcb=x(cb)+3:ycb=y(cb)-3:8000@:.1}L,30 nHx2=x(cb):y2=y(cb):x1=x(cue):y1=y(cue):x3=(x2-x1):y3=(y2-y1) xdir=(x2x1y2y1x3y3)+2*(x2x1y2y1x3y3)+5*(x2x3)+7*(x2x1y2y3) |rat=x3/(y3+.001wn*(y3=z))*(x3y3)+y3/(x3+.001wn*(x3=z))*(y3>x3):rat=rat*(rat255)+255*(rat>255) ratd=rat-rat cb+15,dir:cb+13 ,rat*(ratd<.75@ratd)+rat*(ratd.75@ratd):cb+14,rat*(ratd<.75@ratd)+rat*(ratd.75@ratd) jcb+12 ,z:42197դ,z:ratdratd<.75@cb+12 ,j+(j/ratd)/ rat:"42197",(cb+12 ) v7000X:23681\,st+(st=z):42193Ѥ,z:42194Ҥ,z:42195Ӥ,z:42196Ԥ,z:cb+11 ,33! y.008zn,tn+tn:p(t,fo)=p(t,fo)+j:8;"":mc=40200:502:FP=P(42193Ѥ):FH=P(42195Ӥ) þ42884END  0þ(cb+4)1000:"6500":105i TEST WRONG BALL OR MISS FH(bpP(T,2)<7ƾ(FH+5)p(t,1))(P(T,2)=7ƾ(FH+5)4)(fh=42880p(t,2)<7)5000:"6500":90102#:105i 3FPbp4000:"6500":90102#:105i +FPbp6000p:90102#:105i "frt=1+(t=1):br=j +90102#:fr=fr-(fr>0):105i 3xcr=183:ycr=44,:502:90102# e85004!:tn+th,z;"YOU POTTED THE"'"CUE-BALL":T=J+(T=J):"";''N$(T)'"NOW HAS A"'"FREE SHOT" lN=10 -30-2:.08}# =,N:N:J,-30:20:90102#:J:j:70F:72H tn,z;"USE THE CURSOR"'"KEYS TO MOVE"'"THE CROSS-WIRES"'"TO WHERE YOU"'"WOULD LIKE TO"'"PLACE THE CUE-"'"BALL"'''"PRESS ENTER"'"WHEN READY" @="8"70F:xcr=xcr+(xcr<214):70F:1010 ?="7"72H:ycr=ycr+(ycr<62>):72H:1010 ?="6"72H:ycr=ycr-(ycr>26):72H:1010 @="5"70F:xcr=xcr-(xcr>154):70F:1010 749150=254.1}L,30:1050  1010 n=42816@43040 16:((n-(xcr-3))*(n-(xcr-3)))+(((n+1)-(ycr+3))*((n+1)-(ycr+3)))<81Q1,-20:1010 n $Ncb,xcr-th:cb+j,ycr+th:cb+4,1:cb+11 ,33!:90102#  z:FR=J: 90102#:(P(T,J)=JP(J+(T=J),TW).2~Lm$="GOOD SHOT!!":"4015" "4210"+("7"*) TN,J;"";M$:"6500":P(T,TW)=7'" ";N$(T)'''"YOU'VE ONLY"'"THE BLACK TO"'"POT NOW":N=10 30:.05|L,N:.05|L,N+2:.05|L,N+4:N:.1}L,N+5:1,N+6: MN=10 20:.05|L,N:.05|L,2*N:N:1,502: h rm$="FLUKE!!": sm$="LUCKY!": tM$="WELL DONE!": um$="NICE ONE!!": vM$="EASY!": wm$="GREAT SHOT!!": x m$="O.K.": 90102#:85004! ;p(42195Ӥ)=0tn+th,z;"YOU MISSED"'"THE BALL" >p(42195Ӥ)>0tn+th,z;"YOU HIT THE"'"WRONG BALL" ,t=j+(t=j):''n$(t)'"NOW HAS A"'"FREE SHOT" Vn=1-30-5:.08}# =,n:.08}# =,n+3:n:1,-35# |fr=j: ptbp=J:BR=J:p(t,1)=(p(42193Ѥ)+5):p(1+(t=1),1)=1+(p(t,1)=1) q%p(t,1)=1t$="STRIPED" r%p(t,1)=2t$="SPOTTED" u}502:90102#:tn,z;"GOOD SHOT"'n$(t)''"YOU ARE NOW"'"PLAYING WITH"'"THE ";t$(7)'"BALLS (";t$(8);")" Bn=j6:.2~L,20:.2~L,24:n:j,20 dQP(J,TW)=B1*(P(J,J)=J)+B2*(P(J,J)=TW):P(TW,TW)=B1*(P(TW,J)=J)+B2*(P(TW,J)=TW): XVfv+j:TN,Z;"MIN";TN,TN;"MAX";11 ,Z;"| | | | | | | ":Z,80P:103g,Z ]i14'14'"USE THE 5 & 8"'"KEYS TO SELECT"'"STRENGTH"''14'"PRESS ENTER"'"TO SHOOT" b]41868,491:"";:mc=41800H:st=br*(j+254*(41868-j)/96`)  L90102#:p(t,tw)J/THp(t,th)=z"8600" !; p(t,th)=tw"8530"+th*:fm=j !<+p(t,th)=thp(t,th)=fo"8540"+tw*:fm=j !=-P(T,TH)=FVP(T,TH)=FV+J"8550"+TH*:FM=J !>(p(t,th)=jfo+th*:"8520"+fo*:fm=j !?"P(T,TH)>FV+J"8560"+fv*:FM=J !C "8600" !H"WHAT A PITY": !I"TRY HARDER": !J"DON'T DO IT"'"AGAIN!": !K"NEVER MIND": !L"MAKE IT THE"'"ONLY ONE!": !R"POOR EFFORT!": !S"OH DEAR!": !T"BAD MISTAKE!": !U"NUMBER ";p(t,th)+j: !\"NOT GOOD"'"ENOUGH!": !]"HOPELESS!!": !^"NOT AGAIN!?": !f,"YOU'RE NOT"'"TAKING THIS"'"SERIOUSLY!!": !g"PATHETIC!!": !h"CONCEDE!!": !i%"HAVE YOU TRIED"'"PLAYING GOLF??": !p"WHY NOT GIVE"'"UP NOW!!": !q"THIS MUST BE"'"A JOKE!!": !r"NO COMMENT!!": !s"WELL PLAYED!!*?": !t!"HAVE YOU BEEN"'"DRINKING?!!": !u"YOUR ";P(T,TH)+J;"th!": !;p(t,th)=p(t,th)+j:fmfm=z:1.5@,-tn:"9010":'''' " #'INITIALIZE #(:z=ç:j=/:tw=j+j:th=tw+j:fo=tw+tw:fv=fo+j:x=j:y=j:tn=fv+fv:end="7500":LE=Z:b$(tw,th+fo):n$(tw,fo*th):cue="42773":"9300" #*Pz:z:42773,120x:42774,175:b1=z:b2=z:fm=z:p(tw,tn) #-_fr=z:t=j:bp=z:br=.4L+.2~L*-.1}L:cb=428000:9200#:MC=42500 #0#b$(j)="":b$(tw)="" #1"SET UP SCREEN AFTER EACH HIT #242520,l(44000):42521,h(44000):42522,l(16384@):42523,h(16384@):42524,l(6912):42525,h(6912) #<$:mc=42500:mc=42200ؤ #KZ;3+4*(t=1);t=1;J,J;N$(J);3+4*(t=2);t=2;FV,J;N$(TW);4;0;6-4*(p(1,1)=1),1;b$(1,b1*(p(j,j)>0));5-4*(p(1,1)=1),13 ;b$(1,bp>0);6-4*(p(1,1)=2),1;b$(2,b2*(p(j,j)>0));5-4*(p(1,1)=2),13 ;b$(2,bp>0) # #42520,l(430604):42521,h(430604):42522,l(428000):42523,h(428000):42524,l(257):42525,h(257) # $T?th+fo,z;"DO YOU WISH TO PLAY IN A LEAGUE?"''tn+th;"(Y/N)" $^|="y"Ŧ="Y"le=j:gn=j:"9320":'''"GAME No ";gn;":-"''l$(y,tn+tw);" v ";l$(x,tn+tw)''"PRESS ANY KEY TO CONTINUE":z: $c="n"Ŧ="N""9380" $f 9310^$ $hM:.5,tn+tn:th+fo,z;" DO YOU WISH TO LOAD A TABLE?"''tn+th;"(Y/N)" $i="Y"Ŧ="y"l(fo+fo,fo)::"LEAGUE"l$():gn=l$(tn+tw):np=l$(tn-j):x=l$(tn):y=l$(tn+j):n=jnp:l(n,tw)=l$(n,13 ):l(n,th)=l$(n,14):l(n,j)=l(n,tw)+l(n,th):l(n,fo)=l(n,tw):n:"9340": $j="N"Ŧ="n""9324" $k "9321" $lU:"HOW MANY PLAYERS? (MAX 8)";q$:n=j̱q$:q$(n)<47/ůq$(n)>58:"9324" $mn $nq$="""9324" $pq$>"8"Űq$np)): $K:th+fo,th+th;"ENTER PLAYERS' NAMES"'''6;"(MAX. 12 CHARACTERS)" $7"PLAYER 1 ";N$(J):n$(j)<"65"űn$(j)>"12""9385" $:"PLAYER 2 ";n$(tw):n$(tw)<"65"űn$(tw)>"12""9387" $ $42520,l(50950):42521,h(50950):42522,l(16384@):42523,h(16384@):42524,l(6912):42525,h(6912) $mc="42500" $="""9410" $B/::"7","2";"DO YOU REQUIRE INSTRUCTIONS?"''"13";"(Y/N)" $="n"Ŧ="N"exp=/: $="Y"Ŧ="y""9450" $ "9417" $/::''" WELCOME TO ABRASCO POOL!"''''" THIS IS A GAME FOR 2 TO 8"''" PLAYERS AND IS BASED FAIRLY"''" CLOSELY ON THE POPULAR GAME"''''" IF YOU HAVE NOT PLAYED POOL"''" THEN READ THE FOLLOWING RULES"''" CAREFULLY" $ "9600" $y:''" (IF YOU'VE PLAYED BEFORE YOU"''" MAY FIND THE RULES"''" DIFFER SLIGHTLY FROM THOSE"''" THAT YOU ARE USED TO)" $ "9600" $:''" THE GAME IS PLAYED ON A TABLE"''" WHICH HAS SIX POCKETS"''''" THERE ARE FOUR TYPES OF BALL"''" WHICH ARE DEPICTED AS"''" FOLLOWS:-" %z''" ... STRIPES ... SPOTS ... THE BLACK ... THE CUE-BALL" % "9600" % ''" AT THE BEGINNING OF THE GAME"''" THE SPOTS AND STRIPES"''" (7 OF EACH) AND THE BLACK"''" ARE SET UP IN A TRIANGLE AT"''" ONE END OF THE TABLE."''" THE CUE-BALL IS PLACED AT THE"''" OTHER END" %"9600"::''" THE TWO PLAYERS THEN TAKE"''" TURNS TO TRY TO ""POT"" ONE"''" OF THE STRIPES OR SPOTS INTO"''" A POCKET BY STRIKING IT WITH"''" THE CUE BALL" %"9600":''" WHEN THE FIRST BALL IS POTTED"''" THE PLAYER WHO POTTED IT THEN"''" HAS TO POT ALL THE OTHER"''" BALLS OF THE SAME TYPE,"''" FOLLOWED BY THE BLACK."''''" THE OPPONENT DOES LIKEWISE"''" WITH BALLS OF THE OPPOSITE"''" TYPE" %!v"9600":''" WHEN YOU POT A BALL YOU"''" HAVE AN EXTRA TURN."''''" IF YOU PLAY A FOUL SHOT"''" YOU LOSE A TURN." %&"9600":''" YOU PLAY A FOUL SHOT IF...."''''" 1. THE FIRST BALL YOU STRIKE"''" IS YOUR OPPONENTS"'''" 2. YOU POT ONE OF YOUR "''" OPPONENTS BALLS"'''" 3. YOU DON'T HIT A BALL"'''" 4. YOU POT THE CUE-BALL" %0"9600":''" IF YOU DO POT THE CUE-BALL"''" YOUR OPPONENT REPLACES IT"''" WITHIN A CERTAIN AREA"''" OF THE TABLE."''''" YOU LOSE THE GAME IF YOU POT"''" THE BLACK WITH A FOUL SHOT,"''" OR IF ANY OF YOUR BALLS ARE"''" LEFT ON THE TABLE. TAKE CARE!" %5"9600":''" TO AIM THE CUE-BALL YOU MOVE"''" A SMALL CIRCLE () ROUND"''" THE EDGE OF THE TABLE USING"''" THE CURSOR KEYS. THE 0 KEY"''" ALLOWS RAPID MOVEMENT."''''" PLACE THE CIRCLE IN THE "''" DIRECTION FROM WHICH YOU WANT"''" TO HIT THE BALL" %: "9600":''" UP TO 8 PLAYERS CAN TAKE PART"''" IN A LEAGUE."'''" EACH PLAYER PLAYS EVERY OTHER"''" PLAYER TWICE AND A TABLE IS"''" DISPLAYED AT THE END OF EACH"''" GAME SHOWING THE NUMBER OF"''" GAMES PLAYED, THE NUMBER OF"''" GAMES WON AND LOST, AND THE"''" NUMBER OF POINTS." %?"9600":''" YOU CAN SAVE A LEAGUE ON TAPE"''" BEFORE ALL THE GAMES ARE"''" COMPLETED, AND THEN LOAD IT"''" BACK AT A LATER DATE."''''" FINALLY IF ALL THIS SEEMS A"''" LITTLE COMPLICATED, DON'T"''" WORRY THERE ARE PLENTY OF ON-"''" SCREEN INSTRUCTIONS!" %DC#1;" WOULD YOU LIKE TO SEE THE"''" INSTRUCTIONS AGAIN?" % %3"21","2";"PRESS ANY KEY TO CONTINUE":ç:: 'v1.0 x4g 0XS 22Ф:\G8>2Τ2Ϥ!0~ ü!դL*ʜx4ݾ (< @4~ w5nÊ4ݾ (< @4~ w5sÊ4ݾ (< @4~ w5}Ê5ݾ (< @5~ w5nÊ5ݾ (< @5~ w5(tÊ5ݾ (< @5~ w5}`5ݾ (< @5~ w5()>4ݾ (< @4~ w5( 4 4555~ wӞ@>28:Ф0*ΤR+  "Τ>ݾ($( ~7R~mڈ!0R(/~ 0&8 ~#+ 80,ͣ~՟ڟߟͣ~ͺ~ߟͺ~՟ڟ~0R8MaЧV0D~8=086!Ф>(5566666666*ѤR "Ѥ> w w@ww>w͹~V0WWG_#~V+0WWWGQ*ӤR "Ӥ~F8 #~F+08 #~F+0AF~W#~F+@ ~FW#F~+uãF~W#~F+=q~FW#~F+աͣͣ6 q q q#q#w!Τ>##4 5@5@~Ɵz 5@5@~Ɵߟߟz 5@5@~Ɵڟ 4@4@~Ɵ՟՟ 4@4@~Ɵz 4@4@~Ɵߟz 4@4@~Ɵڟ 5@5@~Ɵ՟!͵! ͵!@>Wv>ǵ>G!R+ ~a04~85aO2!͵B0)!0~ 2\@K[*@!@I>G>G(t>W(>_(9>g(E>g(~(~4~(~p5~(p~4~(p~5~(("~(p("~(4~(5~p(5~(4!R+ !0! #!%!=! }! f!X! {!T!!5!  %!o!w!w!!!!!!!!!!!!ď!??                  `````````````````````````````````````@@```@``````````````````````````````````````````?``````````````````````````````````````````````````````````````````_```````@```````^``_`@@@@@@@@??`?????`?``````````````>``?``````````````````````````````````````<``````````|D~B```@````@@@B<D@B$@BBB???>```````|B~B~<B><<<``````````8<@@||~<<&(n-10 )=2b2=b2+1 A F"xcr,24:0,41): H#152,ycr:63?,0: dç:exp=ç:"9400" e="y"Ŧ="Y""9470" f="N"Ŧ="n""104" g"101" h "9000" iP8:xcb=x(cb)+3:ycb=y(cb)-3:8000@:.1}L,30 nHx2=x(cb):y2=y(cb):x1=x(cue):y1=y(cue):x3=(x2-x1):y3=(y2-y1) xdir=(x2x1y2y1x3y3)+2*(x2x1y2y1x3y3)+5*(x2x3)+7*(x2x1y2y3) |rat=x3/(y3+.001wn*(y3=z))*(x3y3)+y3/(x3+.001wn*(x3=z))*(y3>x3):rat=rat*(rat255)+255*(rat>255) ratd=rat-rat cb+15,dir:cb+13 ,rat*(ratd<.75@ratd)+rat*(ratd.75@ratd):cb+14,rat*(ratd<.75@ratd)+rat*(ratd.75@ratd) jcb+12 ,z:42197դ,z:ratdratd<.75@cb+12 ,j+(j/ratd)/ rat:"42197",(cb+12 ) v7000X:23681\,st+(st=z):42193Ѥ,z:42194Ҥ,z:42195Ӥ,z:42196Ԥ,z:cb+11 ,33! y.008zn,tn+tn:p(t,fo)=p(t,fo)+j:8;"":mc=40200:502:FP=P(42193Ѥ):FH=P(42195Ӥ) þ42884END  0þ(cb+4)1000:"6500":105i TEST WRONG BALL OR MISS FH(bpP(T,2)<7ƾ(FH+5)p(t,1))(P(T,2)=7ƾ(FH+5)4)(fh=42880p(t,2)<7)5000:"6500":90102#:105i 3FPbp4000:"6500":90102#:105i +FPbp6000p:90102#:105i "frt=1+(t=1):br=j +90102#:fr=fr-(fr>0):105i 3xcr=183:ycr=44,:502:90102# e85004!:tn+th,z;"YOU POTTED THE"'"CUE-BALL":T=J+(T=J):"";''N$(T)'"NOW HAS A"'"FREE SHOT" lN=10 -30-2:.08}# =,N:N:J,-30:20:90102#:J:j:70F:72H tn,z;"USE THE CURSOR"'"KEYS TO MOVE"'"THE CROSS-WIRES"'"TO WHERE YOU"'"WOULD LIKE TO"'"PLACE THE CUE-"'"BALL"'''"PRESS ENTER"'"WHEN READY" @="8"70F:xcr=xcr+(xcr<214):70F:1010 ?="7"72H:ycr=ycr+(ycr<62>):72H:1010 ?="6"72H:ycr=ycr-(ycr>26):72H:1010 @="5"70F:xcr=xcr-(xcr>154):70F:1010 749150=254.1}L,30:1050  1010 n=42816@43040 16:((n-(xcr-3))*(n-(xcr-3)))+(((n+1)-(ycr+3))*((n+1)-(ycr+3)))<81Q1,-20:1010 n $Ncb,xcr-th:cb+j,ycr+th:cb+4,1:cb+11 ,33!:90102#  z:FR=J: 90102#:(P(T,J)=JP(J+(T=J),TW).2~Lm$="GOOD SHOT!!":"4015" "4210"+("7"*) TN,J;"";M$:"6500":P(T,TW)=7'" ";N$(T)'''"YOU'VE ONLY"'"THE BLACK TO"'"POT NOW":N=10 30:.05|L,N:.05|L,N+2:.05|L,N+4:N:.1}L,N+5:1,N+6: MN=10 20:.05|L,N:.05|L,2*N:N:1,502: h rm$="FLUKE!!": sm$="LUCKY!": tM$="WELL DONE!": um$="NICE ONE!!": vM$="EASY!": wm$="GREAT SHOT!!": x m$="O.K.": 90102#:85004! ;p(42195Ӥ)=0tn+th,z;"YOU MISSED"'"THE BALL" >p(42195Ӥ)>0tn+th,z;"YOU HIT THE"'"WRONG BALL" ,t=j+(t=j):''n$(t)'"NOW HAS A"'"FREE SHOT" Vn=1-30-5:.08}# =,n:.08}# =,n+3:n:1,-35# |fr=j: ptbp=J:BR=J:p(t,1)=(p(42193Ѥ)+5):p(1+(t=1),1)=1+(p(t,1)=1) q%p(t,1)=1t$="STRIPED" r%p(t,1)=2t$="SPOTTED" u}502:90102#:tn,z;"GOOD SHOT"'n$(t)''"YOU ARE NOW"'"PLAYING WITH"'"THE ";t$(7)'"BALLS (";t$(8);")" Bn=j6:.2~L,20:.2~L,24:n:j,20 dQP(J,TW)=B1*(P(J,J)=J)+B2*(P(J,J)=TW):P(TW,TW)=B1*(P(TW,J)=J)+B2*(P(TW,J)=TW): XVfv+j:TN,Z;"MIN";TN,TN;"MAX";11 ,Z;"| | | | | | | ":Z,80P:103g,Z ]i14'14'"USE THE 5 & 8"'"KEYS TO SELECT"'"STRENGTH"''14'"PRESS ENTER"'"TO SHOOT" b]41868,491:"";:mc=41800H:st=br*(j+254*(41868-j)/96`)  L90102#:p(t,tw)J/THp(t,th)=z"8600" !; p(t,th)=tw"8530"+th*:fm=j !<+p(t,th)=thp(t,th)=fo"8540"+tw*:fm=j !=-P(T,TH)=FVP(T,TH)=FV+J"8550"+TH*:FM=J !>(p(t,th)=jfo+th*:"8520"+fo*:fm=j !?"P(T,TH)>FV+J"8560"+fv*:FM=J !C "8600" !H"WHAT A PITY": !I"TRY HARDER": !J"DON'T DO IT"'"AGAIN!": !K"NEVER MIND": !L"MAKE IT THE"'"ONLY ONE!": !R"POOR EFFORT!": !S"OH DEAR!": !T"BAD MISTAKE!": !U"NUMBER ";p(t,th)+j: !\"NOT GOOD"'"ENOUGH!": !]"HOPELESS!!": !^"NOT AGAIN!?": !f,"YOU'RE NOT"'"TAKING THIS"'"SERIOUSLY!!": !g"PATHETIC!!": !h"CONCEDE!!": !i%"HAVE YOU TRIED"'"PLAYING GOLF??": !p"WHY NOT GIVE"'"UP NOW!!": !q"THIS MUST BE"'"A JOKE!!": !r"NO COMMENT!!": !s"WELL PLAYED!!*?": !t!"HAVE YOU BEEN"'"DRINKING?!!": !u"YOUR ";P(T,TH)+J;"th!": !;p(t,th)=p(t,th)+j:fmfm=z:1.5@,-tn:"9010":'''' " #'INITIALIZE #(:z=ç:j=/:tw=j+j:th=tw+j:fo=tw+tw:fv=fo+j:x=j:y=j:tn=fv+fv:end="7500":LE=Z:b$(tw,th+fo):n$(tw,fo*th):cue="42773":"9300" #*Pz:z:42773,120x:42774,175:b1=z:b2=z:fm=z:p(tw,tn) #-_fr=z:t=j:bp=z:br=.4L+.2~L*-.1}L:cb=428000:9200#:MC=42500 #0#b$(j)="":b$(tw)="" #1"SET UP SCREEN AFTER EACH HIT #242520,l(44000):42521,h(44000):42522,l(16384@):42523,h(16384@):42524,l(6912):42525,h(6912) #<$:mc=42500:mc=42200ؤ #KZ;3+4*(t=1);t=1;J,J;N$(J);3+4*(t=2);t=2;FV,J;N$(TW);4;0;6-4*(p(1,1)=1),1;b$(1,b1*(p(j,j)>0));5-4*(p(1,1)=1),13 ;b$(1,bp>0);6-4*(p(1,1)=2),1;b$(2,b2*(p(j,j)>0));5-4*(p(1,1)=2),13 ;b$(2,bp>0) # #42520,l(430604):42521,h(430604):42522,l(428000):42523,h(428000):42524,l(257):42525,h(257) # $T?th+fo,z;"DO YOU WISH TO PLAY IN A LEAGUE?"''tn+th;"(Y/N)" $^|="y"Ŧ="Y"le=j:gn=j:"9320":'''"GAME No ";gn;":-"''l$(y,tn+tw);" v ";l$(x,tn+tw)''"PRESS ANY KEY TO CONTINUE":z: $c="n"Ŧ="N""9380" $f 9310^$ $hM:.5,tn+tn:th+fo,z;" DO YOU WISH TO LOAD A TABLE?"''tn+th;"(Y/N)" $i="Y"Ŧ="y"l(fo+fo,fo)::"LEAGUE"l$():gn=l$(tn+tw):np=l$(tn-j):x=l$(tn):y=l$(tn+j):n=jnp:l(n,tw)=l$(n,13 ):l(n,th)=l$(n,14):l(n,j)=l(n,tw)+l(n,th):l(n,fo)=l(n,tw):n:"9340": $j="N"Ŧ="n""9324" $k "9321" $lU:"HOW MANY PLAYERS? (MAX 8)";q$:n=j̱q$:q$(n)<47/ůq$(n)>58:"9324" $mn $nq$="""9324" $pq$>"8"Űq$np)): $K:th+fo,th+th;"ENTER PLAYERS' NAMES"'''6;"(MAX. 12 CHARACTERS)" $7"PLAYER 1 ";N$(J):n$(j)<"65"űn$(j)>"12""9385" $:"PLAYER 2 ";n$(tw):n$(tw)<"65"űn$(tw)>"12""9387" $ $42520,l(50950):42521,h(50950):42522,l(16384@):42523,h(16384@):42524,l(6912):42525,h(6912) $mc="42500" $="""9410" $B/::"7","2";"DO YOU REQUIRE INSTRUCTIONS?"''"13";"(Y/N)" $="n"Ŧ="N"exp=/: $="Y"Ŧ="y""9450" $ "9417" $/::''" WELCOME TO ABRASCO POOL!"''''" THIS IS A GAME FOR 2 TO 8"''" PLAYERS AND IS BASED FAIRLY"''" CLOSELY ON THE POPULAR GAME"''''" IF YOU HAVE NOT PLAYED POOL"''" THEN READ THE FOLLOWING RULES"''" CAREFULLY" $ "9600" $y:''" (IF YOU'VE PLAYED BEFORE YOU"''" MAY FIND THE RULES"''" DIFFER SLIGHTLY FROM THOSE"''" THAT YOU ARE USED TO)" $ "9600" $:''" THE GAME IS PLAYED ON A TABLE"''" WHICH HAS SIX POCKETS"''''" THERE ARE FOUR TYPES OF BALL"''" WHICH ARE DEPICTED AS"''" FOLLOWS:-" %z''" ... STRIPES ... SPOTS ... THE BLACK ... THE CUE-BALL" % "9600" % ''" AT THE BEGINNING OF THE GAME"''" THE SPOTS AND STRIPES"''" (7 OF EACH) AND THE BLACK"''" ARE SET UP IN A TRIANGLE AT"''" ONE END OF THE TABLE."''" THE CUE-BALL IS PLACED AT THE"''" OTHER END" %"9600"::''" THE TWO PLAYERS THEN TAKE"''" TURNS TO TRY TO ""POT"" ONE"''" OF THE STRIPES OR SPOTS INTO"''" A POCKET BY STRIKING IT WITH"''" THE CUE BALL" %"9600":''" WHEN THE FIRST BALL IS POTTED"''" THE PLAYER WHO POTTED IT THEN"''" HAS TO POT ALL THE OTHER"''" BALLS OF THE SAME TYPE,"''" FOLLOWED BY THE BLACK."''''" THE OPPONENT DOES LIKEWISE"''" WITH BALLS OF THE OPPOSITE"''" TYPE" %!v"9600":''" WHEN YOU POT A BALL YOU"''" HAVE AN EXTRA TURN."''''" IF YOU PLAY A FOUL SHOT"''" YOU LOSE A TURN." %&"9600":''" YOU PLAY A FOUL SHOT IF...."''''" 1. THE FIRST BALL YOU STRIKE"''" IS YOUR OPPONENTS"'''" 2. YOU POT ONE OF YOUR "''" OPPONENTS BALLS"'''" 3. YOU DON'T HIT A BALL"'''" 4. YOU POT THE CUE-BALL" %0"9600":''" IF YOU DO POT THE CUE-BALL"''" YOUR OPPONENT REPLACES IT"''" WITHIN A CERTAIN AREA"''" OF THE TABLE."''''" YOU LOSE THE GAME IF YOU POT"''" THE BLACK WITH A FOUL SHOT,"''" OR IF ANY OF YOUR BALLS ARE"''" LEFT ON THE TABLE. TAKE CARE!" %5"9600":''" TO AIM THE CUE-BALL YOU MOVE"''" A SMALL CIRCLE () ROUND"''" THE EDGE OF THE TABLE USING"''" THE CURSOR KEYS. THE 0 KEY"''" ALLOWS RAPID MOVEMENT."''''" PLACE THE CIRCLE IN THE "''" DIRECTION FROM WHICH YOU WANT"''" TO HIT THE BALL" %: "9600":''" UP TO 8 PLAYERS CAN TAKE PART"''" IN A LEAGUE."'''" EACH PLAYER PLAYS EVERY OTHER"''" PLAYER TWICE AND A TABLE IS"''" DISPLAYED AT THE END OF EACH"''" GAME SHOWING THE NUMBER OF"''" GAMES PLAYED, THE NUMBER OF"''" GAMES WON AND LOST, AND THE"''" NUMBER OF POINTS." %?"9600":''" YOU CAN SAVE A LEAGUE ON TAPE"''" BEFORE ALL THE GAMES ARE"''" COMPLETED, AND THEN LOAD IT"''" BACK AT A LATER DATE."''''" FINALLY IF ALL THIS SEEMS A"''" LITTLE COMPLICATED, DON'T"''" WORRY THERE ARE PLENTY OF ON-"''" SCREEN INSTRUCTIONS!" %DC#1;" WOULD YOU LIKE TO SEE THE"''" INSTRUCTIONS AGAIN?" % %3"21","2";"PRESS ANY KEY TO CONTINUE":ç:: 'v1.0 x4g 0XS22Ф:\G8>2Τ2Ϥ!0~ ü!դL*ʜx4ݾ (< @4~ w5nÊ4ݾ (< @4~ w5sÊ4ݾ (< @4~ w5}Ê5ݾ (< @5~ w5nÊ5ݾ (< @5~ w5(tÊ5ݾ (< @5~ w5}`5ݾ (< @5~ w5()>4ݾ (< @4~ w5( 4 4555~ wӞ@>28:Ф0*ΤR+  "Τ>ݾ($( ~7R~mڈ!0R(/~ 0&8 ~#+ 80,ͣ~՟ڟߟͣ~ͺ~ߟͺ~՟ڟ~0R8MaЧV0D~8=086!Ф>(5566666666*ѤR "Ѥ> w w@ww>w͹~V0WWG_#~V+0WWWGQ*ӤR "Ӥ~F8 #~F+08 #~F+0AF~W#~F+@ ~FW#F~+uãF~W#~F+=q~FW#~F+աͣͣ6 q q q#q#w!Τ>##4 5@5@~Ɵz 5@5@~Ɵߟߟz 5@5@~Ɵڟ 4@4@~Ɵ՟՟ 4@4@~Ɵz 4@4@~Ɵߟz 4@4@~Ɵڟ 5@5@~Ɵ՟!͵! ͵!@>Wv>ǵ>G!R+ ~a04~85aO2!͵B0)!0~ 2\@K[*@!@I>G>G(t>W(>_(9>g(E>g(~(~4~(~p5~(p~4~(p~5~(("~(p("~(4~(5~p(5~(4!R+ !0! #!%!=! }! f!X! {!T!!5!  %!o!w!w!!!!!!!!!!!!ď!??                  `````````````````````````````````````@@```@``````````````````````````````````````````?``````````````````````````````````````````````````````````````````_```````@```````^``_`@@@@@@@@??`?????`?``````````````>``?``````````````````````````````````````<``````````|D~B```@````@@@B<D@B$@BBB???>```````|B~B~<B><<<``````````8<@@||~<<