ZXTape! 2 World Series Cricket - Side BBosoft1984EnglishSportUnknownNoneOriginalpTZXed by Andrew Barker For Chris Thompson Inlay says "Test Match" on front and "World Series Cricket" on spine.5Instructions PLEASE NOTE ----------- Due to a small bug in this program please take care when entering team or player names in CAPS LOCK mode. Befrore pressing the ENTER key please remove the CAPS LOCK otherwise the program will lock up. We trust that this oversight will not affect your enjoyment of the game. -------------------------------------------------------- Cheat ?? Written inside inlay, not part of above notice: LOAD as normal then break into program, add to line 35 LET ou=0 0England v World X1WORLD XI rB 0:0:6: \9 ,5;"TESTMATCH IS LOADING";11 ,10 ;1;2;"PLEASE WAIT" 0:63000:"" 3:4:0: #H7;2;"   " (H7;2;"    " -V7;2;"      " 2\7;2;"       " 7V7;2;"       " <-7;" " d165,70F:17,17:165,70F:10 ,0:182,87W:10 ,0:185,77M:4,4 nr185,77M:0,10 :187,79O:0,10 :189,81Q:0,10 so21,77M:0,10 :23,79O:0,10 :25,81Q:0,10 x21,77M:4,4:38&,70F:17,17:38&,70F:-10 ,0:557,87W:-10 ,0:15,72H:17,17 X10 ,5;144;11 ,5;145;11 ,4;146 s9 ,4;149;8,4;144;9 ,15;161;8,15;160 w15,7;144;16,7;149;14,25;160;15,25;161 s10 ,1;144;11 ,1;149;8,2;144;9 ,2;149 w6,27;160;7,27;161;18,29;160;19,29;161 511 ,28;"o ";12 ,28;" " =18,16;160;19,16;161 , 4:"" NSPEECH % >????&??xpq~>???p~>??~????p?1???>1??`?????B? 7~3?=?c2M&f$1mԶLɱ8̶g;$c-yM1s!N ̉ݒnd˴ۛf^I6gٛ"=g3D0gcfc1Bwm`?{@?h?A!p?<s|c<???#/ ??πx?O~b|C7?ǘ?|??????????`g9a{?1{| !R#LE8: >0+o Z8 {w+z0 #~<(+DM P P P 88 MPP \Wq !v>pxp PPPx `0 ID‚`08x8||||| ? c=1c=45,5;"The Weather is Fine." jfc=25,2;"The Weather is showery and"," the Light poor.",,," Expect stoppages." kSc=35,5;"The Weather is wet."," Expect stoppages for rain." w 200 z:"You have just be selected to","Captain England.":4,0;"As England's best batsman, you","will bat third." 6,0;"Each Innings has 40 overs but","there could be stoppages for","bad weather. If the No. of overs";"lost on each side are unequal,","the match will be decided on run-rate." ^13 ,0;"In the interests of realism the last man will always be nought not out." ^18,0;"First you must take the toss!","Enter H or T for heads or tails." a$::a$="h"a$="t"150 145 c=(*2)+1 c=1170 10 ,10 ;1;"You've won.";12 ,6;0;"Bat first? (Y OR N)":a$::a$="y"bf=1:180 a$="n"1000 160 m:10 ,10 ;1;"You've lost.";12 ,5;0;"World XI are deciding.":100d c=(*2)+1 Uc=116,0;"They've decided to bat first.":200:1000 Vc=216,1;"They've decided to bat second.":bf=1:100d 5:5:1: ^10 ,1;1;"England's innings begins now.":150:0::2000 Et=0:sc=0:o=40(:v=20:x=0:p=1 O3,2;"Your team is:-":n=111 :,e$(n):n:150: :2500 @o=o-1-st-m:eo=eo+1:g=g+st:st=0:m=0 (o+1)>0225 2eo>wow=20(o+1)>01400x &(o+1)0eowo545! '(o+1)0eo10 ga=10 :225 b=3ho=ho+1 Pb=3ho10 w$(10 );"is to bowl this over.",,,"Skill value ";b /b=3ho>10 ho=10 :225 b=2qu=qu+1 Ob=2qu10 w$(9 );"is to bowl this over.",,,"Skill value ";b  /b=2qu>10 qu=10 :225 b=1im=im+1 Ob=1im10 w$(8);"is to bowl this over.",,,"Skill value ";b /b=1im>10 im=10 :225 M6,0;"Enter first letter of stroke andfirst letter of bowler:-" "10 ,10 ;"D = DEFENCE":11 ,10 ;"A = ATTACK":12 ,10 ;"S = STROKE":13 ,10 ;"B = BIG SLOG":c$ '+c$="dg"sc=(*3):ou=(*5) (,c$="dh"sc=( *4):ou=(*6) ),c$="dq"sc=(*4):ou=(*10 ) *,c$="di"sc=(*5):ou=(*12 ) ++c$="sg"sc=(*6):ou=(*4) ,+c$="sh"sc=(*7):ou=(*5) -+c$="sq"sc=(*8):ou=(*5) .+c$="si"sc=(*9 ):ou=(*7) /3c$="ag"sc=(*5)+3:ou=(*3) 03c$="ah"sc=(*9 )+3:ou=(*4) 13c$="aq"sc=(*9 )+5:ou=(*4) 23c$="ai"sc=(*7)+7:ou=(*5) 3/c$="bg"sc=(*10 )+4:ou=2 4/c$="bh"sc=(*10 )+6:ou=2 5=c$="bq"sc=(*10 )+10 :ou=(*3)+1 6=c$="bi"sc=(*15)+15:ou=(*3)+1 <t=t+sc:x=x+sc: =bc=4gar=gar+sc >bc=3hor=hor+sc ?bc=2qur=qur+sc @bc=1imr=imr+sc A(bc=4ou=2gaw=gaw+1 B(bc=3ou=2how=how+1 C(bc=2ou=2quw=quw+1 D(bc=1ou=2imw=imw+1 O P 3700t Q5:5:1: R 9600% S 3500 T?ou=2e$(p);"is out - ";h$(h):j$(p)=h$(h):fir=0 ce(p)=x:b$(p)=w$(bc+7) hB:e$(p);"scored ";sc;" runs.","His innings total is ";x;" runs." 3ou=2p=p+1:x=0:esp=p-1 $eti=eti+i:t=t+i:i=0:esc=t Jp=11 "The Score is ";t;" runs all out."::"Overs remaining = ";o Xp<11 "The Score is ";t;" runs for ";p-1;" wks."::"Overs remaining = ";o <:"Overs bowled = ";eo::"England's run-rate = ";esc/eo: 7w=20"World XI's run-rate = ";wsc/(wo-1) Ew=2019,0;"England = ";esc;" World XI = ";wsc 821,1;"PRESS ANY LETTER TO CONTINUE" =""520  ou=27000X  "p=11 ou=2545!  esc>wscw=201400x p12 195 !:w=20p-1<10 10 ,7;"Innings complete.",,," Total is ";t;" runs for ";p-1;" wks.",,," Wait for final result." #w=20p-1=10 10 ,7;"Innings complete.",,," Total is ";t;" runs for all out.",,," Wait for final result." &w20p-1<10 10 ,7;"Innings complete.",,," Total is ";t;" runs for ";p-1;" wks.",,,"World XI's innings to start now.",," They have ";t;" runs to beat." (w20p-1=10 10 ,7;"Innings complete.",,," Total is ";t;" runs all out.",,,"World XI's innings to start now.",," They have ";t;" runs to beat." +%300,::ou27000X 0w=201400x 7:7:2 WORLD XI BATTING S:sc=0:t=0:o=40(:te=0:p=1:w=20:x=0 _10 ,1;1;"World XI's innings begins now.":150:0::2000 N3,1;"World team is:-":n=111 :,w$(n):n:200 :2500 ao=o-1-st-g:m=m+st:st=0:g=0:wo=wo+1:(o+1)>01035  %o+10woeo1350F 0wo>eov=20o+1>01400x %o+10woescv=201410  1012 F:v20p-1<10 10 ,8;"INNINGS COMPLETE",,," Total is ";t;" runs for ";p-1;" wks.",,," England's innings to start now.",," They have ";t;" runs to beat." Hv20p-1=10 10 ,8;"INNINGS COMPLETE",,," Total is ";t;" runs for all out.",,," England's innings to start now.",," They have ";t;" runs to beat." Pv=20p-1<10 10 ,8;"INNINGS COMPLETE",,," Total is ";t;" runs for ";p-1;".",,," Wait for final result." Rv=20p-1=10 10 ,8;"INNINGS COMPLETE",,," Total is ";t;" runs for all out.",,," Wait for final result." Z 300, iv20180 x6:6:0: z:esc>wscbf=110 ,3;"England win by ";esc-wsc;" runs.",,,,," ";1;"CONGRATULATIONS";0,,,,,"You keep your place as Captain." zescwscbf=010 ,2;"England win by ";10 -esp;" wickets.",,,,,1;12 ,7;"CONGRATULATIONS";0 escg$(1)="No Balls" Cg$(2)="Byes" Hg$(3)="Leg Byes" Mg$(4)="Overthrows" Rg$(5)="Wides" Wh$(1)=" " Xh$(6)="lbw." Yh$(7)="bowled." Zh$(2)="caught." [h$(4)="caught." \h$(3)="stumped." ]h$(5)="played-on." ^h$(8)="bowled." _h$(9 )="bowled."  7c=1c=4o35#o152800 (o<35#o>15a=(*502) !a=2a=12600( a=32700 +a1a2a32800 (st=(*5)+1:10 ,5;"Bad Light stops play.";12 ,2;"Play is reduced by ";st;" overs.":a=0:200::2800 st=(*12 )+1:10 ,5;"Rain disrupts play.";12 ,2;"Play is reduced by ";st;" overs.":200 : x200::10 ,0;"England's run-rate = ";esc/(eo-1)::"World XI's run-rate = ";wsc/(wo-1): 8:(esc/eo)>(wsc/wo)"England win. Superior run-rate." 7(esc/eo)<(wsc/wo)"World XI win. Superior run-rate." Cesc/eo=wsc/woesp>wsp" World XI win by ";10 -wsp;" wkts." Cesc/eo=wsc/woesp.2~L9500% 0l=(*5)+1:i=(*4)+1 g$(l);" = ";i;" runs." l=0:  <3:4:0: *****FIELD PLACINGS**** =11 ,31;160;12 ,31;161 ^3,0;2;""  0,0;6;"";1;1;0,0;"** *** **** ****** ***** **** ********** *** ****** * ** ******** **** ******* ***** ***** *****";0 1,5;0;"";2,5;"";3,5;"";4,5;"":2,5;1;;"~:.'";3,5;"~:'";1,5;"#" s9 ,4;149;8,4;144;9 ,15;161;8,15;160 73,12 ;1;7;"C O R N H I L L" 15,7;144;16,7;149;18,16;160;19,16;161;14,25;160;15,25;161 s10 ,1;144;11 ,1;149;8,2;144;9 ,2;149 w5,27;160;6,27;161;20,29;160;21,29;161 ǘ165,70F:17,17:165,70F:10 ,0:182,87W:10 ,0:185,77M:4,4 r185,77M:0,10 :187,79O:0,10 :189,81Q:0,10 o21,77M:0,10 :23,79O:0,10 :25,81Q:0,10 ʖ21,87W:4,4:38&,70F:17,17:38&,70F:-10 ,0:557,87W:-10 ,0 &15,72H:17,17 **,,,,,*BATSMAN***** 10 ,5;144 11 ,5;145 11 ,4;146  502  RUN-UP  K.25~,0:.25~,0:.25~,0:1,-3  u=30 /11 ,31;" ";12 ,31;" "  n=17:u=u-1 M11 ,u;"o ";12 ,u;" ":2:12 ,u;" ":2 n %11 ,u;" ";12 ,u;" " 165,70F:17,17:165,70F:10 ,0:182,87W:10 ,0:185,77M:4,4 =11 ,23;160;12 ,23;161 ****DELIVERY,,,,,,,,,, @d=21:b=15:d=d-3:11 ,d;"o " d=18165,70F:17,17:165,70F:10 ,0:182,87W:10 ,0:185,77M:4,4  STROKE  &189,81Q:0,10 :d=1511 ,4;" ":10 ,4;"" #d=12 10 ,4;"" 9d=9 11 ,4;" ":10 ,4;"" |d=610 ,4;" ":11 ,4;"";11 ,4;" ";11 ,5;"";11 ,6;"o" b:11 ,7;" " L38&,70F:17,17:557,87W:-10 ,0 ****HOW OUT!********** ou=25200P ou25096 tn=0:yst=0 &sc10 tn=(*4)+1 tn=15115 tn=25160( tn=351702 tn=45130  'sc<10 yst=(*3)+1 yst=15150 yst=25140 yst=35180< gd=11 :e=7:n=18:d=d-1:e=e+2:d,e;"o";d+1,e-2;" " +d=34,21;2;""  n:d,e;" "  3,23;7;""  5184@  td=11 :e=7:n=18:d=d+1:e=e+1:d,e;"o";d-1,e-1;" ":n:d,e;" "  5184@ We=7:n=14:e=e+1:11 ,e;"o";11 ,e-1;" ":n  5184@ td=13 :e=5:n=15:d=d+1:e=e-1:d,e;"o";d-1,e+1;" ":n:d,e;" " ! 5184@ (td=11 :e=8:n=17:d=d+1:e=e+3:d,e;"o";d-1,e-3;" ":n:d,e;" " + 5184@ 2td=11 :e=8:n=17:d=d-1:e=e+3:d,e;"o";d+1,e-3;" ":n:d,e;" " 4 2;4,29;"" 5 5184@  n:d,e;" " ?21,87W:4,4:38&,70F:17,17:38&,70F:-10 ,0:557,87W:-10 ,0 @~.1}L,0:.1}L,1:.1}L,2:.1}L,3:.1}L,4:.1}L,5:.1}L,6 A 5827 Ph=(*7)+3 Uh75300 Z!h=2h=45400 _h=35600 ah=65700D dh=55800 11 ,2;"o" H20,89Y:2,2:23,91[:2,2 64899  8000@  5826 jd=11 :e=7:n=14:d=d-1:e=e+2:d,e;"o";d+1,e-2;" ":n g7,15;162;8,15;163;9 ,15;" ";6,15;"o" 64899 , 8000@ . 5826 }10 ,2;151;11 ,2;145;10 ,3;"o";10 ,1;" ";11 ,1;" " 64899  8000@:  5826 DQ10 ,5;144;11 ,5;149;11 ,6;"o" E64899 I 8000@ N 5826 11 ,5;" ";10 ,5;" ";12 ,3;"o";10 ,4;151;11 ,4;145;12 ,3;" "  5 11 ,2;" ";10 ,3;144;11 ,3;149;10 ,4;" ";11 ,4;" ";12 ,2;"o" 64899 s21,77M:-12 ,10 :23,79O:-8,10 :25,81Q:-5,10 L38&,70F:17,17:557,87W:-10 ,0  8000@ .5,0:.5,0:.1}L,0:.5,0:.5,3:.1}L,2:.5,2:.1}L,0:.5,0:.1}L,-1:.5,0 : p3:3:7: sa=32 :k=-1 u.n=121:a=a-1:k=k+1 z8k,a;"   WELCOME TO THE TESTMATCH " {#a=310,31;" " n 521,12 ;"  "  100d 4:4: ,a=12 :n=08:a=a+1 a,13 ;" " n 12 ,13 ;"" Ia=31:n=115:a=a-2:2;13 ,a;"O " Ya=13 11 ,15;"";11 ,13 ;"";12 ,13 ;" " Fa=11 10 ,11 ;" ";11 ,13 ;" " Ha=9 9 ,9 ;" ";10 ,11 ;" " La=78,7;" ";9 ,9 ;" " Ta=57,5;" ";8,7;" " \a=36,5;" ";7,5;" " da=15,5;" ";6,5;" "  Aa=10;5,5;"H O W ' S T H A T !" N 13 ,0;" " 64899 X100d:0;5,2;" COPYRIGHT TO BOSOFT 1984 ":100d: 7 X ]*1,7;"ENGLAND SCORECARD" b:n=1esp+1:0;e$(n);9 ;j$(n);20;b$(n);29;e(n):n:esp+3,9 ;"not out " *16,1;"Extras";29;eti Vesp<10 18,1;"Total";15;"(for ";esp;" wkts)";29;esc Mesp=10 18,1;"Total";15;"(all out)";29;esc 321,2;"PRESS ANY KEY TO CONTINUE" =""7130 *:3,8;"BOWLING FIGURES" H5,11 ;"OVRS";19;"RUNS";27;"WKTS" H7,1;w$(11 );12 ;ga;20;gar;29;gaw H9 ,1;w$(10 );12 ;ho;20;hor;29;how H11 ,1;w$(9 );12 ;qu;20;qur;29;quw H13 ,1;w$(8);12 ;im;20;imr;29;imw 321,2;"PRESS ANY KEY TO CONTINUE"  =""7435  K Q/:1,7;"WORLD XI SCORECARD": Un=1wsp+1:0;w$(n);9 ;l$(n);20;f$(n);29;w(n):n:wsp+3,9 ;"not out " [*16,1;"Extras";29;wti `Vwsp<10 18,1;"Total";15;"(for ";wsp;" wkts)";29;wsc cMwsp=10 18,1;"Total";15;"(all out)";29;wsc e321,2;"PRESS ANY KEY TO CONTINUE" j=""7530j *:3,8;"BOWLING FIGURES" H5,11 ;"OVRS";19;"RUNS";27;"WKTS" P7,1;e$(11 );12 ;wi+1;20;wir;29;wiw P9 ,1;e$(10 );12 ;co+1;20;cor;29;cow P11 ,1;e$(9 );12 ;di+1;20;dir;29;diw P13 ,1;e$(8);12 ;bo+1;20;bor;29;bow 321,3;"PRESS ANY KEY TO CONTINUE" =""7650 ? @n=110 A!h=2h=48004D B;8,15;162;9 ,15;163 D15,7;162;16,7;163;18,16;162;19,16;163;14,25;162;15,25;163 E98,2;162;9 ,2;163 J5,27;162;6,27;163;20,29;162;21,29;163;9 ,4;163;8,4;162 L.015zu\,40( O15,7;160;16,7;161;18,16;160;19,16;161;14,25;160;15,25;161 Q5,27;160;6,27;161;20,29;160;21,29;161;9 ,4;161;8,4;160 S!h=2h=48025Y T;8,15;160;9 ,15;161 Y.015zu\,30 ]n ^ %rx502fir=0:1;10 ,3;"APPLAUSE FOR A SUPER 50":0:fir=1:9830f& %xx100dfir=1:1;10 ,1;"APPLAUSE FOR A GREAT CENTURY":0:fir=2:9830f& %tx150fir=2:1;10 ,3;"APPLAUSE FOR A GREAT 150":0:fir=3:9830f& %nx200fir=3:1;10 ,7;"A DOUBLE CENTURY !":0:fir=4:9830f& %: &fbn=120:.05|L,n*2:n:tun=n:n=125:.025{L,tun*2:n &z