ZXTape! 0Created with Ramsoft MakeTZXFOOTBALL  0:0:0: ""  0:0:0: "FOOTBALL"10 ("LOADING PARTS 2,3,&4" 2 "POPCORN" FOOTBALL @??~?>??????~?>????|B><?|<~@xB<@@><*?*~*?>*??*BDbB?*BBBH@@D????*(BBBDBBB@@@DBB@@@T?88T~888T??>88T?T|DR@??BB@p@|(??T@BB(|BB||@BBB@@<T>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>8*~ll8*~lll8*ll8*?8*BDJ@??>*|~@H@@8**N~|BB|@@@B>B~@@8T~DDT~DDDTDDT??TB<FB???DBBD@@TDBBDBBD@@@DZB@@BT~~?|B><???BB~~x$B~~><~~??8??p<?3o?$I>??>`n(>??I$**?**|p?<* **!$I$T?T~T|pxTT TTI$I??T*8*?8*8*>xx8*8*>8*<8I$?c8T??T?<Tx0?vpT>;~xT?N~T?xT$I$1T~?`?0 ?~ 1p%I$I>|~@7  |ߒI'`??$I$??$3<F|<>΀5π<pI$I?? ~In(??~?x~3v}I$?*xy<<|*`<1* $I$T|T|T>><x|7<ǁ 8||TI$I8*8*8*~< ?*<*88I$ ?1TvT~? T??<9?><?T $I$p??x @`?σ|<$Ipb<   >?<@FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBBBBBBBBBBBBBBBBBBBBBBBBGGGBBBFFGGGGGGGGGGGGGGGGGGGGGGBBBBBBGFFBBBBBBBBBBBBBBBBBBBBBBBBGGGBBBFFBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBFFGGGGGGGGGGGGGGGGGGGGGGGFFBBBBBBBBBBBBBBBBBBBBBBBFFBBBBBBBBFFEEEEEEEEEEEEEEEEFFGEEEEEEGGGEEEEEEEEGEEEFFGEEEEEEEEEEEGGGEEEEEGGGEEFFEEEEEEEGEEEGGGGGEEEEEDDDEEGFFGGEEEEBBBGGGGGGGGGGEEEGGFFGEEEEGBBGGGGGGGOOOEEEGGGFFEEEEGGBBGOOOOOOOO AGEGGGGGFDEEGGGGBBr~OOOOOOO NNNNNNFFFFDEEGGGGBBrNN OOOONNNNNNNFFFFFEEGGGGBB LLLOOOEDDDFFGGGJJJLLLLLLLLLLLLLLLLAAGEEFFAJJJLLLLLLLLLLLLLLLLLMEGGFOMMMMMMMMMMMMMMMMMMMMMMOGGFOMMMMMMMMMMMMMMMMMMMMMMMMFk >F[#< >2j\!i[:\(:\ :\ > (#t[ < vâ FOOTBALL 1984 by SOFTSTONE Ltd.ILOVESALLY HELLO GARY.# # <@kk\\\3^\2^_,,\a1X![!@P!!W K SR PARKABLY PUT TOGETHER BYKEITH A GOODYER IN TIMES OF NEED(OK SO I'V GOT A CASH CRISES ON) WELL WEVE ALL GOT TO LIVE. GOD BLESS ALL THE HACKER'S!!!!!!________________________________ ""16384@:a=23653e\+256*23654f\:23613=\,0:23614>\,0:"FOOTBALL"16384@,a-16384@ z0:0::65097I:0:a=23613=\+256*23614>\:a,0:a+1,91[:"":"" 0:0:7::2,1;"Press:";4,7;"1. To SAVE game on to";5,9 ;"Microdrive.";7,7;"2. Play game." ="1"9596|% P="3""BYTES1"65098J,296(:"BYTES2"65368X,168:6 "2"7 236099\,100d: j23658j\,8:.1}L,20:21,0;5,0;"Please input your name ";Z$ $Z$<1űZ$>1521 #kPOS=0:COR=0:SP=0:PLAY=0:ENG1=0:SK1=0:MOR1=502:GAM=1 (?SM=16:TM=0:SC1=0:SC2=0:TI=0 < S=0 n<K(8):L(8):M(8):N(8):O(8) xAV(30):G(30):H(30):I(30):F(30) .a$(16,20):e$(26,10 ) )190:f=116:a$(f):f 8"NEW YORK JETS ","LOS ANGELES RAIDERS","KANSAS CITY CHIEFS","DALLAS COWBOYS","ST LOUIS CARDINALS","HOUSTON OILERS","CHICAGO BEARS","LOS ANGELES RAMS","SEATTLE SEAHAWKS","PITTSBURGH STEELERS","NEW YORK GIANTS","NEW ORLEANS SAINTS","WASHINGTON REDSKINS","MIAMI DOLPHINS","GREEN BAY PACKERS","SAN FRANCISCO 49ERS" f=126:e$(f):f "DICKENSON","THEISSMANN","RIGGINS","PLUNKETT","MONTANA","JOHNSTON","WHITE","MONK","MARINO","GAULT","GREEN","MITCHELL","CARTER","ALLEN","BROWN","GRAHAM","JACKSON","KING","KENNEDY","FOUKES","RICHTER","LLOYD","GILBERT","WILLIAMS","CLAY","" lMON=250000t$ vIN=0:LO=0 LA=1000000t$ 0:0:6: ;1,0;1;"PICK YOUR LEVEL OF PLAY (15)" 3,1;"1) BEGINNER";5,2;"2) NOVICE";7,3;"3) GOOD";9 ,4;"4) PROFICIENT";11 ,5;"5) EXPERT" .2~L,30 8000@:LEV=A $LEV<1LEV>5653 0:0: 00,0;0;5;"GROUP ONE" TA=18:0:5:A,0;A;A,2;A$(A):.05|L,A:A 110 ,0;5;0;"GROUP TWO" [A=9 16:A+2,0;A-8;A+2,3;A$(A):.05|L,A:A N21,0;7;"WHICH GROUP ARE YOU TO COACH?":8000@:GR=A "GR<1GR>2720 GR=10:0:5::F=((*8)+1)+8:V$=A$(F):B=18:B*2,1;B;B*2,3;A$(B):.05|L,25:B GR=20:0:5::F=(*8)+1:V$=A$(F):B=9 16:B*2-16,0;B-8;B*2-16,3;A$(B):.05|L,25:B P21,0;7;"WHICH TEAM DO YOU WISH TO COACH?":8000@:C=A  C<1C>8760 IGR=1B$=A$(1):A$(1)=A$(C):A$(C)=B$:B$=A$(1)  VGR=2C=C+8:B$=A$(9 ):A$(9 )=A$(C):A$(C)=B$:B$=A$(9 ) *u21,0;1;7;" YOU WILL BE PLAYING IN WHITE ":A=1502:.01z# =,A+10 :A H&0:0:7:1: RwA=3183:A,0;7;" ":A \wA=2203:A,0;2;" ":A fMA=210 2:A,0;1;7;"* * * * * * *":A pIA=39 2:A,0;1;7;" * * * * * * " zA j21,0;2;0;"";7;2,32 -Z$;Z$ 2:7:1:13 ,2;"YOUR SEASON AS COACH TO THE";16,6;B$;19,6;"IS ABOUT TO BEGIN" ,920:A=131:B,C:B,C:A &.2~L,7,.1}L,4,.353333,0,.353333,4,.1}L,7,.1}L,4,.1}L,7,.73333,12 ,.2~L,16,.1}L,14,.353333,12 ,.353333,4,.1}L,6,.1}L,4,.1}L,6,.73333,7,.2~L,7,.1}L,7,.525fff,16,.1}L,14,.3,12 ,.73333,11 ,.2~L,9 ,.1}L,11 ,.353333,12 ,.353333,12 ,.1}L,7,.1}L,12 ,.1}L,7,.353333,4,.353333,0 L=125 G(L)=(*10 )+1 H(L)=(*10 )+1 &I(L)=G(L)*15000:+H(L)*100d F(L)=(*6)+1 L 7T=0:R=111 :ENG1=T+H(R):T=ENG1:R 5T=0:R=111 :SK1=T+G(R):T=SK1:R 1T=0:R=111 :U=T+I(R):T=U:R  0 &0:1:7:1: $_0,0:255,0:0,175:-255,0:0,-175 .2,2;"OPTION";2,20;"ENTER":16,151:480,0:160,151:40(,0 8>5,1;"TRANSFER MARKET.......1":.2~L,5 B?7,1;"CHANGE PLAYERS' NAMES.2":.2~L,10 L?9 ,1;"CHANGE TEAM NAMES.....3":.2~L,15 V@11 ,1;"OBTAIN/PAYBACK LOAN...4":.2~L,20 j@13 ,1;"PLAY NEXT GAME........5":.2~L,25 ~@15,1;"YOUR RATING...........6":.2~L,30 H19,3;6;1;1;"SELECT NOW:":8000@ A=11260 A=21440 A=31680 A=41860D A=52220 A=69500% 8A=05025:.01z# =,A:A:1170 TM=1:8,0;"YOU HAVE ALREADY BEEN IN THE "''"TRANSFER MARKET THIS WEEK"''"I'M SORRY BUT YOU CANNOT MAKE"''"ANY MORE TRANSACTIONS":F=1400:F:1040 MON300000u:10 ,0;"YOU HAVE TO GET SOME MONEY BEFORE YOU CAN BUY ANY PLAYERS":F=1250:F:1040 2:2:7:  9610% 71:0,67C:248,0:0 (Y20,0;"ENTER NO. OF THE RESERVE YOU WISH TO SELL OR ~0~ TO CONTINUE":SE 2SE<12 SE>020,0;"NO. ";SE;" IS A PLAYING MEMBER NOT A RESERVE ":F=1200:F:1320( <SE=01040 FSE>161320( KMON=MON+I(SE) PtV(26)=V(SE):E$(26)=E$(SE):G(26)=G(SE):H(26)=H(SE):I(26)=I(SE):F(26)=F(SE) Z1:0,4;"PLAYER SK EN FO VALUE" dF=1726:F-15,0;F;F-15,3;E$(F);F-15,16;G(F);F-15,19;H(F);F-15,22;F(F);F-15,25;I(F):V(F)>0F-15,14;"I" nF:15,0;"ENTER THE NUMBER OF THE PLAYER YOU WISH TO BUY ":BU:BU<17BU>271390n xMON251510 F=01040 L19,0,,,,,,19,0;"PRESENT NAME IS ";E$(F);" " 120,0;" " 321,0;"ENTER NEW NAME (MAX 10 CHARS)" O$ VO$>10 21,0;1;" TOO MANY LETTERS. TRY AGAIN":1550 "19,0;" ":21,0;" ":19,0;"NEW NAME IS ";O$ , E$(F)=O$ 6F>13 1620T @F+1,4;E$(F) J 1630^ TF-12 ,18;E$(F) ^.21,0;"ANY MORE CHANGES ? (Y/N)" hO$ rO$="N"1040 |O$="Y"1440  1040 4:0:4: 6A=116:A,0;A;A,4;A$(A):A J18,0;"ENTER THE NUMBER OF THE TEAM YOU WISH TO CHANGE. ":F "F<1F>161710 -F,4;7;1;2;A$(F) 18,0,,,, ,18,0;"PRESENT TEAM IS ";A$(F) ,20,0;"ENTER NEW NAME OF TEAM" &C$:20,0,,,,:A$(F)="" `C$>2020,0;"NAME IS TOO LONG (MAX 20 CHARS) PLEASE TRY AGAIN":1760 dA=116:A$(A)(̱C$)=C$20,0;"NAME ALREADY EXISTS,TRY AGAIN.":1760 A 20,0,,,, %20,0;"NEW NAME IS ";C$ 4W$="":Q$=" ":G=120-C$:W$=W$+Q$:G A$(F)=B$B$=C$+W$ A$(F)B$A$(F)=C$ F,4;A$(F) 221,0;"ANY MORE CHANGES (Y/N) ":C$ &C$="N"1040 0C$="Y"1680 : 1040 N5:5:0: XL0,0;"DO YOU WISH TO OBTAIN A LOAN OR"''"PAY SOME MONEY BACK?" b.03{u\,10 l7''" ENTER (1) FOR A LOAN OR"''" (2) TO PAYBACK" v.03{u\,15 8000@:D=A D=11960 D=22090*  1920 .:2,6;"FINANCIAL STATEMENT" "4,8;"BALANCE $";MON (6,1;"LOAN AVAILABLE $";LA %8,4;"AMOUNT OWED $";LO qLA014,0;"YOUR CREDIT LIMIT IS $1,000,000"''"YOU CANNOT BORROW ANY MORE MONEY":2050 414,0;"HOW MUCH DO YOU WISH TO BORROW" "$";E:E<02010 E>LA14,0;" ":14,0;"$";E;" IS TOO MUCH."::"YOU MAY HAVE $";LA::"PLEASE TRY AGAIN":E=0:2010 GA=10 12 :A,0;" ":A <14,0;"THE BANK HAS GRANTED YOUR LOAN OF $";E #A=010 :.1}L,A:A  MON=MON+E:LO=LO+E:LA=LA-E F=1100d:F  1040 *.:0,6;"FINANCIAL STATEMENT" 4"4,8;"BALANCE $";MON >%6,4;"AMOUNT OWED $";LO ?{MON014,4;"YOU HAVE NOT GOT ANY MONEY TO REPAY YOUR LOAN":F=1250:F:1040 CFLO014,4;"YOU DO NOT OWE ANY MONEY":2180 H314,0;"HOW MUCH DO YOU WISH TO REPAY" R0"$";D$:D$<480ůD$>5792130R SE=D$ \3E>LO14,0;"YOU DONT OWE THAT MUCH", fbE>LOF=1250:F:14,0;"PLEASE TRY AGAIN ":E=0:2130R pMON=MON-E:LA=LA+E:LO=LO-E zY18,0;"OK YOU HAVE PAYED BACK $";E;20,0;"AND YOU NOW OWE $";LO $F=1150:F:1040  40:6:9 ::GR=2S=8 X,Y 1,7,8,2,5,3,6,4,1,5,3,7,2,6,4,8,1,2,3,4,5,6,7,8,1,3,6,8,2,4,5,7,1,6,8,3,5,2,7,4,1,8,5,4,7,2,6,3,1,4,7,6,3,2,8,5 1,5,6,2,7,3,8,4,1,6,2,5,3,8,4,7,1,7,2,8,3,5,4,6,1,4,6,7,5,8,2,3,1,8,3,6,4,5,2,7,1,3,7,5,8,6,4,2,1,2,6,5,8,7,4,3 MOR2=((*502)+10 *LEV):SK2=((*502)+10 *LEV):ENG2=((*502)+10 *LEV):RA2=((MOR2+SK2+ENG2)/3) 7T=0:R=111 :ENG1=T+H(R):T=ENG1:R 5T=0:R=111 :SK1=T+G(R):T=SK1:R 1T=0:R=111 :U=T+I(R):T=U:R RA1=((MOR1+SK1+ENG1)/3):5,1;"MORALE.....";MOR1:6,1;"SKILL......";SK1;7,1;"ENERGY.....";ENG1;9 ,1;"RATING.....";RA1 =3,0;1;A$(X+S);12 ,0;A$(Y+S) 8.1}L,5:.2~L,10 :.3,15 ,1,2;1;"MATCH NO. ";GAM 14,1;"MORALE.....";MOR2;15,1;"SKILL......";SK2;16,1;"ENERGY.....";ENG2;18,1;"RATING.....";RA2 $K8,35#:104h,0:8,107k:104h,0 %8.1}L,5:.2~L,10 :.3,15 .221,0;"ANY KEY TO CONTINUE":0 /$TI=1TI=0:2470 8 = TM=0 B}4,0;"DO YOU WISH TO"''" (1) PLAY YOUR MATCH"''" (2) CHANGE YOUR TEAM, OR"''" (3) SEE YOUR TEAMS STATISTICS" LH.1}L,30:8000@:DE=A:DE<1DE>32380L VDE=12470 `DE=22430~ jDE=3:2300 t:2370B ~:9610% 71:0,67C:248,0:0 Y20,0;"ENTER NO. OF THE RESERVE YOU WISH TO PLAY OR ~0~ TO CONTINUE":SE SE=0:2370B SE<12 SE>020,0;"NO. ";SE;" IS A PLAYING MEMBER NOT A RESERVE ":F=1200:F:2442 SE>162442 Z20,0;"WHAT NO. PLAYER DO YOU WANT TO DROP FROM THE TEAM ":DR DR<1DR>11 20,0;"NUMBER ";DR;" IS NOT A PLAYING MEMBER. ":F=1200:F:2445 3G(26)=G(DR):G(DR)=G(SE):G(SE)=G(26) 3H(26)=H(DR):H(DR)=H(SE):H(SE)=H(26) V(26)=V(DR):V(DR)=V(SE):V(SE)=V(26):I(26)=I(DR):I(DR)=I(SE):I(SE)=I(26):F(26)=F(DR):F(DR)=F(SE):F(SE)=F(26) 9E$(26)=E$(DR):E$(DR)=E$(SE):E$(SE)=E$(26) :9610% 71:0,67C:248,0:0 K20,0;"PRESS ~C~ TO CONTINE":="C"TI=1::2300 2455 :2370B W=111 :V(W)>0:10 ,0;1;E$(W);" IS INJURED AND YOU CANNOT PLAY WITH HIM.":Z=1200:Z:2430~ W::W=200-1:W,0;"THE BALL GAME IS ABOUT TO BEGIN ":W+1,0;0;" ":.1}L,30-W:W `2,10 ;"MATCH NO.";GAM;0,0;1;"THE BALL GAME IS ABOUT TO BEGIN " 1 %.5,10 :.5,5 #FIN=(*RA1+RA2)/20+4 $SP=1A$(Y+S)=V$:A$(X+S)=B$ A=(*RA2/4) B=(*RA1/4) A>B2530 B>A4000 2480 4:4:7: I0,20;7;0;SC1;21,20;1;SC2 O0,0;7;0;A$(X+S);21,0;1;A$(Y+S) .7:0,16:255,0 @A=1910-24:A,160:0,2:A &0,160:192,0 Z=65232 (U0:226,88X:0,16:225,88X:0,16 2230,92\:-9 ,24:231,91[:-9 ,24:0,32 :1,0:0,-32 3BX=BX-1:BX+1,BY;" ":2905Y U,BX<3BX=4:BX-1,BY;" " ^ BX,BY;"" _7,15-CH;"";8,15-CH;"";9 ,16-CH;"";10 ,16-CH;"";11 ,17-CH;"";12 ,17-CH;"" `7:7,16-CH;"";8,16-CH;"";9 ,17-CH;"";10 ,17-CH;"";11 ,18-CH;"";12 ,18-CH;"" a BX,BY;" " b{BY=BY+1:BX,BY;" ":8:Z=65232:BY=BY+1:BX,BY;" ":8:Z=65232:0 cmBY+2DY5-CHDX1,DY1-CH;7;"";DX2,DY2-CH;"";DX3,DY3-CH;"";DX4,DY4-CH;"";DX5,DY5-CH;"" d%BX<12 BY>172920h e%BX>12 BY>232920h g 2914b hGAX3,AY3-CH-1;"":20:BX,BY;" ":20:BX,BY;" " lD17,0;1;2;6;"* * * * * * * * * *" mD18,0;6;2;1;" T O U C H D O W N " nD19,0;1;2;6;"* * * * * * * * * *" oI18,0;6;2;1;" ";18,18;" " q8F=110 :.05|L,(*30)+5:F sF:SC2=SC2+7 tI0,20;7;0;SC1;21,20;1;SC2 x 250 {)PLAY=PLAY+1:PLAYFIN4200h | 2480 4:4:7: IK=(Y/3) O0,0;7;0;A$(X+S);21,0;1;A$(Y+S) I0,20;7;0;SC1;21,20;1;SC2 c0,16:255,0:A=025524:A,17:0,2:A g64@,160:191,0:A=64@25524:A,160:0,2:A Z=65098J 0:31,88X:0,16:30,88X:0,16:24,88X:9 ,24:0,1:-9 ,-24:0,32 1,0:0,-32 :24,88X:9 ,24:0,32 :1,0:0,-32 DAX1=3:AX2=6:AX3=10 :AX4=14:AX5=18 FAY1=19:AY2=18:AY3=16:AY4=14:AY5=14 DDX1=3:DX2=6:DX3=10 :DX4=14:DX5=18 DDY1=15:DY2=13 :DY3=11 :DY4=9 :DY5=7  1 CH=(*10 ) ģ12 ,11 +CH;0;"";11 ,11 +CH;"";10 ,12 +CH;"";9 ,12 +CH;"";8,13 +CH;"";7,13 +CH;"" ZDX1,DY1+CH;0;"";DX2,DY2+CH;"";DX3,DY3+CH;"";DX4,DY4+CH;"";DX5,DY5+CH;"" ZAX1,AY1+CH;7;"";AX2,AY2+CH;"";AX3,AY3+CH;"";AX4,AY4+CH;"";AX5,AY5+CH;"" ʣ12 ,13 +CH;7;"";11 ,13 +CH;"";10 ,14+CH;"";9 ,14+CH;"";8,15+CH;"";7,15+CH;"" 7:502 βCH=CH-1:12 ,13 +CH;7;"";11 ,13 +CH;"";10 ,14+CH;"";9 ,14+CH;"";8,15+CH;"";7,15+CH;"" RV=0:CH=CH+1:7,15+CH;7;"";8,15+CH;"";9 ,14+CH;"";10 ,14+CH;"";11 ,13 +CH;"";12 ,13 +CH;"":.5,-20 Ҁ0:8:Z=65098J:AX1,AY1+CH;" ";AX2,AY2+CH;" ";AX3,AY3-1+CH;" ";AX4,AY4+CH;" ";AX5,AY5+CH;" " RV=34056 pAY1=AY1-1:AY2=AY2-1:AY3=AY3+1:AY4=AY4-1:AY5=AY5-1:RV=RV+1:4050 AX3,AY3+CH;"" AX1,AY1+CH;"" AX2,AY2+CH;"" AX4,AY4+CH;"" AX5,AY5+CH;"" F=(*4)+1 BX=AX3:BY=AY3+CH 4Z=65098J:((F*10 )+4070)-10 4AX3,AY3+CH;"":.1}L,0:AX3,AY3+CH;"" `BX=BX+1:BY=BY-1:BX,BY;7;1;"";BX-1,BY+1;1;"" BX=AX5BY=AY5+CH4105   4070 4AX3,AY3+CH;"":.1}L,0:AX3,AY3+CH;"" bBX=BX-1:BY=BY-.5:BX,BY;7;1;"";BX+1,BY+.5;1;"" BX<44105   4080 4AX3,AY3+CH;"":.1}L,0:AX3,AY3+CH;"" `BX=BX+1:BY=BY-2:BX,BY;7;1;"";BX-1,BY+2;1;"" BX=AX4BY=AY4+CH4105   4090 4AX3,AY3+CH;"":.1}L,0:AX3,AY3+CH;"" `BX=BX-1:BY=BY-1:BX,BY;7;1;"";BX+1,BY+1;1;"" BX=AX2BY=AY2+CH4104  4100  BX,BY;"" F=(*3)+1 F=14113 F24128   BX,BY;"" Z=(*11 )+1:1,0;0;Z;" ";E$(Z);18,19;0;7;"DROPPED IT!":F(Z)=F(Z)-.5:F(Z)<0F(Z)=0 ZDX1,DY1+CH;0;"";DX2,DY2+CH;"";DX3,DY3+CH;"";DX4,DY4+CH;"";DX5,DY5+CH;"" AX3,AY3+CH;"" 12 ,11 +CH;0;"";11 ,11 +CH;"";10 ,12 +CH;"";9 ,12 +CH;"";8,13 +CH;"";7,13 +CH;"" 12 ,12 +CH;"";11 ,12 +CH;"";10 ,13 +CH;"";9 ,13 +CH;"";8,14+CH;"";7,14+CH;"" H.03{u\,-30:502:PLAY=PLAY+1:PLAYFIN4200h  2480  ;BX>3BX=BX-1:BX+1,BY;" ":4132$ ",BX<4BX=4:BX-1,BY;" " $ BX,BY;"" &7,11 +CH;0;"";8,13 +CH;"";9 ,12 +CH;"";10 ,12 +CH;"";11 ,12 +CH;"";12 ,11 +CH;"" (7:7,14+CH;"";8,14+CH;"";9 ,13 +CH;"";10 ,13 +CH;"";11 ,12 +CH;"";12 ,12 +CH;"" * BX,BY;" " ,}by=by-1:7:bx,by;" ":8:Z=65098J:7:by=by-1:bx,by;" ":8:Z=65098J: .mBY-2DY5+CHDX1,DY1+CH;0;"";DX2,DY2+CH;"";DX3,DY3+CH;"";DX4,DY4+CH;"";DX5,DY5+CH;"" /7:7,14+CH;"";8,14+CH;"";9 ,13 +CH;"";10 ,13 +CH;"";11 ,12 +CH;"";12 ,12 +CH;"" 0%BX<12 BY<11 41506 2$BX>12 BY<741506 4 4140, 6,20:BX,BY;"":20:BX,BY;"" 7AX3,AY3+CH;"" 8-Z=(*11 )+1:1,0;0;Z;" ";E$(Z):17,13 ;2;6;1;"* * * * * * * * * *";18,13 ;6;2;" T O U C H D O W N ";19,13 ;2;6;"* * * * * * * * * *":F(Z)=F(Z)+.5:F(Z)>10 F(Z)=10 9J18,13 ;1;2;6;" ";18,31;" " <8F=110 :.05|L,(*30)+5:F >F:SC1=SC1+7 ?I0,20;7;0;SC1;21,20;1;SC2 @4150:PLAY=PLAY+1:PLAYFIN4200h E 2480 hSC1SC24205m i~:8,4;1;7;1;"OVERTIME WILL BE PLAYED";12 ,0;"THE FIRST TEAM TO SCORE WILL WIN" jTP=14:N=17:.03{u\,5:.03{u\,5+P:N:P k 2480 mSP=16000p p&5:5:0:1: q&1,12 ;1;"RESULTS" ra24,16:0,128:208,0:0,-128:-208,0 s&24,480:208,0 t&24,80P:208,0 u'24,112p:208,0 v'200,16:0,128 wa20,12 :0,136:216,0:0,-136:-216,0 xF=5184 |=F,4;7;" ";F,26;" " }MF+1,4;0;" ";F+1,26;" " ~F SC2>SC14240 FCOR=COR+1:MOR1=MOR1+(SC1-SC2):MOR1100dMOR1=100d K(X)=K(X)+3  4250 1MOR1=MOR1+(SC1-SC2):MOR10MOR1=0 K(Y)=K(Y)+3 L(X)=L(X)+SC1:L(Y)=L(Y)+SC2 M(X)=M(X)+SC2:M(Y)=M(Y)+SC1  N(X)=L(X)-M(X):N(Y)=L(Y)-M(Y) 2.03{u\,15:O(X)=L(X)/GAM:O(Y)=L(Y)/GAM 4GM=(100d+(N(X)*K(X))*10 )*(LEV/2) K5,4;7;0;A$(X+S);5,26;0;SC1 K6,4;0;7;A$(Y+S);6,26;7;SC2 F=9 184 X,Y SF,4;7;0;A$(X+S);F+1,4;0;7;A$(Y+S) &SC2=(*35#):SC1=(*35#) SC1<3SC1=4SC1=5SC1=8SC1=11 SC2<3SC2=4SC2=5SC2=8SC2=11 SC1=SC2SC1=1SC1=2SC1=4SC1=5SC1=8SC2=1SC2=2SC2=4SC2=84505 ?.05|L,30:F+1,26;0;7;SC2 SC1>SC2K(X)=K(X)+3 SC2>SC1K(Y)=K(Y)+3 L(X)=L(X)+SC1:L(Y)=L(Y)+SC2 M(X)=M(X)+SC2:M(Y)=M(Y)+SC1  N(X)=L(X)-M(X):N(Y)=L(Y)-M(Y) O(X)=L(X)/GAM:O(Y)=O(Y)/GAM MF,26;7;0;SC1;F+1,26;0;7;SC2 F 221,2;"PRESS ANY KEY FOR THE LEAGUE"  0:  J=8  Q=0 R=1J-1 K(R)0V(Z)=V(Z)-1  Z  21,2;"ANY KEY TO CONTINUE":0::Z=(*(ENG1/10 )):Z1,0;1;"*********END OF SEASON**********" 54,3;"YOU FINISHED IN ";POS;" POSITION" `16,152:224,0:0,-24:-224,0:0,24 `20,148:216,0:0,-16:-216,0:0,16 POS=15550 U8,0;"UNFORTUNATELY YOU DO NOT QUALIFY"''" FOR THE SUPER-BOWL FINAL" SMON-LO<250000t$13 ,4;"YOU LOST ";250000t$-MON-LO;" DOLLARS" <250000t$-MON-LO013 ,4;"YOU LOST " SMON-LO>250000t$13 ,4;"YOU MADE ";MON-250000t$-LO;" DOLLARS" T16,0;1;"YOUR RATING AS A COACH IS ";:COR0COR=0 1;COR;"%" 521,0;"WOULD YOU LIKE A NEW GAME (Y/N)" X$ X$="Y"9  X$="N"  5535 ZU=-502502:GR;245,60<:.01z# =,U/2:GR;-222,-U:U {GR:20,10 :0,100d:255,60<:-240,557:0,-110n:240,557 >F=5118v3:15,F:-4,0:F 7:GR: T13 ,3;B$;14,10 ;"ARE";15,5;"LEAGUE CHAMPIONS" 1F=1100d:.02{# =,(*30):F  150 0:7:0: !3,10 ;"THIS IS THE"  1 "4,9 ;"" 25,0;" " 26,0;" " 27,0;" " 58,0;" " .2:10 ,7;" " %11 ,7;" " 012 ,3;" " 013 ,3;" " a16,2;1;B$;18,5;0;"VERSUS";20,8;2;V$ )COR=COR+25:SP=1:300, F=210-1 W0:F,0;1;ٺ(F/3+1);"THE SUPERBOWL IS ABOUT TO BEGIN "  .1}L,-F F:2474 p0:0:6: z)1,4;B$;3,4;V$ -1,26;SC1;3,26;SC2 #SC1>SC2COR=COR+(SC1-SC2):S$=B$ SC2>SC1S$=V$  6 -5,4;" " -6,4;" " -7,4;" " +8,5;" " +9 ,5;" " *10 ,6;" " (11 ,7;" " &12 ,8;" " $13 ,9 ;" " ,18,5;" " (17,7;" " $16,9 ;" " !15,11 ;" " 14,13 ;" " 6:0 &568,32 :148,0 &72H,40(:116t,0 %88X,480:84T,0 &104h,568:546,0 &104h,63?:47/,0 &72H,71G:112p,0 &64@,79O:128,0 &568,87W:144,0 &480,95_:160,0 '40(,111o:176,0 5,6;S$ 27,6;1;"SUPER-BOWL CHAMPIONS" .3,2:.3,5:.3,5:.3,9 :.5,12 :.3,12 :1,9 /21,3;"PRESS ANY KEY TO CONTINUE" 0::5525 @6.007ye`A,10 :Q$=:Q$<"0"Q$>"9"8000@ A.03{u\,15:A=Q$: %&0:0:0:7: %>1,0;1;"NAME: ";2,0;"TEAM: " %& 2 %0$4,0;" LEVEL" %5 3 %:$6,0;" BALANCE $" %;$7,0;" LOAN OWED $" %? 4 %D%9 ,0;" VALUE OF SQUAD " %E&10 ,0;" MORALE " %F&11 ,0;" SKILL " %G&12 ,0;" ENERGY " %N&13 ,0;" LGE POSITION " %O&14,0;" TEAM RATING " %P 5 %X&17,0;" YOUR RATING IS " %]7:1 %b1,6;1;Z$ %c2,6;1;B$ %d4,16;LEV %e6,16;MON %f7,16;LO %g7T=0:F=116:TVAL=T+I(F):T=TVAL:F %h9 ,16;TVAL %i10 ,16;MOR1 %j11 ,16;SK1 %k113 ,16;POS:12 ,16;ENG1 %l/14,16;((MOR1+SK1+ENG1)/3) %mCOR>100dCOR=100d %nCOR<0COR=0 %v17,16;COR %w/21,3;"PRESS ANY KEY TO CONTINUE" %x 0 %yNSP=121,0;" ":5534 %{ 1040 %|1#0;"Insert Cartridge and press ENTER" %~ =""9598~% %*"m";1;"Football"9997 ':*"m";1;0+18+"1"23296[,255:*"m";1;0+18+"2"65098J,437:9 %/0,4;"PLAYER SK EN FO VALUE" %PO=1:Q=1SM:Q+PO,0;Q;Q+PO,3;E$(Q);" ";Q+PO,16;G(Q);" ";Q+PO,19;H(Q);Q+PO,22;F(Q);Q+PO,25;I(Q):V(Q)>0Q+PO,14;"I" %Q11 PO=2 %Q: ' 65097I:a=23613=\+256*23614>\:a,0:a+1,91[:*"m";1;0+18+"1":*"m";1;0+18+"2":9 '=65098J:*"m";1;"footUDG":*"m";1;"lines" '65536-7962 ZKEIToolangAk.or2accs+++++        <wO1XO=(,wNrMkMpT=1k>] ENEW YORK JETS LOS ANGELES RAIDERS KANSAS CITY CHIEFS DALLAS COWBOYS ST LOUIS CARDINALS HOUSTON OILERS CHICAGO BEARS LOS ANGELES RAMS SEATTLE SEAHAWKS PITTSBURGH STEELERS NEW YORK GIANTS NEW ORLEANS SAINTS WASHINGTON REDSKINS MIAMI DOLPHINS GREEN BAY PACKERS SAN FRANCISCO 49ERS  DICKENSON THEISSMANNRIGGINS PLUNKETT MONTANA JOHNSTON WHITE MONK MARINO GAULT GREEN MITCHELL CARTER ALLEN BROWN GRAHAM JACKSON KING KENNEDY FOUKES RICHTER LLOYD GILBERT WILLIAMS CLAY <ot$t$eVSEATTLE SEAHAWKS  cBNEW YORK JETS t* @ u* @xyork+ng;a,a5Q1 i333zxxx xxyyyy y xxx xxyy y y y "" MBYTES1 (Jv*>>2V:VO"@ͺ$:V02V">ͺ$" ͺ$> 2V:VO"@ͺ$:V 2V>>2V:VO"@ͺ$:V02V@">ͺ$" ͺ$>2V:VO"@ͺ$:V 2V>~Xs@ <8 x\T$BYTES2 X{~Xs@ <8 x\T$8<8xY>IBZZ<<$fx|JZ~xH00<80(:*$ <