ZXTape! ;OTB x:s0:0:0:23658j\,8:236066\,212:236077\,250:64467:"PIC" U0,0:8:1:"CODE":65277:0,0:"MAIN" =PIC PD50 ?x H  @@x@H H@p` TWװ@@@H @ H  OO@@ H OH HO118ׯA'Pk@@H @ H  H H@@@H  HH HH ?<0 ׯ@(kO?H O H  H HßOOGH ? HH H H _"+`ׯ@++ H  H HH  H O? HH H H OH GH 6n]+`=++ H  H HH  H @ HH HH @H @H VP]+נ?z+5【 H  OO@H  H @OH HO8p@H H o;*WנuA+50 H  @@?xx@H H@xx`/ ~_VWנ*u1*u+.}|@ ~Tp??UUUXUSUe@*uc|~}z@`~T p0_ JῪ4zcfl?~,}t@<h|P<> pQ@E_bb@Ue@4zG|l?~p~J@2p |P2>8f `@*~JHߪ4z׈fl~$`@~U@>0p?xP>0ff `?S~@MD_u@4cf<~d` ~J@Pf0h ?xPf0f> `@*=~J?_| }|Dh ~U@>0d?xP>0>< @0U_PUS~@%@Ea"?w@.8}z@i ~J@?pP<?hG,"F$7@%:D @`_T0(4>s ?@T_߄~)&2H```F ~w ?p':UX?!4PT`@Fw B?p'Q8?{CL g=2LH"\p*4/?x7 4F cq ?3/<|?y/D+P PBRѢRUeQ\xFğsq u@?` C?D* 9 3ޕJ"\g3\Հ 4F 31  ? WD*R  RB"R _UcA|\4Fl??< TT*ws%Nd rRdA 0T 4c ?> _UXoGGDDDDDDDDDDDGGGGGGGGGGGGGGGGGGGGGDDDDDDDDDDDG8xxxGGGGGGGGGGGGGGGFFFGGGGCDGGGGxHHxGGGGGGGGGGGGGGDDDDDDDDDDGGGGxxxxGGGGGGGGGGGGGGDDDDDDDDDDFGGGxxxxGGGGGGGGGGGGGGGGGGGGGGGGEBEExxxEBBGGGGGGGGGGGGGGGGGGGGGGBBEEExxUBBGGGGGGGGGGGGGGGGGGGGGBBBEEEEEUBBBEGGGGGGGGGGGGGGGGGGEBBBUEEEEPBBBEFFGGGGGGGGGGGGGGGGxxzBUEEEEPzzBEFFFFGGGGGGGGGGGGGGxxxBEEEEExxxGGCFFFFDGGGGGGGGGGGGxxGEEEExxxGGGGEFFFFFFFFGGGGGGGGxxGGEExx}xxxxxGGGGGGGGGGGGGGGGGGFFFExxzxxxxxGGGGGGGGGGGGGGGGGGGFFxzxBxxxxxGGGGGGGGGGGGGGGGGGFGFFxzBBxxxxGGGGGGGGGGGGGGGGGGGFGFpzzBBBBzzBGGGGGGGGGGGGGGGGGGFGFFzzzPBBBBBG88888888GGGGGGGGGGFGF8xxxPBBBBBG8888:888GGGGGGGGGGGFxxxxPBBBBBG88::::88GGGGGGGGGGGFxxxxPBBPP8G88888888GGGGGGGGFFFFxxxPB8P8xGGGGGGGGGGGGGGGGGFFFGGFxxxGG88xxGGGGGGGGGGDDDDDDDDDDDDDDDDDDG88xGGGGGGGGGG.CODE q4~000000fffffff?h> ~?JL>)F68of;  8 8f<300>33? 33333300000000`  ??0  033>33>30003<63336<?00>00??00>00000733333?333 336<8<63000000?cwkccc3;??73333333>33>000333;7>33>633303? 33333333333 ccckwc33 33333 ? 0?  0 < < - >?300>333>0003333>0  33>00>3333  0036<63 vkcc>3333333>333>0333>30000> ? 3333333 cck>63 3333>? ?   8  80yO"]Q]"!9T]*\BR[=\"=\ + +i`*=\s#rv{=\!:\~6} ( !'"B\2D\v*]\~$ #"]\}>MAIN oo 5o5:0,0:"SETUP":ze:f:f:ze::"650" 5s;o;tw+o,ze;" Please Wait ": 2f;tw+o,ze;" ": Ofi:flag=ze:k=of:j=ott:flag=flag+(flag=zet$(k,j)=j$):j:k:"721"-flag ra=j$(o):ra=ra-(ra>97a)*32 :j$(o)=ra:k=ṯj$:ra=j$(k):ra=ra+(ra>64@ra<91[)*32 :j$(k)=ra:k: cr=ze:td=ze:twg=ze:tgt=ze::i(fy-e,t):a(tw+o,el):h(tn,th):in=ze:y(tw,t):r(fy-e,t):rd=ze:m(tt-o,el):wk=-th:pld=ze:ze:t(tt,e):d(tw,f) ~i=ott:t(i,e)=i:i:q=tn+(lvl*t)+((f-div)*(f+(lvl/t))):f(zd,q2)=(*z)+q:i=otw+o:d=oel:j(i,d)=f(q,o):d:i (Rdev=fi-div:x$="":i=otw+o:x$=x$+("0"i"1e4""fy+tn" Fcap=cap+q::"Pre - Season Accounts":z=f(dev*tn*tu,dev*f*tu):ot=z:''"Sponsers Pay `";z''"Ground Improvements `";(q*hu):mon=mon+(z-(q*hu)) P$i=otw+o:z=f(f,ze):z=ze"140" Z6d=oz:q=f(el,o):r1=f(t,o):r1=oj(i,q)=j(i,q)+o dr1=tj(i,q)=j(i,q)-o nd:d=oel:j(i,d)tn+(dev*fi)j(i,d)=tn+(dev*fi) d i Bu$(tw):i=otw:q=f(tw*t,o):s(i)=tn+(dev*fi)d(i,f)ze"170" s(i)=ze"190" qths(i)=s(i)+o:u$(i)="+" s(i)=o"190" 'q>thqse+lvls(i)=s(i)-o:u$(i)="-" ȝi:tra=ze:gate=(cr*th):itr=(mon*".001"):wgs=ze:i=otw:wgs=wgs+(("130"+(lvl*tw))*s(i)):i:wgs=(wgs*(o+(".25"*(f-div)))):mon=mon+itr+gate-wgs h"th":any:ot=ot+itr:twg=twg+wgs:tgt=tgt+gate::"WEEKLY ACCOUNTS"''':q=f(f,ze):q=ze"230" di=oq:z=f(tw,o):"9950"+z:q$,r1,r2:co=f(r1,r2):q$;tw+th;"`";co'':mon=mon+co:ot=ot+co:i z''"Gate Money";tw+th;"`";gate''"Wage Bill";tw+th;"`";wgs;''"Interest";tw+th;"`";itr''''"Balance";tw+th;"`";mon:any mon<-("25e4"*dev)"5100" wk=fytd=ze %i=zes:""+i,o:i:wk=fy-nntd=o *sub=ze:f:f:"65236"::ze:"0 Play Match"''"1 List Squad"''"2 Training"''"3 League Table"''"4 Fixtures"''"5 Status"''"6 Scouts"''"7 Scorers"''"8 Player Enquiry"''"9 F.A.Cup";11 ,10 ;"10 Save":"550":21,0;"Week=";WK+O;" Choice":"9992":opt=J$ "251"-(opttn) Ropt=nnok=o::"23692",hu:"F.A.Cup Round ";rd;" Draw"'':"4510":ok=ze:menu opt=zematch  opt=tn"500" tu*opt:menu Uz=oel:th+z,ze;z;f;s$(z):z:'"SUB ";s$(tn+t):f,tw;"Defence";s,tw+th;p(o,o) "nn,tw;"Midfield";el,tw+th;p(t,o);tn+f,tw+o;"Attack";tn+s,tw+th;p(th,o);tn+e,ze;"League Positions"''y$;" ";p1'o$;" ";p2:z=oel ,3z+th,tn+f;" ":g(th,z)zez+th,tn+f;g(th,z) 6*z+th,tn+s;("B"g(o,z)=o)+("S"g(o,z)>o) @)z:g(th,tn+t)zetn+s,tn+f;g(th,tn+t) E2tn+s,tn+s;("B"g(o,tn+t)=o)+("S"g(o,tn+t)>o): "S"ʰ"240":menu &I=the:I,tw-t;fi;" ":I:I=nntn+th:I,tw-t;s;" ":I:I=tn+ftw-t:I,tw-t;fi;" ":I +>end="580":e;t,tw-o;"NOTICE BOARD";f,tw-o;"Next Match :" 07wkty+tnwkTW)*t )N$=J$:tw+o,ze;"Enter skill level 0-2" +"9992":LVL=J$:"708"-(LVLT)*t A:I=OF:D=OEL:D+F,ZE;D;F;T$(I,D);TW-T;D+EL;TT;T$(I,D+EL) 4D:TW,ZE;" C=Change P=Pick M=More teams " %"712"+(="M")+(="C")*fi+(="P")*t  I:"708" /TW,ZE;"Enter no of team to manage " #"9992":Q=J$:"716"-(QTT) 3Y$=T$(I,Q):T$(I,Q)=T$(F,TT):T$(F,TT)=Y$:"722" /TW,ZE;"Enter no of team to change " #"9992":Q=J$:"719"-(QTT) 4TW,ZE;1;"Enter teams new name(10 letters)" 7TT1=ty+t:TT2=hu+tt:"9992":f+(j$10 )*"716" T$(I,Q)=J$:"708" hI=O13 :L(I)=O+(I>OIFIIE)*(*fy+tw)+TY:S(I)=(*tn)+O:I -:TW,ZE;"How many points for a win 2 OR 3" &"9992":PT=J$:"726"-(PTth) <:el,ze;"Start original tape":f:"M1":ze::"t":"tw" N"th":tw+o,0;"No of player":"9992":X=J$:"902"-(XTW)*t "904"-(s(X)=ze)*f  "8900" E:t;se;o;" ";y$;" ";se;ze;ze;" Skl Fm Gl Ap WO"'':ze,ze ri=otw:f+(i>11 );i;f;s$(i);el+th;s(i);tn+e;u$(i);tw+t;d(i,o);tw+s;d(i,t);ty;d(i,f);+(" "d(i,f)tw"1019" s(q)=zed(q,f)ze"1019" $:off=(s(q))+f(f,ze)-o .%i=ooff:r1=f(f,o):r2=f(tw+o,o): 8pc=(((s(q)-o)*"35")+(f(ty+fi,o)))*tu:"News of offer for ";s$(q)''"From ";t$(r1,r2)''"Apps ";e(q,o)+d(q,t);" (";d(q,t);") Gls ";d(q,o)+e(q,t);" (";d(q,o);")"''"Transfer Fee `";pc B/"Do You Accept ";q$:q$="Y""1120" L:i V,"No Enquiries":d(q,th)=t:d(q,f)=o:any: j MON=MON+PC tUe(q,t)=ze:s$(q)="":s(q)=ze:u$(q)="":y(q,o)=ze:y(q,t)=ze:d=of:d(q,d)=ze:d: &:''el;"Division ";div''':i=ottt @t1=f(opp,i):t2=f(opp,i+o):h$="A"t2=f(opp,i):t1=f(opp,i+o) !t$(div,t1);" - ";t$(div,t2) i:  tra=o K:"Area -"''"1. Defence"'"2. Midfield"'"3. Attack"'"4. Reserves"'"5. All" <tw+o,ze;"Section":"9992":q=J$:"2011"-(qfi) ^r1=o+(q=t)*fi+(q=th)*e+(q=f)*el:r2=fi+(q=t)*th+(q=th)*s+(q=fq=fi)*(tn+fi):r3=ty+(q=fi)*hu Ora=8:i=r1r2:q=f(r3,ze):s(i)=zed(i,f)zes(i)tn+(dev*fi)"2065" 3q=y(i,t)>tnd(i,th)=t:d(i,f)=d(i,f)+t:y(i,t)=y(i,t)-(tn+t) C2i:i=otn+t:g(f,i)zed(i,th)=t:d(i,f)=g(f,i) Ki:"2124"+(cup=o) L(i=oth:u(i,th)=u(i,th)+(u(i,th)=o):i W!i=otn:h(i,th)tuh(i,th)=s Y5h(i,o)zeh(i,th)=h(i,th)-o:h(i,th)=zeh(i,o)=ze \i: ui=zeo::"League Division ";div:'tw+fi;"Page ";i+o:'"Team Name Pd W D L F A PT"'':d=(i*el)+o((i+o)*el) EF+(OD=ttdiv=f)+(Odtdtwdivf) (t$(div,t(d,e))=y$);t$(div,t(d,e));el;t(d,o);tn+f;t(d,t);tn+se;t(d,th);tw;t(d,f);tw+th;t(d,fi);nn*th;t(d,s);ty;t(d,se):d:any:i: &m$="League Match - Division "+div:cr=ze:tsb=ze:g(fi,tn+t):ok=o:wk=wk+o:wk=fwk=sewk=tn+fwk=tw+owk=tw+ewk=ty+fiwk=fy-ewk=fy"4125" (wk=fy+o"9e3" ))wktw) NAtw+o,ze;"To Where ":"9992":z=J$:"3151"-(ztw) Sr1=y(q,o):y(q,o)=y(z,o):y(z,o)=r1:r1=y(q,t):y(q,t)=y(z,t):y(z,t)=r1:q$=u$(q):u$(q)=u$(z):u$(z)=q$:x=of:r1=d(q,x):d(q,x)=d(z,x):d(z,x)=r1:x:q$=s$(q):s$(q)=s$(z):s$(z)=q$:r1=s(q):s(q)=s(z):s(z)=r1 Tr1=l(q):l(q)=l(z):l(z)=r1:r1=e(q,o):e(q,o)=e(z,o):e(z,o)=r1:r1=e(q,t):e(q,t)=e(z,t):e(z,t)=r1:r1=e(q,th):e(q,th)=e(z,th):e(z,th)=r1 U sub=o Xpf+(q>11 );q,ze;q;f;s$(q);el+th;s(q);tn+e;u$(q);tw+t;d(q,o);tw+s;d(q,t);ty;d(q,f);+(" "d(q,f)11 );z,ze;z;f;s$(z);el+th;s(z);tn+e;u$(z);tw+t;d(z,o);tw+s;d(z,t);ty;d(z,f);+(" "d(z,f)"543""3600" =r1=f(ad+c(d),ze):r1((p(o,d)+p(t,d)+p(th,d))/th)"3290" d:i:any:"3357" 'r3=f(tw,o):r3fr3nnr1=f(th,nn):r2=-tn-fi 7chn=l(r1):d=tokochn=(m(opp,r1)/(pld+o))*fy+tw+fi Sr2=f(q(d)+r2-(chn/fi),ze):d=os(r1)>r2g(f,r1)=zeg(o,r1)r2g(fi,r1)o"3330"  !o;tw-t,tw;" G O A L " <d=oyg=yg+o:g(th,r1)=g(th,r1)+1:d(r1,o)=d(r1,o)+o 3d=ttg=tg+o:cup=zein=zem(opp,r1)=m(opp,r1)+o '"99":tw-t,tw;" ":"280": "2100":cup=o"4151" inze"9215" %ok=ze::"1500":pld=pld+o:d=oel "vt1=f(opp,D*t-o):t2=f(opp,D*t):r(pld,o)=yg:r(pld,t)=tg:q(o)=(tgh$="A")+(ygh$="H"):q(t)=(tgh$="H")+(ygh$="A") #h$="A"q=t1:t1=t2:t2=q %i=ott:t(i,e)=t1pl1=i *t(i,e)=t2pl2=i +i ,'r1=pl1:r2=pl2:pld=opl1=el:pl2=el .%D=elc(o)=q(o):c(t)=q(t):"3410" /p(th,t):i=ofi:p(o,o)=p(o,o)+j(t1,i):p(o,t)=p(o,t)+j(t1,i):i:i=se:p(t,o)=p(t,o)+j(t1,i):p(t,t)=p(t,t)+j(t2,i):i:i=nnel:p(th,o)=p(th,o)+j(t1,i):p(th,t)=p(th,t)+j(t2,i):i 48i=oth:x=ot:p(i,x)=p(i,x)/dev:x:i:ad1=tn:ad2=fi 9>min=("-.25"div=o)+(odiv=t)+(".90"div=th)+("-.5"div=f) >=c(1)=((p(th,o)/th)-(p(o,t)/fi)+(ad1+p(t,o)))-(pl1/el) C=c(2)=((p(th,t)/th)-(p(o,o)/fi)+(ad2+p(t,t)))-(pl2/el) Hi=ot M@c(i)=(f(c(i)+o,ze)/("5.5"-(min-(lvl/t)))):c(i)capcr=cap WD+f,el;C(o) YD+f,tn+th;C(t):D+f,tw+s;cr \t(r1,o)=t(r1,o)+o:t(r2,o)=t(r2,o)+o:t(r1,fi)=t(r1,fi)+c(o):t(r1,s)=t(r1,s)+c(t):t(r2,fi)=t(r2,fi)+c(t):t(r2,s)=t(r2,s)+c(o) aGc(o)>c(t)t(r1,t)=t(r1,t)+o:t(r2,f)=t(r2,f)+o:t(r1,se)=t(r1,se)+PT fGc(t)>c(o)t(r2,t)=t(r2,t)+o:t(r1,f)=t(r1,f)+o:t(r2,se)=t(r2,se)+PT k_c(t)=c(o)t(r2,th)=t(r2,th)+o:t(r1,th)=t(r1,th)+o:t(r2,se)=t(r2,se)+o:t(r1,se)=t(r1,se)+o m%D=eli(pld,o)=cr:"5500":"3458" p.z=ot:i=oc(z):q=f(tw,o):qthqer2=f(th,nn) 1r1=(t1z=o)+(t2z=t):m(r1,r2)=m(r1,r2)+o:i:z d:cr=i(pld,o):ps=o:"t" X=ttt:RA=X-o:RB=T(X,se):RC=(T(X,fi)-T(X,s)):E1=T(X,o):E2=T(X,t):E3=T(X,th):E4=T(X,f):E5=T(X,fi):E6=T(X,s):E7=T(X,se):E8=T(X,e) "3466"+(T(RA,se)>RB)*t -"3467"+(T(RA,se)=RB(T(RA,fi)-T(RA,s))>RC) :I=oe:T(RA+o,I)=T(RA,I):I:RA=RA-o:"3468"-(RA>ze)*th vT(RA+o,o)=E1:T(RA+o,t)=E2:T(RA+o,th)=E3:T(RA+o,f)=E4:T(RA+o,fi)=E5:T(RA+o,s)=E6:T(RA+o,se)=E7:T(RA+o,e)=E8:X H$="A"CR=(CR/F) x=ott:t(x,e)=ttpos=x x:I(PLD,T)=POS:"80" 4r1=f(el,o):g(d,r1)=g(d,r1)+o:g(d,r1)=t"3620" g(d,r1)>tg(d,r1)=t:  "280": )d=tg(fi,r1)=o .1r1fir1er1o Dr2=o"3665" Gd=t Lg(f,r1)=f(tn,o): Td=t"3710" jg(f,r1)=f(fy,o) oq=r1:"3820"+(fisub=o) t ~$r1fir1eq=th:p(th,t)=p(th,t)-j(opp,r1) tsb=og(fi,r1)=o -tsb=zetsb=o:p(q,t)=p(q,t)+(j(opp,r1)/t)   sub=o Gtw+o,tw;"Take off ":"9992":q=J$:"3811"-(q<1q>el) ,tw+o,tw;" ":g(o,q)>o"3810" btw+o,tw;"Play (D,M,A)":TT1=ty+t:TT2=hu+tt:"9992":q$=J$:"3821"-(q$"D"q$"M"q$"A") 2tw+o,tw;" ":qfiqep(th,o)=p(th,o)-s(q) sub=o"3860" $z=tn+t:q$="D"p(o,o)=p(o,o)+s(z)  q$="M"p(t,o)=p(t,o)+s(z) q$="A"p(th,o)=p(th,o)+s(z) z=tn+t:d(tn+t,t)=d(tn+t,t)+o:sub=o:"3155":r2=g(o,q):g(o,q)=g(o,z):g(o,z)=r2:r2=g(th,q):g(th,q)=g(th,z):g(th,z)=r2:r2=g(f,q):g(f,q)=g(f,z):g(f,z)=r2:"280": i=zet::"Match Versus Ven F-A Att Pos"''':d=(i*"42")+o((i+o)*"42")-oth:o;F+(t((d+t)/th)=pld+o);(d+t)/th;fi;t$(div,(f$(dd+o)));tw-f;f$(d+t);tw-o;r((d+t)/th,o);"-";r((d+t)/th,t);tw+f;i((d+t)/th,o);ty;i((d+t)/th,t):d:any:i: Hok=ze:d$=""::"23692",fy:rd=rd+o:"F.A.Cup - Draw for Round ";rd''  (rd=ox$="":i=ty+thhu-f:x$=x$+i:i (rd=ti=oty+t:x$=x$+("0"i"88"o$=e$(t1):"4150" 2o$=t$(div2,t1) 4&div2=divd=oel:j(tt,d)=j(t1,d):d 6mm$="F.A.Cup - "+("Round "+rdrdcaphcr=hcr-cr+cap:cr=cap 8qh$="A"cr=(tu*((((s-div2)/t)*((s-div)+t))+(*((fi-div2)*t))*((rd/f)+o)+(f("2.75"*(fi-div),o)))):acr=acr+cr 9-rd=scr=("1e4"*(fi-(*t)+)):tcr=tcr+cr :.rd=secr=("1e4"*(tn+-(*t))):tcr=tcr+cr ;:"23692",hu:nn,t;"Att. ";cr:yg=tg''el;"REPLAY":h$=("H"h$="A")+("A"h$="H"):any:ok=ze:1000:ok=o:"4150" <any:yg>tgx$=(div*tt) =ygg2x$=x$+("0"t1g1x$=x$+("0"t2"88"e$(t1-"88");" V ";:"4525" &d1=((t1-o)/tt)+o:t1=t1-((d1-o)*tt) t$(d1,t1);" V "; !t2>"88"e$(t2-"88"):"4540" &d2=((t2-o)/tt)+o:t2=t2-((d2-o)*tt)  t$(d2,t2) i:ok=oany: fy+ty fi:fi::f;y$;" FC"''"Manager ";n$'';t;"Level ";lvl;" Season ";sea''f;"Cash Balance `";mon';f;"Overdraft Limit `";("25e4"*dev)''"Div ";div;" - Position ";pos I'"F.A.Cup Round Reached ";rr''"Ground Capacity ";cap''"Wage Bill `";wgs ANY X:"Disciplinery Points"'':i=otw:y(i,o)zes$(i);el;y(i,o);tw;"(";tn+t-y(i,t);")" i ANY :s;"Club League Records"'''"Highest Victory"'''"Highest Defeat"'''"Highest Draw"'''"Highest Attendances"''"H"''"A"''"Leading Scorer" Xi=oth:k(i,th)zeo+(i*th),th;"V ";b$(i);" ";k(i,o);"-";k(i,t);" Season ";k(i,th) Vi:i=ffi:k(i,o)zes+(i*t),th;"V ";b$(i);" S.";k(i,o);" D.";k(i,th);" - ";k(i,t) Bi:tw,0;b$(s);"Gls ";k(s,o);" Apps ";k(s,t);" S.";k(s,th) ANY q=ze::;"Players Career Records For Club"'tn+f;" Apps Gls S.J ":i=otw:s(i)zeq=q+o:s$(i);tn+f;" ";e(i,o)+(d(i,t)wkfy+o);tw;" ";e(i,t)+(d(i,o)wkfy+o);tw+fi;" ";e(i,th);ty;" " i ANY  W:f;o;"BANKRUPTCY PROCEEDINGS":''th;"Clubs Bank Balance Falls"''tn;"Below Limit" =''t;"BANK TAKES CONTROL OF CLUB";''el;"AND SELLS" 7q=f(tw,o):d1=f(f,o):t1=f(tw,o):s(q)=ze"5120" +pc=((s(q)-o)*"27e3")+(f("3e4","1e3"))  9tn+th,fi;s$(q);" to ";t$(d1,q)''s;"for a Fee of `";pc F''th;"Skill ";s(q);" Goals ";d(q,o);" Apps ";d(q,t):"1130":any mon<-("25e4"*dev)"5100"  |yg=tg"5530" ~ yg-tg<(k(o,o)-k(o,t))"5515" *yg-tg=(k(o,o)-k(o,t))ygtt;("Report"u(i,th)=t)+("Unassigned"u(i,th)=ze) Ji:''"1 Assign Scouts"''"2 Obtain Report"''"3 Skill Sheet"''"4 Menu" tn+f,tw-o;"Next Fixtures":i=ze(tpld<"39")+("41"-pldpld>"38"):r2=(pld+i)*th+o:tn+s+I,tw-t;t$(div,f$(r2r2+o));" (";f$(r2+t);")":i :tw+o,ze;"Choice":"9992":q=J$:"6021"-(qf) "6e3"+(hu*q)  "6500" ;tw+o,ze;"Match ":"9992":q=J$:"6106"-(qtn) =tw+o,ze;"Team(1/2)":"9992":x=J$:"6111"-(xoxt) >tw+o,ze;"Scout ":"9992":z=J$:"6116"-(zth) Rtw+o,ze;"Player (0=All or 1 to 11)":"9992":r3=J$:"6126"-(r3el) ?u(z,fi)=r1:u(z,t)=r3:u(z,f)=x:u(z,o)=q:u(z,th)=o:"6000" 8>tw+o,ze;"Scout ":"9992":q=J$:"6201"-(qth) =tt3=q:u(q,th)t"6e3" Gfr2=u(q,o):u(q,th)=ze::t1=f(u(q,fi),r2*t-t+(u(q,f))):"Report on ";t$(div,t1);:u(q,t)=ze"6230" L" Number ";u(q,t)'''"Season Goals Total = ";m(t1,u(q,t)):r3=(j(t1,u(q,t))+(f((j(t1,u(q,t))/s)+t,ze))-(f((j(t1,u(q,t))/s)+t,ze))):r3tyr3=ty Q]''"Scouts Assessment of Skill ";r3:a(t1,u(q,t))=r3:any:u(tt3,o)=ze:u(tt3,th)=ze:"6e3" VIp(th,t):" Team"''"Player Skill":d=oth:r2=o:r3=fi:d=tr2=s:r3=e Xd=thr2=nn:r3=el [Ni=r2r3:q=j(t1,i)+(f((j(t1,i)/f)+th,ze)-(f((j(t1,i)/f)+th,ze))):qtyq=ty `f;i;tn;q:a(t1,i)=q:p(d,o)=p(d,o)+q:i:d:''"Defence ";p(o,o)''"Midfield ";p(t,o)''"Attack ";p(th,o):any:u(tt3,o)=ze:u(tt3,th)=ze:"6e3" :ze,ze;"Tm/Player 1 2 3 4 5 6 7 8 9 1011":d=zetw:t$(div,d+o):i=zetn:RA=I/2:RA=RA-RA:d+o,tn+(i*t);(RA=0);a(d+o,i+o):i:d:"4e4":"6000"  dwk491 fG:"This Weeks Matches"''':r1=f$(pld*th+opld*th+t):h$=f$(pld*th+t) iLi=oel:t1=f(r1,i*t-o):t2=f(r1,i*t):h$="A"t2=f(r1,i*t-o):t1=f(r1,i*t) n)i;f;t$(div,t1);" V ";t$(div,t2):i: X:ze,ze;"Tm/Player 1 2 3 4 5 6 7 8 9 1011":d=zetw:t$(div,d+o):i=zetn:RA=I/2:RA=RA-RA:d+o,tn+(i*t);(RA=0);m(d+o,i+o);d+o,el+(i*t):i:d:"4e4": r1=f(th,o):r1=o"7140" *:" END OF SEASON NEWS " r1=f(tn+th,o):r1f"7200" r1>fr1e"7400" r1>er1tn"7500" r1=el"7600" r1>el"7300"   -e,fi;"Apprentice Signs Up":r2=f(F*dev,o) /7i=otw:s(i)zei:''"But No Room in Squad":"7225" 4`e(i,o)=ze:e(i,t)=ze:e(i,th)=sea:x=i:"8900":s(i)=r2:''"Name : ";s$(i);" Skill ";s(i) 9any: ot=ot-"1e5":r2=f(t,o):e,t;"Board Decide To Lay New Pitch"''nn;"Cost is `100,000"'''t;"New Pitch is ";("Astro Turf"r2=o)+("Grass"r2=t):mon=mon-"1e5":any:  r2=f(tw,o):s(r2)=ze"7400" Ue,ze;s$(r2);" has Decided to Retire"''"From Football at the Age of ";f(tw,tw+fi) Md(r2,o)=ze:d(r2,t)=ze:d(r2,th)=ze:d(r2,f)=ze:s$(r2)="":s(r2)=ze:any: Lot=ot+"3e5":e,t;"Club is Sold to New Chairman,"''t;"a Big Money Tycoon, Who Pumps"''f;"`300,000 into the Club":mon=mon+"3e5":any: r2=((f(cap/tn,t*hu)/hu))*hu:e,ze;"Sections of Ground Do Not Pass"''"Safety Regulations and Must be"''"Pulled Down."''"Capacity Falls - ";r2:cap=cap-r2:any: @td=o B@tw+o,ze;"Div (1-4) ":"9992":q=J$:qf"8e3" Eq=div"8060" JFtw+o,ze;"Skill Required":"9992":r2=J$:"8011"-(r2ty) Oa:i=q:t1=f(tt,o):cst=(r2*"35e3")*"1.05":t$(q,t1);" Offer Such a Player"''tn;"for `";cst: T""ACCEPT? ";q$:q$="N" Yq$"Y""8020" ^i=otw:s(i)=ze"8040" c i:''"No Room in Squad":any: hmon=mon-cst:x=i:"8900" r s(x)=r2: |i=q:ok=o:"9110" Etw+o,ze;"Team Number":"9992":t1=J$:"8066"-(t1tt-o) G:tw+o,ze;"Player Number":"9992":r2=J$:"8068"-(r2el) Gi=otn:h(i,th)tuh(i,o)=t1h(i,t)=r2cst=h(i,th)-tu:fs=i:"8080" 5h(i,o)=t1h(i,t)=r2"Unavailable For Talks":any:  i:i=otn:h(i,th)=ze"8073" !i::"No More Enquiries":any: Efs=i:z=(j(t1,r2)+(f((j(t1,r2)/s)+t,ze))-(f((j(t1,r2)/s)+t,ze))) &cst=(((z-o)*"35")+(f(ty+fi,o)))*tu cstze"`";cst cst=ze"Free Transfer" O"ACCEPT? (H-HOLD) ";q$:q$="N"h(fs,o)=t1:h(fs,t)=r2:h(fs,th)=s: 3q$="H"h(fs,th)=cst+tu:h(fs,o)=t1:h(fs,t)=r2: q$"Y""8085" i=otw:s(i)=ze"8106"  i:''"No Room In Squad":any: r2=ol(i)=ze r2>or2fir2el(i)=f(fy+tw,ty) h(fs,o)=ze:h(fs,t)=ze:h(fs,th)=ze:l(i)=l(i)+((m(t1,r2)/(pld+o))*(pld*".75")):e(i,o)=ze:e(i,t)=-m(t1,r2)::e(i,th)=sea:mon=mon-cst:x=i:"8900":s(x)=j(t1,r2):d(x,o)=m(t1,r2):m(t1,r2)=ze: !9*:wgs=ze:pl=ze:i=otw:pl=pl+(s(i)>ze) !Wiwgs=wgs+(("130"+(lvl*tw))*s(i)):i:r1=pl*"750":r2="500"*pl:wgs=th*((wgs*(o+(".25"*(f-div))))) !\twg=twg+wgs:ot=ot-r1-r2:mon=mon+lm-(r1+r2+wgs)::"POST SEASON ACCOUNTS"'''"Prize Money";tt;"`";lm''''"Registration";tt;"`";r1''''"Kit";tt;"`";r2''''"Summer Wage Bill";tt;"`";wgs;''''tn+th;"Balance `";mon:fi:any: !H:tn,o;"You Have Been Relegated to the"''e;"V Con League":0: "%"TH":21,0;"Name" "DTT1=ty+t:TT2=hu+tt:"9992":"8905"-(J$<1űJ$>8)*th "fi:S$(X)=J$: #(hcr=ze:acr=ze:"7100":lm=(t*tu*dev)+(tu*(tt-pos)*dev)+((rr-o)*tu*t):b(f,t,fi):i=of::s;"Division ";i:d=ot:'("TOP"d=o)+("BOTTOM"d=t)'' #+r1=ze:d=tr1=tw-th #-,x=ofi:i=divb(i,d,x)=t(x+r1,e):"9020" #2q=f(tt,o):v=ot:z=ofi #4b(i,v,z)=q"9010" #7z:v:b(i,d,x)=q #<x+r1;f;t$(i,b(i,d,x)):x:d:i=fq=f(e,o):''"Vaux.Con Champions - ";e$(q):q$=t$(f,b(f,t,fi)):t$(f,b(f,t,fi))=e$(q):e$(q)=q$ #Alany:i:i=tf:d=ot:t1=b(i-o,t,d+th):t2=b(i,o,d):q$=t$(i-o,t1):t$(i-o,t1)=t$(i,t2):t$(i,t2)=q$:d:i #Frd=ze:p$(th,tn+t):i=tf:q$="":d=thfi:q$=q$+i+("0"b(i,o,d)r(i,q,t)q$=q$+d1+("0"t1qq=d(i,o):r1=i #Di:q>k(s,o)b$(s)=s$(r1):k(s,o)=q:k(s,t)=d(r1,t):k(s,th)=sea-o #cr=hcr+(acr/f):gate=(cr*th):mon=mon+gate:tgt=tgt+gate::tn,ze;"Gate Receipts `";gate:any:ok=o:tu:ok=ze:any:tu*fi:"8500"::"Total Gate Receipts `";tgt''"Total Wage Bill `";twg''"Total Other Trans `";ot:any:tn #0po=d:h=th$=("A"h$="H")+("H"h$="A"):q$=h$ #&div2=divd=oel:j(tt,d)=j(t1,d):d #Mh=oya=ze:ta=ze:q=(((tn+((f-div2)*fi)))+lvl):d=oel:j(tt,d)=f(q,o):d #m$="Play Offs - "+("Semi-Final"rd=o)+("Final"rd=t)+" Leg "+h:opp=tt:o$=t$(div2,t1):ok=ze:1000:ok=o:match+tw #1ya=ya+yg:ta=ta+tg:"9230":h=tya=ta"9200" $!h=th$=q$:ya>taz$=div+"22" $ %h=tyacapcr=cap $h$="H"hcr=hcr+cr $h$="A"acr=acr+cr $:tn,ze;"Att. : ";cr:any: &"Income Tax",-tw*tu,-tu &"Bills Etc",-hu,-fy &"Supp.Club Donate",hu,fy &"Tax Rebate",tu*f,tu &"Prog. Profit",hu,fy &"Pay Police",-tu,-fi*hu &"Tea Profit",fy,tw &"T.V.Pool",ze,"25e3" &"Fans Damage",-tw*tu,-fi*hu &"Gen. Repairs",-hu,-fy &"Ground Repairs",ze,-cap/fi &"Chairman Donates",tu*t,fi*hu &1TW,TW+NN;"Any";tw+o,tw+nn;"Key":ze '="C":"9980" '%tw,tw+nn;" ";tw+o,tw+nn;" ": 'J$:"9993"-(J$="") ' 8"23658",e:K=o̱J$:"9994"-(J$(K)TT2)*t ' K:TT1=fy-t:TT2=fy+se: :SETUP s9dotfse 21g A _P                                                                                     w Arsenal Aston V Charlton AChelsea Coventry Derby Cty Everton Liverpool Luton T Man UnitedNewcastle Norwich C Nottm For Oxford UtdPortsmouthQueens PR Sheff.Wed South'ton Tottenham Watford West Ham Wimbledon Barnsley BirminghamBlackburn Bournem'thBradford CCrystal P Huddersf'dHull City Ipswich T Leicester Leeds Utd Man City Millwall MiddlesbroOldham AthPlymouth AReading Sheff.Utd ShrewsburyStoke CitySwindon T West Brom Aldershot Blackpool Brentford Brighton Bristol C Bristol R Chester C Chesterf'dDoncaster Fulham GillinghamGrimsby T Mansfield North'ton Notts Cty Preston NERotherham Southend USunderlandWalsall Wigan Ath York City Bolton WanBurnley Cambridge Cardiff C Carlisle UColchesterCrewe AlexExeter CtyHalifax T Hereford UNewport C Peterboro Port Vale Rochdale Scarboro ScunthorpeStockport Swansea C Torquay U Tranmere RWolves Wrexham ӥJones Smith Harris Clarke Reid Peters Harding Hughes Hunt Stevens Barnes HamiltonDavis gU Lincoln C Telford U AltringhamEnfield Barnet Maidstone Frickley AWeymouth Duoiea'eoCPatn&enatc  F2 O;M1 xxx                    55555555555