ZXTape!cricket E32E3sG3$c(c6)=(c*1.28# >+8) ( 2 5000 < 6550 F 5100 P 5130  Z 51702 d 5240x x 5030 5270  ȶx-1,y+2:2,0:x-2,y+1:4,0:x-2,y:4,0:x-2,y-1:4,0:x-1,y-2:2,0  x-1,y+2:2,0:1,-1:0,-2:-1,-1:-2,0:-1,1:0,2:1,1  set up teams s(2):n$(2,11 ):w$(2,7):s(1)=0:s(2)=0:team batting=1:no of in=0:w$(1)="0":w$(2)="0" \t$(2,11 ,7):5015:n$(1)="NETHERLANDS":n$(2)="ENGLAND" 4n=111 :t$(1,n),t$(2,n):n "K'vezee","Bopara","Reekers","Wright","Zuid'nt","Shah","Grooth","Morgan","Bunge","Key","Smits","Foster","Borren","Co'wood","Does'te","Rashid","S'ferli","Broad","Seelaar","And'son","Nannes","Sid'tom"  20090605  open windows 5:4:7: 0,0;"";2;0;31;4;7;"";2;0;31;4;7;"" K0;2;100d,152:0;2;0,15 _7,7:241,0:0,129:-241,0:0,-129 *12 ,10 ;0;" " 8:8: fielder positions &x(11 ):y(11 ):5115 @n=111 :x(n),y(n):x(n)=c(x(n)):y(n)=c(y(n)):n 20,20,90Z,15,502,524,25,85U,93],67C,170,535,173,95_,168,3,140,85U,3,524,133,524   set variables ewickets down=0:batsman1=1:batsman2=2:last bowler=0:next batsman=3 [present batsman=batsman1:bm1 pos=1:bm2 pos=9 :overs=0:extras=0 $b(11 ):h$(11 ,15) .h$(1)="Not Out":h$(2)="Not Out" #$w(5):r(5):o(5) $(boundarys=0:last bowler=0 ( 2 score sheet 70:7:2: Al=111 B'l-1,0;t$(team batting,l) Fl-1,12 ;h$(l) P3h$(l)" "l-1,29;b(l) Ql U&present batsman-1,9 ;"*" Z@not batting=1:team batting=1not batting=2 \I12 ,0;"Overs - ";overs;13 ,0;"Extras - ";extras ]u$=s(team batting)+(" all out"wickets down=10 )+(" / "+wickets downwickets down10 ):12 ,16;u$;12 ,16;1;"____________"(̱u$) _&15,0:n=15 dHt$(not batting,6+n);12 ;o(n);18;r(n);24;w(n) in n x get bowler yQovers=overs+1:overs=no of overs+1overs=overs-1:6250j }g#0;0,0;"What is your choice of bowler (1-5)? ";:k$=:k$<"1"k$>"5"5245} ,bowler=k$:bowler=last bowler5245} 1last bowler=bowler:o(bowler)=o(bowler)+1 #0;bowler:480: =no of in=1s(team batting)>s(not batting)6250j  play over 54306:c=1 !54306:2,30;c =no of in=1s(team batting)>s(not batting)6250j Yn=520:n,1;7;" ":n:5400 #0;0,0,, ?5461U:<1e-2z# =6490Z:c=c-1:5330  5490r 2boundarys=1boundarys=0:5330 .wc=1ƥ<5e-2|Lc$="CT":6080 wc=15330 6001q:nearest<3c$="CT":.072}tj,-40(:1:c(70F),c(546):ballx-c(70F),bally-c(546):15:c(70F),c(546):ballx-c(70F),bally-c(546):0:0;ballx,bally:6080 ](present batsman/5)*>1.7Yc$="BL":12 ,10 ;"\* *|":6080 =*(present batsman/6)>1.1 c$="LBW":6080 #<5e-3y# =c$="ST":6080 .072}tj,-40(:1:c(70F),c(546):ballx-c(70F),bally-c(546):15:c(70F),c(546):ballx-c(70F),bally-c(546):0:0;ballx,bally byes=0:<5e-2|Lbyes=1:#0;1,1;"Byes":.368Q,-25:#0;0,0,,,,  5535 $c=c+1:c<75275 >batsman1=present batsmanpresent batsman=batsman2:90Z present batsman=batsman1  90Z set up players x(11 )=c(133) p=111 "-1:x=x(p):y=y(p):200:9 'p )*0;12 ,10 ;"|* *|" , 6 info screen ;1,1;31;2,1;31;:100d,152:0,15:1,1;t$(team batting,batsman1);":";b(batsman1) @<2,1;t$(team batting,batsman2);":";b(batsman2) E2,13 ;s(team batting);" / ";wickets down:no of in=12,23;"(";s(not batting)+1-s(team batting);")" JZ1,13 ;t$(not batting,bowler+6);" to ";t$(team batting,present batsman) O Ubowl V11:x=c(133):y=74J:200 Y[1:l=c(133)̨c(122z)-2:x=l:y=74J:250:250:l Z"x=l:200:0:8 ]p=72-1 ^12 ,10 +p;"." c#3:12 ,10 +p;" " hp i&12 ,12 ;7;" " kx(11 )=l l r hit ball s{wc=0:<.3#0;1,8;"Wicket Keeper":100d:wc=1:#0;0,0,,,,: w.ballx=c(*187):bally=c(*101e) |kballxc(180)ballyc(99c)6210B:boundarys=1   play ball Ca r=0:nof=0:at ball=0:f=0:wic=1 #0;0,0,,,,:12 ,10 ;0;"|* *|":#0;1,1;"Run (y/n)?","Runs - ";nof /k$=:k$"y"k$"Y"k$"n"k$"N"5544 F#0;0,0,,,,:k$="n"k$="N"a r=16050 k$="n"k$="N"  6740T 'b f=0:r c=0:a r=1  r c=1 r c=1byes=0s(team batting)=s(team batting)+1:b(present batsman)=b(present batsman)+1:r(bowler)=r(bowler)+1:a r=1:nof=nof+1:5566 ^nof=nof+1:extras=extras+1:s(team batting)=s(team batting)+1:a r=1 run out=1  5540  qfind fielder r,fx=0:fy=0:nearest=1000 sa=111 z"diff=(ballx-x(a))+(bally-y(a)) .nearest>diffnearest=diff:fx=x(a):fy=y(a) a   c batsman Qnofɺ(nof/2)*2batsman1=present batsmanpresent batsman=batsman2: Onofɺ(nof/2)*2batsman2=present batsmanpresent batsman=batsman1  out Ł#0;0,0,,,,:c$"LBW"#0;1,1;t$(team batting,present batsman);" has been ";c$:6087 F#0;1,1;t$(team batting,present batsman);" is LBW" Un=120:.005y# =,23+*6:n:#0;0,0,,,, #wickets down=wickets down+1 8c$"Run Out"c$=c$+" "+t$(not batting,bowler+6) Ch$(present batsman)=c$:c$"Run Out"w(bowler)=w(bowler)+1 #wickets down=10 6250j h$(next batsman)="Not Out" &present batsmanbatsman16140 1batsman1=next batsman:present batsman=batsman1  6160 1batsman2=next batsman:present batsman=batsman2 #next batsman=next batsman+1 $$c=c+1:c<75275 . 90Z B boundary G$no=4:<.2~Lno=6 Lfb(present batsman)=b(present batsman)+no:s(team batting)=s(team batting)+no:r(bowler)=r(bowler)+no M.072}tj,-40(:1:c(70F),c(546):ballx-c(70F),bally-c(546):15:c(70F),c(546):ballx-c(70F),bally-c(546):0:0;ballx,bally Q#0;0,0,,,,;1,1;no;" RUNS.":n=502-502-1.5@:.001wn,n:n:1;ballx,bally V!#0;0,0,,,,: jend of innings tk51702:#0;0,0;"Press any key to continue":0:#0;0,0,,,, ySw$(team batting)=wickets down:wickets down=10 w$(team batting)="All out" ~;:no of in=no of in+1:no of in>16340 cn$(team batting);" scored ";s(team batting);" runs":wickets down=10 "all out":6300 #"for ";wickets down;" wicket(s)." F''n$(not batting);" need ";s(team batting)+1;" runs"'"to win." *'''"Press any key to continue.":0 9t=not batting:not batting=team batting:team batting=t  5130   85U finish ;:"FINAL RESULT";0,0;1;"____________" ؉''n$(not batting);" - ";s(not batting);" runs ";:w$(not batting)"All out""for"'14;w$(not batting);" wicket(s).":6370  "all out." ''n$(team batting);" - ";s(team batting);" runs ";:w$(team batting)"All out""for "'14;w$(team batting);" wicket(s).":6380  "all out." vs(not batting)>s(team batting)''n$(not batting);" have won by"'12 ;s(not batting)-s(team batting);" run(s)." )w$(1)="All out"w$(1)="10" )w$(2)="All out"w$(2)="10" vs(team batting)>s(not batting)''n$(team batting);" have won by"'12 ;10 -w$(team batting);" wicket(s)." #s(1)s(2)6465A kw$(1)w$(2)''n$(2);" have won by"'12 ;w$(1)-w$(2);" wicket(s)." A20,0;"Press 'n' to quit, any other keyto play again.";1;20,0;"______________________________________________" Ck$=:k$=""6467C Dk$="n"k$="N"10000' E Z no ball dZ#0;0,0,,,,;1,1;:<.5#0;"WIDE":6510n i#0;"No Ball" n{extras=extras+1:s(team batting)=s(team batting)+1:r(bowler)=r(bowler)+1:.368Q,40(:75K x#0;0,0,,,,   toss coin -0:7:0:1:0 L:"How many overs? ";:o$:n=1̱o$:o$(n)<"0"o$(n)>"9"6565 ;n:no of overs=("0"+o$):no of overs<16565  no of overs (team=2:<.5team=1 "''n$(team);" have won the toss." 5''"Press 1) to bat first"'" 2) to bowl first." !k$=:k$"1"k$"2"6600 ,+team batting=1:not batting=2 6Tk$="1"team=2k$="2"team=1team batting=2:not batting=0 @ T one run ^run out=0 hw=18 r312 ,10 +w;"*";12 ,19-w;"*" |)at ball=06850:6790  6940 kq=:run out=1wic=1q<.5c$="Run Out":12 ,10 ;"\":7040:6080 frun out=1wic=2q<.5c$="Run Out":12 ,19;"/":7040:6080 }run out=1#0;1,1;"Run Out Missed":.144~tk,30:502:#0;0,0,,,,: 312 ,10 +w;" ";12 ,19-w;" " w  move fielder )1:7:x=fx:y=fy:200 0fxballxfx=ballx 0fx>ballxfx=fx-3.84u\:fxballyfy=fy-3.84u\:fyballyfy=bally $ballx=fxbally=fyat ball=1 20:2:x=fx:y=fy:250:8   throw ball &f06980D 05dx=c(60<)-fx:dy=c(546)-fy:wic=1 5]dx2=c(112p)-fx:dy2=c(546)-fy:(dx2+dy2)<(dx+dy)dx=dx2:dy=dy2:wic=2 :3te=7+(*4):stepx=dx/te:stepy=dy/te I f=1 Nfx2=fx+stepx:fy2=fy+stepy Xfx,fy:fx2-fx,fy2-fy b^fx=fx2:fy=fy2:wic=1fx>83Sfx<86Vfy>75Kfy<78Nrun out=1 cPwic=2fx>150fx<153fy>75Kfy<78Nrun out=1 who Qnof=(nof/2)*2present batsman=batsman1present batsman=batsman2: Onof=(nof/2)*2present batsman=batsman2present batsman=batsman1