ZXTape! 0Created with Ramsoft MakeTZXHFD2 +2A iW63999:236077\,249:0:0:0::0:"128K PIC" R4:4:3,0:"CODE":65100L:3,0:"3" C128K PIC P><<B AxDC GA|! <A0a A~!B B0 @A|!A 8! 0 A! "D0 Af2wpDޑR=/<{z!48A F@!D ?AxBDDp A ##UD!(BR%)%JJc!? A0B AI A l!"BRI%)$JJ`6!,0 A|A0@B A~h 0 wD!R^/%/={K׮>x!B00 A|A iB GAx8 <͛c|s'@k}x @~0 ` xx!<<A9a0 j@%w?<zO@l>͛c|) #c}l"p||?0 ` ͆ `!Ff BQ BV@!@@.Z@w!ÇI@Gl߾`_a =@?cmof'? >ك߿|!fC[՘@N@ (J@T6=HGe@l߾`8e/`_cmgf?-x <~BD JT@yG  Klw5H6n0cn`?ހc@c9ǟx! G'3|  !`fzD :T@1!2|׌ x$~?pn|x !~f  Ʋw>Rx#m<m`3}wmll9"g!t2\p|0Ͷ 3`x !@  B!_pm0ٻm`3$ml|1ƃ" JRws>8*! JTa@#C\fos7I*"Rp;ppw8vs8ds"1 aȹ2N0H:8 asǏUPUET UU]j px~~ps~8 i%-KP #8G `Ͼ $@y9s*@Ԅ%(H% @s7~?~ps;??|8.y `=Jg/@0D 0f~2.3"UIUUUUTBR"R%J"RUU%p=ipsp?8~p~?>s>%%)BZ %(JBg?@/0nKiHP"પPrR#%s"\P%)@sp?~p?s~=i=.s'p(2\? !?0`I$Jx*UUP%UUUABR"R%R"TTHxp>;ppw8wsp8%)%(BRdp> 0f JJ(HP*󪪨PJ(*A#9K!p>?8|>ws|8 xxxxxxxxxxxx xxxxxxxxxxxxx xxxxxxxxxxxx xxxxxxxxxxxxx xxxxxxxxxxxxx xxxxxxxxxxxxx xxxxxx xxxxxx xxxxxx''' 8888888888 8888888888 8888888888 8888888888 '''''''''''''''''''' ''''''''''''''''''''?CODE 444~44~4>h> >bd&F0h0*d:0  004~4~0> 0`>w{><>>w>p>ww>>np~s>>p~ss>88>s>ss>>ss?>0 0 >>0 0s{ss~s~ss~>spp{>|vss~|p~pxp~ppp>sps>sssss>>~~<v|x|vspppppsssss{ws>sss{>~s{~pp>sss>~s{~vs>p>s>ssss{>ssss6ssss6s>>sc68p`0 xxv>pp~ss~>ppp>>vv>8<888>vv><pp|vvv8x88|~<p|xx|v88888~mmm|vvvvvv>>pppps>>svvv><~8~00p pv,"7")*(MH-):RA=(MI/"10"):MI=MI-(RA*"10"):MI=MI-(MI>"7")*MI:MG=(MG-"60")/"6":MG S):D(F)=D(F)+(R=S):F(,F)=F(,F)+R:F("2",F)=F("2",F)+S:  ET=R:R=S:S=ET: !X="2"̰"20":RA=X-:RB=(W(X)*PTS+D(X)):RC=(F(,X)-F("2",X)):E1=P(X):E2=W(X):E4=D(X):E5=F("1",X):E6=F("2",X):D$=T$(X) "$"1059"+(W(RA)*PTS+D(RA)> RB)*"2" #8"1060"+(W(RA)*PTS+D(RA)=RB(F(,RA)-F("2",RA))> RC) $P(RA+)=P(RA):W(RA+)=W(RA):D(RA+)=D(RA):F(,RA+)=F(,RA):F("2",RA+)=F("2",RA):T$(RA+)=T$(RA):RA=RA-:"1061"-(RA>ç)* %lP(RA+)=E1:W(RA+"1")=E2:D(RA+"1")=E4:F("1",RA+)=E5:F("2",RA+)=E6:T$(RA+"1")=D$:X:"858": *CE "M:E":,ç:"I" :ں;ٰ"7";,"9";"EXTRA TRAINING";ڰ"7";ç;"7","8";"1 GOALKEEPER'S ";MW;"9","8";"2 DEFENCE ";MX;"11","8";"3 MIDFIELD ";MY;"13","8";"4 ATTACK ";MZ;ڰ"6";"21","13";"M MENU" D$=:"1003"-(D$="") D$="M""6"  D$="P" H"1002"+(D$ ="1"MW=çD$ ="2"MX=çD$ ="3"MY=çD$ ="4"MZ=ç)*"4" HS=(D$-"48") lLL=:"17",ç;"HOW MANY HOURS (1 TO 9)? ";"17","25";:"270":HR=ZA:"1008"-(HR
"9") A"891":"892":I="20"̼-:"1022"-(T(I)=HSU(I)=ç)*"13" RA=+(*"4"):RA=(RA/"10"):RB=+(*"9"):RB=(RB-HR):RA=RA-(RB*".05"):RB=+(*"18"):"1010"+(A3="8"RB>U(I)>çE(,I)<çJ(I)="42"J(I)="76"J(I)="73"J(I)="82"J(I)="83") U(I)="2"+(*):J(I)="35" "1012"+(RA=ç)+(RA<ç)*"2" 8"17",ç;" ";V$(I);" HAS IMPROVED WELL ":"1015" 8"17",ç;" ";V$(I);" SHOWS NO IMPROVMENT ":"1015" /"17",ç;" ";V$(I);" IS SLACKING " $RA<çH(I)=H(I)-RA:Y=I:"1017" H(I)=H(I)+RA:Y=I CU(I)>ç"18",ç;"HAS BEEN INJURED FOR ";U(I);" WEEKS":"1019" "525":U(I)=ç"1021" 4K="13"̰"20":V$(K)="32"AD=K:"652":"1021" K ]K=̰"40":K:"17",ç;" " `I:"332":MW=MW+(HS=)*HR:MX=MX+(HS="2")*HR:MY=MY+(HS=)*HR:MZ=MZ+(HS="4")*HR:"1001" ?I "M:I":,ç:"W" TRA=(*"472"):BU=(RA<(PU+PV))*("2"+(*"169")):MP=(V$("12")="32"):"1003" 'ڰ"4";ܼ;"19","4";"LMTG ";CJ-: 3OB=ç:MF="4"+(*"32"):MF=(MF/"4"):"1006"      Q:N=ç:V=V+(Y$(V)=Z$):AR="4":AQ="2":AM=+(*"9"):R=ç:S=ç:S$=Y$(V)       "1041":"1016"+BK u"2",ç;ܼ;MJ;MK;("157"+ML);ڰ"7";ٰ"2";Z$;"22";ç;S$;MI;MH;"31";("157"+MG):D$=Z$:"1031":"1019" l"2",ç;ܼ;MI;MH;("157"+MG);ڰ"7";ç;S$;"22";ٰ"2";Z$;MJ;MK;"31";("157"+ML):D$=S$:"1031"  "1002" MP=ç"1036" f"M:AB":"1009":ڰ"5";ç,ç;"TIME ";N;"8";"MIN":N=MD:ڰ"5";ç,"5";N:="S"MP=ç"1034" 'I=̰"8":"1025"-(B(I)=N)*(-C(I)) #R=R+:"1031":"1001":"1025" S=S+:"1031":"1005" I  "1028"+(N="45")*"4" "1030"-(N<"81"N=BU) "M:AD":"1051" N:R1=R:S1=S:"1033" Cڰ"7";ܼ;"2","14"+(BK="2")*;R;"2","17"-(BK="2")*;S: ç,"23";ܼ;ڰ"2";ٰ"7";"HALF TIME";ڰ"7";ç;"2","11"+(BK="2")*"7";"(";R;")";"2","18"-(BK="2")*"7";"(";S;")":"99":ç,"23";" ":"1028"  }ç,"23";ڰ"2";ٰ"7";ܼ;"FULL TIME":"891":MA=MA+R:MJ=SA:MK=SB:ML=SC:NH=ç:BJ=ç:BP=ç:CJ=CJ-:OT=(R>S):"70"  AD=:"1035":"1037"  [ڰ"6";ܼ;"21",ç;AD;;(T(AD)+);("144"+T(AD));ڰ"6";"5";V$(AD);"14";H(AD):  ڰ"4";ٰ"6";"21",;"S SUBSTITUTE";ܼ;ڰ"7"-(G("12")<ç);ç;"21","18";"12";(T("12")+);("144"+(T("12")));ڰ"7";" ";ڰ"7"-(G("12")<ç);V$("12");" ";H("12"):  2="S"AD=AD+:AD=AD-(AD="12")*"11":"1035" !=°"13"ƯV$(AD)ɰ"32""1040"  "1037" II="12":"652":MP=:"1036":ڰ"4";"21",ç;" ": MH=S$():MI=S$("2"):MG=S$():RA=(MH/"10"):MH=MH-(RA*"10"):MH=MH-(MH>"7")*(MH-):RA=(MI/"10"):MI=MI-(RA*"10"):MI=MI-(MI>"7")*MI:MG=(MG-"60")/"6":MGç"POLICE BILL `";OL;"31";"-":JR=JR-OL <ON>ç"CLUB LOTTERY RAISES `";ON;"31";"+":JR=JR+ON  "1028":"1009"-(RA<)*"2" oI=̰"20":V$(I)ɰ"32"ƽX(I)>"400"RA=(FT-FP):V$(I);" TESTIMONIAL `";RA;"31";"+":JR=JR+RA:"1009" I BNQ>çOO>ç"INSURANCE PAYS CLUB `";OO;"31";"+":JR=JR+OO  "1037"  "1046" KOT>ç"BONUS PAY `";("11"*NW);"31";"-":JR=JR-NW*"11"    "1028":"1018"-(RA<) ?RA=FT-FP:"SPONSORS PAY THE CLUB `";RA;"31";"+":JR=JR+RA  KMA>"9"AG<"4"CI=MB"FD MANAGER OF THE MONTH`5000 +":JR=JR+"5000" MA=MA-(MB=CI)*MA:MB=MB+(MBCI)*"4":KC>ç"BANK REPAYMENTS";"23";"`";CF;"31";"-":JR=JR-CF:KC=KC-CF:KA=KA+CF:CF=CF-(KA<)*CF:KA>COKA=CO EJQ>ç"MORTGAGE REPAYMENTS `";JP;"31";"-":JR=JR-JP:JQ=JQ-JP Eڰ"4";ٰ"7";"9";"WEEK'S PROFIT `";JR:JR<çAI=AI-JR:"1024"  AI=AI+JR Z8>"0""911" "1028":"1029"-(RA<"4")* I=̰"20":V$(I)ɰ"32"ƽG(I)>"29"J(I)ɰ"82"J(I)ɰ"42"J(I)ɰ"76"J(I)ɰ"83"J(I)ɰ"73"J(I)ɰ"35"J(I)="82"-(U(I)>ç)*"47":E(,I)=E(,I)+(E(,I)<ç)*(E(,I)*"2"):V$(I);" ANOUNCES HE PLANS TO RETIRE AT THE END OF THE SEASON":G(I)=G(I):"1029"  I:"1029" RA=+(*"35"): "1028":"1030"+(RA>"2")* ,I=̰"20":"1032"-(V$(I)ɰ"32"U(I)=) 2V$(I);" RETIRES THROUGH INJURY":"200":"1034" I    7NQ=NQ-(NQ>-):NQ=ç"INSURANCE POLICY HAS EXPIRED"  3"M:AD":HW="1001":D$="W1":BU<"81"HW="1003"  "901"  P"1028":Y=̰"20":"1038"+(J(Y)="105"RA<"6")+(J(Y)="105"RA="9")*"19"  Y:"1011" OV$(Y);" INTERNATIONAL COMITMENTRELEASE HIM Y/N";"23";"`";V(,Y);"31";"+" 9="Y"J(Y)="73":JR=JR+V(,Y):AD=Y:"351":"1011" @="N"RA=+(*"15"):H(Y)=H(Y)-(RA/"10"):"525":"1011"  "1040" dRA=+(*"50"):RA="8"RA=(AI/"100")*"15":"VAT RETURNS";"23";"`";RA;"31";"-":JR=JR-RA q"1028":RA="9"AI>"300000"AI>"1500000"RA=(AI/"2"):"DIRECTORS WITHDRAW `";RA;"31";"-":JR=JR-RA "1028":RAɰ"8" (I="20"̼-:"1050"+(T(I)=ç)*"6" 1"1056"-(J(I)="32"J(I)="43"J(I)="45")*"5" 'RA=+(*"20"):"1052"-(Y$(RA)=Z$) qEV=H(I)*H(I)*"6000":V$(I);" IS UNHAPPY AND REQUESTS"'"A TRANSFER TO ";Y$(RA);'"TAX FREE `";EV;" ACCEPT Y/N" "1053"+(="Y")+(="N")*"2" "1060":JR=JR+EV:"200": 6RA=(*"10"):H(I)=H(I)-(H(I)/"10"):Y=I:"525":  I: !mRA="97"+(*"10"):RB="1500000"+(*"1000000"):Y$(RA);" OFFER `";RB;"TAX FREEFOR ";V$(Y);" ACCEPT Y/N" ""1058"-(="N")*"47"+(="Y") #)I=Y:"1060":JR=JR+RB:"200":"1011" $5RA=I:Y="21"̰"23":V$(Y)=V$(I)I=Y:"200":I=RA %Y: $?W1 + + - "M:W1":,ç:"R" fFL=+(*"20"):V$(FL)="32"J(FL)="35"J(FL)="42"J(FL)="73"J(FL)="82"J(FL)="83""1005"  "1054" "1004"+(JS=ç) 0V$(FL);" RETIRES THROUGH INJURY":I=FL:"200" JS=ç "1007"+(I$()="32")*"4" +I="6"̰"12":"1010"-(I$(I)ɰ"32")*"2" lRA=(Y("2",)/"10"):RB=(*RA):RB=(RB/"2"):Y("2",I)+RB> Y(,I)Y("2",I)=Y("2",I)-RB:"1010" Y("2",I)=Y("2",I)+RB I BU=ç:CZ=ç  "1038":"1016"-(RA<"12")* :"M:13":K=ç̼:RA=+(*"17"):"1014"+(N(,RA)=ç) "1041":ڰ"6";ç;"MIDWEEK GAME";ڼ;ٰ"5";'"4";Y$(N(,RA));" ";R;" ";Y$(N("2",RA));" ";S:R$=Y$(N(,RA)):S$=Y$(N("2",RA)):"1051":N(,RA)=ç K MA1=ç:I=̰"20":A1=A1+(V$(I)ɰ"32"):I:"312":"1017"+(A1<"12")*"4" JU="TOO MANY SHARES HAVE BEEN SOLD"'"THE NEW BOARD OF DIRECTORS"'"HAVE SACKED YOU":NC=ç:OQ=:"M:X":AI=ç:"1001":"1039" "1019"+(ID<"15")*"4" ~I=(ID-)(ID-"14")-:RA=(W$(I)()-"48"):RB=(W$(I)("2")-"48"):OP=OP+(RA< RB)*+(RA=RB):I:"1020"+(OP>"6")* ="DIRECTORS VOTE OF CONFIDENCE":RA=+(*"2"):"1020"+RA Tڰ"2";ٰ"7";"YOU ARE GIVEN A WEEK'S NOTICE":NC=ç:OQ=:"M:X":"1001":"1039" &ڰ"4";"YOU ARE GIVEN ANOTHER CHANCE" AI>-"1039" KA=ç"1026" |KD=KA:AI=AI+KA:KA=ç:KD=KD+(KD/"100")*"11":KC=KC+KD:CF=(KC/"40"):"1036":"THE DIRECTORS BORROW `";KD:"1023" JQ>ç"1028" JQ=("1800000"/AP):ET=((JQ/"100")*"26"):JP=((ET+JQ)/"80"):AI=(AI+JQ):JQ=JQ+ET:"1036":"THE DIRECTORS MORTGAGE `";JQ:"1023" AU<"2""1030" DW=(AU-):AU=:AV=(DW/"1000"):AV=AV+(AV<ç)*AV:AK=AK-((AK/"100")*AV):AK=AK+((-AK)/"2")*(+(".95"-AK)):DX=(AK*DW)/"100":AK=AK-(AG-BX)*"20":AI=AI+DX:"1036":"THE CLUB SELL SHARES `";DX:"1023" I=̰"20":"1031"+(G(I)<ç) 4I:I="24"̰"26":"200":I:"1017"+(AI<ç)*"20" H(I)=EV="6500":"1034"  ?EV="5000"*(H(I)-)*(H(I)-)*"2"+(J(I)="105")*"310000"  +FU=(EV/)+"6000":RA=EV+(*FU):EV=RA  R"1036":"THE DIRECTORS HAVE SOLD"'V$(I);" FOR `";EV:AI=AI+EV:"200":"1031"  %"TO GET OUT OF FINANCIAL TROUBLE":  k"DIRECTORS VOTE OF CONFIDENCE":ڰ"2";ٰ"7";"YOU HAVE BEEN SACKED":NC=ç:OQ=:"M:X":"1001":"1039" RA=+(*"35"): "890"  "1042" JR=+(*"9")-"5":R=R+(R<ç)*R:S=+(*"8")-"5":S=S+(S<ç)*S: J"332":I=̰"20":V$(I)ɰ"32"V("2",I)=çD$="R":HW="359":"902" I "848":"1044" uKR   "M:R":,ç:"R1" ]ZY=ç:::ݼ;"20","18";"BANK";ç;" `";AI:HG=((X(IB)+"19")/"20"):"1024"-(HF=) .HG=AP:,"9";Z$;"19";"DIV ";AP:"1025" &,"9";Y$(X(IB));"19";"DIV "; HG ܼ;(T(IB)+);"6","8";("144"+T(IB));ڰ"4";ç;"10";V$(IB);"19";H(IB);"22";G(IB);"8","12";ڼ;ܼ;ٰ"7";"TEMPER ";E(,IB):"1028"-(HI=çHF=)*"2" R"21",ç;"DO YOU WANT TO NEGOTIATE Y/N ":="N"D$="R1":HW="1001":"901" "1026"+(="Y")*"2" E"21",ç;" ":"1030"-(HI AI) )HF<"10",ç;"MONEY OFFER `";HI "1037"-(HJ=çHF=)*"5" L"21",ç;"DO YOU WANT TO LOAN Y/N ":"1032"+(="Y")+(="N")*"5"  HK=ç:"332":"90":LL="2":ڰ"6";"21",ç;"LOAN WHICH PLAYER ";"21","18";:"270":HK=ZA:"1033"+(HK>çHK<"21")  C"1035"-(HL=HKJ(HK)="42"J(HK)="35"J(HK)="82"T(HK)=ç)*"2"  qG(HK)=G(HK):LL="2":ڰ"6";"21",ç;"HOW MANY WEEKS LOAN ";"21","20";:"270":HJ=ZA:"1022"    $"881":"1043"-(HL=çHF=)*"5" L"21",ç;"DO YOU WANT TO FREE TRANSFER Y/N":"1038"+(="Y")+(="N")*"5" "332":"90" HL=ç:LL="2":ڰ"6";"21",ç;"FREE TRANSFER PLAYER No ";"21","24";:"270":HL=ZA:"1041"-(HL"20"HL=HK) >"1022"+(T(HL)=çJ(HL)="76"J(HL)="82"J(HL)="42")*"18"  ("883":H(IB)=EV="6500":"1045" BEV="5000"*(H(IB)-)*(H(IB)-)*"2"+(H(IB)>"9.6")*"310000" vFU=(EV/)+"6000":RA=EV+(*FU):EV=RA:RA=(G(IB)-"28"):RA=RA+(RA<ç)*RA:RB=(EV/"10")*RA:EV=EV-RB:"906"  HN=ç:"1048"-(HF<"2"HL>ç) HM=("4"/HG):H(HL)HMHO=H(HL):HM=(G(HL)-"26"):HM=HM-(HM<ç)*HM:HO=HO-HM:HO=HO-(HO<ç)*HO:HO=HO+(HO=ç):HN=(HO*HO*"5000") "1050"-(HF<"2"HJ>ç) HO=ç:HM=("4"/HG):H(HK)>HMHO=H(HK):HM=(G(HK)-"26"):HM=HM-(HM<ç)*HM:HO=HO-HM:HO=HO-(HO<ç)*HO:HO=HO+(HO=ç):HN=HN+(HO*HJ*"100") EV=EV-HN:"1052"-(EVHI) >ڰ"5";"13",ç;"TRANSFER FEE AGREED BY ";Y$(X(IB)):"1054" ڰ"5";"13",ç;Y$(Y(,IB-"18"));" REFUSE OFFER":HI=ç:HJ=ç:HK=ç:HL=ç:I=̰"99":I:RA=+(*"4"):RA=X(IB)=ç HW="1001":D$="R1":"901" eLL=:"21",ç;"HOW MANY WEEKS CONTRACT ";"21","24";:"270":HR=ZA:"1055"-(HR<"2") )"14",ç;"CONTRACT";"16";HR;" WEEKS"  "1059"-(HF=HF=)*"2" !eLL="4":"21",ç;"HOW MUCH PER WEEK ` ";"21","19";:"270":HS=ZA:"1058"-(HS<) "&"15",ç;"WEEKLY PAY";"16";"`";HS #"1062"-(HF=HF=)*"2" $vLL="5":"21",ç;"HOW MUCH SIGNING ON FEE ` ";"21","25";:"270":HT=ZA:"1061"-(HT<ç(HT+HI)>AIHF<) %ZY=ç:"16",ç;"SIGNING ON FEE `";HT;"21",ç;" ":HF=(HT+HI)>AIZY=AI:"17",ç;"DIRECTORS LOAN YOU `";((HI+HT)-AI):AI=((HI+HT)-AI) &HU=+(*"20")+"50":HU=HU*H(IB)+(H(IB)>"9.7")*"1000":HU=HU+((HG-AP)<-)*( (HG-AP)*HU):HV=(G(IB)-"27"):HV=HV+(HV<)*(HV+):HU=(HU/HV):HU=HU+(HU<"50")*("50"-HU):D$="R2":HW="1011":"901" FR1  "M:R1":,ç:"R2" "64815":"1023":Z7="0":EV=ç:HK=ç:HJ=ç:HH=ç:HI=ç:HL=ç::ڼ;ٰ"7";ç,"5";"BUYING";ڰ"2";ç,"22";"OFFERS";ڰ"6";ç;"11","5";"SELLING" JER="2":HD="5":HE="162":PZ="125":I="21"̰"23":"1003"+(X(I)=ç) "1021":ER,;I-"20";;Y$(X(I));ER+,;(T(I)+);ܼ;("144"+T(I));ç;ڰ"4";;G(I);"6";V$(I);"15";H(I):ER=ER+:HE=HE-"24" I AER="13":HE="74":PZ="125":I="24"̰"26":"1006"+(X(I)=ç) "1021":ER,;I-"20";;Y$(X(I));ER+,;(T(I)+);ܼ;("144"+T(I));ç;ڰ"4";;G(I);"6";V$(I);"15";H(I):ER=ER+:HE=HE-"24" TI:ER="2":HD="149":HE="162":PZ="101":I=̺:"1008"+(J$(I)="32"NC>ç) x"1021":ER,"19";I+"6";ER,"21";J$(I);ER+,"21";"D";O(,I);"26";O("2",I):ER=ER+:HE=HE-"24":Z7=Z7+"1" (I:"890":ڰ"6";"21","14";"M MENU" "849" 7="1"X("21")>çװ".1",:IB="21":HF=:"1022" 7="2"X("22")>çװ".1",:IB="22":HF=:"1022" 7="3"X("23")>çװ".1",:IB="23":HF=:"1022" 9="4"X("24")>çװ".1",:IB="24":HF="2":"1022" 9="5"X("25")>çװ".1",:IB="25":HF="2":"1022" 9="6"X("26")>çװ".1",:IB="26":HF="2":"1022" B="7"ƯJ$()ɰ"32"װ".1",:IB=:D$="Y":HW="1001":"902" F="8"ƯJ$("2")ɰ"32"װ".1",:IB="2":D$="Y":HW="1001":"902" B="9"ƯJ$()ɰ"32"װ".1",:IB=:D$="Y":HW="1001":"902"  "1010" 7ٰ"5":HD,HE:PZ,ç:ç,-"21":-PZ,ç:ç,"21":ç: D$="R":HW="1022"::"901" &I="24"̰"26":V$(I)="32""1026" *K=̰"20":V$(I)=V$(K)G(I)>ç"1026"  K:"200" I: /R2 ||~"M:R2":,ç:"X" %"332":D$="R1":HW="1001":"901" eLL=:"21",ç;"HOW MANY WEEKS CONTRACT ";"21","24";:"270":HR=ZA:"1003"-(HR<"2") )"14",ç;"CONTRACT";"16";HR;" WEEKS" "1007"-(HF=HF=)*"2" eLL="4":"21",ç;"HOW MUCH PER WEEK ` ";"21","19";:"270":HS=ZA:"1006"-(HS<) &"15",ç;"WEEKLY PAY";"16";"`";HS "1010"-(HF=HF=)*"2" qLL="5":"21",ç;"HOW MUCH SIGNING ON FEE ` ";"21","25";:"270":HT=ZA:"1009"-(HT<ç(HT+HI)>AI ) O"16",ç;"SIGNING ON FEE `";HT;"21",ç;" " "891":HU=+(*"20")+"50":HU=HU*H(IB)+(H(IB)>"9.6")*"1000":HU=HU+((HG-AP)<-)*( (HG-AP)*HU):HV=(G(IB)-"27"):HV=HV+(HV<)*(HV+):HU=(HU/HV):HU=HU+(HU<"50")*("50"-HU) $DT=(HSHU):"1039"-(HS>HU )*"27" BHV=(("1000"*H(IB))/AP):HV=HV+((HG-AP)<-)*((HG-AP)*"4")*HV )DT=(HTHV)*"2":"1039"-(HT>HV )*"25" YIA=(G(IB)-"23"):IA=IA+(IA<)*(IA+):RA=+(*"2"):IA=IA+(RA="2"):IA=IA*"53" 'DT=(IAHR)*:"1039"-(IA> HR)*"23" "18","2";V$(IB);" AGREES TO SIGN";"19","8";" ":V("2",IB)=HR:V(,IB)=HS:X(IB)=X(IB)-(NT=ç)*X(IB):AI=AI-(HF=)*(HI+HT)-(HF=)*HT:"1017"-(HF=NT=ç)*"16"-(HF=NT=)*"653" DY(,IB-"18")=ç:Y("4",IB-"18")=ç:Y("5",IB-"18")=ç:HI=ç ?I=̰"20":V$(I)="32"AD=IB:"652":Y=I:"525":"1020" I HLç"1024" 'HL=IB:"1024":"1001"+(HKç)*"21" mI="13"̰"20":J(I)="43"J(I)="32"J(I)="45"J(HK)="76":U(HK)=HJ:AD=HK:"652":Y=I:"525":"1001" I V$(HL)="":H(HL)=ç:T(HL)=ç:X(HL)=ç:E(,HL)=ç:E("2",HL)=ç:G(HL)=ç:J(HL)="32":U(HL)=ç:V(,HL)=ç:V("2",HL)=ç: "98":V$("27")=Z9+"."+H$(RC)+M$(RB)+H$(RD)+E$(RA):G("27")="18"+(*"15"):T("27")=+(*"4"):H("27")=+(*("6"-HG)): "98":V$("28")=Z9+"."+H$(RC)+M$(RB)+H$(RD)+E$(RA):G("28")="18"+(*"15"):T("28")=+(*"4"):H("28")=+(*("5"-HG)):  &RA=+(*"20"):"1029"+(RA="20") _"19","8";"RE-NEGOTIATE Y/N":"1029"-(="N"HF<)*"28"+(="N"HF=)*"18"-(="Y")*"27" 'RA=+(*"80"):"1031"-(Y$(RA)=Z$) T("27")=ç:T("28")=ç:"10",ç;"MONEY OFFER `";EV:RA=+(*"5"):"892":"1033"-(RA="5"ET<"20"H(IB)>"1.9") HJ="2"+(*"19"):U("27")=HJ:J("27")="42":"1025":H("27")=+(*(H(IB)-)):H("27")=H("27")-(H("27")>"5")*(H("27")-"5"):"11",ç;"LOAN ";HJ;" WEEKS";"16";("144"+T("27"));" ";V$("27");"27";H("27");"30";G("27")  yRA=+(*"10"):"892":"1035"-(RA="9"T("27")=çET<"20"H(IB)>"2.9"RA="9"T("27")>çET<"19"H(IB)>"2.9")  "1026":H("28")=+(*(H(IB)-"2")):H("28")=H("28")-(H("28")>"5")*(H("28")-"5"):"12",ç;"FREE TRANSFER ";("144"+T("28"));" ";V$("28");"27";H("28");"30";G("28")  E"18","7";"DO YOU ACCEPT Y/N":"850":"1035"+(="N")+(="Y")*  0"891":RA=+(*"7"):"1037"-(RA>)*"36"  X(IB)=ç:V$(IB)="":"1001" 4"891":"1048":RA=+(*"20"):"1040"-(RA=) RA=+(*"7"):AI=AI-(ZY>ç)*AI:AI=AI+(ZY>ç)*ZY:"18","2";V$(IB);" REFUSES TO SIGN "''" ":"925":"1050"-(HF=NT>çRA>)*"691"-(HF="2")*"14" oAI=AI+((EV/)*"2"):I="24"̰"26":X(I)=X(I)-(V$(I)=V$(IB))*X(I):I:HL=IB:"1024":"1042"-(T("27")ç) BV("2","27")=HJ:V(,"27")=H("27")*"50":AD="27":"1045" "1044"-(T("28")ç) QHJ=ç:AD="28":"1045":IB=Y:HF=:HL=ç:NT=ç:D$="R":HW="1022":"901"  "1001" 5I="20"̼-:V$(I)="32""652":Y=I:"525": I: RB=IB:"18","2";V$(RB);"HAS GONE TO ";Y$(IB);'" ":HL=RB:"1024":K=̰"50":K:"1001"-(NT=)*"637" "I=̰"20":V$(I)=V$(IB)IB=I: I: I=IB:"200":"99":"1001" .X 113"M:X":,ç:"U" VRA=-(AG>"6"AG<"14")-(AG>"13")*"2":RZ=+(*RA):RA=(AG/"4")-"2":I=RZ    RB=(*RA) \RB=RB+AP:RC=RB-(RB>"4")*(RB-"4")-(RB<)*RB:RC=RC+(RC=ç):RD=((RC*"20")-"19")+"10" %RE=(*"10"):"1011"-(RC=AP)*"4" -"1008"-(T$(RE+"11")=Z$Y$(RD+RE)=Z$)*"2" (K=I-:J$(K)=T$("11"+RE)"1006" K =J$(I)=T$("11"+RE):O(,I)=AP:O("2",I)="11"+RE:"1014" %K=I-:J$(K)=Y$(RD+RE)"1006" K 8RF=RD+RE:J$(I)=Y$(RF):O(,I)=RC:O("2",I)="11"+RE I: F-U "M:U":,ç:"B"          <CJ="38"-(ID-):I="38"̰"2"-"2":CJ=IBK=:"1014" I  BK="2"  UA=ç:OZ=ç:OQ=ç:OP=ç:HE=ç:JN=ç:X$="":JJ=ç:JR=ç:NP=NF+NA:OO=ç:I=̰"20":OO=OO+(U(I)>çJ(I)="35")*V(,I):NP=NP+V(,I):J(I)="73"Y=I:"525" :I:I=̰"12":NP=NP+Y(,I):I:FM=(AI*".3"/"100") D$="W":HW="903":"901" 3B "M:B":,ç:"1"  zDN="50000"+(*"10000"):DN=(DN/AP)/AP:DN=DN-(("1250"/AP)/AP)*AG:DN=DN-(("1250"/AP)/AP)*MN:DN=DN-(AP=)*(DN/)     oRA=(("200"/AP)/AP):RB=+(*(RA-)):OL=("40"*RB):ON=("4"+(*"12500"))/AP:"1008"+(BK="2")*"5" ?DZ=("5"-AP):NJ>DZRA=NJ-DZ:DN=(DN/RA):"1011":"1010" 6NJRADN=RA (DN=DN+(DN<ç)*DN:DN=DN++(*"50") &AP"18721"DN="18721"  "1010" 5PG=PG+(PG=ç)*DN:PF=PF+(PF=ç)*DN:DN>PFPF=DN DNç)*"17";ڰ"4";ٰ"7";"H";RB,"17"-(IB>ç)*"17";ڰ"2";ٰ"7";"A" >RA=RA+(Y$(RA+CM)=Z$):RB,"2";Y$(RA+CM);RB,"19";Y$(RA+CM) 9(RB-)IDRB,"12";W$(RB-)();"-";W$(RB-)("2") B(RB+"18")IDRB,"29";W$(RB+"18")();"-";W$(RB+"18")("2") -RA=RA+:RB=RB+:"1007"-(RB<"21")*"5"  CJ=ç !ڰ"6";ç;"21","13";"M MENU" "849":"1009" _214 "M:14":,ç:"7" Z"M:13":"4"::ç,"10";"POSTPONMENTS":EV="2":I=̰"18":"1002"+(N(,I)=ç)*"2" ;EV,"4";Y$(N(,I));"19";Y$(N("2",I)):CJ=ç"1005"  EV=EV+  I:"1006" R=+(*"9")-"5":R=R+(R<ç)*R:S=+(*"8")-"5":S=S+(S<ç)*S:R$=Y$(N(,I)):S$=Y$(N("2",I)):EV,"14";R;EV,"17";S:"1051": CJ=ç"891":"1057": ڰ"6";"21","13";"M MENU" "1008"-(="M")*"108" z27 cce"M:7":,ç:"8" 9EF=::ڰ"2";ٰ"7";"P PLAYER AGE GOALS PLD INJURIES" )I=̰"20":"1003"+(V$(I)="32")*"7" ܼ;(T(I)+);EF,ç;("144"+T(I));ç;ڰ"4"+(G(I)<ç)*"2";;V$(I);ڰ"4";"10";G(I);"13";(T(I)=);E(,I);EF,"16";E("2",I);ç;"20";X(I) -E(,I)<çJ(I)="82"EF,"24";"RETIRING" 4U(I)>çJ(I)="83"EF,"24";U(I);"26";"WK SUS" 3U(I)>çJ(I)="35"EF,"24";U(I);"27";"WEEKS" 3U(I)>çJ(I)="76"EF,"24";U(I);"27";"UNAVA" 2U(I)>çJ(I)="42"EF,"24";U(I);"27";"LOAN"  EF=EF+  I:CJ=ç "848":"1011" C8 "M:8":,ç:"9" /:ڰ"6";"20","5";"C CHANGE LEVELS M MENU" "1002"+(AB+"2")  (JT=-);"8","12";"3 EASY"  (JT=ç);"10","12";"2 NORM"  (JT=);"12","12";"1 HARD" $(JT="2");"14","12";"0 GENIUS" ="M""900" "1007"+(="C"AB<)*"2" VLL=:"18",ç;"WHICH LEVEL? ";:"270":RA=ZA:"1010"-(RA<ç("2"-RA)) 4JT=(RA=ç)*2+(RA=)-(RA=):AB=JT:"1001" 29 "M:9":,ç:"C" -Y=̰"20":J(Y)="42"U(Y)=I=Y:"200" "1003"+(U(Y)=ç) OU(Y)=U(Y)-:U(Y)=çH(Y)=H(Y)-".4":J(Y)="32"+(E(,Y)<ç)*"50":"525" X(Y)=X(Y)+(Y<"12"):Y _ME=ME+(R1> S1)*(ME/"2")-(R1< S1)*(ME/"2"):ME=ME-(ME>"99")*(ME-"99"):ME<"2"ME="2" SY=̰"11":T(Y)>"2"H(Y)>çH(Y)=H(Y)+(R1> S1 )/"20"-(R1< S1 )/"25":"1008" @H(Y)>çH(Y)=H(Y)+(R1>S1)/"20"-(R1 "8")   "1007":ڰ"2";ٰ"7";"11","6";"START ORIGINAL TAPE":ٰ"4":"T:":"M1":"M2"::ڰ"2";ٰ"7";"11","11";"STOP TAPE":׺,"10":"1001":"1007":ڰ"2";ٰ"7";"11","6";"LOAD SAVED GAME TAPE":ٰ"4":X$:"M:":ç:ç:"6" :"1001"::ڰ"2";ٰ"7";"11","2";" PLEASE INSERT BLANK TAPE ":"23607","60":"23635","23627":"23636","23628":X$:"23635","203":"23636","92":"23607","249"::"11","9";"SAVE AGAIN Y/N":ç:"6"+(="Y")*"1000" 8ڰ"4":"4":ç::"2","2";ۼ;ٺ;ڰ"7";"LOADING": /H ZZ\"M:H":,ç:"J" *NP=ç:OC=ç:RX=F("2",AG):RY=F(,AG) XRA=(*"5"):RZ="12"+RA:ME="30"+(*"20"):Y=̰"20":Y>RZI=Y:"200":"1013" H(Y)=(AP-"5")+(*"39")/"10":T(Y)=+(Y>Y<"6")+(Y>"5"Y<"9")*"2"+(Y>"8"Y<"12")*+(Y>"11")*(*"4"):OC=OC+(T(Y)=):G(Y)="18"+(*"18"):V(,Y)= +(*"20")+"50":V(,Y)=V(,Y)*H(Y)+(H(Y)>"9.6")*"1000":HV=(G(Y)-"27"):HV=HV+(HV<)*(HV+) 8V(,Y)=(V(,Y)/HV):V(,Y)=(V(,Y)+(V(,Y)<"50")*("50"-V(,Y))):NP=NP+V(,Y):V("2",Y)="20"+(*"56"):E(,Y)=ç:X(Y)="30"+(*(((G(Y)-"17")*"30")-"30")):E("2",Y)=ç:RA=-+(*"17"):RA=RA+(RA<ç)*RA-(RA>"9")*(RA-"9"):E(,Y)=RA:"98":V$(Y)=Z9+"."+H$(RC)+M$(RB)+H$(RD)+E$(RA) "1006"+(RY=ç)* "1007"+(T(Y)=)*"2" 9T(Y)="4"E(,Y)=(*(RY+)):RY=RY-E(,Y):"1010" 1E(,Y)=(*(RY/"2")):RY=RY-E(,Y):"1010" 5RX>çT(Y)=E(,Y)=(*(RX+)):RX=RX-E(,Y) IT(Y)=E("2",Y)=(X(Y)-(X(Y)/"4"))+(*(X(Y)/"4"))+E(,Y):"1013" @T(Y)="2"T(Y)=E("2",Y)=E(,Y)+(*(X(Y)/"6")):"1013" BT(Y)="4"E("2",Y)=(X(Y)/"6")+(*(X(Y)-(X(Y)/"2")))+E(,Y) q"525":Y:NW="150"+(*"200"):NW=NW/AP:NV="200"+(*"300"):NV=NV/AP:AI="150000"+(*("500000"/AP)) 6NF=("5000"+(*"3000"))/AP:NP=NP+NA+NF:"332": 1J "M:J":,ç:"L" (:"9",;"CURRENT TICKET PRICE `";NJ vLL=:"11",;"TYPE NEW TICKET PRICE IN PENCE"'"14";"p";:"270":ZA=(ZA/"100"):"1003"-(ZA<".1"ZA>"9.99") 2NJ=ZA:"9","25";NJ;" ":K=̰"50":K:"900" 0L "M:L":,ç:"S" KNA=("200"-("7.5"*AG))*("5"-AP):NG=NA:NB=(NA/"100")*"20":NA=NA-NB NC=(("20"/AG)*"10")+(+(*"20")):NE=("14"-AG)-(ç+(*"7")):NE=NE+(NE<ç)*NE::ç,"10";Z$;" FC"''"THE BOARD OF DIRECTORS OFFER YOU"''"`";NA;" PER WEEK"'"AND A ";NC;" WEEK CONTRACT" "19","14";"SIGNATURE:" "1013"-(NU=)*"8"  "21","8";"RE-NEGOTIATE Y/N" "1006"+(="N")*"4"+(="Y") NA"8"G$F$) )F$=G$:"19","24";F$:NUɰ"2""755"  !"21","7";"DO YOU ACCEPT Y/N" ="N"NC=ç:"6" %="Y""1010":I=̰"99":I:"6"  "1014" ,ES "M:S":,ç:"Y" &OZ=ç:CZ=ç:"891":"767":"751" :"892":ET=ET-"12":JW="102"-(AG*"4")+(ET/"2.5"):RA=AI/(("999999"/AP)/"4"):RA=RA-(RA>"4")*(RA-"4"):JW=JW+RA:"1003"+(AG>) `EE=("50000"/AP)/AG:ڰ"6";ټ;"7","7";"LEAGUE PRIZE MONEY";"9","12";"`";EE:AI=AI+EE     "1009"+(AG<"18")* "1010"+(AP<"4"AG>"17")* "1011"+(AP="4"AG<"20") Nڰ"2";"5",ç;"YOU HAVE BEEN SACKED BY YOUR FELLOW DIRECTORS":"1000":  "1013"-(AP=AG>"5")*"420" ټ;"11","2";"MANAGER RATING ";JW;"%";" ";"13","2";"SEASON TICKET SALES `";(DN*"4"):"863":AH=AH+:AI=AI+(DN*"4"):"1015":"891"  AK=AK-(AP<"4"AG>"17")*"400":AP=AP+(AG>"17"AP<"4")-(AG<"4"AP>):BX=(AG<"4")*("17"+AG)-(AG>"17")*(AG-"17"):AK=AK+(AG<"4")*"60"-(AG>"17")*"60":"813":"814":"1023":"4":"755":"858":"416":"413":"332":"1029":NF=("5000"+(*"3000"))/AP:OY="5":"69" /I=̰"4":RA=(I*"20")-"19":AP=I"1017" MK=̰"10":"1020":RC=RB:"1020":D$=Y$(RC):Y$(RC)=Y$(RB):Y$(RB)=D$:K +"2":ڰ"2"::ç;ç,"11";"DIVISION ";I K=ç̰"19":(I=K>"16"I=K=çI="4"K"16"I=K"16"I="4"K="19");K+,"10";K+;K+,"13";Y$(RA+K):K:"1021"  I:"1021" RB=RA+(*"20"): (ڼ;"21","11";"C CONTINUE":="C" "850":"1021" FI="2"̰"4"Ͱ"2":CN=I*"20":CM=CN-"19":"1023"+(I/"2"):I:I: $"1026":"1028":"1027":"1028" "1027":"1028": ?QN=CN-"2":QO=CN-:QQ=CN:QP=CN+:QR=QP+:QS=QP+"2": ?QN=CM:QO=CM+:QQ=CM+"2":QP=CM-:QR=QP+:QS=QP+"2": qX$=Y$(QN):D$=Y$(QO):U$=Y$(QQ):Y$(QN)=Y$(QP):Y$(QO)=Y$(QR):Y$(QQ)=Y$(QS):Y$(QP)=X$:Y$(QR)=D$:Y$(QS)=U$: pI="6"̰"12":Y("5",I)=Y("5",I)+(I$(I)ɰ"32"):Y("5",I)="19"I$(I)="":NO=NO-:J=̰"5":Y(J,I)=ç:J I: '4Y   "M:Y":,ç:"Y1" YNA=("200"-("7.5"*O("2",IB)))*("5"-O(,IB)):NG=NA:NB=(NA/"100")*"20":NA=NA-NB bNC=(("20"/AG)*"10")+(+(*"20")):NE=("14"-O("2",IB))-(ç+(*"7")):NE=NE+(NE<ç)*NE o:ç,"10";J$(IB);" FC"'"THE BOARD OF DIRECTORS OFFER YOU"''"`";NA;" PER WEEK AND"'"A ";NC;" WEEK CONTRACT" $"19","14";"SIGNATURE:":"1014" *װ".1",ç:NC=ç:"1006"+(Z7="1")*"10" 0J$(IB)="":O(,IB)=ç:O("2",IB)=ç:"1024" Z"21",;"RE-NEGOTIATE Y/N M MENU":="M"װ".1",ç:NC=ç:D$="R1":HW="1001":"902" $"1014"+(="N")*"18"-(="Y")*"9" NAç)*"80":I DRA=RA-(RA>"71")*(RA-"71"):RB=RA+(*"10"):"1022"-(Y$(RB)=Z$) ZRB>(CM-)RB<(CN+)RB=RB-(RB/"20")*"20":RB=RB+(T$(RB)=Z$):O(,IB)=AP:"1030" J$(IB)=Y$(RB):O(,IB)=+(RB>"20"RB<"41")+(RB>"40"RB<"61")*"2"+(RB>"60")*:O("2",IB)=RB-((O(,IB)*"20")-"20") D$="R1":HW="1001":"901" "1026"+(RB>"20")*"5" "1030"-(T$(RB)=Z$)*"11" )I=̰"20":T$(I)=J$(IB)RA=I:"1029" I DRA=RA-(RA>"11")*(RA-"11"):RB=RA+(*"10"):"1030"-(T$(RB)=Z$) 'J$(IB)=T$(RB):O("2",IB)=RB:"1024" @RB=RB-"20":RA=O(,IB)+:RB=RB+((RA*"20")-"20"):"1023" װ".1",ç:"1042":OW=ç:JU=ç:AU="100000":JQ=ç:KC=ç:OQ=ç:"891":RX=(AP=O(,IB)):AK="2000"-(O(,IB)*"400"):BX=:D$=Z$:Z$=J$(IB):J$(IB)=D$:NI=NI-(O(,IB)>"2")*NI:AP=O(,IB):PS=IB:IB=PS:AG=O("2",IB):"5":CJ="38"-(ID-):"1044":"1033"+(RX=)*"5"  IRA=(AP*"20")-"19":K=̰"18":N(,K)>çET=N(,K):EV=:"1036"  .N("2",K)>çET=N("2",K):EV="2":"1036"  0K:I=̰"20":T$(I)=Y$((RA-)+I):I:"1038"  1I=̰"20":T$(I)=Y$(ET)N(EV,K)=((RA-)+I):  I: KI=ID:W$(I)="":I:J("28"):E(,"28"):"M:H":"1001":AP"18")*"19":RD=RC+V:V=RD:RF=ç:RE=ç:I=CMRD:RE=RE+(Y$(I)=Z$RE=ç):RF=RF+(Y$(I)=J$(IB)RF=ç):I:ID=ID+(RF=RE=ç):V=V+(RF=RE=çRF=çRE=RF=RE=): .Y1 "M:Y1":,ç:"Z" 2I=̰"12":I$(I)="":K=̰"5":Y(K,I)=ç:K:I {NL=:NM=:I=̰"2":"98":I$(I)=H$(RC)+M$(RB)+H$(RD)+E$(RA):Y(,I)="50"+(*"200"):Y("2",I)=+(*"100"):I "NN=(*"4"):"1004"+(NN=ç)* I=NN:"98":I$(I+"2")=H$(RC)+M$(RB)+H$(RD)+E$(RA):Y(,I+"2")="50"+(*"200"):Y("2",I+"2")=+(*"99"):Y("4",I+"2")=+(*"4"):Y("5",I+"2")=+(*"9") ;Y(,I+"2")=+(*"80"):"1006"-(Y$(Y(,I+"2"))=Z$) I NO=(*"5"):"1008"+(NO=ç) TI=NO:"98":I$(I+"5")=H$(RC)+M$(RB)+H$(RD)+E$(RA):Y(,I+"5")="50":Y("2",I+"5")=(*"60"):Y(,I+"5")="35"+(*"65"):Y("4",I+"5")=+(*"4"):Y("5",I+"5")="16"+(*"2"):Y("6",I+"5")=-+(*"17"):Y("6",I+"5")=Y("6",I+"5")+(Y("6",I+"5")<ç)*Y("6",I+"5")-(Y("6",I+"5")>"9")*(Y("6",I+"5")-"9"):I @"416":"413":I=̺:J$(I)="":O(,I)=ç:O("2",I)=ç:I "RA=(*):"1011"+(RA=ç)*"2" {I=RA:K=̰"20":V$(K)ɰ"32"ƽG(K)>"28"J(K)ɰ"82"E(,K)=E(,K)-(E(,K)*"2"):G(K)=G(K):J(K)="82":"1013" K %I:RA=(*):"1014"+(RA=ç)*"6" QK=RA:I=+(*"12"):U(I)=çU(I)=+(*"5"):J(I)="35":AD=I:"1017"   K:"1020" ,J="13"̰"20":V$(J)="32"I=J:"652": J: MNJ=+("4"-AP):NQ=-:I="21"̰"26":X(I)=ç:V$(I)="":I:"332":"89" "6" 3Z "M:Z":,ç:"AB" ڰ"4":"4":ç::ڰ"6";ç;,"11";Z$;ٰ"7";ڰ"2";"6",;"1st STRIP";ں;"6","20";"2nd STRIP":"1002":"1003":"1005" #SA;SB;"8","7";("157"+SC): $SD;SE;"8","24";("157"+SF): #ç;ڰ"5";"20","13";"M MENU": >"1013":ڼ;ٰ"5";"12","7";"C CHANGE 1st STRIP":"1004"  "1006"-(="M")*"106"+(="C") "1013":ٰ"6";"12","8";"I CHANGE INK";"14","8";"P CHANGE PAPER";"16","8";"G CHANGE GRAPHIC";"18","8";"S SWAP STRIPS" E"1008"+(="I")+(="P")*"2"+(="G")*+(="S")*"4"-(="M")*"108" 2SA=SA+(SA<"7")-(SA="7")*"7":"1002":"1008" 2SB=SB+(SB<"7")-(SB="7")*"6":"1002":"1008" 2SC=SC+(SC<"5")-(SC="5")*"4":"1002":"1008" ZMJ=SA:SA=SD:SD=MJ:MK=SB:SB=SE:SE=MK:ML=SC:SC=SF:SF=ML:"1002":"1003":"1008" CI="12"̰"18"Ͱ"2":I,ç;" ":I: ^SA=SDSB=SESC=SFۼ;"12",ç;" TWO STRIPS THE SAME NOT ALLOWED":I=̰"100":I:"1007" MJ=SA:MK=SB:ML=SC:"900" \/AB 99;"M:AB":,ç:"4" #Y=+(*):"1004"-(Y=)*"2" 0Y="2"+(*"10"):"1003"-(T(Y)=çT(Y)="4") ܼ;ڰ"7";AR,AQ;V$(Y);" ";MJ;MK;("157"+ML);ڰ"7";ç;" ";N:E(,Y)=E(,Y)-(E(,Y)<ç)+(E(,Y)>-):E("2",Y)=E("2",Y)+:H(Y)=H(Y)+".04":"1008" (Y="2"+(*"10"):"1003"+(T(Y)<"4") [E(,)=E(,)-(E(,)<çBA>ç)+(E(,)>-BA>ç):E("2",)=E("2",)+(BA>ç) 6"98":V$("21")=Z9+"."+H$(RC)+M$(RB)+H$(RD)+E$(RA) Eڰ"7";ܼ;AR,AQ;V$("21");" ";MI;MH;("157"+MG);ڰ"7";ç;" ";N 7AQ=AQ+(AR="7")*"15":AR=AR+(AR<"7")-(AR="7")*: ^RA=(*"4"):MD="90"+RA:RA=+(*):BN=ç:BO=ç:LA=ç:LB=ç:B("8"):C("8"):BN=BN+(BDBB)*BB+(BD < BB)*BD-(EJ/"2")+(BK=)-(AA=)-(BJ >)+(RA=ME >"80")-(RA=ME < "30")-((PV-PU)>"29"):RA=+(*"5"):BO=BO+(ELEK)*EK+(EL < EK)*EL-(BC/"2")-(BC=BBBB=BD)+(RA=MM >"80")-(RA=MM <"30")-((PU-PV)>"29"):"1010"+(BN<) 1M=BN:RA=(*"8"):LA=LA+(RA>(EI/"2")):M "1012"+(BO<) ;M=BO:RA=(*("8"+(AP=))):LB=LB+(RA>(BA/"2")):M 0RA=LA+LB:RA>"8"LA=LA-:LB=LB-:"1013"  LA=LA-R:LA<çLA=ç:"1016" 1M=LA:B(M)=(N+"2")+(*(MD-)):C(M)=:M LB=LB-S:LB<çLB=ç: ?M=(LA+)(LB+LA):B(M)=(N+"2")+(*(MD-)):C(M)="2":M: @4 S "M:4":,ç:"AD"  UA=ç:ڰ"6";,"11";"DIRECTORS";ڰ"4";"8",;"HOW MUCH MONEY DO YOU WANT FROMTHE DIRECTORS FOR NEW PLAYERS.";"11","11";"`";:"270":UA=ZA:"1003"-(UA=ç) 7"13",;"DIRECTORS: ";: "1004"+(AI>"70000")*"2" `RA="20000"+(*"600000"):RB=+(*"2"):RA=(RA/AP):(RA/RB)>UA"AGREE":AI=AI+UA:"900" "REFUSE":"900" %RA=+(*):"1007"-(RA<)*"2" ;RA=(AI/"100")*"20":"WITHDRAW `";RA:AI=AI-RA:"900" )BAD "M:AD":,ç:"A" 7FL=+(*"18"):RA=+(*"2"):BU>"80"RA="2" +"892":"1053"+(BU<"81"FL>"11")*"11" -ET<"13"T(FL)=çJ(FL)="42"J(FL)="82" .I="13"̰"20":T(I)=çIE=I:JS=ç:"1056"  I:JS=:  !"1057"+(BU<"81"RA="2")*"6" !RA=(("60"/"100")*Y("2","2")):U(FL)=(*"32")-"8":RB=((U(FL)/"100")*RA):U(FL)=U(FL)-RB:U(FL)=U(FL)-(U(FL)<ç)*U(FL):U(FL)=U(FL)+(U(FL)=ç):J(FL)="35":"1058"+(BU>"80")*"2" "ڰ"5";"17","8";V$(FL);" INJURED";"18","6";V$("12");" SUBSTITUTED":MP=ڰ"5";"18","6";Z$;" HAVE TEN MEN":"1061" #E MP=:ڰ"4";"21",ç;" ":"1061" $@V$(FL);" INJURED FOR ";U(FL);" WEEK"+("32"+(U(FL)>)*"51") %KI="12":AD=FL:"652":I=IE:AD="12":"652":BU<"81""332":"1009" & 'U(FL)="2":J(FL)="83":ڰ"5";"17","7";V$(FL);" SENT OFF";"18","5";Z$;" HAVE TEN MEN":I=IE:AD=FL:"652":"332":"1009":C("8")="2":B("8")=(N+((MD-N)/"2")): ("98":V$("21")=Z9+"."+H$(RC)+M$(RB)+H$(RD)+E$(RA):ڰ"5";"17","7";V$("21");" SENT OFF";"18","5";S$;" HAVE TEN MEN":C("8")=:B("8")=(N+((MD-N)/"2")): i2A NNP"M:A":,ç:"D" "I=̰"18":"1002"+(N(,I)=ç) I:RA=ç:"1027" cMC=MC+:N(,I)=JI:N("2",I)=JH:B$=Y$(JI)+°"32"+"P"+°"32"+°"32"+"P"+°"32"+Y$(JH):"1028" "I=̰"20":T$(I)=Y$(ET)KH=I: I GW$(ID)=S+R:ID=ID+(ID<"38"):I="37"̼-"2":"1011"+(CJ=I)*"6" I JI=V-:JH=V+:"875" Y$(JI)=Z$JI=JI-:"875" &"1022":Y$(JH)=Z$JH=JH+:"875"  "1023" %JI=JI-:JH=JH+:"875":"1013" JI=V+:JH=V-:"878" Y$(JI)=Z$JI=JI+:"878" &"1022":Y$(JH)=Z$JH=JH-:"878"  "1023" %JI=JI+:JH=JH-:"878":"1018" $ET=JI:R$=Y$(JI):"1008":KI=KH: RET=JH:S$=Y$(JH):"1008":R=+(*"8")+((KI"29"CI<"42")*"55":RA=+(*IB):"1027"-(RA="5")  "1001" 4B$=Y$(JI)+°"32"+R+°"32"+°"32"+S+°"32"+Y$(JH) 4ڰ"6";ܼ;CL,"4";B$:CL=CL+:"1030"-(RAɰ"5")  "1051" 5CL="20""891":CL="11":"887":"1057":"412"  "445" \/D HHJ"M:D":,ç:"O" e:"890":LL="2":"8",ç;"HOW MANY WEEKS DO YOU WANT TO"'"INSURE THE SQUAD FOR (1-38) ";:"270" ANQ=ZA:NR=((NP/"85")*NQ):"1003"-(NQ"38"NR>AI)*"2" ="11",ç;"THIS POLICY WILL COST `";NR;'"DO YOU ACCEPT Y/N" ="Y""900" ="N"NQ=ç:NR=ç:"900"  "1004" 5O "M:O":,ç:"F" "892":O1=ç:I=̰"18":O1=O1+(N(,I)>çO1=ç):I:RA="4":RB="9.5":ç:ڰ"4":"4"::OZ=çRA,RB;"E EMPLOYEES":RA=RA+:RB=RB-".5" 2CZ=çRA,RB;"S SHARES":RA=RA+:RB=RB-".5" vRA,RB;"A ALTER LEVELS":RA=RA+:RB=RB-".5":NL=NO>çRA,RB;"R RESERVES/YOUTH TEAM":RA=RA+:RB=RB-".5" 1RA,RB;"C CHANGE STRIP":RA=RA+:RB=RB-".5" ?NI=çRA,RB;"G GROUND IMPROVEMENTS":RA=RA+:RB=RB-".5" RA,RB;"T TICKET PRICE":RA=RA+:RB=RB-".5":RA,RB;"W WAGES/CONTRACTS":RA=RA+:RB=RB-".5":O1>çRA,RB;"P POSTPONMENTS":RA=RA+:RB=RB-".5" @CI=(MB-)UA=çRA,RB;"D DIRECTORS":RA=RA+:RB=RB-".5" .RA,RB;"B BONUS PAY":RA=RA+:RB=RB-".5" 8NQ=-RA,RB;"I INSURE TEAM":RA=RA+:RB=RB-".5" )ڰ"6";RA,RB;"M MAIN MENU":HW="1001" D$=:"1012"-(D$="")  װ".1", D$="G"NI=ç"110" D$="T"D$="J":"902" D$="S"CZ=ç"175" D$="W""160" D$="P"O1>çD$="14":"902" D$="E"OZ=çOZ=:"655" D$="C"D$="Z":"902" )D$="D"CI=(MB-)UA=çD$="4":"902" $D$="R"NL=NO>çD$="F":"902" D$="A"D$="8":"902" D$="B"D$="G":"902" D$="I"NQ=-D$="D":"902" "1011"-(D$="M")*"1005" 3F "M:F":,ç:"G" i"891":"892"::ڰ"5";ç,"11";"YOUTH TEAM";ڰ"7";ç;,"7";"COACH:";I$();"22";Y("2",);"%" KRB="6":ٰ"7";"5","24";"TEMP":I=̰"7":"1003"+(I$(I+"5")="32") RA=(Y("2",I+"5")=Y(,I+"5")):RB,"6";I;"8";(Y("4",I+"5")+);ܼ;("144"+Y("4",I+"5"));ç;ڰ"4";"10";I$(I+"5");"17";Y("5",I+"5");"21";RA;Y("2",I+"5");ç;"23";"%";"25";Y("6",I+"5"):RB=RB+:RA="19",ç;"COACH:HE IS AS GOOD AS POSSIBLE" qI:A3<"8"NO>çڰ"6";"15","2";"X PROMOTE PLAYER TO 1st TEAM ";"17","2";"PLAYER MUST BE RATED OVER 49%" ,ڰ"6";"21","13";"M MENU":="M""900" -"850":"1005"+(="X"ET<"20"NO>ç)*"2" jLL=:"15","2";"PROMOTE PLAYER No? ";"15","21";:"270":HC=ZA:"1008"-(HC"7") 9"1009"-(I$(HC+"5")="32"Y("2",HC+"5")<"50")*"8" 'I="13"̰"20":"1010"+(V$(I)="32")  I:"1001" lH(I)=(Y("2",HC+"5")/"30"):H(I)=H(I)+ç+(*)/"10":H(I)=H(I)+(AP<)*(-AP):H(I)ZA)* 7"891":RA=ZA-NW:RA=(RA/"50"):"1001"+(RA>ç)*"8" UY=̰"20":T(Y)>çRB=(*RA):H(Y)=H(Y)+(T(Y)>ç)*(RB/"10"):J(Y)ɰ"35""525" Y:"332":NW=ZA:"1001" Y=̰"20":"1012"+(T(Y)=ç) pRA=(NW/"100"):RA=RA+(RA=ç):RB=NW-ZA:RC=(RB/RA):RB=((H(Y)/"100")*RC):H(Y)=H(Y)-RB:J(Y)ɰ"35""525" Y:"332":NW=ZA:"1001" iRA=(*"99"):ME=ME+(NW"50")*RA-(NW>ZA)*RA:ME=ME-(ME>"99")*(ME-"99"):ME<"2"ME="2"  (GMAIN 2]Y&4] :"312" sMA=ç:MB="4":NW=ç:OT=ç:NQ=-:OZ=ç:CF=ç:AP="4":NH=ç:NI=ç:JV=ç:KC=ç:JL=ç:AA=ç:AD="35":AG="20":AH=ç:AK="180":CL="11":JS=ç:JQ=ç:JM=ç:JN=ç:NJ=:JW=ç:JU=ç:AM=ç:AU="100000":AV=ç:OQ=ç:OP=ç:T$("20","9"):V$("28","8"):J("28"):T("28"):H("28"):M("8"):U("28"):G("28"):V("2","28"):X("28"):E(,"28") MDT=+(*):I$("12","6"):Y("6","12"):J$(,"9"):O("2",):BX="12":NL=ç:NM=ç:NN=ç:NO=ç:NS=:NT=ç:HI=ç:HJ=ç:HK=ç:HL=ç:OB=ç:NU=:ND=ç:PA=ç:PB=ç:PC=ç:PD=ç:PE=ç:PF=ç:PG=ç:LL="9":PX="48":PY="57":JP=ç:PU=ç:PV=ç:MI=ç:MH="2":MG=:PT=ç:OY="5":Z8="0":"4":"316" OW=ç:MW=ç:MX=ç:MY=ç:MZ=ç:MC=ç:UA=ç:Z6="1":OJ="2":OK="2":AW=ç:MB="4":T("24")=ç:CZ=ç:CW=ç:HA=ç:BJ=ç:BK=:BN=ç:BU=ç:CI=:CJ="38":CK=ç nCN=(AP*"20"):CM=(CN-"19"):CO=("310000"/AP)-(AP*"10000"):JK=ç:KA=(CO-KC):KA=KA+(KA<ç)*KA:V=CM: X"65100":"64815"::AI=AI+(AI<ç)*AI:HW="1001":CJ="38"-(ID-):"4":ڰ"4":ç::RA="10":RB="5.5":,"2";"P PLAY MATCH";"4","2";"C CHECK MATCH";"5",;"T TEAM";"6",;"O OFFERS/NEGOTIATIONS";"7","4";"A ADDITIONAL MENU";"8","4";"I INJURIES/GOALS";"9","5";"B BANK";RA,RB;"L LEAGUE TABLE":RA=RA+:RB=RB+".5" _RA,RB;"F FIXTURES":RA=RA+:RB=RB+".5":NN>çRA,RB;"S SCOUTS":RA=RA+:RB=RB+".5" MNC=çOQ=çٰ"7";RA,RB;"R RE-NEGOTIATE CONTRACT":RA=RA+:RB=RB+".5" :NL=RA,RB;"E EXTRA TRAINING":RA=RA+:RB=RB+".5" !OY>çRA,RB;"1 SAVE ";ݼ;OY D$=:"23"-(D$="")  װ".1", 4D$="1"OY>çD$="C":OY=OY-:HW="1006":"902" D$="F"D$="1":"902" D$="L""95" D$="C"D$="3":"901" D$="T""114" D$="B""713" D$="I"D$="7":"902" D$="S"NN>ç"48" D$="E"NL=D$="E":"902" "D$="A"D$="O":"902" #!D$="O""891":D$="R1":"901" %-D$="R"NC=çOQ=çNU="2":D$="L":"902" &D$="P"NC>çOQ=ç"223" '"22" (ܼ;ER,ES;"GOALKEEPER ";BA;ڰ"5";ER+,ES;"DEFENCE ";BC;ڰ"6";ER+"2",ES;"MIDFIELD ";BB;ڰ"7";ER+,ES;"ATTACK ";BD: )Vڰ"4";ܼ;ER+"7",ES+;ڰ"2";ٰ"7";"FORMATION";ER+"8",ES+"4";ç;ڰ"4";ç;MU: *j"891":OW=ç:MW=ç:MX=ç:MY=ç:MZ=ç:MO=:ڰ"4":"4":ç:MJ=MIMK=MHML=MGMJ=SD:MK=SE:ML=SF + "M:B":"1001":D$="I":"902" .'BK=ڰ"4";ٰ"7";ç,"14";"HOME": / ڰ"4";ٰ"7";ç,"14";"AWAY": 0:"49":"53" 1Lڰ"7";ç,"13";"SCOUTS":ER="4":I=̺:"50"+(I$(I+"2")="32")*"2" 2^ER,ç;I;"2";"SCOUT:";Y("2",I+"2");"10";"%";"12";I$(I+"2"):"51"+(Y(,I+"2")=ç) 3ER,"19";Y$(Y(,I+"2"));"29";(Y("4",I+"2")>ç);ڰ"4"+(Y("4",I+"2")>ç)*(Y("4",I+"2")-);("144"+Y("4",I+"2"));ڰ"4";ç;"31";Y("5",I+"2") 4ER=ER+"2":I: 5!ڰ"6";"12",ç;"A ASIGN SCOUT" 6"848":"54"+(="A"NN>ç) 7gLL=:"12",ç;"WHICH SCOUT 1 TO 3? ";"12","20";:"270":AD=ZA:"56"-(AD) 8!"57"-(I$(AD+"2")="32")*"2" 9'X(AD+"20")=ç:ER=+(AP>"2")*"40" ::I=ERER+"19":I-(+(ER="41")*"40"),;I;"6";Y$(I);"17";I+"20";"20";Y$(I+"20"):I:LL="2":"21",ç;"TEAM No/0 MORE CHOICE ";"21","22";:"270" ;I=ZA:"60"+(I=ç) <"62"-(I>"80"Y$(I)=Z$)*"4" =-ER=ER+(ER=)*"40"-(ER="41")*"40":"58" >Y(,AD+"2")=I::"49":"12",ç;"FOR ";ܼ;°"145";ç;" ENTER 1";"4";ڰ"5";ܼ;°"146";ڰ"4";ç;" ENTER 2";"4";ڰ"6";ܼ;°"147";ڰ"4";ç;" ENTER 3";"4";ڰ"7";ܼ;°"148";ڰ"4";ç;" ENTER 4":LL=:"17",ç;"1 TO 4? ";:"270":JF=ZA:"63"-(JF"4") ?Y("4",AD+"2")=JF:"49" @KLL=:"19",ç;"WHICH CURRENT FORM 1-9? ";"19","24";:"270" A#JF=ZA:"66"-(JF"9")*"2" BY("5",AD+"2")=JF :"48" E"6" F"71"+(BK=) GmET=(BK="2"OB=ç)*AP:BL=("5"-ET)*"100":BL=BL+(+(*"100")):BL=(DN*BL)/"100":OL=ç:ON=ç:"81" H+BK=OB<"2"BL=(DN*(NJ*"100")/"100") QBL=(BL/"2") VR$=Z$:"M:13":"1051" WAM=+(*):AM="89" X"100" YJT=JT+(JT<"2"(BB+BD+BC)>("23"+(JT*))-(AP*)):AB=JT:AB=AB-(JT>-(BB+BD+BC)<("20"+(JT*)-(AP*)+)):DO="89":AE="21": Zz:ٰ"7";ڰ"2";ܼ;ç,"11";Z$;ç;ç;ڰ"4";,"2";"1st TEAM";,"21";"RESERVES":EV=ç:IA=:IC="2":I=̰"20" [dH$=("144"+T(I)):(T(I)>ç);ڰ"4"+(T(I)>ç)*(T(I)-);IA,EV;H$;ڰ"4";ç;IA,EV+IC;I;" ";ڰ"4"+(G(I)<ç)*"2";V$(I);ڰ"4";" ";H(I);J(I):IC=IC-(I="9"):IA=IA+(I="11")*"2"-(I="12")*"14":EV=EV+(I="12")*"17":IA=IA+:I:ڰ"2";ٰ"7";"15","6";"SUB":ڰ"4";ٰ"6";"19","2";"MORALE ";(ME/"10");ڼ;ܼ;ٰ"7";"18","2";"TEMPER ";PU:"890" \~ٰ"6":"140","76":"104",ç:ç,-"40":-"104",ç:ç,"40":"139","77":"106",ç:ç,-"42":-"106",ç:ç,"42":ç ]ER="13":ES="18":"40": _Q"96":ڼ;ٰ"7";ܼ;"SEASON ";AH+;"21","13";ç;ڰ"6";ç;"M MENU":"97" `:ڰ"4";"DIV ";AP;ڰ"5";ç,"12";"P W D L F A PT":N=̰"20":(T$(N)=Z$)*"7";N;"2";ٰ"6"+(T$(N)=Z$);T$(N);(T$(N)=Z$)*"7";"12";P(N);"15";W(N);"18";D(N);"21";P(N)-(W(N)+D(N));"24";F(,N);"27";F("2",N);"30";(W(N)*PTS+D(N)):N: a"849":"97" bH$="BCDFGHJKLMNPRSTVW":M$="AEIOU":RA=+(*"26"):RB=+(*"5"):RC=+(*"17"):RD=+(*"17"):Z9="65"+(*"22"): dRNC=NC-(NC>ç):I=̰"20":V("2",I)=V("2",I)-(V("2",I)>ç):I:"M:9":"1001" j"M:A":"1010" nNI=("1500000"/AP)::"9",ç;"THE BUILDERS CHARGE `";NI;'"TO IMPROVE GROUND CAPACITY TO"'"MAXIMUM DO YOU AGREE Y/N":"890" o ="Y"AI>NIAI=AI-NI:"900" p="N"NI=ç:"900" q"111" rCW=ç:"90" s9ܼ;ڼ;ٰ"7";"18","9";PU:ER="13":ES="18":"40" tCW=CJ=ç u4ڰ"6";"21",ç;"MENU CHANGE SACK EDIT TRAN FIELD" vP"849":"118"+(="C")+(="E")*"11"+(="T")*"16"+(="S")*"28"+(="F")*"31" wzLL="2":ڰ"6";"21",ç;"No OF PLAYER TO MOVE ";"21","21";:"270":AD=ZA:"120"-(AD=ç)*"4"-(AD>"20") x3"121"-(J(AD)="73"J(AD)="83"J(AD)="76")*"2" y"123"-(J(AD)="35") zPH(AD)=H(AD)-(U(AD)H(AD))*H(AD):U(AD)=ç:Y=AD:"525" {pLL="2":ڰ"6";"21",ç;"PLAYER'S NEW POSITION ";"21","22";:"270":I=ZA:"124"-(I"20") |0"125"-(J(I)="73"J(I)="83"J(I)="76")*"2" }"127"-(J(I)="35") ~FH(I)=H(I)-(U(I)H(I))*H(I):U(I)=ç:Y=I:"525" 8"652":"128":I=AD:"128":"332":BJ=BJ+:"115" IA="2"+(I<"12")*I+(I="12")*"14"+(I>"12")*(I-"12"):IC=(I>"12")*"17":H$=("144"+T(I)):ڰ"4"+(T(I)>ç)*(T(I)-);(T(I)>ç);IA,IC;H$;ڰ"4";ç;IA,IC+"2"-(I>"9");I;" ";ڰ"4"+(G(I)<ç)*"2";V$(I);ڰ"4";" ";H(I);J(I): nLL="2":ڰ"6";"21",ç;"No OF PLAYER ";"21","13";:"270":I=ZA:"130"-(I=ç)*"14" "131"-(I"20")*"2" "132"-(V$(I)="32")* LL="8":PX="32":PY="122":ڰ"6";"21",ç;"TYPE PLAYERS NEW NAME ";"21","22";:"270":"133"-(X$="32"űX$<) "147":V$(I)=X$:IA="2"+(I<"12")*I+(I="12")*"14"+(I>"12")*(I-"12"):IC="4"+(I>"12")*"17":ڰ"4"+(G(I)<ç)*"2";IA,IC;V$(I):"115" KLL="2":ڰ"6";"21",ç;"WHICH PLAYER ";"21","13"; +"270":I=ZA:"136"-(I"20")*"21" F"137"-(V$(I)="32"E(,I)<çJ(I)="82"J(I)="76"J(I)="42")* 8G(I)=G(I)+(G(I)<ç)*(G(I)*"2")-(G(I)>ç)*(G(I)*"2") }IA="2"+(I<"12")*I+(I="12")*"14"+(I>"12")*(I-"12"):IC="4"+(I>"12")*"17":ڰ"4"+(G(I)<ç)*"2";IA,IC;V$(I):"115" pLL="2":ڰ"6";"21",ç;"No OF PLAYER TO SACK ";"21","21";:"270":I=ZA:"140"-(I"20") "141"-(V$(I)="32")*"2" *OM=(V(,I)*V("2",I)):"142"+(AI> OM) Qڰ"2";ٰ"7";"21",ç;" YOU CANNOT AFFORD THIS AMMOUNT ":I=̰"50":I:"116" .ڰ"6";"21",ç;"THIS WILL COST `";OM;" Y/N" "144"+(="Y")-(="N")*"28" 5AI=(AI-OM):"890":"200":"128":"332":"115" EA1=ç:I=̰"20":A1=A1+(V$(I)ɰ"32"):I:"139"-(A1<"13")*"23" K=̰"20":V$(K)=X$"132" K: xLL="2":ڰ"6";"21",ç;"No OF PLAYER TO RE-POS ";"21","23";:"270":I=ZA:"150"-(I<)*"34"-(I>"20") "151"-(T(I)=ç)*"35" ="116"+(J(I)="32"J(I)="105"J(I)="43"J(I)="45")*"36" 4ڰ"6";"21",ç;" 1=GOALIE 2=DEF 3=MID 4=ATTACK " ,X$=:ZA=X$-"48":"153"+(ZA>çZA<"5") "װ".1",ç:"155"-(T(I)=ZA)*"40" XT(I)=ZA:RA="10"+(*"19"):H(I)=H(I)-(RA/"10"):Y=I:"525":"128":"332":"115" OER=:NP=ç::ڼ;ٰ"7";ܼ;ç,ç;"P PLAYERS WAGES";"20";"CONTRACT TEM" #I=̰"20":"162"+(V$(I)="32") NP=NP+V(,I):H$=("144"+T(I)):ܼ;(T(I)+);ER,ç;H$;ڰ"4";ç;" ";ڰ"4"+(G(I)<ç)*"2";V$(I);ڰ"4";"11";"`";V(,I);"20";V("2",I);" WEEK"+("32"+(V("2",I)>)*"51");"30";E(,I):ER=ER+ XI:ڰ"2";ٰ"7";"21","4";"TOTAL";ڰ"4";ç;" `";NP;ڰ"6";"21","22";"C CONTINUE" "850":"164"+(="C") :ڼ;ٰ"7";ܼ;ç,ç;" STAFF NAME WAGES CONTRACT ";ڰ"4";ç;ç;'"MANAGER";"8";F$;"17";"`";NA;"23";NC;" WEEK"+("32"+(NC>)*"51"):RA=NA ?I= ̰"12":"167"+(I="2")+(I>"2"I<"6")*"2"+(I>"5")* 9I+,ç;"COACH";"8";I$(I);"17";"`";Y(,I):"171" :I+,ç;"PHYSIO";"8";I$(I);"17";"`";Y(,I):"171" :I+,ç;"SCOUT";"8";I$(I);"17";"`";Y(,I):"171" 3I+,ç;"YOUTH P";"8";I$(I);"17";"`";Y(,I) hRA=RA+Y(,I):I:ڰ"5";"15",ç;"DIRECTORS & OTHER GENERAL STAFF";ڰ"4";'"17";"`";NF:RA=RA+NF }ڰ"7";"17","2";"1st TEAM TOTAL `";NP:NP=NP+RA:"18","17";"--------";ڰ"2";ٰ"7";"19","11";"TOTAL";ڰ"4";" `";NP ڰ"6";"21","13";"M MENU" "850":"174"+(="M")*"726" :CI=AH=çAG="12" AK=AK+(AG< BX)*(BX-AG)*"20":AK=AK-(AG> BX)*(AG-BX)*"20":AK=AK+((-AK)/"2")*(+(".95"-AK)):BX=AG:AK=AK-(AK>"5000")*(AK-"5000"):,"8";"SHARES PRICE ";AK;"p" !AU>ç,"9";"1 SELL SHARES" 0AI>çAU<"1000000""5","9";"2 BUY SHARES" %ڰ"6";"21","13";"M MENU":"890" D"180"+(="1"AU>ç)+(="2"AI>çAU<"1000000")*+(="M")*"710" MLL="7":"7","2";"SELL HOW MANY SHARES ";:"270":DW=ZA:"182"-(DW<ç) CZ=:AU=AU-DW:AV=(DW/"1000"):AV=AV+(AV<ç)*AV:AK=AK-((AK/"100")*AV):AK=AK+((-AK)/"2")*(+(".95"-AK)):DX=(AK*DW)/"100":AK=AK-(AG-BX)*"20":"8",ç;"THE CLUB HAS RAISED `";DX:AI=AI+DX:"890":JU=(AU<):"185" RLL="7":"7",;"SPEND HOW MUCH MONEY `";:"270":EO=ZA:"184"-(EO>AIEO<ç) OX=:EP=(EO/"4894"):EP=EP+(EP<ç)*EP:EP=EP*"6":AK=AK+EP:EP=(EO/AK)*"100":AU=AU+EP:AK=AK+((-AK)/"2")*(+(".95"-AK)):AI=AI-EO:"8",ç;"YOU HAVE PURCHASED ";EP;" SHARES":"890":CZ= "900" ȅV$(I)="":T(I)=ç:H(I)=ç:J(I)="32":U(I)=ç:X(I)=ç:E(,I)=ç:E("2",I)=ç:E(,I)=ç:V(,I)=ç:V("2",I)=ç:G(I)=ç: $RA=+(*"200"):RA="8""707" OT=ç:"42" X$="":PW=ç #PWçX$=X$(̱X$-):ڰ"8";(" "+°"8"PW < LL);°"8";" ";°"8";:PW=PW-:"271" "275"-(D$=°"13"PW=ç)*"4" PW>çD$=°"13""281" "277"-(PW=LL)*"5" D$< PXůD$> PY"271" -ڰ"8";ٰ"9";D$;:X$=X$+D$:PW=PW+:"271" D$=:"280"-(D$="")  װ".01",: ڰ"8";" "PW< LL PX="48"ZA=X$ UPY=PY-(PX="32"PX="33")*"65":PX=PX+(PX="32")*"16"+(PX="33")*"15":LL="9": 8 9"23658","8":ڰ"4":"4"::ٰ"7";ڰ"2";"10","11";"STOP TAPE":׺,"10":ٰ"6";"10",ç;"DO YOU WANT TO LOAD OLD GAME Y/N":ç:="Y"D$="C":HW="1005":"902" ;:"2" < ç:"1000" >$"M:L":"4":ڰ"4":"1001":"891" B~"M:H":"1001":"332"::ٺ;ۼ;"2","2";"LOADING";ټ;"10","6";"START ORIGINAL TAPE":ٰ"4":ç:"M1":"M2":ç:"6" LkMU=ç:PU=E(,):BB=ç:BC=ç:BD=ç:BA=(T()=)*H(): M="2"̰"11":BC=BC+((T(M)="2")*H(M)):BB=BB+((T(M)=)*H(M)):BD=BD+((T(M)="4")*H(M)):MU=MU+(T(M)="2")*"100"+(T(M)=)*"10"+(T(M)="4"):PU=PU+E(,M):M:BC=(BC/"3.9"):BB=(BB/"2.9"):BD=(BD/"2.9"):BB=BB-(BB>"9")*(BB-"9"):BC=BC-(BC>"9")*(BC-"9"):BD=BD-(BD>"9")*(BD-"9"): _1I="20"̰"13"-:V$(I)="32""652":"353" `I a fڰ"4":ç:"4"::"5",;"PLAYER FOR RENEWAL OF CONTRACT";"9","6";ܼ;(T(F)+);("144"+T(F));ڰ"4";ç;"8";ڰ"4"+(G(F)<ç)*"2";V$(F);ڰ"4";"17";H(F);(J(F));"20";G(F);"23";"`";V(,F): gGNT=:F=̰"20":"64815":"360"+(V("2",F)>çůV$(F)="32")*"6" h.IB=F:"358":"20","8";"RE-NEGOTIATE Y/N" i"361"+(="N")+(="Y")*"2" j$NT=ç:I=F:"200":"332":"366" k%HF=:HW="1022":D$="R"::"901" nF:NT=ç:"6"  "416":"413":"931":"422" 1I=̺:IB=(Y$(V)=T$(I)JT<):"414"+(IB=) I "418" !M=̰"20":T$(M)=Y$(V)MN=M: M:MN="2":  CX=AP-JT EI=("6"-CX)+(*"4")+IB:EJ=("6"-CX)+(*"4")+IB:EK=("6"-CX)+(*"4")+IB:EL=("6"-CX)+(*"4")+IB:MM="100"-("5"*MN):RA=+(*"20"):MM=MM+RA:RZ=+(*"2"):PV="15"+(*"75"):MV="442"-(RZ="2")*"9":MM>"99"MM="99"  "423"+(CI="38")*"154" !CI=CI+:NC=ç"M:X":"1001" D$="U":HW="1001":"901"  ME>"99"ME="99"  ME<çME=ç  ,J(Y)="76"J(Y)="82"J(Y)="42""527": aJ(Y)="32"+(H(Y)>H(Y)+".7")*"11"+(H(Y)ç)*"13":H(Y)>"9.7"J(Y)="105" wH(Y)=H(Y)-((H(Y)-"9.9")/"2")*(+(H(Y)-"9.95")):H(Y)=H(Y)+(V$(Y)ɰ"32")*((-H(Y))/"2")*(+("1.09"-H(Y))): A"M:14":"863":ڰ"4"::"1001":"114":"863":"M:7":"1001":"863":"M:1":"1001":"863":ڰ"4":"4"::"96":"863":"M:S":"1001" Q "1013" ^:D$="S":HW="1013":"902" WHZ=V(,AD):HY=V("2",AD):FG=X(AD):N$=V$(AD):FH=U(AD):FJ=E(,AD):RZ=E("2",AD):FK=H(AD):JG=T(AD):CG=J(AD):RY=G(AD):RA=E(,AD):X(AD)=X(I):V$(AD)=V$(I):V(,AD)=V(,I):V("2",AD)=V("2",I):U(AD)=U(I):T(AD)=T(I):J(AD)=J(I):E(,AD)=E(,I):E("2",AD)=E("2",I):E(,AD)=E(,I):H(AD)=H(I):G(AD)=G(I):X(I)=FG:V$(I)=N$ oT(I)=JG:J(I)=CG:E(,I)=FJ:E("2",I)=RZ:E(,I)=RA:H(I)=FK:V(,I)=HZ:V("2",I)=HY:G(I)=RY:U(I)=FH: 5:ڰ"2";ٰ"7";ç,"11";"EMPLOYEES":"657"-(NL=) '"1 SACK COACH":"658" '"1 HIRE COACH" "660"-(NM=) 9'"2 SACK PHYSIO ";I$("2");" ";Y("2","2");"%":"661" '"2 HIRE PHYSIO" "663"-(NN>ç) '"3 SACK SCOUT" "665"-(NN<) '"4 HIRE SCOUT" "667"-(NO>çNL=) '"5 SACK YOUTH PLAYER" "669"-(NO<"7"NL=) '"6 HIRE YOUTH PLAYER" ڰ"6";"18","13";"M MENU" 0"671"+(="M")*"35"+(="1")*"5"+(="2")*"8" ="3"NN>çװ".1",:"693" ="4"NN<װ".1",:"680" &="5"NO>çNL =װ".1",:"682" '="6"NO<"7"NL=װ".1",:"687" "850":"670" @װ".1",:NL=NL+(NL=ç)-(NL=):IB=:"701":"678"-(NL=ç) "699":"706" ;"698":Y(,IB)=ç:Y("4",IB)=ç:Y("5",IB)=ç:"706" :װ".1",:NM=NM+(NM=ç)-(NM=):IB="2":"678"-(NM=ç) 6I=̰"5":I$(I)="32"IB=I:NN=NN+(NN<):"678" I gRA="6"::ڰ"5";ç,"11";"YOUTH TEAM";"5","24";ٰ"7";"TEMP":I="6"̰"12":"683"+(I$(I)="32") RA,"6";I;"8";(Y("4",I)+);ܼ;("144"+Y("4",I));ڰ"4";ç;"10";I$(I);"17";Y("5",I);"21";Y("2",I);"23";"%";"25";Y("6",I):RA=RA+ I ZLL="2":"15",ç;"SACK WHICH PLAYER ";:"270":IB=ZA:"706"-(IB>"5"IB<"13")*"20" "685"+(I$(IB)ɰ"32")*"15" *I="6"̰"12":I$(I)="32"IB=I:"689" I NO=NO+(NO<"7") "698":"18","5";(Y("4",IB)+);ܼ;("144"+Y("4",IB));ڰ"4";ç;"7";I$(IB);"14";Y("5",IB);"17";"TEMPER ";Y("6",IB);"21","2";"DO YOU WANT THIS PLAYER Y/N" "691"+(="N")+(="Y")*"15" 4RA=+(*):NO=NO-(RA=):"677"+(RA<)*"13" E:ڰ"6";ç,"13";"SCOUTS":ET=:I=̰"5":"694"+(I$(I)="32") aET,"7";I;"9";I$(I);"16";Y("2",I);"18";"%";"20";"`";Y(,I);"25";"P/W":ET=ET+"2" I HLL=:"15",ç;"SACK WHICH ";:"270":IB=ZA:"697"-(IB"5") "703"-(I$(IB)="32")*"7" \"98":I$(IB)=H$(RC)+M$(RB)+H$(RD)+E$(RA):Y(,IB)="50"+(IB<"6")*("100"+(*"100")):Y("2",IB)=(ç+(IB<"6"))+(*("11"+(IB<"6")*"88")):Y(,IB)="35"+(*"65"):Y("4",IB)=+(*"4"):Y("5",IB)="16"+(*):Y("6",IB)=-+(*"17"):Y("6",IB)=Y("6",IB)+(Y("6",IB)<ç)*Y("6",IB)-(Y("6",IB)>"9")*(Y("6",IB)-"9"):"704": 'I$(IB)="":F=̰"6":Y(F,IB)=ç:F: NO=NO-:"699":"706"  NL= =NO=ç:I="6"̰"12":F=̰"6":Y(F,I)=ç:I$(I)="":F:I: NN=NN-:"699":"900"  IB>"5" L"18","4";I$(IB);"11";Y("2",IB);"%";"15";"`";Y(,IB);" PER WEEK": "900" 2RA=+(*"99"):RA="8":"712"-(RA="8")*"4" ,IB=+(*"5"):"709"+(I$(IB)="32")* 5Z8=:IB=NL=NL-(NL>ç):"699":"702":"712" (IB="2"NM=NM-(NM>ç):"699":"712" NN=NN-(NN>ç):"699"  4JQ=JQ-(JQ<ç)*JQ:KC=KC-(KC<ç)*KC:"714":"721" JQ=JQ-(JQ<ç)*JQ:KC=KC-(KC<ç)*KC::ç,"14";ݼ;"BANK";ç;"2","2";"CURRENT ACCOUNT `";AI;"4","2";"OVERDRAFT FACILITY `";KA;"6","2";"AMOUNT OWED `";KC:JQ=ç"8","2";"1 MORTGAGE" KA>ç"10","2";"2 LOAN" #KC>ç"12","2";"3 REPAY LOAN" &JQ>ç"8","2";"4 REPAY MORTGAGE" gKC>çCF>çRA=(KC/CF):RA=(RA-(RA>"40")*(RA-"40")):"16","2";"WEEKS TO END OF LOAN :";RA gJQ>çJP>çRA=(JQ/JP):RA=(RA-(RA>"80")*(RA-"80")):"18","2";"WEEKS TO END OF MORTGAGE:";RA  ="2"KA>ç"727" ="1"JQ=ç"726" ="3"KC>çAI>ç"734" ="4"JQ>çAI>ç"736" "848":"721" "730":"713" ב"738":LL="8":"8",;"HOW MUCH? ";"9",;"BANK CHARGES 11% INTEREST";"10",;"MINIMUM `40 `";:"270":KD=ZA:"729"-(KD<"40"KD>KA ) "713" ٚ"738":KA=KA-KD:AI=AI+KD:KD=KD+(KD/"100 ")*"11":KC=KC+KD:CF=(KC/"40"):"12",;"REPAID OVER 40 WEEKS AT `";CF:K=̰"50":K:"861":"713" ڶJQ=("1800000"/AP):"8",;"THE BANK WILL OFFER YOU";"9",;"`";JQ:ET=((JQ/"100")*"26"):JP=((ET+JQ)/"80"):"10",;"REPAYMENTS ARE `";JP;"12",;"OVER 80 WEEKS Y/N" "731"+(="Y")*"2"+(="N")  JQ=ç: AI=AI+JQ:JQ=JQ+ET: x"738":LL="8":LL="8":"8",;"REPAY HOW MUCH"'" MINIMUM `40 `";:"270":OD=ZA:"735"-(OD>AIOD<"40"OD >KC ) [KC=KC-OD:KA=KA+OD:AI=AI-OD:"739":"861":CF=(KC/"40"):KC=KC-(KC<"40")*KC:"713" "738":LL="8":"8",;"YOU OWE `";JQ;" MORTGAGE";"9",;"REPAY HOW MUCH"'" MINIMUM `80 `";:"270":OE=ZA:"737"-(OE>AIOE<"80"OE<çOE >JQ ) IJQ=JQ-OE:AI=AI-OE:"861":JP=(JQ/"80"):JQ=JQ-(JQ<"80")*JQ:"713" ;I="8"̰"12":I,;" ":I: KA=çKC=CO:"713"  %Y=̰"20":J(Y)="82"I=Y:"200" =RA=(*"25")/"10":"753"+(T(Y)=çJ(Y)="42"J(Y)="76") &U(Y)=ç:H(Y)=H(Y)-"1.4"+RA:"525"  Y:"332": QI=̰"20":E(,I)=ç:G(I)=G(I)+(G(I)>ç)-(G(I)<ç):T$(I)=Y$((CM-)+I):I: &I=̰"20":Y$((CM-)+I)=T$(I):I:  -UID=:W$("38","2"):N("2","18"):P("20"):W("20"):D("20"):F("2","20"): . M("8"): PSں;ٰ"7";ܼ;"21",ç;"SEASON ";ç;ڰ"8";AH+;"21","13";ڰ"6";ç;"M MENU" Q ="M""6" Y ZI=̰"20":T$(I)=Z$AG=I: [I: ]KA<çKA=ç:KC=CO-KA ^ _]"21",ç;ڰ"2";ܼ;ٰ"7";"END OF SEASON";ç;ڰ"8";ç;" ";AH+;"22";ڰ"6";"C CONTINUE" a"850":"865"+(="C")*"15" kJICNJH=CM m nJHCNJI=CM p q~HJ>ç"11",ç;"LOAN ";HJ;" WEEKS";"16";ܼ;(T(HK)+);("144"+T(HK));ڰ"4";ç;" ";V$(HK);"27";H(HK);"30";G(HK) r svHL>ç"12",ç;"FREE TRANSFER ";(T(HL)+);ܼ;("144"+T(HL));ڰ"4";ç;" ";V$(HL);"27";H(HL);"30";G(HL) t wV=V+:V>CNV=CM x"889"-(Y$(V)=Z$)*"2" y z="19","18";ݼ;"BANK";ç;" ` ";"19","24";AI: {:ڰ"4";ۼ;"21",ç;" PLEASE WAIT ": |ET=ç:A1="0":A2="1":A3="0":I=̰"20":ET=ET+(V$(I)ɰ"32"):A1=A1+(V$(I)ɰ"32"J(I)< "46"J(I)ɰ"35"):A2=A2-( A2="1"J(I)="35"):A3=A3+(I>"12"T(I)>ç):I: AIB="80"-(H(AD)>"6")*"40":RA=+(*IB):"899"-(Y$(RA)=Z$)  &"891":װ".1",:D$="O":HW="1001" "M:":D$:HW 4ڰ"4";"21",ç;" C CONTINUE " "="C""7":ڰ"7":ç::"1002" "850":"904" HF="2""M:R2":"1031" HF="1054"  "1046" EY(,I-"18")=ç:Y("4",I-"18")=ç:Y("5",I-"18")=ç:X(I)=ç: -"ONE OF YOUR STAFF HAS RESIGNED":Z8="0":  "926"+DT  D$="WAGES TOO LOW":"930" "D$="SIGNING FEE TOO LOW":"930" D$="CONTRACT TOO LONG" 0"19",(("32"-D$)/"2");D$:F=̰"99":F: (RA=+(*"4"):APɼAG>"4"RAɺ &EI="8":EJ="8":EK="8":EL="8": AS=:ER="20":ET="49" :ڼ;ٰ"7";ç,"11";"DIVISION ";ET:RA=:I=ASER:RA,"10";I;"13";Y$(I):RA=RA+:I:ڰ"6";"21",ç;" C CHANGE TEAM F FINISH M MORE " c="M"AS=AS+"20":AS=AS-(AS="81")*"80":ER=AS+"19":ET=ET+:ET=ET-(ET="53")*"4":"1001" #"1002"+(="C")*"2"+(="F")*"5" sLL="2":ڰ"6";"21",ç;"No OF TEAM TO BE CHANGED ";"21","25";:"270":RA=ZA:"1005"-(RA< ASRA> ER) PX="32":PY="122":ڰ"6";"21",ç;"TEAM ";RA;"8";"NEW NAME(9 MAX) ";"21","23";:"270":"1014":A$=X$:I=̰"80":"1006"-(A$< űA$> "9"A$=Y$(I)) I:Y$(RA)=A$:"1001" AS=ç:JT=-:AB=JT :I=+(AS=)*"40"̰"20"+(AS=)*"40":I;;Y$(I);"20";I+"20";"23";Y$(I+"20"):I:LL="2":ڰ"2";ٰ"7";ܼ;"21",ç;"TEAM No/0 MORE CHOICE ";"21","22";:"270":ED=ZA:"1009"+(ED>çED<"81")  AS=AS+(AS=ç)-(AS=):"1008" wZ$=Y$(ED):"891":ٰ"7";ڼ;ܼ;ۼ;"21","23";Z$:D$=Y$(ED):Y$(ED)=Y$(AP*"20"):Y$(AP*"20")=D$:"755":"813" U"416":"413":MJ=ç:MK="7":ML=:SA=ç:SB="7":SC=:SD=:SE="7":SF= LL="8":PX="32":PY="122":ڰ"5";"21",ç;"MANAGER'S NAME (8 MAX) ";"21","23";:"270":F$=X$:"1013"-(F$="32") ~LL=:PX="50":PY="51":ڰ"5";"21",ç;"POINTS FOR WIN 2/3 ";"21","19";:"270":PTS=X$:"891":"317"  X$="9" )RB="9"-X$:I=RB:X$=X$+°"32":I: ٿj LIVERPOOLARSENAL MAN UTD TOTTENHAMC PALACE MAN CITY LEEDS UTDLUTON T QPR ASTON V SOTON CHELSEA SUNDELANDNOTTS FORWIMBLEDONNORWICH CCOVENTRY EVERTON DERBY C SHEFF UTDOLDHAM SHEFF WEDWEST HAM SWINDON TMILLWALL NOTTS C NEWCASTLEBRIGHTON WOLVES WEST BROMPORT VALEPLYMOUTH BLACKBURNBRISTOL RBRISTOL COXFORD U HULL CITYLEICESTERCHARLTON WATFORD GRIMSBY TSOUTHEND TRANMERE EXETER C BURY STOKE C READING ORIENT CHESTER BRADFORD WIGAN A SWANSEA CPRESTON CAMBRIDGEBOLTON W ROTHERHAMMANSFIELDFULHAM CREWE A BOURNMTH DONCASTERTORQUAY BURNLEY PETERBOROMAIDSTONESTOCKPORTDARLINTONNORTHPTONROCHDALE SCARBORO HEREFORD CARDIFF CCARLISLE LINCOLN CBLACKPOOLWREXHAM ALDERSHOTYORK CITYWALSALL HALIFAX TKETTERINGBARNET WELLING YEOVIL T BARROW TELFORD WYCOMBE RUNCORN MERTHYR STAFFORD SUTTON U BOSTON SLOUGH NORTHWICHFISHER BATH JUVENTUS R MADRID B MUNICH BARCELONAANDELECHTAS ROMA HAMBURG D KIEV FC BRUGE AC MILAN SDENNS RY EY ON WAYLE BY INSLEYSONTONS ES MANBLENEYSEYTERIS ER ENSDONINGGANLIN4M1    HM2 8JI="21"̰"23":RA=+(*"9"):I$(I-"18")="32"RA="910":"315" 9aRD=((Y("2",I-"18")/"10")-"9")/"2":EV=RD/"2":RC=(Y("5",I-"18")-RD):RF=(Y("5",I-"18")+EV):RE=RC+(*((RF-RC)+)):RE=RE-(RE>"9")*(RE-"9")-(RE<ç)*RE:RE=RE+(RE=ç):RZ=(*"5")/"10":RE=RE+RZ:RB="10"-((Y(,I-"18")+"19")/"20"):RC=(RB-"5"):RA=+(*"4"):"314"+( RA>Y("5",I-"18") < RCY("5",I-"18") > RBRE<) :Y(,I-"18")=Y(,I-"18")-(Y(,I-"18")*"2"):X(I)=(Y(,I-"18")):"98":V$(I)=(Z9)+"."+H$(RC)+M$(RB)+H$(RD)+E$(RA):G(I)="22"+(*"14"):T(I)=Y("4",I-"18"):H(I)=RE:E(,I)=-+(*"17"):E(,I)=E(,I)+(E(,I)<ç)*E(,I)-(E(,I)>"9")*(E(,I)-"9") ;9I:I="24"̰"26":RA=+(*):RA>X(I)=ç:"318" <RA=+(*"15"):K=RA̰"20":G(K)<çU(I)=K:V$(I)=V$(K):T(I)=T(K):H(I)=H(K):X(I)=+(*("80"-(H(K)>"5")*"40")):X(I)=X(I)-(Y$(X(I))=Z$)*X(I):G(I)=G(K):E(,I)=E(,K):"318" =K >I: 3G  "M:G":,ç:"MAIN" #:"8","7";"LEAGUE BONUS `";NW %ڰ"6";"14","7";"C CHANGE M MENU" ="M""900" "1003"+(="C")*"2" BLL=:"14","6";" NEW LEAGUE BONUS ` ";"14","25";:"270" "1007"-(NW=ZA)*"6" "1014":"1008"+(NW>ZA)* 7"891":RA=ZA-NW:RA=(RA/"50"):"1001"+(RA>ç)*"8" UY=̰"20":T(Y)>çRB=(*RA):H(Y)=H(Y)+(T(Y)>ç)*(RB/"10"):J(Y)ɰ"35""525" Y:"332":NW=ZA:"1001" Y=̰"20":"1012"+(T(Y)=ç) pRA=(NW/"100"):RA=RA+(RA=ç):RB=NW-ZA:RC=(RB/RA):RB=((H(Y)/"100")*RC):H(Y)=H(Y)-RB:J(Y)ɰ"35""525" Y:"332":NW=ZA:"1001" iRA=(*"99"):ME=ME+(NW"50")*RA-(NW>ZA)*RA:ME=ME-(ME>"99")*(ME-"99"):ME<"2"ME="2"  (0MAIN 2]Y&4] :"312" sMA=ç:MB="4":NW=ç:OT=ç:NQ=-:OZ=ç:CF=ç:AP="4":NH=ç:NI=ç:JV=ç:KC=ç:JL=ç:AA=ç:AD="35":AG="20":AH=ç:AK="180":CL="11":JS=ç:JQ=ç:JM=ç:JN=ç:NJ=:JW=ç:JU=ç:AM=ç:AU="100000":AV=ç:OQ=ç:OP=ç:T$("20","9"):V$("28","8"):J("28"):T("28"):H("28"):M("8"):U("28"):G("28"):V("2","28"):X("28"):E(,"28") MDT=+(*):I$("12","6"):Y("6","12"):J$(,"9"):O("2",):BX="12":NL=ç:NM=ç:NN=ç:NO=ç:NS=:NT=ç:HI=ç:HJ=ç:HK=ç:HL=ç:OB=ç:NU=:ND=ç:PA=ç:PB=ç:PC=ç:PD=ç:PE=ç:PF=ç:PG=ç:LL="9":PX="48":PY="57":JP=ç:PU=ç:PV=ç:MI=ç:MH="2":MG=:PT=ç:OY="5":Z8="0":"4":"316" OW=ç:MW=ç:MX=ç:MY=ç:MZ=ç:MC=ç:UA=ç:Z6="1":OJ="2":OK="2":AW=ç:MB="4":T("24")=ç:CZ=ç:CW=ç:HA=ç:BJ=ç:BK=:BN=ç:BU=ç:CI=:CJ="38":CK=ç nCN=(AP*"20"):CM=(CN-"19"):CO=("310000"/AP)-(AP*"10000"):JK=ç:KA=(CO-KC):KA=KA+(KA<ç)*KA:V=CM: X"65100":"64815"::AI=AI+(AI<ç)*AI:HW="1001":CJ="38"-(ID-):"4":ڰ"4":ç::RA="10":RB="5.5":,"2";"P PLAY MATCH";"4","2";"C CHECK MATCH";"5",;"T TEAM";"6",;"O OFFERS/NEGOTIATIONS";"7","4";"A ADDITIONAL MENU";"8","4";"I INJURIES/GOALS";"9","5";"B BANK";RA,RB;"L LEAGUE TABLE":RA=RA+:RB=RB+".5" _RA,RB;"F FIXTURES":RA=RA+:RB=RB+".5":NN>çRA,RB;"S SCOUTS":RA=RA+:RB=RB+".5" MNC=çOQ=çٰ"7";RA,RB;"R RE-NEGOTIATE CONTRACT":RA=RA+:RB=RB+".5" :NL=RA,RB;"E EXTRA TRAINING":RA=RA+:RB=RB+".5" !OY>çRA,RB;"1 SAVE ";ݼ;OY D$=:"23"-(D$="")  װ".1", 4D$="1"OY>çD$="C":OY=OY-:HW="1006":"902" D$="F"D$="1":"902" D$="L""95" D$="C"D$="3":"901" D$="T""114" D$="B""713" D$="I"D$="7":"902" D$="S"NN>ç"48" D$="E"NL=D$="E":"902" "D$="A"D$="O":"902" #!D$="O""891":D$="R1":"901" %-D$="R"NC=çOQ=çNU="2":D$="L":"902" &D$="P"NC>çOQ=ç"223" '"22" (ܼ;ER,ES;"GOALKEEPER ";BA;ڰ"5";ER+,ES;"DEFENCE ";BC;ڰ"6";ER+"2",ES;"MIDFIELD ";BB;ڰ"7";ER+,ES;"ATTACK ";BD: )Vڰ"4";ܼ;ER+"7",ES+;ڰ"2";ٰ"7";"FORMATION";ER+"8",ES+"4";ç;ڰ"4";ç;MU: *j"891":OW=ç:MW=ç:MX=ç:MY=ç:MZ=ç:MO=:ڰ"4":"4":ç:MJ=MIMK=MHML=MGMJ=SD:MK=SE:ML=SF + "M:B":"1001":D$="I":"902" .'BK=ڰ"4";ٰ"7";ç,"14";"HOME": / ڰ"4";ٰ"7";ç,"14";"AWAY": 0:"49":"53" 1Lڰ"7";ç,"13";"SCOUTS":ER="4":I=̺:"50"+(I$(I+"2")="32")*"2" 2^ER,ç;I;"2";"SCOUT:";Y("2",I+"2");"10";"%";"12";I$(I+"2"):"51"+(Y(,I+"2")=ç) 3ER,"19";Y$(Y(,I+"2"));"29";(Y("4",I+"2")>ç);ڰ"4"+(Y("4",I+"2")>ç)*(Y("4",I+"2")-);("144"+Y("4",I+"2"));ڰ"4";ç;"31";Y("5",I+"2") 4ER=ER+"2":I: 5!ڰ"6";"12",ç;"A ASIGN SCOUT" 6"848":"54"+(="A"NN>ç) 7gLL=:"12",ç;"WHICH SCOUT 1 TO 3? ";"12","20";:"270":AD=ZA:"56"-(AD) 8!"57"-(I$(AD+"2")="32")*"2" 9'X(AD+"20")=ç:ER=+(AP>"2")*"40" ::I=ERER+"19":I-(+(ER="41")*"40"),;I;"6";Y$(I);"17";I+"20";"20";Y$(I+"20"):I:LL="2":"21",ç;"TEAM No/0 MORE CHOICE ";"21","22";:"270" ;I=ZA:"60"+(I=ç) <"62"-(I>"80"Y$(I)=Z$)*"4" =-ER=ER+(ER=)*"40"-(ER="41")*"40":"58" >Y(,AD+"2")=I::"49":"12",ç;"FOR ";ܼ;°"145";ç;" ENTER 1";"4";ڰ"5";ܼ;°"146";ڰ"4";ç;" ENTER 2";"4";ڰ"6";ܼ;°"147";ڰ"4";ç;" ENTER 3";"4";ڰ"7";ܼ;°"148";ڰ"4";ç;" ENTER 4":LL=:"17",ç;"1 TO 4? ";:"270":JF=ZA:"63"-(JF"4") ?Y("4",AD+"2")=JF:"49" @KLL=:"19",ç;"WHICH CURRENT FORM 1-9? ";"19","24";:"270" A#JF=ZA:"66"-(JF"9")*"2" BY("5",AD+"2")=JF :"48" E"6" F"71"+(BK=) GmET=(BK="2"OB=ç)*AP:BL=("5"-ET)*"100":BL=BL+(+(*"100")):BL=(DN*BL)/"100":OL=ç:ON=ç:"81" H+BK=OB<"2"BL=(DN*(NJ*"100")/"100") QBL=(BL/"2") VR$=Z$:"M:13":"1051" WAM=+(*):AM="89" X"100" YJT=JT+(JT<"2"(BB+BD+BC)>("23"+(JT*))-(AP*)):AB=JT:AB=AB-(JT>-(BB+BD+BC)<("20"+(JT*)-(AP*)+)):DO="89":AE="21": Zz:ٰ"7";ڰ"2";ܼ;ç,"11";Z$;ç;ç;ڰ"4";,"2";"1st TEAM";,"21";"RESERVES":EV=ç:IA=:IC="2":I=̰"20" [dH$=("144"+T(I)):(T(I)>ç);ڰ"4"+(T(I)>ç)*(T(I)-);IA,EV;H$;ڰ"4";ç;IA,EV+IC;I;" ";ڰ"4"+(G(I)<ç)*"2";V$(I);ڰ"4";" ";H(I);J(I):IC=IC-(I="9"):IA=IA+(I="11")*"2"-(I="12")*"14":EV=EV+(I="12")*"17":IA=IA+:I:ڰ"2";ٰ"7";"15","6";"SUB":ڰ"4";ٰ"6";"19","2";"MORALE ";(ME/"10");ڼ;ܼ;ٰ"7";"18","2";"TEMPER ";PU:"890" \~ٰ"6":"140","76":"104",ç:ç,-"40":-"104",ç:ç,"40":"139","77":"106",ç:ç,-"42":-"106",ç:ç,"42":ç ]ER="13":ES="18":"40": _Q"96":ڼ;ٰ"7";ܼ;"SEASON ";AH+;"21","13";ç;ڰ"6";ç;"M MENU":"97" `:ڰ"4";"DIV ";AP;ڰ"5";ç,"12";"P W D L F A PT":N=̰"20":(T$(N)=Z$)*"7";N;"2";ٰ"6"+(T$(N)=Z$);T$(N);(T$(N)=Z$)*"7";"12";P(N);"15";W(N);"18";D(N);"21";P(N)-(W(N)+D(N));"24";F(,N);"27";F("2",N);"30";(W(N)*PTS+D(N)):N: a"849":"97" bH$="BCDFGHJKLMNPRSTVW":M$="AEIOU":RA=+(*"26"):RB=+(*"5"):RC=+(*"17"):RD=+(*"17"):Z9="65"+(*"22"): dRNC=NC-(NC>ç):I=̰"20":V("2",I)=V("2",I)-(V("2",I)>ç):I:"M:9":"1001" j"M:A":"1010" nNI=("1500000"/AP)::"9",ç;"THE BUILDERS CHARGE `";NI;'"TO IMPROVE GROUND CAPACITY TO"'"MAXIMUM DO YOU AGREE Y/N":"890" o ="Y"AI>NIAI=AI-NI:"900" p="N"NI=ç:"900" q"111" rCW=ç:"90" s9ܼ;ڼ;ٰ"7";"18","9";PU:ER="13":ES="18":"40" tCW=CJ=ç u4ڰ"6";"21",ç;"MENU CHANGE SACK EDIT TRAN FIELD" vP"849":"118"+(="C")+(="E")*"11"+(="T")*"16"+(="S")*"28"+(="F")*"31" wzLL="2":ڰ"6";"21",ç;"No OF PLAYER TO MOVE ";"21","21";:"270":AD=ZA:"120"-(AD=ç)*"4"-(AD>"20") x3"121"-(J(AD)="73"J(AD)="83"J(AD)="76")*"2" y"123"-(J(AD)="35") zPH(AD)=H(AD)-(U(AD)H(AD))*H(AD):U(AD)=ç:Y=AD:"525" {pLL="2":ڰ"6";"21",ç;"PLAYER'S NEW POSITION ";"21","22";:"270":I=ZA:"124"-(I"20") |0"125"-(J(I)="73"J(I)="83"J(I)="76")*"2" }"127"-(J(I)="35") ~FH(I)=H(I)-(U(I)H(I))*H(I):U(I)=ç:Y=I:"525" 8"652":"128":I=AD:"128":"332":BJ=BJ+:"115" IA="2"+(I<"12")*I+(I="12")*"14"+(I>"12")*(I-"12"):IC=(I>"12")*"17":H$=("144"+T(I)):ڰ"4"+(T(I)>ç)*(T(I)-);(T(I)>ç);IA,IC;H$;ڰ"4";ç;IA,IC+"2"-(I>"9");I;" ";ڰ"4"+(G(I)<ç)*"2";V$(I);ڰ"4";" ";H(I);J(I): nLL="2":ڰ"6";"21",ç;"No OF PLAYER ";"21","13";:"270":I=ZA:"130"-(I=ç)*"14" "131"-(I"20")*"2" "132"-(V$(I)="32")* LL="8":PX="32":PY="122":ڰ"6";"21",ç;"TYPE PLAYERS NEW NAME ";"21","22";:"270":"133"-(X$="32"űX$<) "147":V$(I)=X$:IA="2"+(I<"12")*I+(I="12")*"14"+(I>"12")*(I-"12"):IC="4"+(I>"12")*"17":ڰ"4"+(G(I)<ç)*"2";IA,IC;V$(I):"115" KLL="2":ڰ"6";"21",ç;"WHICH PLAYER ";"21","13"; +"270":I=ZA:"136"-(I"20")*"21" F"137"-(V$(I)="32"E(,I)<çJ(I)="82"J(I)="76"J(I)="42")* 8G(I)=G(I)+(G(I)<ç)*(G(I)*"2")-(G(I)>ç)*(G(I)*"2") }IA="2"+(I<"12")*I+(I="12")*"14"+(I>"12")*(I-"12"):IC="4"+(I>"12")*"17":ڰ"4"+(G(I)<ç)*"2";IA,IC;V$(I):"115" pLL="2":ڰ"6";"21",ç;"No OF PLAYER TO SACK ";"21","21";:"270":I=ZA:"140"-(I"20") "141"-(V$(I)="32")*"2" *OM=(V(,I)*V("2",I)):"142"+(AI> OM) Qڰ"2";ٰ"7";"21",ç;" YOU CANNOT AFFORD THIS AMMOUNT ":I=̰"50":I:"116" .ڰ"6";"21",ç;"THIS WILL COST `";OM;" Y/N" "144"+(="Y")-(="N")*"28" 5AI=(AI-OM):"890":"200":"128":"332":"115" EA1=ç:I=̰"20":A1=A1+(V$(I)ɰ"32"):I:"139"-(A1<"13")*"23" K=̰"20":V$(K)=X$"132" K: xLL="2":ڰ"6";"21",ç;"No OF PLAYER TO RE-POS ";"21","23";:"270":I=ZA:"150"-(I<)*"34"-(I>"20") "151"-(T(I)=ç)*"35" ="116"+(J(I)="32"J(I)="105"J(I)="43"J(I)="45")*"36" 4ڰ"6";"21",ç;" 1=GOALIE 2=DEF 3=MID 4=ATTACK " ,X$=:ZA=X$-"48":"153"+(ZA>çZA<"5") "װ".1",ç:"155"-(T(I)=ZA)*"40" XT(I)=ZA:RA="10"+(*"19"):H(I)=H(I)-(RA/"10"):Y=I:"525":"128":"332":"115" OER=:NP=ç::ڼ;ٰ"7";ܼ;ç,ç;"P PLAYERS WAGES";"20";"CONTRACT TEM" #I=̰"20":"162"+(V$(I)="32") NP=NP+V(,I):H$=("144"+T(I)):ܼ;(T(I)+);ER,ç;H$;ڰ"4";ç;" ";ڰ"4"+(G(I)<ç)*"2";V$(I);ڰ"4";"11";"`";V(,I);"20";V("2",I);" WEEK"+("32"+(V("2",I)>)*"51");"30";E(,I):ER=ER+ XI:ڰ"2";ٰ"7";"21","4";"TOTAL";ڰ"4";ç;" `";NP;ڰ"6";"21","22";"C CONTINUE" "850":"164"+(="C") :ڼ;ٰ"7";ܼ;ç,ç;" STAFF NAME WAGES CONTRACT ";ڰ"4";ç;ç;'"MANAGER";"8";F$;"17";"`";NA;"23";NC;" WEEK"+("32"+(NC>)*"51"):RA=NA ?I= ̰"12":"167"+(I="2")+(I>"2"I<"6")*"2"+(I>"5")* 9I+,ç;"COACH";"8";I$(I);"17";"`";Y(,I):"171" :I+,ç;"PHYSIO";"8";I$(I);"17";"`";Y(,I):"171" :I+,ç;"SCOUT";"8";I$(I);"17";"`";Y(,I):"171" 3I+,ç;"YOUTH P";"8";I$(I);"17";"`";Y(,I) hRA=RA+Y(,I):I:ڰ"5";"15",ç;"DIRECTORS & OTHER GENERAL STAFF";ڰ"4";'"17";"`";NF:RA=RA+NF }ڰ"7";"17","2";"1st TEAM TOTAL `";NP:NP=NP+RA:"18","17";"--------";ڰ"2";ٰ"7";"19","11";"TOTAL";ڰ"4";" `";NP ڰ"6";"21","13";"M MENU" "850":"174"+(="M")*"726" :CI=AH=çAG="12" AK=AK+(AG< BX)*(BX-AG)*"20":AK=AK-(AG> BX)*(AG-BX)*"20":AK=AK+((-AK)/"2")*(+(".95"-AK)):BX=AG:AK=AK-(AK>"5000")*(AK-"5000"):,"8";"SHARES PRICE ";AK;"p" !AU>ç,"9";"1 SELL SHARES" 0AI>çAU<"1000000""5","9";"2 BUY SHARES" %ڰ"6";"21","13";"M MENU":"890" D"180"+(="1"AU>ç)+(="2"AI>çAU<"1000000")*+(="M")*"710" MLL="7":"7","2";"SELL HOW MANY SHARES ";:"270":DW=ZA:"182"-(DW<ç) CZ=:AU=AU-DW:AV=(DW/"1000"):AV=AV+(AV<ç)*AV:AK=AK-((AK/"100")*AV):AK=AK+((-AK)/"2")*(+(".95"-AK)):DX=(AK*DW)/"100":AK=AK-(AG-BX)*"20":"8",ç;"THE CLUB HAS RAISED `";DX:AI=AI+DX:"890":JU=(AU<):"185" RLL="7":"7",;"SPEND HOW MUCH MONEY `";:"270":EO=ZA:"184"-(EO>AIEO<ç) OX=:EP=(EO/"4894"):EP=EP+(EP<ç)*EP:EP=EP*"6":AK=AK+EP:EP=(EO/AK)*"100":AU=AU+EP:AK=AK+((-AK)/"2")*(+(".95"-AK)):AI=AI-EO:"8",ç;"YOU HAVE PURCHASED ";EP;" SHARES":"890":CZ= "900" ȅV$(I)="":T(I)=ç:H(I)=ç:J(I)="32":U(I)=ç:X(I)=ç:E(,I)=ç:E("2",I)=ç:E(,I)=ç:V(,I)=ç:V("2",I)=ç:G(I)=ç: $RA=+(*"200"):RA="8""707" OT=ç:"42" X$="":PW=ç #PWçX$=X$(̱X$-):ڰ"8";(" "+°"8"PW < LL);°"8";" ";°"8";:PW=PW-:"271" "275"-(D$=°"13"PW=ç)*"4" PW>çD$=°"13""281" "277"-(PW=LL)*"5" D$< PXůD$> PY"271" -ڰ"8";ٰ"9";D$;:X$=X$+D$:PW=PW+:"271" D$=:"280"-(D$="")  װ".01",: ڰ"8";" "PW< LL PX="48"ZA=X$ UPY=PY-(PX="32"PX="33")*"65":PX=PX+(PX="32")*"16"+(PX="33")*"15":LL="9": 8 9"23658","8":ڰ"4":"4"::ٰ"7";ڰ"2";"10","11";"STOP TAPE":׺,"10":ٰ"6";"10",ç;"DO YOU WANT TO LOAD OLD GAME Y/N":ç:="Y"D$="C":HW="1005":"902" ;:"2" < ç:"1000" >$"M:L":"4":ڰ"4":"1001":"891" B~"M:H":"1001":"332"::ٺ;ۼ;"2","2";"LOADING";ټ;"10","6";"START ORIGINAL TAPE":ٰ"4":ç:"M1":"M2":ç:"6" LkMU=ç:PU=E(,):BB=ç:BC=ç:BD=ç:BA=(T()=)*H(): M="2"̰"11":BC=BC+((T(M)="2")*H(M)):BB=BB+((T(M)=)*H(M)):BD=BD+((T(M)="4")*H(M)):MU=MU+(T(M)="2")*"100"+(T(M)=)*"10"+(T(M)="4"):PU=PU+E(,M):M:BC=(BC/"3.9"):BB=(BB/"2.9"):BD=(BD/"2.9"):BB=BB-(BB>"9")*(BB-"9"):BC=BC-(BC>"9")*(BC-"9"):BD=BD-(BD>"9")*(BD-"9"): _1I="20"̰"13"-:V$(I)="32""652":"353" `I a fڰ"4":ç:"4"::"5",;"PLAYER FOR RENEWAL OF CONTRACT";"9","6";ܼ;(T(F)+);("144"+T(F));ڰ"4";ç;"8";ڰ"4"+(G(F)<ç)*"2";V$(F);ڰ"4";"17";H(F);(J(F));"20";G(F);"23";"`";V(,F): gGNT=:F=̰"20":"64815":"360"+(V("2",F)>çůV$(F)="32")*"6" h.IB=F:"358":"20","8";"RE-NEGOTIATE Y/N" i"361"+(="N")+(="Y")*"2" j$NT=ç:I=F:"200":"332":"366" k%HF=:HW="1022":D$="R"::"901" nF:NT=ç:"6"  "416":"413":"931":"422" 1I=̺:IB=(Y$(V)=T$(I)JT<):"414"+(IB=) I "418" !M=̰"20":T$(M)=Y$(V)MN=M: M:MN="2":  CX=AP-JT EI=("6"-CX)+(*"4")+IB:EJ=("6"-CX)+(*"4")+IB:EK=("6"-CX)+(*"4")+IB:EL=("6"-CX)+(*"4")+IB:MM="100"-("5"*MN):RA=+(*"20"):MM=MM+RA:RZ=+(*"2"):PV="15"+(*"75"):MV="442"-(RZ="2")*"9":MM>"99"MM="99"  "423"+(CI="38")*"154" !CI=CI+:NC=ç"M:X":"1001" D$="U":HW="1001":"901"  ME>"99"ME="99"  ME<çME=ç  ,J(Y)="76"J(Y)="82"J(Y)="42""527": aJ(Y)="32"+(H(Y)>H(Y)+".7")*"11"+(H(Y)ç)*"13":H(Y)>"9.7"J(Y)="105" wH(Y)=H(Y)-((H(Y)-"9.9")/"2")*(+(H(Y)-"9.95")):H(Y)=H(Y)+(V$(Y)ɰ"32")*((-H(Y))/"2")*(+("1.09"-H(Y))): A"M:14":"863":ڰ"4"::"1001":"114":"863":"M:7":"1001":"863":"M:1":"1001":"863":ڰ"4":"4"::"96":"863":"M:S":"1001" Q "1013" ^:D$="S":HW="1013":"902" WHZ=V(,AD):HY=V("2",AD):FG=X(AD):N$=V$(AD):FH=U(AD):FJ=E(,AD):RZ=E("2",AD):FK=H(AD):JG=T(AD):CG=J(AD):RY=G(AD):RA=E(,AD):X(AD)=X(I):V$(AD)=V$(I):V(,AD)=V(,I):V("2",AD)=V("2",I):U(AD)=U(I):T(AD)=T(I):J(AD)=J(I):E(,AD)=E(,I):E("2",AD)=E("2",I):E(,AD)=E(,I):H(AD)=H(I):G(AD)=G(I):X(I)=FG:V$(I)=N$ oT(I)=JG:J(I)=CG:E(,I)=FJ:E("2",I)=RZ:E(,I)=RA:H(I)=FK:V(,I)=HZ:V("2",I)=HY:G(I)=RY:U(I)=FH: 5:ڰ"2";ٰ"7";ç,"11";"EMPLOYEES":"657"-(NL=) '"1 SACK COACH":"658" '"1 HIRE COACH" "660"-(NM=) 9'"2 SACK PHYSIO ";I$("2");" ";Y("2","2");"%":"661" '"2 HIRE PHYSIO" "663"-(NN>ç) '"3 SACK SCOUT" "665"-(NN<) '"4 HIRE SCOUT" "667"-(NO>çNL=) '"5 SACK YOUTH PLAYER" "669"-(NO<"7"NL=) '"6 HIRE YOUTH PLAYER" ڰ"6";"18","13";"M MENU" 0"671"+(="M")*"35"+(="1")*"5"+(="2")*"8" ="3"NN>çװ".1",:"693" ="4"NN<װ".1",:"680" &="5"NO>çNL =װ".1",:"682" '="6"NO<"7"NL=װ".1",:"687" "850":"670" @װ".1",:NL=NL+(NL=ç)-(NL=):IB=:"701":"678"-(NL=ç) "699":"706" ;"698":Y(,IB)=ç:Y("4",IB)=ç:Y("5",IB)=ç:"706" :װ".1",:NM=NM+(NM=ç)-(NM=):IB="2":"678"-(NM=ç) 6I=̰"5":I$(I)="32"IB=I:NN=NN+(NN<):"678" I gRA="6"::ڰ"5";ç,"11";"YOUTH TEAM";"5","24";ٰ"7";"TEMP":I="6"̰"12":"683"+(I$(I)="32") RA,"6";I;"8";(Y("4",I)+);ܼ;("144"+Y("4",I));ڰ"4";ç;"10";I$(I);"17";Y("5",I);"21";Y("2",I);"23";"%";"25";Y("6",I):RA=RA+ I ZLL="2":"15",ç;"SACK WHICH PLAYER ";:"270":IB=ZA:"706"-(IB>"5"IB<"13")*"20" "685"+(I$(IB)ɰ"32")*"15" *I="6"̰"12":I$(I)="32"IB=I:"689" I NO=NO+(NO<"7") "698":"18","5";(Y("4",IB)+);ܼ;("144"+Y("4",IB));ڰ"4";ç;"7";I$(IB);"14";Y("5",IB);"17";"TEMPER ";Y("6",IB);"21","2";"DO YOU WANT THIS PLAYER Y/N" "691"+(="N")+(="Y")*"15" 4RA=+(*):NO=NO-(RA=):"677"+(RA<)*"13" E:ڰ"6";ç,"13";"SCOUTS":ET=:I=̰"5":"694"+(I$(I)="32") aET,"7";I;"9";I$(I);"16";Y("2",I);"18";"%";"20";"`";Y(,I);"25";"P/W":ET=ET+"2" I HLL=:"15",ç;"SACK WHICH ";:"270":IB=ZA:"697"-(IB"5") "703"-(I$(IB)="32")*"7" \"98":I$(IB)=H$(RC)+M$(RB)+H$(RD)+E$(RA):Y(,IB)="50"+(IB<"6")*("100"+(*"100")):Y("2",IB)=(ç+(IB<"6"))+(*("11"+(IB<"6")*"88")):Y(,IB)="35"+(*"65"):Y("4",IB)=+(*"4"):Y("5",IB)="16"+(*):Y("6",IB)=-+(*"17"):Y("6",IB)=Y("6",IB)+(Y("6",IB)<ç)*Y("6",IB)-(Y("6",IB)>"9")*(Y("6",IB)-"9"):"704": 'I$(IB)="":F=̰"6":Y(F,IB)=ç:F: NO=NO-:"699":"706"  NL= =NO=ç:I="6"̰"12":F=̰"6":Y(F,I)=ç:I$(I)="":F:I: NN=NN-:"699":"900"  IB>"5" L"18","4";I$(IB);"11";Y("2",IB);"%";"15";"`";Y(,IB);" PER WEEK": "900" 2RA=+(*"99"):RA="8":"712"-(RA="8")*"4" ,IB=+(*"5"):"709"+(I$(IB)="32")* 5Z8=:IB=NL=NL-(NL>ç):"699":"702":"712" (IB="2"NM=NM-(NM>ç):"699":"712" NN=NN-(NN>ç):"699"  4JQ=JQ-(JQ<ç)*JQ:KC=KC-(KC<ç)*KC:"714":"721" JQ=JQ-(JQ<ç)*JQ:KC=KC-(KC<ç)*KC::ç,"14";ݼ;"BANK";ç;"2","2";"CURRENT ACCOUNT `";AI;"4","2";"OVERDRAFT FACILITY `";KA;"6","2";"AMOUNT OWED `";KC:JQ=ç"8","2";"1 MORTGAGE" KA>ç"10","2";"2 LOAN" #KC>ç"12","2";"3 REPAY LOAN" &JQ>ç"8","2";"4 REPAY MORTGAGE" gKC>çCF>çRA=(KC/CF):RA=(RA-(RA>"40")*(RA-"40")):"16","2";"WEEKS TO END OF LOAN :";RA gJQ>çJP>çRA=(JQ/JP):RA=(RA-(RA>"80")*(RA-"80")):"18","2";"WEEKS TO END OF MORTGAGE:";RA  ="2"KA>ç"727" ="1"JQ=ç"726" ="3"KC>çAI>ç"734" ="4"JQ>çAI>ç"736" "848":"721" "730":"713" ב"738":LL="8":"8",;"HOW MUCH? ";"9",;"BANK CHARGES 11% INTEREST";"10",;"MINIMUM `40 `";:"270":KD=ZA:"729"-(KD<"40"KD>KA ) "713" ٚ"738":KA=KA-KD:AI=AI+KD:KD=KD+(KD/"100 ")*"11":KC=KC+KD:CF=(KC/"40"):"12",;"REPAID OVER 40 WEEKS AT `";CF:K=̰"50":K:"861":"713" ڶJQ=("1800000"/AP):"8",;"THE BANK WILL OFFER YOU";"9",;"`";JQ:ET=((JQ/"100")*"26"):JP=((ET+JQ)/"80"):"10",;"REPAYMENTS ARE `";JP;"12",;"OVER 80 WEEKS Y/N" "731"+(="Y")*"2"+(="N")  JQ=ç: AI=AI+JQ:JQ=JQ+ET: x"738":LL="8":LL="8":"8",;"REPAY HOW MUCH"'" MINIMUM `40 `";:"270":OD=ZA:"735"-(OD>AIOD<"40"OD >KC ) [KC=KC-OD:KA=KA+OD:AI=AI-OD:"739":"861":CF=(KC/"40"):KC=KC-(KC<"40")*KC:"713" "738":LL="8":"8",;"YOU OWE `";JQ;" MORTGAGE";"9",;"REPAY HOW MUCH"'" MINIMUM `80 `";:"270":OE=ZA:"737"-(OE>AIOE<"80"OE<çOE >JQ ) IJQ=JQ-OE:AI=AI-OE:"861":JP=(JQ/"80"):JQ=JQ-(JQ<"80")*JQ:"713" ;I="8"̰"12":I,;" ":I: KA=çKC=CO:"713"  %Y=̰"20":J(Y)="82"I=Y:"200" =RA=(*"25")/"10":"753"+(T(Y)=çJ(Y)="42"J(Y)="76") &U(Y)=ç:H(Y)=H(Y)-"1.4"+RA:"525"  Y:"332": QI=̰"20":E(,I)=ç:G(I)=G(I)+(G(I)>ç)-(G(I)<ç):T$(I)=Y$((CM-)+I):I: &I=̰"20":Y$((CM-)+I)=T$(I):I:  -UID=:W$("38","2"):N("2","18"):P("20"):W("20"):D("20"):F("2","20"): . M("8"): PSں;ٰ"7";ܼ;"21",ç;"SEASON ";ç;ڰ"8";AH+;"21","13";ڰ"6";ç;"M MENU" Q ="M""6" Y ZI=̰"20":T$(I)=Z$AG=I: [I: ]KA<çKA=ç:KC=CO-KA ^ _]"21",ç;ڰ"2";ܼ;ٰ"7";"END OF SEASON";ç;ڰ"8";ç;" ";AH+;"22";ڰ"6";"C CONTINUE" a"850":"865"+(="C")*"15" kJICNJH=CM m nJHCNJI=CM p q~HJ>ç"11",ç;"LOAN ";HJ;" WEEKS";"16";ܼ;(T(HK)+);("144"+T(HK));ڰ"4";ç;" ";V$(HK);"27";H(HK);"30";G(HK) r svHL>ç"12",ç;"FREE TRANSFER ";(T(HL)+);ܼ;("144"+T(HL));ڰ"4";ç;" ";V$(HL);"27";H(HL);"30";G(HL) t wV=V+:V>CNV=CM x"889"-(Y$(V)=Z$)*"2" y z="19","18";ݼ;"BANK";ç;" ` ";"19","24";AI: {:ڰ"4";ۼ;"21",ç;" PLEASE WAIT ": |ET=ç:A1="0":A2="1":A3="0":I=̰"20":ET=ET+(V$(I)ɰ"32"):A1=A1+(V$(I)ɰ"32"J(I)< "46"J(I)ɰ"35"):A2=A2-( A2="1"J(I)="35"):A3=A3+(I>"12"T(I)>ç):I: AIB="80"-(H(AD)>"6")*"40":RA=+(*IB):"899"-(Y$(RA)=Z$)  &"891":װ".1",:D$="O":HW="1001" "M:":D$:HW 4ڰ"4";"21",ç;" C CONTINUE " "="C""7":ڰ"7":ç::"1002" "850":"904" HF="2""M:R2":"1031" HF="1054"  "1046" EY(,I-"18")=ç:Y("4",I-"18")=ç:Y("5",I-"18")=ç:X(I)=ç: -"ONE OF YOUR STAFF HAS RESIGNED":Z8="0":  "926"+DT  D$="WAGES TOO LOW":"930" "D$="SIGNING FEE TOO LOW":"930" D$="CONTRACT TOO LONG" 0"19",(("32"-D$)/"2");D$:F=̰"99":F: (RA=+(*"4"):APɼAG>"4"RAɺ &EI="8":EJ="8":EK="8":EL="8": AS=:ER="20":ET="49" :ڼ;ٰ"7";ç,"11";"DIVISION ";ET:RA=:I=ASER:RA,"10";I;"13";Y$(I):RA=RA+:I:ڰ"6";"21",ç;" C CHANGE TEAM F FINISH M MORE " c="M"AS=AS+"20":AS=AS-(AS="81")*"80":ER=AS+"19":ET=ET+:ET=ET-(ET="53")*"4":"1001" #"1002"+(="C")*"2"+(="F")*"5" sLL="2":ڰ"6";"21",ç;"No OF TEAM TO BE CHANGED ";"21","25";:"270":RA=ZA:"1005"-(RA< ASRA> ER) PX="32":PY="122":ڰ"6";"21",ç;"TEAM ";RA;"8";"NEW NAME(9 MAX) ";"21","23";:"270":"1014":A$=X$:I=̰"80":"1006"-(A$< űA$> "9"A$=Y$(I)) I:Y$(RA)=A$:"1001" AS=ç:JT=-:AB=JT :I=+(AS=)*"40"̰"20"+(AS=)*"40":I;;Y$(I);"20";I+"20";"23";Y$(I+"20"):I:LL="2":ڰ"2";ٰ"7";ܼ;"21",ç;"TEAM No/0 MORE CHOICE ";"21","22";:"270":ED=ZA:"1009"+(ED>çED<"81")  AS=AS+(AS=ç)-(AS=):"1008" wZ$=Y$(ED):"891":ٰ"7";ڼ;ܼ;ۼ;"21","23";Z$:D$=Y$(ED):Y$(ED)=Y$(AP*"20"):Y$(AP*"20")=D$:"755":"813" U"416":"413":MJ=ç:MK="7":ML=:SA=ç:SB="7":SC=:SD=:SE="7":SF= LL="8":PX="32":PY="122":ڰ"5";"21",ç;"MANAGER'S NAME (8 MAX) ";"21","23";:"270":F$=X$:"1013"-(F$="32") ~LL=:PX="50":PY="51":ڰ"5";"21",ç;"POINTS FOR WIN 2/3 ";"21","19";:"270":PTS=X$:"891":"317"  X$="9" )RB="9"-X$:I=RB:X$=X$+°"32":I: ٿj LIVERPOOLARSENAL MAN UTD TOTTENHAMC PALACE MAN CITY LEEDS UTDLUTON T QPR ASTON V SOTON CHELSEA SUNDELANDNOTTS FORWIMBLEDONNORWICH CCOVENTRY EVERTON DERBY C SHEFF UTDOLDHAM SHEFF WEDWEST HAM SWINDON TMILLWALL NOTTS C NEWCASTLEBRIGHTON WOLVES WEST BROMPORT VALEPLYMOUTH BLACKBURNBRISTOL RBRISTOL COXFORD U HULL CITYLEICESTERCHARLTON WATFORD GRIMSBY TSOUTHEND TRANMERE EXETER C BURY STOKE C READING ORIENT CHESTER BRADFORD WIGAN A SWANSEA CPRESTON CAMBRIDGEBOLTON W ROTHERHAMMANSFIELDFULHAM CREWE A BOURNMTH DONCASTERTORQUAY BURNLEY PETERBOROMAIDSTONESTOCKPORTDARLINTONNORTHPTONROCHDALE SCARBORO HEREFORD CARDIFF CCARLISLE LINCOLN CBLACKPOOLWREXHAM ALDERSHOTYORK CITYWALSALL HALIFAX TKETTERINGBARNET WELLING YEOVIL T BARROW TELFORD WYCOMBE RUNCORN MERTHYR STAFFORD SUTTON U BOSTON SLOUGH NORTHWICHFISHER BATH JUVENTUS R MADRID B MUNICH BARCELONAANDELECHTAS ROMA HAMBURG D KIEV FC BRUGE AC MILAN SDENNS RY EY ON WAYLE BY INSLEYSONTONS ES MANBLENEYSEYTERIS ER ENSDONINGGANLINM1 @@@D<d@@@@@@@Ap֒{`DdbE`DdfDu⤂{yNWtQJU`DrDRu^HP[`DbpDR{`DfdE{yO`Drb`Du`DfbjDr⤈{uzPPQ`DdDX[`DbpDR_`Db`DR[`DrDR_`DdDu⊬{t_`DdDu⤆{tPQ`DjDX[`DbpDRZRu⤌{tPQ`DjDX[`DbpDRVRu⤊zWtQJTPPZRWyNRRu⤊zZP}`DrDRTP[`DrDRZPyNRTu⤊zVP{NRu⤴{tQJU`DjDR_`Db`Du⤊zVu⤄{u`Db`DZPPQuNX[`DbpDRW`DbrDR_`Dd`DRu⤆{tP[`DjDRu⤂{yNWtQJU`DhDRu`DfbhDVP@}yOQ`DjDX[`DbpDR@x@Q`DjDX[`DbpDR@|@yyNRtQyNX[`DbpDRzQyNX[`DbpDRZPQyNX[`DbpDRU`DdDRuPRzPQuNX[`DbpDRRu`DrpDuHPR{PrRVD\DVHPRVHPRVHPRVHPRuPR{`DddDWtQJU`DbhDRuPRzQ`DhDX[`DbpDRuPRzuQuNXRz[uNWtQJU`DbnDRuQuNXRzQuNXRVPQuNXRyNRUzQuNXRZPQuNXR}`DrDRTPQuNXR[`DrDRvru֒{`DdhE`DdlDu⤂{yNWtQJUuNRu}yOPR{Nu`DfbpDyz⤂{yNWtQJU`DbjDRu֖z`Dd`DuPRyOPRzuHPRzHPRuPRzPRuPRzPRuPR{yNWtQJTQ`Dp`DZPPR}`DjDRU`Dh`DRRuPRzPRZPHPPRRzHRTPRuPR{zPRuQuNXRzQuNXRu`DfbpDz| uB