ZXTape! 0Created with Ramsoft MakeTZXSUPER tAq=502:n=021:xx=((65393q+2*n)-65437):xy=((65392p+2*n)-65436):xx>6n: .pt=xx+xy+((xx-xy)/2):pt6n: .pt=xx+xy+((xx-xy)/2):pt90Zmn=90Z t2=23673y\:1,0:23659k\,0:23689\,2:21;mn;" minutes":23659k\,2:23689\,24: s23659k\,0:23689\,2:" ";7;p$(x+1):23659k\,2:23689\,24: b23659k\,0:23689\,2:12 :23659k\,2:23689\,24:  hi="23":lo="1":wk="1":a$("22","10"):p$("11","10"):a("22","13"):p("12","4"):l$("4","21"):l$("1")="for league champions":l$("2")="to finish in top six":l$("3")="to finish in top half":l$("4")="to avoid relegation !":n="1"̰"22":a$(n):n "Arsenal","Aston V.","Birmingham","Chelsea","Everton","Ipswich T.","Leicester","Liverpool","Luton Town","Man. City","Man.United","Newcastle","Norwich C.","Notts. F.","Oxford C.","Q.P.R.","Sheff.Weds","Southamp'n","Tottenham","Watford","W.B.A.","West Ham" "25":"26":"30" b"24","12","15","29","7","6","3","7","24","48","240","188","224","96","192","224" tn="0"̰"15":x:"T"+n,x:n:n="0"̰"23":x:"A"+n,x:n:"9989":n="0"̰"17":a:"65441"+n,a:n:"65441": "12","8","63","40","30","18","115","64","48","16","252","20","120","72","206","2","0","0","0","0","24","60","60","24" "6":ڰ"6":ٰ"1"::"3","4";"";"4","4";"";"5","4";" ":n="0"̰"7":"98"+n,"139"-n:"4","0":n "10","14";"S";"11","10";" CROSS 1985";"12","14";"F";"13","14";"T";"14","14";"W";"15","14";"A";"16","14";"R";"17","14";"E":"9000" !"5200":"35":"100" #w:n="1"̰"11":n;"3";a$(n):n:n="12"̰"22":n-"12","16";n;"19";a$(n):n:'''"5";"List of current teams"'' ("'" Change any team names ? y/n" )"0":="n" .="y""50" /"41" 2N"Enter team number to change ";r$:"9011":n=(r$):n<"1"n>"22""50" 7Y"17","2";" Current team is ";a$(n):"Enter new team name - 10 letters";a$(n):"35" di"Enter the number of the","team you wish to follow ";r$:"9011":tm=(r$):tm<"1"tm>"22""100" go:" BEFORE FIELDING YOUR TEAM"," PLEASE NOTE THAT THIS IS"," HOW THEY WILL BE LINING UP":"8905":"9000" i:"Your team is ";a$(tm) jMn="1"̰"11":"18","0";"Enter player name for"'"number ";n;" -";:"108" kb"20","0";"Maximum ten letters":p$(n):n+"3","5";n;"8";p$(n);"21";:"108":n:"115" ln="1"" keeper": mn>"1"n<"6"" defender": nn>"5"n<"9"" midfield": o" attacker": s$"9000":"9050":"9100":"6000" ,"4":ڰ"4":ٰ"0":ܰ"0": 1,"310":n="0"̰"45":x:"65392"+n,x:n: 6"10","2","18","8","4","9","8","6","14","6","13","11","16","11","9","11","10","15","14","15","5","15","11","19","15","17","7","16","13","21","3","21","8","21","19","24","4","24","8","26","14","25","10","29","10","16" ^P"65409","13":"65414","10":"65415","16":"65436","10":"65437","15" "7","0":"241","0":"0","175":"-241","0":"0","-175":"127","0":"0","175":ذ"127","87","20":"8","32":"55","0":"0","112":"-55","0":"8","56":"20","0":"0","64":"-20","0":"63","72":"0","32",/"1.8":"247","32":"-56","0":"0","112":"56","0":"247","56":"-20","0":"0","64":"20","0":"191","72":"0","32",-/1.8ffff "10","6";".";"10","25";".":"3","78":"-3","-8":"6","0":"-3","8":"0","36":"3","-8":"-6","0":"3","8":"-3","-8":"0","-36":"252","78":"-3","-8":"6","0":"-3","8":"0","36":"-3","-8":"6","0":"-3","8":"3","-8":"0","-36" Ȏn="1"̰"10":ް"1";(65392p+2*n),(65393q+2*n);"";(65412+2*n),(65413+2*n);"":n Zް"1";"65392","65393";"";"65434","65435";"";"65436","65437";"" p23659k\,0:23689\,2:21;mn;" minutes":23659k\,2:23689\,24: ۟23659k\,0:23689\,1:" ";7;a$(tm);" ";a(tm,12 );" ";a$(op);" ";a(op,12 ):23659k\,2:23689\,24: -502:x=8:4050:4110 1;10 ,16;"";11 ,16;"":10 :1;11 ,16;"";12 ,16;"":10 :1;12 ,16;"";13 ,16;"";:65436,13 :65437,16 x=9 :4050:4110:0.01z# =,10 :0018:xc=-1:yc=(*3)-1:n=4:4615 @.502:x=11 :4050:4160@ J1;10 ,15;"";9 ,15;"":10 :1;9 ,15;"";8,15;"":10 :1;8,15;"";7,15;"";:65436,7:65437,15 Otx=13 :4050:4160@:0.01z# =,3:xc=1:yc=(*3)-1:n=5:4715k  1  4050 p(inty,intx)=34"4110:0.01z# =,10 :18:23637U\,024:23638V\,117u %:4110:23637U\,086V:23638V\,116t 30mn=90Z90102#:200:8600! 4n=p(x+1,1) 5Qxx>30-p(x+1,2)23637U\,115s:23638V\,156 9Gn=0xx>2523637U\,115s:23638V\,156 :n=0q=(*3)*2:xc=((65409+q)-xx):yc=((65408+q)-xy):n=(*p(x+1,2))+1:4590:23637U\,075K:23638V\,190 >Wby=65436+(*3)-1:bx=65437+1:by<0by=0 ?by>21by=21 DA(by,bx)32 23637U\,253:23638V\,119w ECn=3n=123637U\,244:23638V\,121y G.23637U\,042*:23638V\,121y H4205m:(65436,65437)=39'0.01z# =,3:13 :23637U\,154:23638V\,134 Jt(65436,65437)=33!0.01z# =,10 :11 :23637U\,024:23638V\,117u L.23637U\,133:23638V\,155 a n=n-1 fA(by,bx)32 23637U\,253:23638V\,119w k 4205m p`inty=65436:intx=65437:4110:23637U\,104h:23638V\,117u hy=x:yc=xy:xc=xx:p(12 ,4)=0:p(1,1)=0:p(1,3)=0 q=2011 -1 xx=65393q+2*q:65437-xx>0xy=xx-1:inty=xy+(*3)-1:intx=xx+1:p(1,1)=q:gd=((65404|+(*3)*4)-xy):23637U\,162:23638V\,123{ 1q:23637U\,090Z:23638V\,124| inty>21inty=21 inty<0inty=0 Kintx>30intx=30:inty=xy+(10 -xy) #(inty,intx)=32 4160@ q=10 1-1:xx=65393q+2*q:65437-xx>0xy=xx-1:inty=xy+(*3)-1:intx=xx+1:p(12 ,4)=q:23637U\,105i:23638V\,125} 1q:23637U\,014:23638V\,126~ inty>21inty=21 inty<0inty=0 8intx>26intx=26:inty=xy+(10 -xy) #(inty,intx)=32 4110 Jp(1,4)=123637U\,100d:23638V\,128 q=p(1,1)-111 -1:xx=65393q+2*q:65437-xx>0xy=xx-1:inty=xy+(*3)-1:intx=xx+1:p(1,3)=q:gl=((65404|+(*3)*4)-xy):23637U\,172:23638V\,127 1q:23637U\,100d:23638V\,128 inty>21inty=21 inty<0inty=0 Kintx>30intx=30:inty=xy+(10 -xy) #(inty,intx)=32 4160@ Jp(1,1)=023637U\,035#:23638V\,130 :xy=65392p+2*p(1,1):xx=xy+1 q=2p(12 ,3) intx=xx+1:inty=xy+gd inty>21inty=21 inty<0inty=0 Kintx>30intx=30:inty=xy+(10 -xy) E(inty,intx)32 23637U\,035#:23638V\,130 4160@:q Kp(12 ,4)=023637U\,200:23638V\,131 ;xy=65392p+2*p(12 ,4):xx=xy+1 2q=2p(p(12 ,4)+1,3) 1intx=xx+1:inty=xy+(*3)-1 inty>21inty=21 inty<0inty=0 8intx>26intx=26:inty=xy+(10 -xy) #(inty,intx)=32 4110 q .Jp(1,3)=023637U\,135:23638V\,133 2:xy=65392p+2*p(1,3):xx=xy+1 3q=2p(12 ,3) 4intx=xx+1:inty=xy+gl 5inty>21inty=21 6inty<0inty=0 7Kintx>30intx=30:inty=xy+(10 -xy) 8E(inty,intx)32 23637U\,135:23638V\,133 :4160@:q QAx=y:xy=yc:xx=xc:23637U\,042*:23638V\,121y 6 4050 o(inty,intx)=34"4160@:0.01z# =,3:19:23637U\,154:23638V\,134 :4160@:23637U\,217:23638V\,133 0mn=90Z90102#:200:8600! n=p(12 ,1) Oxx21by=21 'by<0by=0 ,A(by,bx)32 23637U\,122z:23638V\,137 -Cn=1n=323637U\,113q:23638V\,139 /.23637U\,167:23638V\,138 04205m:(65436,65437)=33!0.01z# =,10 :11 :23637U\,024:23638V\,117u 2s(65436,65437)=39'0.01z# =,3:13 :23637U\,154:23638V\,134 4.23637U\,133:23638V\,155 I n=n-1 NA(by,bx)32 23637U\,122z:23638V\,137 S 4205m X`inty=65436:intx=65437:4160@:23637U\,233:23638V\,134 hy=x:yc=xy:xc=xx:p(12 ,4)=0:p(1,1)=0:p(1,3)=0 q=110 :xx=65393q+2*q:xx-65437>0xy=xx-1:inty=xy+(*3)-1:intx=xx-1:p(1,1)=q:gd=((65414+(*3)*2)-xy):23637U\,017:23638V\,141 1q:23637U\,199:23638V\,141 inty>21inty=21 inty<0inty=0 Iintx<1intx=1:inty=xy+(10 -xy) #(inty,intx)=32 4110 q=11 20:xx=65393q+2*q:xx-65437>0xy=xx-1:inty=xy+(*3)-1:intx=xx-1:p(12 ,4)=q:23637U\,206:23638V\,142 1q:23637U\,113q:23638V\,143 inty>21inty=21 inty<0inty=0 6intx<5intx=5:inty=xy+(10 -xy) #(inty,intx)=32 4160@ Jp(1,2)=123637U\,188:23638V\,145 q=p(1,1)+110 :xx=65393q+2*q:xx-65437>0xy=xx-1:inty=xy+(*3)-1:intx=xx-1:p(1,3)=q:gl=((65414+(*3)*2)-xy):23637U\,006:23638V\,145 1q:23637U\,188:23638V\,145 inty>21inty=21 inty<0inty=0 Iintx<1intx=1:inty=xy+(10 -xy) #(inty,intx)=32 4110 Jp(1,1)=023637U\,139:23638V\,147 :xy=65392p+2*p(1,1):xx=xy+1 1q=2p(p(1,1)+1,3) intx=xx-1:inty=xy+gd inty>21inty=21 inty<0inty=0 Iintx<1intx=1:inty=xy+(10 -xy) E(inty,intx)32 23637U\,139:23638V\,147 4110:q Kp(12 ,4)=023637U\,027:23638V\,149 ;xy=65392p+2*p(12 ,4):xx=xy+1 q=2p(12 ,3) 1intx=xx-1:inty=xy+(*3)-1 inty>21inty=21 inty<0inty=0 6intx<5intx=5:inty=xy+(10 -xy) #(inty,intx)=32 4160@ q Jp(1,3)=023637U\,234:23638V\,150 :xy=65392p+2*p(1,3):xx=xy+1 1q=2p(p(1,3)+1,3) intx=xx-1:inty=xy+gl inty>21inty=21 inty<0inty=0 Iintx<1intx=1:inty=xy+(10 -xy) E(inty,intx)32 23637U\,234:23638V\,150 "4110:q 9Ax=y:xy=yc:xx=xc:23637U\,167:23638V\,138 gxy=65392p+2*x:xx=xy+1:inty=xy+(65436-xy):intx=xx+(65437-xx): 1;xy,xx;"";xy,xx;"":3:1;xy,xx;"";inty,intx;"":3:1;inty,intx;"";inty,intx;"":xy,inty:xx,intx: @1;xy,xx;"";xy,xx;"":3:1;xy,xx;"";inty,intx;"":3:1;inty,intx;"";inty,intx;"":xy,inty:xx,intx: m(65436,65437)34"1;65436,65437;8;"":23637U\,162:23638V\,153 r)1;65436,65437;"" wZ(by,bx)=32 1;by,bx;"":23637U\,035#:23638V\,154 |1;by,bx;8;""; "65436,by:65437,bx: "xy=65436:xx=65437 .xy=9 xy=10 xy=11 m$="g": !xy=8yc1m$="g": #xy=12 yc-1m$="g": xy=8xy=12 23659k\,0:23689\,2:" ";1;"SIDE NETTING":"23659","2":"23689","24":"100"  m$="k": hinty=65436:intx=65437:65392p=6543665393q=654375050  5150 -65436+n*yc<0n=65436: 765436+n*yc>21n=21-65436:  xc=1:4815 2inty=65436:intx=65437:4110 intx=(*2)+29:inty=(*3)+10 :65436<11 inty=(*3)+8:65436=10 inty=10 w(inty,intx)=32 1;65434,65435;"";inty,intx;"":65434,inty:65435,intx n=p(x+1,2) (by=65436+yc:bx=65437+xc a4205m:(65436,65437)34"23637U\,016:23638V\,160 E65437=3123637U\,0491:23638V\,161  n=n-1 9n023637U\,240:23638V\,157  1 9x=023637U\,061=:23638V\,169 :x<11 23637U\,086V:23638V\,116t :x=2123637U\,231:23638V\,172 .23637U\,217:23638V\,133 s(65436,65437)=39'0.01z# =,3:13 :23637U\,154:23638V\,134 t(65436,65437)=33!0.01z# =,10 :11 :23637U\,024:23638V\,117u .23637U\,133:23638V\,155 " 4250 %m$="g"9805M& &)m$="k"8751/":4955[:6 '.23637U\,037%:23638V\,159 axc=-1:4815 c2inty=65436:intx=65437:4160@ dintx=(*2)+1:inty=(*3)+10 :65436<11 inty=(*3)+8:65436=10 inty=10 ew(inty,intx)=32 1;65392p,65393q;"";inty,intx;"":65392p,inty:65393q,intx fn=p(12 ,2) k(by=65436+yc:bx=65437+xc ra4205m:(65436,65437)34"23637U\,016:23638V\,160 sD65437=023637U\,154:23638V\,164 t n=n-1 v9n023637U\,0524:23638V\,163 x 6 y.23637U\,037%:23638V\,159  4251 m$="g"9805M& ,m$="k"8751/":4905):4627  xc=1 265436>17xc=0:yc=-1: &65436>13 yc=-1: 265436>11 yc=(*2)-1: $65436>8yc=0: )65436>6yc=(*2): $65436>3yc=1: xc=0:yc=1: )O1;10 ,3;"":65436,10 :65437,3 .yc=(*3)-1 / 30:15:1498 0:1;10 ,2;"";10 ,3;"" 3 n=18+(*3) 8-by=65436+yc:bx=65437+1 = 4205m Bn D:1;10 ,3;"";10 ,2;"" G [Q1;10 ,28;"":65436,10 :65437,28 `yc=(*3)-1 a 30:15:1498 b<1;10 ,29;"";10 ,28;"" e n=18+(*3) j-by=65436+yc:bx=65437-1 o 4205m tn v<1;10 ,28;"";10 ,29;"" y  4050 =1;xy,xx;"";inty,intx;"";:xy,inty:xx,intx Tinty=65436intx=6543723637U\,024:23638V\,170 .23637U\,061=:23638V\,169 yc=(*3)-1 )x=0:15:18:30  n=18+(*5) -by=65436+yc:bx=65437+1  4205m Fby=21by=023637U\,024:23638V\,171 n }(10 ,2)=32 1;inty,intx;"";10 ,2;"";:65392p,10 :65393q,2 _(65436,65437)=39'13 :23637U\,154:23638V\,134 _(65436,65437)=33!11 :23637U\,024:23638V\,117u E65437<1623637U\,024:23638V\,159  6 .23637U\,037%:23638V\,159  4050 =1;xy,xx;"";inty,intx;"";:xy,inty:xx,intx Tinty=65436intx=6543723637U\,194:23638V\,173 .23637U\,231:23638V\,172 yc=(*3)-1 #15:19:30 ( n=18+(*5) --by=65436+yc:bx=65437-1 2 4205m 4Fby=21by=023637U\,183:23638V\,174 7n <(10 ,29)=32 1;inty,intx;"";10 ,29;"":65434,10 :65435,29 =.23637U\,153:23638V\,171 PO:"WELCOME TO THE START OF A NEW","SEASON IN THE ";ܰ"1";"SUPER LEAGUE";ܰ"0" U''"In a moment you will be able to select the 22 teams to play in the league, and also choose yourteam and how they will line up."'' Zk"Please enter what sort of seasonyou would like to have - the higher the number the harder theseason." `6n="1"̰"4":"12"+"2"*n,"2";n;" - Try ";l$(n):n d<"0":r$=:r$>"48"Ưr$<"53"l=r$::"5801":"5225" e "5220" i"Before watching any game you will be asked to enter the skilllevels of individual players up to a maximum depending on what sort of season you have chosen." n''"Dribbling skill and strength of kick mean what they say, and supporting energy is how much a player will help in defence or support an attack." sr''"Your team will play from left toright and due to colour clash will play in blue against the white team." v "9000" x:10 ;1;"PLEASE NOTE:";0;;2,0;"After each game the league tablewill take about 30 seconds to becalculated - please be patient. "'"You will not be able to save theseason to date on tape unless atleast 4 matches have been played "'"Your rating as a tactician will be calculated from your team's league position and how hard a season you have decided to have.You will earn the maximum ratingif you choose the most difficultseason and you finish champions." z{"You will score the lowest ratingif you choose the easiest seasonand you finish bottom."''"See instructions again ? y/n" ~"0":="n" ="y""5200"  "5244" ~_:"0","0";"lge ";۰"1";"Match number ";wk;۰"0";"29";"lge";"pos";"29";"pos";"1" 2n="1"̰"22":a(n,"8")="0":a(n,"10")="0":n n="1"̰"22" a(n,"8")ɰ"0""5575" op=wk+2-n op<1op=op+21 op>21op=op-21 op=nop=22 "a(n,8)=op:a(op,8)=n =(wk/2)*2wka(n,10 )=1:5575 a(op,10 )=1 ǀa(n,10 )=11;a(n,9 );4;a$(n);16;"v ";a$(a(n,8));30;a(a(n,8),9 ) n  G&:wk>28000@:5705I H 8900" IAn=122:a(n,9 )=0:n:q=122 MEpt=-1:gd=0:gl=0:no=0:n=122 SDa(n,9 )023637U\,248:23638V\,186 V?a(n,7)ptpt=a(n,7):gd=a(n,5)-a(n,6):gl=a(n,5):23637U\,238:23638V\,186 ]La(n,5)-a(n,6)gdgd=a(n,5)-a(n,6):gl=a(n,5):23637U\,238:23638V\,186 b?a(n,5)gl23637U\,248:23638V\,186 egl=a(n,5) fno=n gn ha(no,9 )=q i q:"9000" k l5"0","14";۰"1";"W D L F A Pts";۰"0";" " m(q=122:n=122 nn=tm1 ontm0 pa(n,9 )=q23692\,255:q;3;a$(n);" ";a(n,2);17;a(n,3);20;a(n,4);23;a(n,5);26;0;a(n,6);29;1;a(n,7):0:5746r qn rq u>9001)#:="n""47918","245":"48096","245":"5758" y2="y""47918","224":"48096","224":"5740" { "5749" ~ "9000" !n="2"̰"11":p(n,"4")="0":n a(tm,"9")lolo=a(tm,"9")  a(1,"9")="0":"YOU CAN'T REALLY WANT TO SEE THE LEAGUE TABLE BEFORE A GAME IS PLAYED CAN YOU ????":"9000":"9100" "5739":"9100" 9xc=0yc=0"23637","16":"23638","160" q="1"n:by=65436+yc:bx=65437+xc:"4205":q:(65436,65437)34""23637","16":"23638","160" 9x<11 23637U\,24:23638V\,159 76:23637U\,037%:23638V\,159 Bd=557-l*5:s=557-l*5:e=557-l*5 gn="2"̰"11":p(n,1)=(d/10 ):p(n,2)=(s/10 ):p(n,3)=(e/10 ):n: dc="0":sc="0":ec="0" :"9";ܰ"1";"PLAYERS SKILLS"'ܰ"0";" "'"d = dribbling ability :max = ";d;"s = strength of kick :max = ";s;"e = supporting energy :max = ";e;"6","16";"d s e"'"" n="2"̰"11" _n;"3";p$(n);" = ";p(n,"1");" = ";p(n,"2");" = ";p(n,"3");" ";:n<"6""d":"5818" n<"9"ٰ"2";"m":"5818"  ٰ"3";"a" ?dc=dc+p(n,1):sc=sc+p(n,2):ec=ec+p(n,3):n R"19","5";"TOTALS";"15";dc>d;dc;۰"0";"21";sc>s;sc;۰"0";"27";ec>e;ec dc>dsc>sec>e"5990" dc>d"5900" sc>s"5930" ec>e"5960"  "5998"  ="n" "y""5845"  "5990" ""21","0";n;" ";p$(n):"5997" ="d""5900" ="s""5930" ="e""5960"  "5870"  ;:n;" ";p$(n)'''"Dribbling ability = ";p(n,"1"):"5992" p(n,"1")=q:"5804" *::n;" ";p$(n)'''"Strength of kick = ";p(n,"2"):"5992" 4p(n,"2")=q:"5804" H;:n;" ";p$(n)'''"Supporting energy = ";p(n,"3"):"5992" Rp(n,"3")=q:"5804" fh"Enter the number of the"'"player you wish to change ";r$:"9011":n=(r$):n<"2"n>"11""5990" g h(''"Enter new value"'"(max 7 - min 2) " i*"0":r$=:r$>"49"Ưr$<"56"q=r$: j "5993" l?"Enter new value"'"(max 7 - min 2) ";r$:"9011":q=(r$): mB"7000":ܰ"1";"Change skill d,s or e ? ";ܰ"0":"7001":"0": n<"7000":ܰ"1";"Any changes ? y/n";ܰ"0":"7001":"0": q "5500" uop=a(tm,"8") ycn="1"̰"3":p("12",n)="3":a(op,"9")<"15"p("12",n)="4":a(op,"9")<"7"p("12",n)="5" zMn:p("12","2")=p("12","2")+"1":p("12","3")="3"p("12","3")="4" {Pp("1","2")="2":a(tm,"6")>wk*1.3&fffa(tm,"10")="0"p("1","2")="1" }Pp("1","4")="2":a(op,"6")>wk*1.3&fffa(op,"10")="0"p("1","4")="1" %"16","0";a$(tm);" play ";a$(op); 4a(tm,"10")="1""17","10";"at home";:"6030"  " away"; n=122 wk>46043 ea(n,11 )=(*4+*3.5`):a(n,10 )=0a(n,11 )=(*3+*3)  6067 +a(n,11 )=(a(n,5)/wk-1) #a(n,10 )=06065 @a(n,11 )=a(n,11 )+(*2+*2+*2.5 ) @a(n,11 )=a(n,11 )+(a(a(n,8@),9 )/7)  "6069" ;a(n,9 )<6a(n,11 )=a(n,11 )+1 ka(n,11 )=a(n,11 )+(*1.75`+*1.75`+*1.75`)+(a(a(n,8),9 )/11 ) 6a(n,11 )=a(n,11 )+(a(n,12 )/4) n A'''"Press w to watch the game or"'"press r for the result only" "0":="w"a(tm,"12")="0":a(tm,"13")="0":a(op,"12")="0":a(op,"13")="0":"5804":"9100":"300":mn="0":"400":"1499":t2="23673":"1500" "r""6072" &l="1"a(tm,"11")=a(tm,"11")+"1" Jl="2"a(op,"11")=a(op,"11")-"1":a(op,"11")<"0"a(op,"11")="0" Jl="4"a(tm,"11")=a(tm,"11")-"1":a(tm,"11")<"0"a(tm,"11")="0" na(tm,"12")=(*a(tm,"11")):a(op,"12")=(*a(op,"11")):a(tm,"13")=a(op,"12"):a(op,"13")=a(tm,"12") `q=a(tm,"12"):qɰ"0"p("9","4")=((*(q+1))/1.43333):q=q-p("9","4"):qɰ"0"p("10","4")=((*(q+1))/1.3&fff):q=q-p("10","4"):qɰ"0"p("11","4")=((*(q+1))/1.2):q=q-p("11","4"):qɰ"0"p("7","4")=((*(q+1))/1.1 ):q=q-p("7","4"):qɰ"0"p("8","4")=(*(q+1)):q=q-p("8","4") #p((*5)+2,4)=q  "8600" X "23659","0":"23689","2": Y!"23659","2":"23689","24": a "25":"26":"9100":"6000" @W"WHILE THE LEAGUE TABLE IS BEING CALCULATED THIS IS YOUR RECORD TO DATE THIS SEASON" Eua(tm,"9")="0""Please wait until you have played at least one game before you request to see your record": F8wkɰ"43""4","0";"You are currently trying ",l$(l) G)wk="43""4","0";"You tried ";l$(l) J"7","0";"You have now played ";a(tm,"1");" games"," "'ܰ"1";" W D L F A Pts";ܰ"0";"1";a(tm,"2");"5";a(tm,"3");"9";a(tm,"4");"13";a(tm,"5");"17";a(tm,"6");"21";a(tm,"7") O"13","0";"After ";wk-1;" matches :"'""'"Your league position = ";a(tm,"9"),"Highest position so far = ";hi,"Lowest position so far = ";lo T "8100" Y%"19","0";"Your rating = ";r;" %"  -l="1"r=(22-a(tm,"9"))*2.5 : 6l="2"r="11"+(22-a(tm,9 ))*2.5 : 6l="3"r="24"+(22-a(tm,9 ))*2.5 : ,r="44"+(22-a(tm,9 ))*2.5 a(tm,"9")="1"r="100":   :"10";۰"1";"END OF SEASON" "8006":"9002" =:"Do you want a final look at","the league table ? y/n " "0":="y""5739":"8200" "n""8215" +:"THIS IS YOUR LAST CHANCE TO SEE THE FINAL LEAGUE TABLE OR YOUR RECORD FOR THE SEASON"'""'"Press y if you want just one more look or enter anything elsefor a new season" 0"0":="y""8200" 5"20":"20" !"6":ڰ"6":ٰ"1": !B۰"1";"1","12";"MATCH ";wk;۰"0";" "'"3";"Final score -"'"" !aa(tm,"10")="1""5";a$(tm);" ";a(tm,"12");" ";a$(op);" ";a(op,"12")," ":q="5":"8615" !G"5";a$(op);" ";a(op,"12");" ";a$(tm);" ";a(tm,"12")," ":q="19" !6n="2"̰"11":p(n,"4")ɰ"0"q;p$(n);" ";p(n,"4") !n !]"9001":="n""54326","245":"54414","245":"54497","245":"54602","245":"8805" !T="y""54326","224":"54414","224":"54497","224":"54602","224":"8601" ! "8655" "/,"7000":"12";۰"1";"GOAL KICK":"7001" "5u"50":n="0"̰"10":ް"1";("65392"+"2"*n),("65393"+"2"*n);"";("65414"+"2"*n),("65415"+"2"*n);"":n ":+"8765":n="0"̰"43":q:"65392"+n,q:n "="10","2","19","10","2","10","7","10","11","10","11","15","17","15","5","15","11","21","17","18","5","19","9","10","14","11","5","11","16","16","4","16","11","16","19","20","2","21","9","21","14","21","10","29" "B"15":"1480": "e2:"OTHER RESULTS ";۰"1";"Match ";wk;"1","0" "jn="1"̰"22" "o$n=tmn=opa(n,"10")="0""8840" "~xxx=a(n,"8"):a(n,"12")=(*a(n,"11")):a(xx,"12")=(*a(xx,"11")):a(n,"13")=a(xx,"12"):a(xx,"13")=a(n,"12") "I"3";a$(n);" ";a(n,"12");"17";a$(xx);" ";a(xx,"12");" ";"16" "n "n="1"̰"22" "a(n,"5")=a(n,"5")+a(n,"12"):a(n,"6")=a(n,"6")+a(n,"13"):a(n,"12")=a(n,"13")a(n,"3")=a(n,"3")+"1":a(n,"7")=a(n,"7")+"1":"8875" "Ta(n,"12")>a(n,"13")a(n,"2")=a(n,"2")+"1":a(n,"7")=a(n,"7")+"3":"8875" "a(n,"4")=a(n,"4")+"1" "a(n,"1")=a(n,"1")+"1":n " :"9002" "("5700":wk=wk+"1":wk="43""8200" ""9100":"6000" "Z"WHILE THE LEAGUE TABLE IS BEING CALCULATED THIS IS HOW YOUR TEAMIS CURRENTLY LINING UP" "Ƀ"0","146":"255","0":"97","146":"60","0",:"0","4":"255","0":"70","4":"0","50":"115","0":"0",-502 "ξ"5","0";p$("11");" ";p$("9");" ";p$("10");"9","0";p$("8");" ";p$("6");" ";p$("7");"13","0";p$("3");"22";p$("2");"16","5";p$("4");" ";p$("5");"19","11";p$("1") "ӿٰ"2";"6","3";"11";"6","15";"9";"6","26";"10";"10","3";"8";"10","15";"6";"10","26";"7";"14","4";"3";"14","26";"2";"17","9";"4";"17","22";"5";"20","15";"1": #(n="65441":"7000":"31";"3";ܰ"1";"Press any key to continue":"7001":"0":"23670",(*"256"):"23671",(*"256"): #);"7000":'ܰ"1";"List on printer ? y/n":"7001":"0": #*2"7000":ܰ"1";"List on printer ? y/n":"7001" #+"0":="n" #,"y""9003" #-" "::"9002" #2-"7000":" ";۰"1";"END OF GAME":"7001": #3r$=""űr$>"2"r$="99": #42z="1"̱r$:r$(z)<"48"ůr$(z)>"57"r$="99": #5z: #_:"8905":"9000"::n="1"̰"11":n;"5";p$(n);" ";:"108":n:'''"List of current players"''''"Change any players ? y/n"'' #d"0":="n" #j"y""9060" #nT"Enter number of player to change";r$:"9011":n=(r$):n>"11"n<"1""9070" #xY"18","0";"Current player is ";p$(n):"Enter new player - 10 letters",p$(n):"9055" #n="65441":"6":ڰ"6":ٰ"1"::"2","4";"ENTER -";"5","9";"p to change"'"12";"player names"''"9";"s to change";"12";"players' skill etc"''"9";"l for league table"''"9";"a to save game on tape"''"9";"r for record to date"''"9";"c to continue" #""23659","0":c$:"23659","2" #"0":="p""9050":"9100" #="s""5804":"9100" #="l""5765" #="a":"9990":"9105" # ="c" #5="r"a(tm,"9")="0":"8005":"9000":"9100" #$="r":"8006":"9002":"9100" # "9126" &Mܰ"0":"6":ڰ"6":ٰ"1": &R{ܰ"1";۰"1";"5","8";"";"6","8";"";"7","8";"";"8","8";"" &U"15" &Vx<"11""9820" &W"12","4";a$(op);" have scored";"14","4";"after ";mn;" minutes":a(op,"12")=a(op,"12")+"1":a(tm,"13")=a(tm,"13")+"1" &X_n="1"̰"10":װ"0.03",*"10":n:mn="90""20","10";۰"1";"END OF GAME":"300":"8600" &YA"9000":"300":"300":"400":"1499":t2="23673":"1505" &\"12","4";a$(tm);" have scored";"14","4";"after ";mn;" minutes";"17","5";"Scorer : ";p$(x+1):a(tm,"12")=a(tm,"12")+"1":a(op,"13")=a(op,"13")+"1":p(x+1,"4")=p(x+1,"4")+"1" &]gn="1"̰"15":װ"0.05",*10 +"5":n:mn="90""20","10";۰"1";"END OF GAME":"300":"8600" &^P"9000":"65438","1":"300":"300":"350":"1499":t2="23673":"1600" 't"42","79","92","17","73","163","25","208","33","240","92","17","182","92","195","229","25","201" 'swk<"5":"You cannot save the game on tapeunless you have completed at least four games - sorry.":"9000": '"Use a blank cassette"'"to save the game."''"To load a saved game"'"enter LOAD """""''"Press any key to bring"'"up start tape message.":"0":r$="":"SUPER"7777a '?:''"Press v to verify the tape"'"or r to return to the game" ' "0":="r" ' "v""9992" ' :"Rewind tape, press any key,"'"then press the play switch"'"on your cassette recorder."'''"Should you get a tape load error just press the 'y' key"'"(to bring up the RETURN command)then press the ENTER key.":"0":r$="" ' Z"SUPER":''ܰ"1";"You have successfully copied thegame, press any key to return":"0": 'o65441:23755\;" ";23756\;" ";23757\;" ";23758\;" ";23759\:x=23755\ 'x1=256*x+(x+1):x2=x-256*(x/256):x3=(x/256):x=x+256*(x+3)+(x+2)+4:3;"t":x1;5;x2;11 ;x3:3:65441:9999' C