ZXTape! 0Created with Ramsoft MakeTZXWORLD LGE rw world lge 91  9000(# 8fff=30:ggg=30:hhh=30:iii=30 7:7:0: ss$=" ":u$="0":w$="0":uu=0:uw=0:um=0:ul=0:we=1 <e1=1:e3=1:e5=1:e2=1:pm=0 ;kp=0:ko=0:rz=0:w=1:js=0 wf$="3142758614235867516273841625384753647182182736452143658713245768324176851526374852617483172835465463728112345678" #\s=1:f=1:sp=2:tr=0:i=0:z=5:in=0:no=0 $lz1=0:z2=0:z3=0:z4=0:z5=0:z6=0:z7=0:z8=0:z9=0 %lj1=0:j2=0:j3=0:j4=0:j5=0:j6=0:j7=0:j8=0:j9=0 &lja=0:jb=0:jc=0:jd=0:je=0:jf=0:jg=0:jh=0:jk=0 '`v=1:u=1:zz=0:qp=0:qq=1:tt=8.6 :tu=9 :ni=9 (n$(8,12 ):p(8,7):t(7):b$(9 ,12 ):z$(9 ,12 ):c$(9 ,12 ):h$(8,12 ) )d$(9 ,12 ):e$(9 ,12 ):g$(9 ,12 ):i$(9 ,12 ):j$(9 ,12 ):k$(9 ,12 ):a$(9 ,12 ) *x=0:r=0 +0y$(r$8,v,,u)=r$(vv+u-1) ,0p$(f$ p,s,f)=f$(ss+f-1) - /:" WORLD LEAGUE " 033,6;"(ET Software) 1991"::1 1a=18 2n$(1)="England L'ns":n$(2)="Denmark Vkgs":n$(3)="U.S.A. Stars":n$(4)="Sweden Selct":n$(5)="Australia Ks" 4Tn$(6)="Czechosl'kia":n$(7)="Poland Pnths":n$(8)="World Select" d19;n$(a):a ih$(1)="England L'ns":h$(2)="Denmark Vkgs":h$(3)="U.S.A. Stars":h$(4)="Sweden Selct":h$(5)="Australia Ks" jTh$(6)="Czechosl'kia":h$(7)="Poland Pnths":h$(8)="World Select" o pn=18 rz,17;n tz=z+1:n v(::"THESE CLUBS WANT YOU AS MANAGER!" x&:"press number of your chosen club" "Followed by ENTER",q q<1q>8135 z=5:n=4 9130# q=11200 q=21205 q=31210 q=41215 q=51220 q=61225 q=71230 q=81235 ?az=ea:bz=eb:cz=ec:dz=ed:ez=ee:fz=ef:gz=eg:hz=eh:iz=ei )1:4,0;"Your riders" ;15,0;"You are manager of ";n$(q);s$;s$;s$;s$ 018,0;"ANY RIDER NAME CHANGE y/n?" =""172 ="y"180 ="n"200 "y"Ŧ"n"172 "Select Rider Number ";y y<1y>9 180 (19,0;"New Name, Rider ";y "Max. 12 letters ";z$(y) z=5 y=19 z,sp;z$(y) z=z+1:y 19,0;s$ 170 918,0;s$:20,8;"Press any key" 0:0: 400 y=1ni Tb$(1)="K. Tatum ":b$(2)="S. Cross ":b$(3)="J. Doncaster" pb$(4)="M. Dugard ":b$(5)="S. Wigg ":b$(6)="N. Evitts ":b$(7)="G. Havelock " 8b$(8)="R. Knight ":b$(9 )="A. Silver " q=1z$(y)=b$(y) y80 z,sp;b$(y) z=z+1:y : y=1ni Tc$(1)="T. Knudsen ":c$(2)="P. Ravn ":c$(3)="J. Pedersen " pc$(4)="J. Jorgensen":c$(5)="H. Nielsen ":c$(6)="G. Handburg ":c$(7)="J. Staechman" 8c$(8)="L. Munkedal ":c$(9 )="B. Peterson " q=2z$(y)=c$(y) y80 z,sp;c$(y) z=z+1:y : y=1ni Td$(1)="S. Moran ":d$(2)="R. Correy ":d$(3)="S. Ermolenko" pd$(4)="K. Moran ":d$(5)="R. Miller ":d$(6)="B. Hamill ":d$(7)="G. Hancock " 8d$(8)="B. Ott ":d$(9 )="G. Hicks " q=3z$(y)=d$(y) y80 z,sp;d$(y) z=z+1:y : y=1ni Te$(1)="P. Jonsson ":e$(2)="G. Stenlund ":e$(3)="J. Nilsen " oe$(4)="T.Rickardson":e$(5)="H.Gustafsson":e$(6)="T. Olsson ":e$(7)="J.Andersson " 8e$(8)="C. Ivarsson ":e$(9 )="P. Nahlin " q=4z$(y)=e$(y) y80 z,sp;e$(y) z=z+1:y : y=1ni Wg$(1)="T. Wiltshire":g$(2)="P. Crump ":g$(3)="C. Boyce " pg$(4)="G. Doyle ":g$(5)="L. Adams ":g$(6)="S. Davies ":g$(7)="T. Butler " 8g$(8)="A. Rivett ":g$(9 )="M. Poole " q=5z$(y)=g$(y) y80  z,sp;g$(y) z=z+1:y : y=1ni Ti$(1)="Bo Brhel ":i$(2)="Zdenek Tesar":i$(3)="R. Matousek " pi$(4)="Vlad. Kalina":i$(5)="Vaclav Milik":i$(6)="Anton Kasper":i$(7)="Z.Schneid'nd" 8i$(8)="P. Vandirek ":i$(9 )="Gaspr Forgac"  q=6z$(y)=i$(y)  y80  z,sp;i$(y)  z=z+1:y  : y=1ni Tj$(1)="R.Dolmis'wcz":j$(2)="Tomaz Gollob":j$(3)="Woj. Zaluski" pj$(4)="J. Gomoiski ":j$(5)="Piotr Swist ":j$(6)="Eugn Skupien":j$(7)="J. Olszewski" 8j$(8)="Z. Kasprzak ":j$(9 )="Slawom Dudek" q=7z$(y)=j$(y) y80  z,sp;j$(y) z=z+1:y  y=1ni Tk$(1)="L.Gun'std NR":k$(2)="M.Shirra NZ":k$(3)="A.Castgna IT" pk$(4)="G. Riss GR":k$(5)="K. Niemi FIN":k$(6)="D. Bargh NZ":k$(7)="K. Lausch GR" 8k$(8)="V.Furl'to IT":k$(9 )="Z.Adorjan HU" q=8z$(y)=k$(y) y80  z,sp;k$(y)  z=z+1:y !  $8,10 ;"PLEASE WAIT..." l=14  9400$ x=qr=q424 l o=x  x=qo=r  x$="Away" x=qx$="At Home"  :"Club: ";h$(q) #:"Your Speedway Diary - Week ";w #:"1. Your riders Pts/Mtchs/Avs." :"2. League Table" :"3. Weekly League Fixtures" :"4. Match day" *" Opponents: ";h$(o):" You are ";x$ :"Press chosen number" "Followed by ENTER",b  b<1b>4452  "b=19820\&:400 b=24677E b=3699 /b=4tr=1:2290:1000 y=w "Fixtures for week ";y l=14 )s=8*(y-1)+l*2-1 x=p$(f$,s,f) !s=8*(y-1)+l*2 r=p$(f$,s,f) :h$(x);" v ";h$(r) l :::"Enter another week number"::"(1 to 14) for other" :"Weekly Fixtures" :"Or 99 to continue" "Followed by ENTER",z y=z !y<1y>14719  :700 y=99c400 y99c712 Ju$=z$(8):w$=z$(1):uu=hz:uw=az:ul=j8:um=j1:un=jh:uo=ja zm=z8:zn=z1: Ju$=z$(8):w$=z$(2):uu=hz:uw=bz:ul=j8:um=j2:un=jh:uo=jb zm=z8:zn=z2: Ju$=z$(8):w$=z$(3):uu=hz:uw=cz:ul=j8:um=j3:un=jh:uo=jc zm=z8:zn=z3: Ju$=z$(8):w$=z$(4):uu=hz:uw=dz:ul=j8:um=j4:un=jh:uo=jd zm=z8:zn=z4: Ju$=z$(8):w$=z$(5):uu=hz:uw=ez:ul=j8:um=j5:un=jh:uo=je zm=z8:zn=z5: Ju$=z$(8):w$=z$(6):uu=hz:uw=fz:ul=j8:um=j6:un=jh:uo=jf zm=z8:zn=z6: Ju$=z$(8):w$=z$(7):uu=hz:uw=gz:ul=j8:um=j7:un=jh:uo=jg zm=z8:zn=z7: Jz$(8)=w$:z$(1)=u$:hz=uw:az=uu:j8=um:j1=ul:jh=uo:ja=un z8=zn:z1=zm: Jz$(8)=w$:z$(2)=u$:hz=uw:bz=uu:j8=um:j2=ul:jh=uo:jb=un z8=zn:z2=zm: Jz$(8)=w$:z$(3)=u$:hz=uw:cz=uu:j8=um:j3=ul:jh=uo:jc=un z8=zn:z3=zm: Jz$(8)=w$:z$(4)=u$:hz=uw:dz=uu:j8=um:j4=ul:jh=uo:jd=un z8=zn:z4=zm: Jz$(8)=w$:z$(5)=u$:hz=uw:ez=uu:j8=um:j5=ul:jh=uo:je=un z8=zn:z5=zm: Jz$(8)=w$:z$(6)=u$:hz=uw:fz=uu:j8=um:j6=ul:jh=uo:jf=un z8=zn:z6=zm: Jz$(8)=w$:z$(7)=u$:hz=uw:gz=uu:j8=um:j7=ul:jh=uo:jg=un z8=zn:z7=zm: Ju$=z$(9 ):w$=z$(1):uu=iz:uw=az:ul=j9:um=j1:un=jk:uo=ja zm=z9:zn=z1: Ju$=z$(9 ):w$=z$(2):uu=iz:uw=bz:ul=j9:um=j2:un=jk:uo=jb zm=z9:zn=z2: Ju$=z$(9 ):w$=z$(3):uu=iz:uw=cz:ul=j9:um=j3:un=jk:uo=jc zm=z9:zn=z3: Ju$=z$(9 ):w$=z$(4):uu=iz:uw=dz:ul=j9:um=j4:un=jk:uo=jd zm=z9:zn=z4: Ju$=z$(9 ):w$=z$(5):uu=iz:uw=ez:ul=j9:um=j5:un=jk:uo=je zm=z9:zn=z5: Ju$=z$(9 ):w$=z$(6):uu=iz:uw=fz:ul=j9:um=j6:un=jk:uo=jf zm=z9:zn=z6: Ju$=z$(9 ):w$=z$(7):uu=iz:uw=gz:ul=j9:um=j7:un=jk:uo=jg zm=z9:zn=z7: Jz$(9 )=w$:z$(1)=u$:iz=uw:az=uu:j9=um:j1=ul:jk=uo:ja=un z9=zn:z1=zm: Jz$(9 )=w$:z$(2)=u$:iz=uw:bz=uu:j9=um:j2=ul:jk=uo:jb=un z9=zn:z2=zm: Jz$(9 )=w$:z$(3)=u$:iz=uw:cz=uu:j9=um:j3=ul:jk=uo:jc=un z9=zn:z3=zm: Jz$(9 )=w$:z$(4)=u$:iz=uw:dz=uu:j9=um:j4=ul:jk=uo:jd=un z9=zn:z4=zm: Jz$(9 )=w$:z$(5)=u$:iz=uw:ez=uu:j9=um:j5=ul:jk=uo:je=un z9=zn:z5=zm: Jz$(9 )=w$:z$(6)=u$:iz=uw:fz=uu:j9=um:j6=ul:jk=uo:jf=un z9=zn:z6=zm: Jz$(9 )=w$:z$(7)=u$:iz=uw:gz=uu:j9=um:j7=ul:jk=uo:jg=un z9=zn:z7=zm: teams match day  :z=5  2290 (x=qsp=2:i=0:1030 sp=20:i=18 %:h$(o);" v ";h$(q):1032 :h$(q);" v ";h$(o)  ni=9  y=1ni  y80  z,sp;z$(y) z=z+1:y 1:9190# *x=qsp=20:i=18:1045 sp=2:i=0 ,z=5:ni=7:0:9150# 1250:1 +18,0;s$;19,0;s$ V16,0;"Do you want rider 8 or 9 in team y/n? (May use to alter line-up)" =""1053 ="y"1059#  ="n"1600@ ""y"Ŧ"n"1051 #<18,0;"Which rider- 8 or 9 - number " %"Followed by ENTER",e &e=81065) 'e=9 10764 (!e8e9 1059# )C18,0;"Which rider to change with 8 ":"(1 to 7) " *"Followed by ENTER",as +as81065) , 6100 3 1090B 4in=110786 5 10808 6U20,0;"Sorry, ";z$(9 );" Injured":105i:20,0;s$ 7 1059# 8C18,0;"Which rider to change with 9 ":"(1 to 7) " 9"Followed by ENTER",at :at810808 ; 62008 Bsound E(x=qsp=2:i=0:1095G Fsp=20:i=18 Gz=5:ni=9 Hy=1ni Iy80 J z,sp;z$(y) Kz=z+1:y L 1  1050 eng nea=6:eb=4:ec=6:ed=4:ee=5:ef=3:eg=5:eh=3:ei=4: den nea=6:eb=4:ec=5:ed=4:ee=6:ef=4:eg=3:eh=4:ei=5: usa nea=6:eb=5:ec=6:ed=4:ee=5:ef=3:eg=3:eh=5:ei=3: swe nea=6:eb=3:ec=6:ed=4:ee=5:ef=4:eg=3:eh=3:ei=5: aust nea=6:eb=4:ec=6:ed=4:ee=5:ef=3:eg=5:eh=3:ei=3:  cz nea=6:eb=3:ec=5:ed=5:ee=5:ef=3:eg=3:eh=4:ei=2: pol rea=6:eb=3:ec=5:ed=4:ee=5:ef=3:eg=3:eh=4:ei=3: row rea=5:eb=6:ec=5:ed=5:ee=5:ef=4:eg=3:eh=4:ei=3:  opponents y=17 o11260 a$(y)=b$(y):y Gw>2h$(1)=n$(1)h$(1)=n$(2)1259 Vua=6:ub=4:uc=6:ud=5:ue=5:uf=3:ug=5: Vua=6:ub=4:uc=6:ud=5:ue=5:uf=4:ug=5: o21265 a$(y)=c$(y):y Gw>2h$(2)=n$(1)h$(2)=n$(2)1264 Vua=5:ub=5:uc=6:ud=4:ue=6:uf=5:ug=3: Vua=6:ub=5:uc=6:ud=4:ue=6:uf=5:ug=4: o31270 a$(y)=d$(y):y Gw>2h$(3)=n$(1)h$(3)=n$(2)1269 Vua=6:ub=5:uc=6:ud=4:ue=5:uf=5:ug=3: Vua=6:ub=5:uc=6:ud=4:ue=5:uf=5:ug=4: o41275 a$(y)=e$(y):y Gw>2h$(4)=n$(1)h$(4)=n$(2)1274 Vua=6:ub=4:uc=6:ud=4:ue=5:uf=4:ug=3: Vua=6:ub=4:uc=6:ud=5:ue=5:uf=5:ug=4: o51280 a$(y)=g$(y):y Gw>2h$(5)=n$(1)h$(5)=n$(2)1279 Vua=6:ub=4:uc=6:ud=5:ue=5:uf=3:ug=4: Vua=6:ub=4:uc=6:ud=5:ue=5:uf=3:ug=5: o61285 a$(y)=i$(y):y Gw>2h$(6)=n$(1)h$(6)=n$(2)1284 Vua=6:ub=3:uc=5:ud=2:ue=5:uf=4:ug=2: Vua=6:ub=4:uc=5:ud=3:ue=5:uf=3:ug=2: o71290  a$(y)=j$(y):y Gw>2h$(7)=n$(1)h$(7)=n$(2)1289  Vua=6:ub=3:uc=5:ud=3:ue=5:uf=3:ug=2:  Vua=6:ub=4:uc=5:ud=3:ue=5:uf=3:ug=2:  a$(y)=k$(y):y  Gw>2h$(8)=n$(1)h$(8)=n$(2)1293   Vua=5:ub=6:uc=5:ud=5:ue=5:uf=4:ug=3:  Vua=5:ub=6:uc=5:ud=5:ue=5:uf=5:ug=4: @ E%12 ,0;s$;s$;s$;s$;s$;s$ J " THE LINE UP FOR THE MATCH" L520,9 ;"Press any key":0:0 Shh=0:ww=0 T u=1 sx=q2505 :1653u t 2500 u 0:: ve=12 w xah=y$(r$,v,u) z v=v+1 {ar=y$(r$,v,u) | v=v+1 e=1a2=ah:2301 e=1x4=ar:2321 e=2a1=ah:2351/ e=2x3=ar:2371C  x=q1672 #e=1ad=6:af=1 #e=2ad=7:af=2 t1;z$(ah);1;9 ;ad;ah;0::0;a$(ar);1;9 ;af;ar;0:1676 #e=1ad=1:af=6 #e=2ad=2:af=7 h0;a$(ar);1;9 ;af;ar;0::1;z$(ah);1;9 ;ad;ah;0 e 60,0;"Heat number ";0,12 ;qq qq=151810 qp=11690 hh=ww1810 hh1e3>1e5>1e2>11810 .xj=hh-ww:xj6pm=1:1719  1810  pl=1 x2=a2:x1=a1 pm=18140 ;10 ,0;"Which rider to withdraw ";x1;" or ";x2 "Followed by ENTER",ca ca=x11740 ca=x21741 cax1cax21733 /10 ,31;x1:8100:1743 #10 ,31;x2:8100 Q11 ,0;"Rider replacement - Number":" " "Followed by ENTER",da da>71743 da=x2da=x11743 #rz=1da58132  8110 rz=11757 ca=x11753 ca=x21755 da=x21743 *x1=da:11 ,31;x1:1760 da=x11743  1759 da58132  1751 x2=da:11 ,31;x2  rz=0:250:: e=12 'x=qe=1ad=1:af=6 'x=qe=2ad=2:af=7 'x=oe=1ad=6:af=1 'x=oe=2ad=7:af=2 8e=1ah=x2:a2=ah:ar=x4:2301:2321 8e=2ah=x1:a1=ah:ar=x3:2351/ :2371C  x=q1772 t1;z$(ah);1;9 ;ad;ah;0::0;a$(ar);1;9 ;af;ar;0:1773 h0;a$(ar);1;9 ;af;ar;0::1;z$(ah);1;9 ;ad;ah;0 e 60,0;"Heat number ";0,12 ;qq  1690  x=q1814 ]qq=2qq=4qq=6qq=8qq=9 qq=10  qq=141690  1815 \qq=2qq=4qq=7qq=8qq=9 qq=11 qq=141690 #d65d751690 59 ,0;"Do you want RESERVE 6or7 in? y/n"  9800H& =""1818 ="y"rz=1:1720 ,="n"qp=1:v=v-4:1651s "y"Ŧ"n"1818 &49 ,0;"CHANGE RIDER? 6pts + behind y/n" ' 9800H& (=""1832( )="y"1719 *,="n"qp=1:v=v-4:1651s +"y"Ŧ"n"1832( `w1=h2w1=w1+1 ah1=w2h1=h1+1 bh1=h2h1=h1+1 cw1=w2w1=w1+1 dh1=w1h1=h1+1 eh2=w2w2=w2+1 f1h1=h2h1=w1h1=w2h2=w1h2=w2w1=w22152h gDfff=30:ggg=30:hhh=30:iii=30:2154j h^3600:15,2;"OBJECTION - RE-RUN - RE-RUN":110n:15,2;s$ ic11 ,0;s$;s$;s$;s$:fff=30:ggg=30:hhh=30:iii=30:1692 j 3600 lx=q3905A:2159o m 3900< o/15,0;"PLEASE WAIT FOR RESULT!!!" p%h1>w1h2>w1w2>w1g=w1:2168x q%w1>h2w2>h2h1>h2g=h2:2168x r%h1>w2h2>w2w1>w2g=w2:2168x sw1>h1w2>h1h2>h1g=h1 xzz=zz-1 ym=g93] z-w1=mzz=zz+1:w1=zz:m3,16;w1 |-w2=mzz=zz+1:w2=zz:m4,16;w2 ~-h1=mzz=zz+1:h1=zz:m1,16;h1 -h2=mzz=zz+1:h2=zz:m2,16;h2 m 15,0;s$  zz=0 x=q2204 U2,16;h2;6,16;h1;4,16;w2;8,16;w1 !15,0;"Heat scores" %h$(o);" ";w1+w2;" ";h$(q);" ";h1+h2  2210 U2,16;w2;6,16;w1;4,16;h2;8,16;h1 !15,0;"Heat scores" %h$(q);" ";h1+h2;" ";h$(o);" ";w1+w2 (ww=ww+w1:ww=ww+w2:hh=hh+h1:hh=hh+h2 :"Total scores" x=q2215 h$(o);" ";ww;" ";h$(q);" ";hh  2216 h$(q);" ";hh;" ";h$(o);" ";ww   zz=0 chh+ww=90Ze1=1:e3=1:e5=1:e2=1:qq=1:v=1:2235 8000@:8050r :"Press any key"  0 qq=qq+1 qq=152400`  1651s  aa=hh:bb=ww:tr=1 :"Press any key"  0  7: 8000@:8050r  9800H& #0,10 ;"Press any key" ::"Total scores": x=q2269 h$(o);" ";ww;" ";h$(q);" ";hh  2270 h$(q);" ";hh;" ";h$(o);" ";ww <j1=j1+l1:ja=ja+ra:j2=j2+l2:jb=jb+rb:j3=j3+l3:jc=jc+rc Pj4=j4+l4:jd=jd+rd:j5=j5+l5:je=je+re:j6=j6+l6:jf=jf+rf:jg=jg+rg:j7=j7+l7 kp=12276 iz1=z1+1:z2=z2+1:z3=z3+1:z4=z4+1:z5=z5+1:z6=z6+1:z7=z7+1  4161A Tll=0:lm=0:mm=0:mn=0:nn=0:np=0:pp=0 Tra=0:rb=0:rc=0:rd=0:re=0:rf=0:rg=0 Tl1=0:l2=0:l3=0:l4=0:l5=0:l6=0:l7=0 Td1=4:d2=4:d3=4:d4=4:d5=4:d6=3:d7=3  ah=1se=az ah=2se=bz ah=3se=cz ah=4se=dz ah=5se=ez ah=6se=fz ah=7se=gz  ar=1sf=ua ar=2sf=ub ar=3sf=uc ar=4sf=ud ar=5sf=ue ar=6sf=uf ar=7sf=ug  /ah=1sc=az 0ah=2sc=bz 1ah=3sc=cz 2ah=4sc=dz 3ah=5sc=ez 4ah=6sc=fz 5ah=7sc=gz 6 Car=1sd=ua Dar=2sd=ub Ear=3sd=uc Far=4sd=ud Gar=5sd=ue Har=6sd=uf Iar=7sd=ug J ` e f60,0;"Heat number ";0,12 ;qq j 9800H& l/9 ,0;"Type number of First rider" m"Followed by ENTER",ca o#ca<1ca>72413m px1=ca q9 ,31;x1 t110 ,0;"Type number of Second rider" u"Followed by ENTER",ca v#ca<1ca>72421u wca=x12421u xx2=ca y10 ,31;x2 ~ ttb=1+(*3) 2 ttb=1x3=1:x4=3:2450 3 ttb=2 x3=3:x4=1:2450 & ttb=3x3=1:x4=5 "Please wait..." 1760 Ar$="22117766445576332415623146537722663572412713543145136754": Ar$="22117766445567334251261364357722665327147231451354317645": rr=1+(xy+yx*)   ta=1+(*120x) ta>203525 ta>43510 n1=1: ta>83515 n2=1: ta>143520 n3=1: n4=1:  0,15;" ";2,16;" ";6,16;" ";4,16;" ";8,16;" " t2,19;" ";4,19;" ";6,19;" ";8,19;" ": hpa=2:ph=0 h>aph=2:pa=0 a=hpa=1:ph=1 j=18 n$(j)h$(x)4390& p(j,5)=p(j,5)+ph p(j,6)=p(j,6)+h p(j,7)=p(j,7)+a ;ph=1p(j,4)=p(j,4)+1:4370 ;ph=0p(j,3)=p(j,3)+1:4370 /ph=2p(j,2)=p(j,2)+1 #p(j,1)=p(j,1)+1  4470v &n$(j)h$(r)4470v 0p(j,5)=p(j,5)+pa 5p(j,7)=p(j,7)+h :p(j,6)=p(j,6)+a N;pa=1p(j,4)=p(j,4)+1:4460l X;pa=0p(j,3)=p(j,3)+1:4460l b/pa=2p(j,2)=p(j,2)+1 l#p(j,1)=p(j,1)+1 vj l  i=17 /i=1:"The lge table now being sorted" ?i=3:"This takes about 15-30 seconds - be patient!!!" j=i+18 'p(j,5)>p(i,5)5000 _p(j,5)=p(i,5)(p(j,6)-p(j,7))>(p(i,6)-p(i,7))5000 j i 4 > C518,9 ;1;"Press any key";0 D 0 E F" WORLD LEAGUE TABLE" H%2,14;"p w l d Pts" Ri=18 ["2+i*2,0;n$(i) ]An$(i)=h$(q)1;2+i*2,0;n$(i);0 fj=15 p.2+i*2,3*j+11 ;p(i,j) zj i $ko=1:"FINAL LEAGUE TABLE" +0:" Press any key":1  0: tr=04895 $tr=1tr=0:9820\& w=147000X @w=1w=4w=6w=9 w=12 5100 Mw=2w=5w=7w=10 w=13 in=0:4890   4890  w=w+1:400 ko=17000X  400 $  k=17  t(k)=p(j,k) p(j,k)=p(i,k)  p(i,k)=t(k) k  t$=n$(j)  n$(j)=n$(i)  n$(i)=t$   inj qc=1+(*7) qc=15102 qc=2qb=2 qc=3qb=3 qc=4qb=4 qc=5qb=5 qc=6qb=6 qc=7qb=7 016,0;"Injured-One match- ";z$(qb) %:"To be brought in - ";z$(9 ) )"(Please wait)":in=1:no=1  285 at=qb:qc=0  62008 no=0:9820\&  4890 |$0,15;"Speed rating " }Q1:10 ,0;7;"":0 ~615,0;" ^ - - - - - - -" m1,16;1;h1 ,oo=sc-1m1,19;"Eng. failure" m8,fff;" "  m3,16;0;w1 ,op=sd-1m3,19;"Eng. failure" m7,ggg;" "  m2,16;1;h2 *oq=se-1m2,19;"Rider fell" m6,hhh;" "  m4,16;0;w2 *ot=sf-1m4,19;"Rider fell" m5,iii;" "  "as=1901:921 "as=2903:923 "as=3905:925 "as=4907:927 "as=5909:929 "as=6911:931 "as=7913:933  10753 8"at=1951:971 9"at=2953:973 :"at=3955:975 ;"at=4957:977 <"at=5959:979 ="at=6961:981 >"at=7963:983 Ano=15120 B 10753 X Y :0 ]h$(q)=n$(1)7010b ^h$(q)=n$(2)7015g _ 7030v b"Well done, ";h$(q) c0:"Are the World League Champions":7022n g"Good effort, ";h$(q) h%:"Are the World League Runners-up" n9:"A great team and":"A brilliant Manager":7040 v%"You certainly had some bad luck.." w#:"I'm sure you could do better!" :: :: '"----------"::"Press chosen number" N"1 Final Riders scores/averages":"2 Final League Table":"3 Start new game" "Followed by ENTER",b !b<1b>37047  1 /b=1kp=1:9820\&:7000X /b=2tr=0:ko=1:4677E b=31 @ Ace=h2 K,a2=1ll=ce:ra=ra+ll:l1=l1+1 L,a2=2lm=ce:rb=rb+lm:l2=l2+1 M,a2=3mm=ce:rc=rc+mm:l3=l3+1 N,a2=4mn=ce:rd=rd+mn:l4=l4+1 O,a2=5nn=ce:re=re+nn:l5=l5+1 P,a2=6np=ce:rf=rf+np:l6=l6+1 Q,a2=7pp=ce:rg=rg+pp:l7=l7+1 T rce=h1 s,a1=1ll=ce:ra=ra+ll:l1=l1+1 t,a1=2lm=ce:rb=rb+lm:l2=l2+1 u,a1=3mm=ce:rc=rc+mm:l3=l3+1 v,a1=4mn=ce:rd=rd+mn:l4=l4+1 w,a1=5nn=ce:re=re+nn:l5=l5+1 x,a1=6np=ce:rf=rf+np:l6=l6+1 y,a1=7pp=ce:rg=rg+pp:l7=l7+1 |  ca=1d1=d1-1 ca=2d2=d2-1 ca=3d3=d3-1 ca=4d4=d4-1 ca=5d5=d5-1 ca=6d6=d6-1 ca=7d7=d7-1  #da=1d158130 'da=1d1=d1+1:1750 #da=2d258130 'da=2d2=d2+1:1750 #da=3d358130 'da=3d3=d3+1:1750 #da=4d458130 'da=4d4=d4+1:1750 #da=5d558130 'da=5d5=d5+1:1750 #da=6d658130 'da=6d6=d6+1:1750 #da=7d758130 'da=7d7=d7+1:1750 X0:12 ,0;"Sorry, extra ride(s) taken":1:75K:1743 X0:12 ,0;"Sorry, reserve 6 or 7 only":1:75K:1743 #x3=3x4=58180 .x3=1e1>1x4=28145 $x31x4=1:8160 .x3=3e3>1x4=28150 $x33x4=3:8165 .x3=5e5>1x4=28155 $x35x4=5:8170 .x3=2e2>1x4=28180 $x32x4=2:8175  8190 e1=e1+1:8180 e3=e3+1:8180 e5=e5+1:8180 e2=e2+1 B0:12 ,0;h$(o);" may replace, Oh no!":1 pm=0:1761 #( c=""""+7:v:c,v:c #2 #8L0,0,128,208,248,232,232,16 #9G6,14,7,63?,491,87W,86V,34" #< # #q=1210 #q=2220 #q=3230 #q=4240 #q=5250 #q=6260 #q=7270 #q=8280 # 1 # 9190# #o=1210 #o=2220 #o=3230 #o=4240 #o=5250 #o=6260 #o=7270 #o=8280 # 0 # z=5 #n=1ni #z,i;n #z=z+1:n # $ $)s=8*(w-1)+l*2-1 $x=p$(f$,s,f) $!s=8*(w-1)+l*2 $r=p$(f$,s,f) $ &H &I213 ,0;"Scores this match Rds Pts" &Ky=17 &L" ";z$(y):y &M z=14 &Nn=17 &Oz,0;n &Pz=z+1:n &R14,20;l1;14,26;ra;15,20;l2;15,26;rb;16,20;l3;16,26;rc &UY17,20;l4;17,26;rd;18,20;l5;18,26;re &VY19,20;l6;19,26;rf;20,20;l7;20,26;rg &[ &\ test avs &^4:0,0;"Your team and riders"::h$(q) &_T4,14;"Mchs Rds Pts CMA":i=0:ni=9 :z=6:9191# &`"y=1:sp=2:z=6 &ay=1ni &by80 &c z,sp;z$(y) &dz=z+1:y &e 1 &f@6,16;z1;6,20;j1;6,23;ja &gj1<49835k& &h#z1=0ja=09835k& &iav=ja*4/j1:9885& &j6,27;q$(w$,d) &k@7,16;z2;7,20;j2;7,23;jb &lj2<49840p& &m#z2=0jb=09840p& &nav=jb*4/j2:9885& &o7,27;q$(w$,d) &p@8,16;z3;8,20;j3;8,23;jc &qj3<49845u& &r#z3=0jc=09845u& &sav=jc*4/j3:9885& &t8,27;q$(w$,d) &u@9 ,16;z4;9 ,20;j4;9 ,23;jd &vj4<49850z& &w#z4=0jd=09850z& &xav=jd*4/j4:9885& &y9 ,27;q$(w$,d) &zC10 ,16;z5;10 ,20;j5;10 ,23;je &{j5<49855& &|#z5=0je=09855& &}av=je*4/j5:9885& &~10 ,27;q$(w$,d) &C11 ,16;z6;11 ,20;j6;11 ,23;jf &j6<49860& &#z6=0jf=09860& &av=jf*4/j6:9885& &11 ,27;q$(w$,d) &C12 ,16;z7;12 ,20;j7;12 ,23;jg &j7<49865& &#z7=0jg=09865& &av=jg*4/j7:9885& &12 ,27;q$(w$,d) &C13 ,16;z8;13 ,20;j8;13 ,23;jh &j8<49870& &#z8=0j8=09870& &av=jh*4/j8:9885& &13 ,27;q$(w$,d) & &C14,16;z9;14,20;j9;14,23;jk &j9<49876& &#z9=0j9=09876& &av=jk*4/j9:9885& &14,27;q$(w$,d) & kp=1:"FINAL AVERAGES" &:" Press any key" & 0 & & d=4 &w$=(av+0.0005vn) &q$(w$ ,d)=w$(d) & &n=1ni &y,i;n &y=y+1:n & po(#vfghiS U0W0wFp3142758614235867516273841625384753647182182736452143658713245768324176851526374852617483172835465463728112345678sfizu e England L'nsDenmark VkgsU.S.A. StarsSweden SelctAustralia KsCzechosl'kiaPoland PnthsWorld Select&q q q e q q q q q q q xr1D