v`0%? ! 6XD:\a@>B>~xB>~x<~Bͮd`ҮҮ׮\cƄYX![!HP! !  K SRP 236099\,75K =:0,6;6;1;"LIMITED OVER CRICKET" (x$=" ":v$=" _":z$=" ":t(2,3):r(2,11 ,3):s(2,6,5):w$(7,4):t$(2,12 ,10 ):s$(2,7,10 ) 2n=111 :r(1,n,2)=7:r(2,n,2)=7:r(1,n,3)=7:r(2,n,3)=7:n:p(11 ,2):n=111 :p(n,1):p(n,2):n:n=17:w$(n):n <c=0:''"Do you want to enter your own teams or use the teams held by the Computer?"''"The computer holds teams for England and Australia."''"Press Y to use Computer teams,"''" N to load your own." Fc= Pc=121y110n Zc=110n130 d 70F nv:n=112 :t$(1,n):t$(2,n):n:n=17:s$(1,n):s$(2,n):n:400 I:"Press Capital Shift and enter the letter C ";q$:q$"C"130 "Team name and Player names must not exceed 10 Letters. Please Enter your team data now.":"Team No 1 Name? ";t$(1,12 ):'t$(1,12 ) ec=111 :c+5,0;c;:"Player Name? ";t$(1,c):5;t$(1,c):c Q"Team No 2 Name? ";t$(2,12 ):4,15;t$(2,12 ) gc=111 :c+5,15;c;:"Player Name? ";t$(2,c):19;t$(2,c):c S9100#:t$(1,12 ):n=111 :n;5;t$(1,n):n r'"Select 6 players as bowlers and enter their team Number in orderof merit: i.e. Your best bowlersnumber first." `c=16:"Player No? ";z:s$(1,c)=t$(1,z):z,15;"Bowler No ";c:c S9100#:t$(2,12 ):n=111 :n;5;t$(2,n):n r'"Select 6 players as bowlers and enter their team Number in orderof merit: i.e. Your best bowlersnumber first." `c=16:"Player No? ";z:s$(2,c)=t$(2,z):z,15;"Bowler No ";c:c 9100#:"CHECKING":n=26:c=1n-1:s$(1,n)=s$(1,c)s$(2,n)=s$(2,c)260 c:n:340T '"A mistake has been made and a player(s) has been nominated more than once as a bowler.":'t$(1,12 ),t$(2,12 ):n=16:n+6,0;n;4;s$(1,n),n;19;s$(2,n):n j'"Please check your mistake. You will be asked to re-enter your Bowlers again.":9100#:180 T!"Please release CAPS SHIFT NOW" ^""Enter c ";q$:q$"c"350^ :end=0:win=-10 :"Please select the type of game you want to play by pressing theappropriate key."'''"<1> JOHN PLAYER LEAGUE."'" 40 Overs per side"'" 8 Over limit per bowler."''"<2> WORLD CUP SERIES"'4;"50 Overs per side"'4;"10 Over limit per bowler"''"<3> PRUDENTIAL CUP MATCH."'4;"55 Overs per side"'4;"11 Over limit per bowler.":c=0 c=:c=491og=40(:ob=8:g$="JOHN PLAYER LEAGUE":n=9 15:n,0;z$:n:9 ,10 ;"SELECTED":9100#:450 c=502og=502:ob=10 :g$="WORLD CUP SERIES":5,0;z$;z$;z$;13 ,0;z$;z$;z$;13 ,10 ;"SELECTED":9100#:450 c=513og=557:ob=11 :g$="PRUDENTIAL TROPHY":n=511 :n,0;z$:n:17,10 ;"SELECTED":9100#:450  410  &:9 ;"Teams"'t$(1,12 ),t$(2,12 ):1,0;1;v$:n=111 :n+1,0;n;3;t$(1,n),n;19;t$(2,n):n:'"Bowlers in merit order are:"'':n=16:n;3;s$(1,n),n;19;s$(2,n):n *Ho=0:v=0:w=0:toss=(*2)+1:9100# 4z"The toss has been made and has been won by ";t$(toss,12 )''"Press 1 to BAT"''" 2 to BOWL":c=0 Hdc=:c=491toss=1c=502toss=2''t$(1,12 );" to BAT":900 R^c=502toss=1c=491toss=2''t$(2,12 );" to BAT":890z \ 840H zu$(12 ,10 ):n=112 :u$(n)=t$(1,n):t$(1,n)=t$(2,n):t$(2,n)=u$(n):n:n=16:u$(n)=s$(1,n):s$(1,n)=s$(2,n):s$(2,n)=u$(n):n 9100#:"Would you please confirm that you do not wish to make any amendments to the team details."''"Press A to amend."''"Press C to continue.":c=0 kc=:c=97a'"O.K. You will be returned to thestart and asked to load teams again.":9100#: .c=99ci=1:j=2:1000  930 d=0:v=0:w=0:k1=1:k2=2:k3=1:r(i,1,2)=6:r(i,2,2)=6:6000p ball=0:ro=0 end=17500L Bwin-10 win=win-runs:win06000p:7500L (?ex=0:runs=0:ball=6100d:3900< 255l=l-256 W55000,l:l=55002:l=55001:l<5l>6ball=ball+1 1500+(l*502) 1,10 ;0;1;"STUMPED":10 ,8;" ";10 ,9 ;7;"";10 ,11 ;" ";10 ,12 ;"";9 ,19;"";10 ,10 ;0;"":r(i,k3,2)=3 Jn=110 :.15~,0:.1}L,-10 :n:3500 @~10 ,8;"";9 ,19;"";1,10 ;0;1;"L.B.W":r(i,k3,2)=1:1560 r10 ,10 ;0;"";1,10 ;1;"BOWLED":9 ,19;"";10 ,8;"":r(i,k3,2)=2:1560 f=(*11 )+1:x=p(f,1):y=p(f,2):2300:1,10 ;0;1;"CAUGHT":p(f,1),p(f,2);"";9 ,19;"":r(i,k3,2)=4:1560 /1,10 ;0;1;"NO BALL" z.2~L,-10 :t(i,1)=t(i,1)+1:t(i,2)=t(i,2)+1:win-10 win=win-1  1300 81,10 ;0;1;"WIDE":1760 :Oex=1:1,0;0;"EXTRAS":a=11 :b=(*6):f=11 :2310 :15:1;96`,90Z:1;xt,yt:a,b;0;"";10 ,10 ;"":10 ,11 ;"":b<21,10 ;0;"4 BYES":n=15:.1}L,10 :n:runs=4:3700t D 2500 lf=(*3)+2 v6x=p(f,1):y=p(f,2):a=x:b=y:2300 15:1;96`,90Z:1;xd,yt:x,y;"";10 ,11 ;"";10 ,10 ;0;"";1,0;"FIELDED":2535 oa=(*8)+2:b=(*11 )+1:n=14:a=p(n,1)b=p(n,2)1950 2n:2310 :f=4:b/a<1f=2 10 :1;96`,90Z:1;xt,yt:10 ,11 ;"";10 ,10 ;0;"":a,b;0;"":56200,0:56201,a:56202,b:l=56203:runs=56200:2500 $f=(*3)+5:1910v a=(*8)+2:b=(*19)+12 :n=13:a=p(n+4,1)b=p(n+4,2)2050  1n:2310 :f=5:b>18f=6 !a>8b<22f=7 10 :1;96`,90Z:1;xt,yt:10 ,20;0;"";a,b;"":56260,0:56261,a:56262,b:l=56263:runs=56260:2500 4$f=(*2)+8:1910v fa=(*8)+12 :b=(*19)+12 :n=12:a=p(n+7,1)b=p(n+7,2)2150f p1n:2310 :f=8:b<20f=9 z10 :1;96`,90Z:1;xt,yt:a,b;0;"";10 ,20;"":56320,0:56321,a:56322,b:l=56323:runs=56320:2500 %f=(*2)+10 :1910v ʀa=(*9 )+11 :b=(*11 )+1:n=12:a=p(n+9 ,1)b=p(n+9 ,2)2250 2n:2310 :f=10 :b<7f=11 10 :1;96`,90Z:1;xt,yt:10 ,11 ;"";a,b;0;"";10 ,10 ;"":56380<,0:56381=,a:56382>,b:l=56383?:runs=56380<:2500 cxt=(y*8)-96`:yt=78N-(x*8):.005y# =,10 :96`,90Z:xt,yt: cxt=(b*8)-96`:yt=78N-(a*8):.005y# =,10 :96`,90Z:xt,yt: ``ball=ball+1:10 ,8;"";1,0;0;"WICKET KEEPER":1300 runs=02530 3<.1}Lr(i,k3,1)>25runs=6 ^1,10 ;1;runs;" RUNS":n=16:.2~L,15:n:3600 op(f,1),p(f,2);1;"";1,10 ;0;1;"RUN? Y/N":c=0:2540 op(f,1),p(f,2);1;"";1,10 ;0;1;"RUN? Y/N":c=0:2540 c= c=110n3600 5c=121y1,10 ;x$;x$;x$:2560 2540 `x=p(f,1):y=p(f,2):h1=a-x:h2=b-y:h3=11 :h10h202600( #h10h2>02700 #h1>0h202800 #h1>0h2>02900T (h1=02640P 2c=xa-1:c,y;"";10 ,h3;" ";11 ,31-h3;" ":2:h3=h3+1:c,y;" ";10 ,h3;"";11 ,31-h3;"" <)h3=19ret=2630F :3000 Fc P8h2=0c=15:a,b;"":c:3100 Zc=yb-1:a,c;"";10 ,h3;" ";11 ,31-h3;" ":2:h3=h3+1:a,c;" ";10 ,h3;"";11 ,31-h3;"" d)h3=19ret=2670n :3000 nc:3100 h1=02740 c=xa-1:c,y;"";10 ,h3;" ";11 ,31-h3;" ":2:h3=h3+1:c,y;" ";10 ,h3;"";11 ,31-h3;"" )h3=19ret=2730 :3000 c 8h2=0c=15:a,b;"":c:3100 c=yb1:a,c;"";10 ,h3;" ";11 ,31-h3;" ":2:h3=h3+1:a,c;" ";10 ,h3;"";11 ,31-h3;"" )h3=19ret=2770 :3000 c:3100 c=xa:c,y;"";10 ,h3;" ";11 ,31-h3;" ":2:h3=h3+1:c,y;" ";10 ,h3;"";11 ,31-h3;"" )h3=19ret=2820 :3000 c:2640P Tc=xa:c,y;"";10 ,h3;" ";11 ,31-h3;" ":2:h3=h3+1:c,y;" ";10 ,h3;"";11 ,31-h3;"" ^)h3=19ret=2920h :3000 hc:2740 10 ,19;" ";11 ,12 ;" ":runs=runs+1:18,0;0;runs;19,0;"Runs":h3=11 :10 ,h3;"";11 ,31-h3;"":z1=0:1,10 ;0;1;"RUN? Y/N" )ret=2630F ret=2820 c,y;"" )ret=2730 ret=2920h c,y;"" ret=2670n a,c;"" ret=2770 a,c;"" !z1=:z1=110n3600 6z1=121y1,10 ;x$;x$;x$:3050 3020 Gret=2630F ret=2730 ret=2820 ret=2920h c,y;" " )ret=2670n ret=2770 a,c;" " ret va,b;"":h4=b*8:h5=168-a*8:h6=(*10 )+3:b<16h7=83S-h4:h8=92\-h5 0-b16h7=163-h4:h8=92\-h5 :h4,h5:c=1h6:10 ,h3;" ";11 ,31-h3;" ":h7/h6,h8/h6:h3=h3+1:2:10 ,h3;"";11 ,31-h3;"";10 ,10 ;0;"";10 ,20;"":h3=19ret=3150N :3000 NJc:>.45ffff1,0;0;1;"RUN OUT":3170b Xruns=runs+1:10 ,10 ;0;"";10 ,20;"";1,0;1;0;"RUN OUT MISSED":n=110 :.1}L,10 :n:3600 bb<1610 ,8;"";10 ,10 ;0;"":n=110 :.1}L,0:.1}L,-10 :n:3800 l9 ,19;"";10 ,20;0;"":n=110 :.1}L,0:.1}L,-10 :n:3800 {w=1:t(i,3)=t(i,3)+1:s(j,v,4)=s(j,v,4)+1:r(i,k3,3)=v:k1=k3k1=0 k2=k3k2=0 6000p #d=1end=13950n w=0:1300 ex=13700t 2r(i,k3,1)=r(i,k3,1)+runs:ro=ro+runs $Tt(i,2)=t(i,2)+runs:k3=k1runs=1runs=3k3=k2:1300 )4k3=k2runs=1runs=3k3=k1:1300 . 1300 t,t(i,1)=t(i,1)+runs:3620$ ؆ex=1t(i,1)=t(i,1)+runs:t(i,2)=t(i,2)+runs:w=1:t(i,3)=t(i,3)+1:3810 tr(i,k3,1)=r(i,k3,1)+runs:t(i,2)=t(i,2)+runs:w=1:t(i,3)=t(i,3)+1 Zruns=runs+1:k3=k1runs=1runs=3k3=k2:runs=runs-1:3840 Gk3=k2runs=1runs=3k3=k1:runs=runs-1:3840 runs=runs-1 b<163870  Kk1=k3r(i,k2,2)=5:k2=0:6000p:k3=k1:3540 Kk2=k3r(i,k1,2)=5:k1=0:6000p:k3=k2:3540 Dk1=k3r(i,k1,2)=5:k1=0:6000p:3540 (=r(i,k2,2)=5:k2=0:6000p:3540 480c<557c=c-480:6100  6080 ԗc=v20,0;z$;z$:20,0;s$(j,c);" has just bowled":n=110 :.2~L,0:n:20,0;z$:6060 پs(j,c,1)=ob20,0;z$;z$:20,0;s$(j,c);" has bowled his"'ob;" Over entitlement":n=110 :.1}L,0:n:20,0;z$;z$:6060 v=c: 220,0;"ENTER NEW BATSMAN NUMBER ":z "z<3z>11 6130 r(i,z,2)720,0;z$;z$:20,0;"ILLEGAL BATSMAN NUMBER":n=110 :.1}L,0:n:6130 k1=0k1=z:k3=z k2=0k2=z:k3=z $%w=0:r(i,z,2)=6: 8runs=0:20,0;z$;z$;20,0;"INNINGS CLOSED. ";:1;2;"Press S to copy Scorecard Press C to continue":c=0 L:c=:c=115s20,0;z$;z$::6250j Vc=99c6250j ` 6220L j:i=26500d d=1:win=t(1,2)+1:0,10 ;"SCORECARD";3,6;g$;6,0;t$(1,12 );15;t(1,2):t(1,3)10 6,18;"-";t(1,3);" Wkts" ro=0:''t$(2,12 );" to BAT"'''"Require ";win;" runs to win.":i=2:j=1:9100#: dend=1:win=-10 :0,10 ;"SCORECARD";3,8;g$;6,0;t$(1,12 );15;t(1,2):t(1,3)10 6,18;"-";t(1,3);" Wkts" n10 ,0;t$(2,12 );15;t(2,2):t(2,3)10 10 ,18;"-";t(2,3);" Wkts": xt(1,2)>t(2,2)'''t$(1,12 );" Won by ";t(1,2)-t(2,2);" runs.":9100#: }t(1,2) or ":c=0 Vc= `c=110n jc=121y t 7510V Computer Rentals Ltd 1983 #(10 ,8,9 ,7,8,8,7,10 ,5,15,7,22,9 ,19,14,24,15,15,15,10 ,14,3 #2/"LBW","BWLD","STMD","CT","R/OT","N/OT"," " #<"COOK","WESSELS","FOWLER","DYSON","GOWER","CHAPPELL","LAMB","HUGHES","BOTHAM","HOOKES","RANDALL","BORDER","MILLER","MARSH","PRINGLE","YARDLEY","TAYLOR","HOGG","WILLIS","THOMSON","COWANS","LAWSON","ENGLAND","AUSTRALIA" #Fx"WILLIS","HOGG","BOTHAM","LAWSON","COWANS","THOMSON","MILLER","YARDLEY","PRINGLE","CHAPPELL","FOWLER","BORDER"," "," " ##"Press ENTER to continue ";q$:: &8"cricket"9910&:"mcode"55000,1500: &4:4:0: &-55000:"mcode"55000,1500 &:10 ,10 ;1;"STOP THE TAPE":500: X V _Z #Q                      3.!LBW BWLDSTMDCT R/OTN/OT  ӓ 2 s      c""  (p(cricket R&L:M׮M3׮ҮҮ56e3Y'm0%> :G>(( <>2<((>2<((>2<( (>2<( (>2<( (>2<((>2<(-(>2<(;(> 2<(Z(> 2<((> 2<((> 2<((> 2<((>2>2 >!HHw w>~ w> w w>$ w w w(!9H>w >w> w>} w>: w>8 w>H w> w)!KH> w >0w> w >0w>w >8w>\w >xw>>w >w>w >w>w >w>w >$w!FD>p=(#>!EDw >w +>w >w!d@>`w >w+>w >w >w >w >`w >w!bG>w!@w w >w >w > w w >@w!@w >w w!C>w w w w w w >w w w w>!ZDw >w #>w >w!{@>w >w#>w >`w >w >w >w >w!}G>w!@>@w > w w >w >w >w w >w!@w =w w!C>w w >@w w w!@> w w w w >w w w w>>!H BBBBBB!@>!HBBBBBB!@(W>r =( >!Hw w w w >w w w w!P>w w w= w w!U>w w>@ w!"Pw> w w> w> w> w w> w=!BPw>!CQw>` w> w> w> w> w>!DVw>` w>!dPw> w>!eRw> w>!Hw w w w > w w w w!P>@w w w> w w!U>w w< w!=Pw> w w> w> w> w w>@ w>!]Pw>!\Qw> w> w> w>` w> w>![Vw> w>!{Pw> w>!zRw> w!fS>p=(#:(%(!:( :((  :>2:(%(!:( :((  :>2:()(%:(( :((  :>2:>()(%:=(( :>((  :>>2< P P MNMK\ !v>}:8H44$Bz8B00<\Rx8HHZ<<<$$|y%>]@ \>008x$:<8((H00z8E|T2TT\\T~$$$