Top 10k strings from footbal8.tap in <root> / bin / z80 / software / ZxTapGames.zip / games /
Back to the directory listing
6 ;"M MENU":
5 Y$(Z(J,I))=Z$
5
4 s333-AK)):
4 ;" ":
4 )=Y$(Z(J,I)):
4 )=Y$(Z(J+1
3 Z9+"."+H$(RC)+M$(RB)+H$(RD)+E$(RA):
3 HV=HV+(HV<1
3 -(Y$(RA)=Z$)
3 (AG-BX)*20
3 xxxxxx
2 Z9+"."+H$(RC)+M$(RB)+H$(RD)+E$(RA)
2 V=V+(Y$(V)=Z$):
2 T$(I)=Y$(ET)
2 RA=RA+(RA<0
2 NE=NE+(NE<0
2 NB=(NA/100
2 MI=MI-(RA*10
2 MI=MI-(MI>7
2 MH=MH-(RA*10
2 MH=MH-(MH>7
2 KC=KC-(KC<0
2 JQ=JQ-(JQ<0
2 IA,IC;V$(I):
2 HV=(G(IB)-27
2 HU=HU+(HU<50
2 HU=HU+((HG-AP)<-1
2 HU=(HU/HV):
2 HO=HO-(HO<0
2 HO=HO+(HO=0
2 HM=HM-(HM<0
2 HG-AP)*HU):
2 H(Y)=H(Y)+(R1> S1 )/20
2 DN=DN-((1250
2 CI=CI-(R=S):
2 B$=Y$(JI)+
2 AV=AV+(AV<0
2 ;Z$;" HAVE TEN MEN":
2 ;Y$(X(I));
2 ;HR;" WEEKS"
2 ;"YOUTH TEAM";
2 ;"WEEKLY PAY";
2 ;"U.E.F.A.":
2 ;"STOP TAPE":
2 ;"START ORIGINAL TAPE":
2 ;"SIGNING ON FEE `";HT;
2 ;"SEMI FINAL ":
2 ;"SCOUTS":
2 ;"RE-NEGOCIATE Y/N"
2 ;"QUARTER FINAL "
2 ;"LOAN ";HJ;" WEEKS";
2 ;"LEAGUE";
2 ;"HOW MUCH SIGNING ON FEE ` ";
2 ;"HOW MUCH PER WEEK ` ";
2 ;"HOW MANY WEEKS CONTRACT ";
2 ;"FREE TRANSFER ";
2 ;"FINAL ":
2 ;"EUROPEAN"
2 ;"EUROPEAN CUP WINNERS":
2 ;"DIVISION ";CS:
2 ;"CUP ROUND"
2 ;"CUP ROUND ";JE:
2 ;"CONTRACT";
2 ;"C CONTINUE":
2 ;"C CONTINUE"
2 ;"AGG ";JB;"-";JC:
2 ;"2nd LEG":
2 ;"1st LEG":
2 ;" C CONTINUE ":
2 +(Y$(Z(J+1
2 +(R> S)*RA+(R< S)*RB:
2 )=H$(RC)+M$(RB)+H$(RD)+E$(RA):
2 (N+((MD-N)/2
2 (HT+HI)>AI
2 (AK*DW)/100
2 ((Z(J,I)+19
2 ((ET+JQ)/80
2 "DIRECTORS VOTE OF CONFIDENCE":
1 ZA=(ZA/100
1 Z9+"."+I$(HC+5
1 Z(J,I)=Z(J+1
1 Z(J+I,K)=L(F):
1 Z$=Y$(ED):
1 Z$=J$(IB):
1 Z
1 Y1
1 Y$(RD+RE)=Z$)*2
1 Y$(RC)=Y$(RB):
1 Y$(RB)=D$:
1 Y$(RA)=A$:
1 Y$(RA);" OFFER `";RB;"TAX FREEFOR ";V$(Y);" ACCEPT Y/N"
1 Y$(QS)=U$:
1 Y$(QR)=D$:
1 Y$(QQ)=Y$(QS):
1 Y$(QP)=X$:
1 Y$(QO)=Y$(QR):
1 Y$(QN)=Y$(QP):
1 Y$(I)=Z$)*4
1 Y$(ED)=Y$(AP*20
1 Y$
1 Y E
1 X(Y)+(Y<12
1 X(IB)=X(IB)-(NT=0
1 X(I)=X(I)-(Y$(X(I))=Z$)*X(I):
1 X(I)=X(I)-(V$(I)=V$(IB))*X(I):
1 X(AD)=X(I):
1 X$=Y$(QN):
1 X
1 W1
1 W(F)=W(F)+(R> S):
1 W
1 V$(Y)=V$(I)
1 V$(Y);" INTERNATIONAL COMITMENTRELEASE HIM Y/N";
1 V$(IB)="":
1 V$(I)=V$(K):
1 V$(I)=V$(IB)
1 V$(I);" TESTIMONIAL `";RA;
1 V$(I);" RETIRES THROUGH INJURY":
1 V$(I);" IS UNHAPPY AND REQUESTS"'"A TRANSFER TO ";Y$(RA);'"TAX FREE `";
1 V$(I);" ANOUNCES HE PLANS TO RETIRE AT THE END OF THE SEASON":
1 V$(HL)="":
1 V$(FL);" RETIRES THROUGH INJURY":
1 V$(FL);" INJURED FOR ";U(FL);" WEEK"+
1 V$(AD)=V$(I):
1 U(Y)=U(Y)-1
1 U(FL)=U(FL)-(U(FL)<0
1 U(FL)=U(FL)+(U(FL)=0
1 U(AD)=U(I):
1 U$=Y$(QQ):
1 U
1 TOTTENHAMWEST HAM EVERTON NOTTS FORLIVERPOOLARSENAL MAN UTD IPSWICH TCHELSEA WATFORD LUTON T COVENTRY LEICESTERSHEFF WEDBRMINGHAMMAN CITY ASTON V QPR WEST BROMOXFORD U CHARLTON LEEDS UTDFULHAM CRYSTAL PNEWCASTLENORWICH CSTOKE C BRIGHTON OLDHAM A GRIMSBY TCARLISLE MILLWALL BRADFORD SHEFF UTDBARNSLEY HULL CITYBLACKBURNWIMBLEDONSTOCKPORTWIGAN A YORK CITYDONCASTERLINCOLN CBRENTFORDWOLVES NOTTS C BOLTON W ROTHERHAMBRISTOL CWALSALL DERBY C BURY NEWPORT CCARDIFF CREADING BLACKPOOLPLYMOUTH PORTMOUTHMIDDLBOROWREXHAM ROCHDALE HALIFAX TALDERSHOTTORQUAY UCHESTER CPRESTON MANSFIELDEXETER C PORT VALEBURNLEY NORTHPTONCAMBRIDGEHEREFORD ORIENT TRANMERE PETERBOROSWINDON THARTLPOOLCREWE A SWANSEA CTELFORD UENFIELD WEYMOUTH BLYTH S RUNCORN BATH CITYBARNET KETTERINGDARTFORD DUDLEY T BOSTON U YEOVIL T HITCHIN TSLOUGH T SOUTHPORTMAIDSTONEJUVENTUS R MADRID B MUNICH BARCELONAANDELECHTAS ROMA HAMBURG D KIEV FC BRUGE AC MILAN
1 T(I)=T(K):
1 T(AD)=T(I):
1 T$(M)=Y$(V)
1 T$(I)=Y$((RA-1
1 T$(I)=Y$((CM-1
1 T$(I)=J$(IB)
1 SC=SC+(SC<5
1 SB=SB+(SB<7
1 SA=SA+(SA<7
1 S$=Y$(JH):
1 S
1 RZ=RZ+(RZ=53
1 RY=RY+(RY=53
1 RX=(AP=O(1
1 RF=RF+(Y$(I)=J$(IB)
1 RE=RE-(RE>9
1 RE=RE+(Y$(I)=Z$
1 RE=RE+(RE=0
1 RD=RD+(RD=53
1 RD=((RC*20
1 RD;" ";Y$(Z(J,K));" v ";:
1 RC=RC-(RC>18
1 RC=RC+(RC=0
1 RC=RB-(RB>4
1 RB=Z(J,I):
1 RB=RB+(T$(RB)=Z$):
1 RB=RB+((RA*20
1 RB=1500000
1 RB;"W WAGES/CONTRACTS":
1 RB;"T TICKET PRICE":
1 RB;"S SHARES":
1 RB;"S SCOUTS":
1 RB;"R RESERVES/YOUTH TEAM":
1 RB;"R RE-NEGOTIATE CONTRACT":
1 RB;"P POSTPONMENTS":
1 RB;"M MAIN MENU":
1 RB;"L LEAGUE TABLE":
1 RB;"L LEAGUE CUP FIXTURES":
1 RB;"G GROUND IMPROVEMENTS":
1 RB;"F FIXTURES":
1 RB;"F FA CUP FIXTURES":
1 RB;"E EMPLOYEE'S":
1 RB;"D DIRECTORS":
1 RB;"C CHANGE STRIP":
1 RB;"A ALTER LEVELS":
1 RB;"1 SAVE ";
1 RA=Z(J,I):
1 RA=RA-(RA>71
1 RA=RA-(RA>4
1 RA=RA-(RA>11
1 RA=RA-(AP<3
1 RA=RA+(Y$(RA+CM)=Z$):
1 RA=(RA/AP):
1 RA=(G(IB)-28
1 RA=(100000
1 R2
1 R1
1 R$=Y$(JI):
1 R
1 PY=PY-(PX=32
1 PX=PX+(PX=32
1 PG=PG+(PG=0
1 PF=PF+(PF=0
1 P(F)=P(F)+1
1 P
1 OP=OP+(RA< RB)*3
1 OK=OK-(J=3
1 OK=OK+(OK=8
1 OK=OK+(J=3
1 OJ=OJ-(J=1
1 OJ=OJ+(OJ=8
1 OJ=OJ+(J=1
1 OC=OC+(T(Y)=1
1 O1=O1+(N(1
1 O
1 NO=NO-(RA=3
1 NO=NO+(NO<7
1 NN=NN-(NN>0
1 NN=NN+(NN<3
1 NM=NM-(NM>0
1 NM=NM+(NM=0
1 NL=NL-(NL>0
1 NL=NL+(NL=0
1 NI=NI-(O(1
1 NC=NC-(NC>0
1 NC=NC+(FD+1
1 NA;" PER WEEK"'"AND A ";NC;" WEEK CONTRACT"
1 NA;" PER WEEK AND"'"A ";NC;" WEEK CONTRACT"
1 N(EV,K)=((RA-1
1 N$=V$(AD):
1 N
1 MU=MU+(T(M)=2
1 ME=ME+(R1> S1)*
1 MAIN
1 M2 @
1 M1
1 M$="AEIOU":
1 LB=LB+(RA>
1 LA=LA+(RA>
1 L(F)=Z(J,I):
1 L(F)=Z(J+1
1 L y
1 KD+(KD/100
1 KD+(KD/100
1 KC=KC-(KC<40
1 KA=KA+(KA<0
1 KA=(CO-KC):
1 K$=Y$(RA):
1 JW;"%";" ";
1 JT=JT+(JT<1
1 JR=JR-FP+FM
1 JQ=JQ-(JQ<80
1 JE=JE-(GZ=4
1 JE =JE-(GZ=4
1 JC=JC+(CQ=1
1 JB=JB+(CQ=1
1 J(AD)=J(I):
1 J$(K)=Y$(RD+RE)
1 J$(K)=T$(11
1 J$(IB)=Y$(RB):
1 J$(IB)=T$(RB):
1 J$(IB)=D$:
1 J$(IB)="":
1 J$(I)=Y$(RF):
1 J$(I)=T$(11
1 J <
1 ID=ID+(RF=1
1 ID=ID+(ID<38
1 IC=IC-(I=9
1 IB=(Y$(V)=T$(I)
1 IA=IA+(RA=2
1 IA=IA+(IA<1
1 IA=IA+(I=11
1 IA=(G(IB)-23
1 IA,EV+IC;I;" ";
1 I$(IB)=H$(RC)+M$(RB)+H$(RD)+E$(RA):
1 I$(IB)="":
1 I$(I)=H$(RC)+M$(RB)+H$(RD)+E$(RA):
1 I
1 HV=HV+((HG-AP)<-1
1 HV=(G(Y)-27
1 HN=HN+(HO*HJ*100
1 HN=(HO*HO*5000
1 H(Y)=H(Y)-1.4
1 H(Y)=H(Y)-.4
1 H(Y)=H(Y)-(RA/10
1 H(Y)=H(Y)-((H(Y)-9.9
1 H(Y)=H(Y)+.04
1 H(Y)=H(Y)+(
1 H(Y)+(H(Y)>9.6
1 H(IB)+(H(IB)>9.7
1 H(IB)+(H(IB)>9.6
1 H(IB))/AP):
1 H(I)=H(K):
1 H(I)=H(I)-(U(I)<
1 H(I)=H(I)-(RA/10
1 H(I)=H(I)-(H(I)/10
1 H(I)=H(I)+0
1 H(I)=H(I)+(AP<3
1 H(I)*H(I)*6000
1 H(I))*U(I)-(U(I)>
1 H(AD)=H(I):
1 H(AD)=H(AD)-(U(AD)<
1 H(AD))*U(AD)-(U(AD)>
1 H$="BCDFGHJKLMNPRSTVW":
1 H 3
1 G(RB)=G(RB)-(G(RB)*2
1 G(I)=G(I)+(G(I)>0
1 G(I)=G(I)+(G(I)<0
1 G(AD)=G(I):
1 FD128K
1 EV=EV+(I=12
1 EV;" ACCEPT Y/N"
1 ET=ET-(ET=79
1 ET=ET+(ET=53
1 ET=((JQ/100
1 ER=ER-(ER=100
1 ER=ER+(J=1
1 ER=ER+(ER=1
1 ER,ES;"GOALKEEPER ";BA;
1 EP=EP+(EP<0
1 EK)*EK+(EL < EK)*EL-
1 EA=Z(J,I):
1 E$ S
1 DN=DN-(AP=1
1 DN=DN+(DN<0
1 DN=(DN/RA):
1 DN*BL)/100
1 DENNS RY EY ON WAYLE BY INSLEYSONTONS ES MANBLENEYSEYTERIS ER ENSDONINGGANLIN
1 D(F)=D(F)+(R=S):
1 D$=Y$(RC):
1 D$=Y$(QO):
1 D$=Y$(ED):
1 D$="WAGES TOO LOW":
1 D$="SIGNING FEE TOO LOW":
1 D$="CONTRACT TOO LONG"
1 CV=CV-(CV=1
1 CT=CT-(R< S)*CT:
1 CT=CT+(R> S):
1 CS=CS-(CS=30
1 CR=CR-(R< S)*CR:
1 CR=CR+(R> S):
1 CODE
1 CF=CF-(KA<1
1 C
1 BU=(RA<(PU+PV))*(2
1 BL=(DN*(NJ*100
1 BK=BK-(BK=2
1 BD=BD-(BD>9
1 BD=BD+((T(M)=4
1 BC=BC-(BC>9
1 BC=BC+((T(M)=2
1 BB=BD)+(RA=1
1 BB=BB-(BB>9
1 BB=BB+((T(M)=3
1 BB)*BB+(BD < BB)*BD-
1 B$=A$(MQ,MR)(2
1 B W
1 AZ=AZ+(AZ=53
1 AY=AY+(AY=53
1 AY+" "+Y$(Z(J,I))+" v "+Y$(Z(J+1
1 AS=AS-(AS=101
1 AS=AS+(AS=0
1 AR=AR+(AR<7
1 AR,AQ;V$(Y);" ";
1 AR,AQ;V$(21
1 AQ=AQ+(AR=7
1 AP=AP+(AG>17
1 AK=AK-(AP<4
1 AK=AK-(AG> BX)*
1 AK=AK-((AK/100
1 AK=AK+(AG<4
1 AK=AK+(AG< BX)*
1 AK-((AK/100
1 AI>1500000
1 AI=AI+(AI<0
1 AI=(HI+HT)
1 AI/((999999
1 AD=AD-(AD=12
1 AD
1 AB=AB-(JT>-1
1 AB U
1 AA=(R1< S1 )
1 A3=A3+(I>12
1 A2=A2-( A2=1
1 A$(MQ,MR)=65
1 A$(MQ,MR)(13
1 A
1 ="Y")*1000
1 ;Z$;" FC"''"THE BOARD OF DIRECTORS OFFER YOU"''"`";
1 ;Z$;" ";A$(RA,I)(12
1 ;Y$(X(IB));
1 ;Y$(RA+K):
1 ;Y$(RA+CM);
1 ;Y$(RA+CM)
1 ;V$(RB);"HAS GONE TO ";Y$(IB);'" ":
1 ;V$(IB);" REFUSES TO SIGN "''" ":
1 ;V$(IB);" AGREES TO SIGN";
1 ;V$(FL);" SENT OFF";
1 ;V$(FL);" INJURED";
1 ;S$;" HAVE TEN MEN":
1 ;P(N)-(W(N)+D(N));
1 ;NC;" WEEK"+
1 ;JB;"-";JC
1 ;J$(IB);" FC"'"THE BOARD OF DIRECTORS OFFER YOU"''"`";
1 ;A$(RA,I)(2
1 ;(W(N)*PTS+D(N)):
1 ;'"MANAGER";
1 ;'" ";P$(1
1 ;"YOUTH P";
1 ;"YOU OWE `";JQ;" MORTGAGE";
1 ;"YOU HAVE PURCHASED ";EP;" SHARES":
1 ;"YOU HAVE BEEN SACKED":
1 ;"YOU HAVE BEEN SACKED BY YOUR FELLOW DIRECTORS":
1 ;"YOU ARE GIVEN ANOTHER CHANCE"
1 ;"YOU ARE GIVEN A WEEK'S NOTICE":
1 ;"WHICH SCOUT 1 TO 3? ";
1 ;"WHICH PLAYER ";
1 ;"WHICH LEVEL? ";:
1 ;"WHICH CURRENT FORM 1-9? ";
1 ;"WEMBLEY":
1 ;"WEEKS TO END OF MORTGAGE:";
1 ;"WEEKS TO END OF LOAN :";
1 ;"WEEKLY NEWS";
1 ;"WEEK'S PROFIT";
1 ;"TYPE PLAYERS NEW NAME ";
1 ;"TYPE NEW TICKET PRICE IN PENCE"'
1 ;"TRANSFER FEE AGREED BY ";Y$(Y(3
1 ;"TOUR EUROPE Y/N"
1 ;"TIME ";N;
1 ;"THIS WILL COST `";OM;" Y/N"
1 ;"THE CLUB HAS RAISED `";
1 ;"THE BUILDERS CHARGE `";NI;'"TO IMPROVE GROUND CAPACITY TO"'"MAXIMUM DO YOU AGREE Y/N":
1 ;"THE BANK WILL OFFER YOU";
1 ;"TEMPER ";Y(6
1 ;"TEMPER ";PV:
1 ;"TEMPER ";PU;
1 ;"TEMPER ";PU:
1 ;"TEMPER ";E(3
1 ;"TEAM No/0 MORE CHOISE ";
1 ;"TEAM No/0 MORE CHOICE ";
1 ;"TEAM ";RA;
1 ;"T TEAM";
1 ;"SPEND HOW MUCH MONEY `";:
1 ;"SIGNATURE:":
1 ;"SIGNATURE:"
1 ;"SHARES PRICE ";
1 ;"SELLING"
1 ;"SELL HOW MANY SHARES ";:
1 ;"SEASON TICKET SALES `";
1 ;"SEASON ";AH+1
1 ;"SEASON ";
1 ;"SCOUT:";Y(2
1 ;"SAVE AGAIN Y/N":
1 ;"SACK WHICH PLAYER ";:
1 ;"SACK WHICH ";:
1 ;"S SWAP STRIPS"
1 ;"S SUBSTITUTE";
1 ;"RND ";I:
1 ;"RETIRING"
1 ;"RESERVES":
1 ;"REPAYMENTS ARE `";JP;
1 ;"REPAY HOW MUCH"'" MINIMUM `80 `";:
1 ;"REPAY HOW MUCH"'" MINIMUM `40 `";:
1 ;"REPAID OVER 40 WEEKS AT `";
1 ;"RE-NEGOCIATE Y/N":
1 ;"RE-NEGOCIATE Y/N M MENU":
1 ;"PROMOTE PLAYER No? ";
1 ;"POSTPONMENTS":
1 ;"POINTS FOR WIN 2/3 ";
1 ;"PLAYER'S NEW POSITION ";
1 ;"PLAYER MUST BE RATED OVER 49%"
1 ;"PLAYER FOR RENEWAL OF CONTRACT";
1 ;"PHYSIO";
1 ;"PENALTIES ";RA;"-";RO:
1 ;"P PLAYERS WAGES";
1 ;"P PLAYER AGE GOALS PLD INJURIES"
1 ;"P PLAY MATCH";
1 ;"P CHANGE PAPER";
1 ;"P W D L F A PT":
1 ;"OVERDRAFT FACILITY `";
1 ;"OVER 80 WEEKS Y/N"
1 ;"OFFERS";
1 ;"O OFFERS/NEGOTIATIONS";
1 ;"No OF TEAM TO BE CHANGED ";
1 ;"No OF PLAYER TO SACK ";
1 ;"No OF PLAYER TO RE-POS ";
1 ;"No OF PLAYER TO MOVE ";
1 ;"No OF PLAYER ";
1 ;"NO GAME THIS WEEK ";
1 ;"NEW NAME(9 MAX) ";
1 ;"MORALE ";(ME/10
1 ;"MORALE ";(MM/10
1 ;"MORALE ";(ME/10
1 ;"MONEY OFFER `";HI
1 ;"MONEY OFFER `";:
1 ;"MONEY OFFER `";
1 ;"MINIMUM `40 `";:
1 ;"MIDWEEK GAME";
1 ;"MENU CHANGE SACK EDIT TRAN FIELD"
1 ;"MANAGER'S NAME (8 MAX) ";
1 ;"MANAGER RATING ";
1 ;"M MENU F FIXTURES"
1 ;"M MENU C CUP FIXTURES"
1 ;"LOAN WHICH PLAYER ";
1 ;"LOADING";
1 ;"LOADING":
1 ;"LOAD SAVED GAME TAPE":
1 ;"LMTG ";CJ;
1 ;"LMTG ";CJ-1
1 ;"LEAGUE PRIZE MONEY";
1 ;"LEAGUE POS ";MN
1 ;"LEAGUE POS ";AG;
1 ;"LEAGUE CUP";
1 ;"LEAGUE CUP SEMI FINAL":
1 ;"LEAGUE CUP ROUND ";OJ:
1 ;"LEAGUE CUP QUARTER FINAL":
1 ;"LEAGUE CUP FINAL";
1 ;"LEAGUE CUP FINAL":
1 ;"I INJURIES/GOALS";
1 ;"I CHANGE INK";
1 ;"HOW MUCH? ";
1 ;"HOW MUCH MONEY DO YOU WANT FROMTHE DIRECTORS FOR NEW PLAYERS.";
1 ;"HOW MANY WEEKS LOAN ";
1 ;"HALF TIME";
1 ;"GENERAL RUNNING COSTS";
1 ;"GATE MONEY";'" `";NP;"-";
1 ;"G CHANGE GRAPHIC";
1 ;"FULL TIME":
1 ;"FREE TRANSFER PLAYER No ";
1 ;"FORMATION";
1 ;"FIXTURES":
1 ;"FA CUP";
1 ;"FA CUP SEMI FINAL":
1 ;"FA CUP ROUND ";OK:
1 ;"FA CUP QUARTER FINAL":
1 ;"FA CUP FINAL";
1 ;"FA CUP FINAL":
1 ;"EUROPEAN FRIENDLY":
1 ;"EUROPEAN FRIENDLY"
1 ;"ENTER NAME OF SAVED GAME"
1 ;"END OF SEASON";
1 ;"EMPLOYEE'S":
1 ;"DUE TO CUP MATCHES":
1 ;"DO YOU WANT TO NEGOCIATE Y/N ":
1 ;"DO YOU WANT TO LOAN Y/N ":
1 ;"DO YOU WANT TO LOAD OLD GAME Y/N":
1 ;"DO YOU WANT TO FREE TRANSFER Y/N":
1 ;"DO YOU WANT THIS PLAYER Y/N"
1 ;"DO YOU ACCEPT Y/N":
1 ;"DO YOU ACCEPT Y/N"
1 ;"DIVISION ";I
1 ;"DIVISION ";
1 ;"DIV"'" ";P$(2
1 ;"DIV ";AP;
1 ;"DIV ";AP:
1 ;"DIV "; HG
1 ;"DIRECTORS: ";:
1 ;"DIRECTORS";
1 ;"DIRECTORS LOAN YOU `";
1 ;"DIRECTORS & OTHER GENERAL STAFF";
1 ;"CURRENT TICKET PRICE `";NJ
1 ;"CURRENT ACCOUNT `";
1 ;"CONTRACT TEM"
1 ;"COACH:HE IS AS GOOD AS POSSIBLE"
1 ;"COACH:";I$(1
1 ;"C CHECK MATCH";
1 ;"C CHANGE LEVELS M MENU"
1 ;"C CHANGE 1st STRIP":
1 ;"BUYING";
1 ;"BANK CHARGES 11% INTEREST";
1 ;"B BANK":
1 ;"ATTEN ";
1 ;"AMOUNT OWED `";
1 ;"A PROMOTE PLAYER TO 1st TEAM ";
1 ;"A ASIGN SCOUT"
1 ;"A ADDITIONAL MENU";
1 ;"4 REPAY MORTGAGE"
1 ;"3 REPAY LOAN"
1 ;"2nd STRIP":
1 ;"2 BUY SHARES";
1 ;"1st TEAM";
1 ;"1st TEAM TOTAL `";NP:
1 ;"1st STRIP";
1 ;"1 TO 4? ";:
1 ;"1 SELL SHARES";
1 ;"1 MORTGAGE"
1 ;"--------";
1 ;"-"'"INTEREST FROM BANK";
1 ;"(";S;")":
1 ;"(";R;")";
1 ;" ` ";
1 ;" YOU CANNOT AFFORD THIS AMMOUNT ":
1 ;" TWO STRIPS THE SAME NOT ALLOWED":
1 ;" STAFF NAME WAGES CONTRACT ";
1 ;" ENTER 4":
1 ;" ENTER 3";
1 ;" ENTER 2";
1 ;" ENTER 1";
1 ;" C CHANGE TEAM F FINISH M MORE "
1 ;" 1=GOALIE 2=DEF 3=MID 4=ATTACK "
1 ;" ";V$(HL);
1 ;" ";V$(HK);
1 ;" PLEASE INSERT BLANK TAPE ":
1 ;" ":
1 ;" PLEASE WAIT ":
1 ;" C CONTINUE "
1 ;" ":
1 ;" ":
1 ;" ":
1 ;" "
1 9
1 8
1 70 )
1 7 )
1 67 #
1 66
1 6 M
1 5
1 4 ]
1 3 G
1 14 M
1 13
1 128K PIC
1 1
1 /AP)/AP)*MN:
1 /AP)/AP)*AG:
1 /AP)-(AP*10000
1 -(Y$(V)=Z$)*2
1 -(Y$(RB)=Z$)
1 -(T(I)=ZA)*41
1 -(T$(RE+11
1 -(T$(RB)=Z$)*11
1 -(T$(RB)=Z$)
1 -(RC=AP)*4
1 -(R1< S1 )/25
1 -(R1< S1 )*.06
1 -(PW=LL)*5
1 -(J(AD)=73
1 -(J(AD)=35
1 -(IA> HR)*23
1 -(HT>HV )*25
1 -(HS>HU )*27
1 -(D$="M")*1003
1 -(B(I)=N)*(3
1 -(A(X)=RA)*3
1 ,Y)=(X(Y)/6
1 ,Y)=(X(Y)-(X(Y)/4
1 ,RA))> RC)
1 ,RA));" ";S:
1 ,RA));" ";R;" ";Y$(N(2
1 ,K))=Z$);Y$(Z(J+I,K));" ";
1 ,IB)=RB-((O(1
1 ,IB);" PER WEEK":
1 ,I);" WEEK"+
1 ,I)+RB> Y(3
1 ,I))+" "+
1 ,ES;"MIDFIELD ";BB;
1 ,ES;"DEFENCE ";BC;
1 ,ES;"ATTACK ";BD:
1 +RA)=Y$(80
1 +AG)-(AG>17
1 +(Y$(Z(J,I))=Z$
1 +(Y$(I)=J$(IB))*I:
1 +(W(RA)*PTS+D(RA)> RB)*2
1 +(W(RA)*PTS+D(RA)=RB
1 +(RE> RD):
1 +(M(I)=RA)*29
1 +(J(Y)=105
1 +(J(I)=105
1 +(H(IB)>9.6
1 +(AI>50000
1 *FQ)+FP/AP:
1 *(X(Y)-(X(Y)/3
1 *((RF-RC)+1
1 *(((G(Y)-17
1 );"-";W$(RB-1
1 );"-";W$(RB+18
1 );"-";A$(RA,I)(12
1 );"-";A$(RA,I)(11
1 );" SUBSTITUTED":
1 );" SENT OFF";
1 );" ";Z$;" ";A$(RA,I)(13
1 );" ";A$(RA,I)(2
1 );" ";A$(RA,I)(11
1 );" ";A$(RA,I)(13
1 )-(R1< S1)*
1 )-((PV-PU)>29
1 )-((PU-PV)>29
1 )+I)=T$(I):
1 )+(J(Y)=105
1 )+((KI<KH )*2
1 )+((KH<KI )*2
1 )*GZ+(CP=1
1 )*CS+(BK=2
1 )*(HI+HT)-(HF=3
1 ));" REFUSE OFFER":
1 ));" ";V$(28
1 ));" ";V$(27
1 )''" ";
1 (Z9)+"."+H$(RC)+M$(RB)+H$(RD)+E$(RA):
1 (Y$(Z(J,K))=Z$);
1 (Y$(Z(J,I))=Z$
1 (W(X)*PTS+D(X)):
1 (T$(N)=Z$)*7
1 (RA/RB)>UA
1 (RA-(RA>80
1 (RA-(RA>40
1 (HT+HI)>AI )
1 (H(Y)-9.95
1 (EO/AK)*100
1 (DN/AP)/AP:
1 (BX-AG)*20
1 (BB+BD+BC)>(23
1 (BB+BD+BC)<(20
1 ((Z(J+I,K)+19
1 ((X(IB)+19
1 ((HI+HT)-AI):
1 '"6 HIRE YOUTH PLAYER"
1 '"5 SACK YOUTH PLAYER"
1 '"4 HIRE SCOUT"
1 '"3 SACK SCOUT"
1 '"2 SACK PHYSIO ";I$(2
1 '"2 HIRE PHYSIO"
1 '"1 SACK COACH":
1 '"1 HIRE COACH"
1 "WITHDRAW `";RA:
1 "WAGE BILL";
1 "VAT RETURNS";
1 "TOO MANY SHARES HAVE BEEN SOLD"'"THE NEW BOARD OF DIRECTORS"'"HAVE SACKED YOU":
1 "TO GET OUT OF FINACIAL TROUBLE":
1 "THE DIRECTORS MORTGAGE `";JQ:
1 "THE DIRECTORS HAVE SOLD"'V$(I);" FOR `";EV:
1 "THE DIRECTORS BORROW `";
1 "THE CLUB SELL SHARES `";
1 "SPONSORS PAY THE CLUB `";RA;
1 "POLICE BILL `";
1 "ONE OF YOUR STAFF HAS RESIGNED":
1 "MORTGAGE REPAYMENTS `";JP;
1 "DIV ";
1 "DIRECTORS WITHDRAW `";
1 "CLUB LOTTERY RAISES `";
1 "BANK REPAYMENTS";
1 "128K PIC"
1 xxxxxxxxxxxx xxxxxxxxxxxxx xxxxxxxxxxxx xxxxxxxxxxxxx xxxxxxxxxxxxx xxxxxxxxxxxxx
1 8888888888 8888888888 8888888888 8888888888 '''''''''''''''''''' ''''''''''''''''''''%
1