ZXTape! 0Created with Ramsoft MakeTZXrun    "CHOOSESC" .1}L,.1}L 23692\,222 721,0;"STOP TAPE - THEN ENTER TWO CODES"; a$(2,11 ,18) a(2,11 ,11 ) b$(2,25) (b(2,2) * c(2) 2d$(2,18) <d(2,7) Fe$(2,2,18) Pe(2,2,4) Zf$(2,2,18) df(2,2,4) ng$(2,5,18) xh$(2,15,18) j$(2,18) j(2,3) i(2,6) x$(7,13 ) u$(4,14) z(2,13 ) "TEAM 1 = ";y$ +y$3.1}L,.1}L:170 "TEAM 2 = ";z$ +z$3.1}L,.1}L:172 .1}L,.1}L %:"PUT IN DATA CASSETTE AND PLAY "  "SEARCHING FOR ";y$+"data"; y$+"data" 423692\,222:"SEARCHING FOR ";z$+"data"; z$+"data" (23692\,222::"PLEASE WAIT"  n=12 b$(n) b(n,1),b(n,2) a=111 a$(n,a) b=111 a(n,a,b) b a c(n)=1  a = 16  i(n,a)  a d$(n) "a=17 ,d(n,a) 6a 7j$(n) 8a =13 9j(n,a) :a @a=12 J e$(n,a) Tb=14 ^ e(n,a,b) hb ra |a = 12  f$(n,a) b=14  f(n,a,b) b a a = 15  g$(n,a) a a= 15  h$(n,a) a a=113 &z(n,a) 0a :u$(1)="Run" Du$(2)="Pass" Nu$(3)="Prevent" Xu$(4)="Blitz" bx$(1)="Inside run" lx$(2)="Short yardage" mx$(3)="Sweep run" vx$(4)="Quick pass" x$(5)="Short pass" x$(6)="Long pass" x$(7)="Screen pass" n ,:"PUT IN BLANK CASSETTE ":l=905  "a$"a$()  L: "a"a() L : "b$"b$()  L: "b"b() L: "d$"d$()  L: "d"d() L: "e$"e$()  L: "e"e() L: "f$"f$()  L: "f"f()  L: "g$"g$() L: "h$"h$()  L: "j$"j$() * L: "j"j() 4L: "u$"u$() >L: "x$"x$() H L: "i"i() I L: "z"z() J.1}L,.1}L L=23692\,222::"DATA SAVED - PRESS 'Y' TO VERIFY" ML$= NL$="Y"L$="y"852T Ol$=""845M R 901 T!:"REWIND TAPE THEN PRESS PLAY" X "a$"a$() Y "a"a() Z "b$"b$() [ "b"b() \ "d$"d$() ] "d"d() ^ "e$"e$() _ "e"e() ` "f$"f$() a "f"f() b "g$"g$() c "h$"h$() d "j$"j$() e "j"j() f "u$"u$() p "x$"x$() z "i"i() { "z"z() |.1}L,.1}L *23692\,222::"DATA VERIFIED" L23692\,222: :"REWIND TAPE "::"INSERT PROGRAM TAPE AND PLAY" "PRINTCODE"  "endzone" G((23631O\+256*23632P\)+2),181:20:  Scott Campbell Gerald Riggs Kenny Flowers Sylvester Stamps Ken Whisenhunt Arthur Cox Ron Middleton Aubrey Matthews Stacey Bailey Floyd Dixon Billy Johnson Jim Kelly Greg Bell Robb Riddick Ronnie Harmon Carl Byrum Jamie Mueller Pete Metzelaars Butch Rolle Chris Burkett Andre Reed Trumaine Johnson  Ffff 6P,       0  T%y"  fff% 8 s333zfffffff&fff fff P `!* ffff 0  (p  a/ X l7Atlanta Falcons Buffalo Bills  )Mick Luckhurst Scott Norwood Kffffffff~LbL̀}L_ OSylvester Stamps Sylvester Stamps Ronnie Harmon Robb Riddick W    vfff OBilly Johnson Billy Johnson Ron Pitts Ron Pitts Wp p ) ) ǻMike Gann Mike Gann Joel Williams Rick Bryan Rick Bryan Shane Conlan Bruce Smith Sean McNanie Sean McNanie Darryl Talley #Scott Case Bobby Butler Tim Gordon Robert Moore Bobby Butler Derrick Burroughs Mark Kelso Nate Odomes Ron Pitts Ron Pitts )Rick Donnelly John Kidd #/ ! A  ` Inside run Short yardageSweep run Quick pass Short pass Long pass Screen pass =Run Pass Prevent Blitz  fff:S333S333<nfffz ͆el̈́>fff&fffY -fffYATFZBUB lLYCHOOSESC @P9J ~Bx~#_!:):;\O:*(30{ ʊ ~6Ҋ %>2>6#w>2ɯ2{sڌ >2ҫ @&o)))^:\8{=)= yW:(7= *>_???@g{8''===o>~@$= 9>W:(:= z٦wz 6w#{٦w{ 6w+#%# !{wدw#~8w>w*Q\͈ "Q\֥A 8> ''0H(z> 'Ɛ2)O0!! F({F!\w2)2 ` > ~M ͭ![:???o>~@> o= !ͭ{wدw>2ɾwЯ2[zS_S@@@@@PP(|((|(xPx(x HH HH(*D: @ @@@@ @ @(|(| @|@ @@8LTTd8 ` p0H x0HH0(|x@pH00HH0x @@0H0HH00HH0 @  @ @ ||@  @0H 8LTL@80HHxHHpHpHHp0H@@H0`PHHP`p@`@@pp@`@@@0H@XH0HHxHHHp p0P HP`PHH@@@@@pDlTDDDHhhXXH0HHHH0pHHp@@0HHHP(pHHpPH0H H0p HHHHH0DD((DDDTT(D((DD(x @x`@@@@`@@ ` `8T pp x08H8@@pHHp0H@H08HH80Hp@80@`@@@8HH8p@@pHHH ` p ` @@@P`PH` phTTTTpHHHH0HHH0pHHp@@8HH8Ph@@@0@0p@`@@0HHHH8DDD(DDDT(D((DHHH8px0@x @ PPPPPP@  @(P$ZRZendzone K(#KZMd63744 e f 6000p gN#9 ;23,0;"ENDZONE ******************* c. SPORT-SIM 1988"; hJ#9 ;18,0;"------------------------------------------"; ja#9 ;19,190;"Quarter : ";quarter;20,190;"Time : ";mins;":0";secs; u'#9 ;3,0;"Kickoff."; w&n=0.1}L0.4L:n,.1}L:n xR#9 ;5,0;b$(1,1b(1,1));" to kickoff?"; yz$= zrand=(*10 )+1 {z$=""121y |z$="y"off=1 }z$"y"off=2 off=1def=2 off=2def=1 133 C21,0;" ";:8100 [#9 ;7,0;b$(off,1b(off,1));" kickoff. (1 for onside kick.)" z$= z$="1"8700! z$=""134 kickoff=(*19)+1 kickoff>3150 (#9 ;9 ,0;"Touchback"; down=1:yds=10 def=1line=20 def=2line=80P 195 rand=(*10 )+1 /rande(def,1,3)returner=1 /rand>e(def,1,3)returner=2 y#9 ;9 ,0;e$(def,returner,1e(def,returner,4));" gets the ball on his ";kickoff;" yd-line." *(*10 )+1<7159 *#9 ;11 ,0;"Fair catch." &def=1line=kickoff:195 0def=2line=100d-kickoff:195 5run=((*12 )+1)-((*12 )+1) 6#9 ;11 ,0;"He returns the ball .."; %dist=(run+e(def,returner,1)) 7dist>30dist=dist+(*e(def,returner,2)) def=1line=kickoff+dist *def=2line=100d-kickoff-dist )line>100dline<16700, n=0dist k=110 :k ##9 ;12 ,0;n;" "; .01z# =,.01z# = n (#9 ;13 ,0;"yards to"; jline<502#9 ;" the ";b$(1,b(1,2)b(1,1));" ";line;"-yard line." tline>502#9 ;" the ";b$(2,b(2,2)b(2,1));" ";100d-line;"-yard line." .line=502#9 ;" the halfway line." ,(*100d)+1<99c195 '#9 ;15,0;"FUMBLE!"; )n=13:.2~L,.1}L:n L#9 ;16,0;b$(off,1b(off,1));" regain poss."; =""185 6secs=20:down=1:yds=10 :205 =""195 ext=10 :8600! down=1:yds=10 off=2204 def=1:off=2 205 off=1:def=2 8100 8000@ d#9 ;3,0;b$(off,b(off,2)b(off,1));" Press 1 to review/change team."; z$= z$="1"6400 z$=""208 63,0;" "; P#9 ;3,0;b$(off,b(off,2)b(off,1));" - offense."; 3#9 ;13 ,140;"Select play (a-i)"; *#9 ;5,13 ;"Inside Run"; 1#9 ;6,13 ;"Short Yardage Run"; )#9 ;7,13 ;"Sweep Run"; *#9 ;9 ,13 ;"Quick pass"; +#9 ;10 ,13 ;"Short pass"; *#9 ;11 ,13 ;"Long pass"; ,#9 ;13 ,13 ;"Screen pass"; %#9 ;15,13 ;"Punt"; 3#9 ;17,13 ;"Field Goal Attempt"; n=16 O#9 ;4+n,120x;n;4+n,130;" : ";a$(off,i(off,n)); @a(off,n,10 )=0#9 ;4+n,230;"QB"; Ga(off,i(off,n),10 )=1#9 ;4+n,230;"RB"; Ga(off,i(off,n),10 )=2#9 ;4+n,230;"TE"; Ga(off,i(off,n),10 )=3#9 ;4+n,230;"WR"; n M#9 ;5,0;"a>";6,0;"b>";7,0;"c>"; O#9 ;9 ,0;"d>";10 ,0;"e>";11 ,0;"f>"; P#9 ;13 ,0;"g>";15,0;"h>";17,0;"i>"; "z$= #z$=""290" % z=(z$) &z=105i500 'z=104h600X (#z<104hz>96`300, ) 290" ,.1}L,.1}L 13n=517:n,0;" ";:n 6+#9 ;5,0;x$(z-96`); 7play=z ;1#9 ;13 ,140;"Select player ("; <"play<100d#9 ;"1-6)"; =!play>99c#9 ;"2-6)"; Bz$= Cz$=""322B D z=(z$) Ez=13 322B Fz=z-480 Gz<1322B Hz>6322B I$play>99cz=1322B Mtarget=i(off,z) ^-#9 ;7,0;a$(off,i(off,z)); wstrat=0 x2#9 ;13 ,140;"Select strategy "; y#play<100d#9 ;"(1) "; z$play>99c#9 ;"(2-3) "; {?#9 ;9 ,0;"1>";9 ,10 ;"Draw Play"; |C#9 ;10 ,0;"2>";10 ,10 ;"Play action"; }?#9 ;11 ,0;"3>";11 ,10 ;"Shotgun"; ~C#9 ;12 ,0;"0>";12 ,10 ;"No strategy"; z$= z$=""382~ &z$="1"play<100dstrat=1 %z$="2"play>99cstrat=2 %z$="3"play>99cstrat=3 5n=9 12 :n,0;" ";:n Hn=12 16:n,0;" ";:n 7strat=1#9 ;9 ,0;"Draw play"; 9strat=2#9 ;9 ,0;"Play action"; 5strat=3#9 ;9 ,0;"Shotgun"; F#9 ;17,0;"1 to amend, else any key to continue.."; z$= z$=""397 z$="1"205 717,0;" "; 63,0;" ";  800  n=317 /n,0;" "; n 1#9 ;4,0;"Field Goal Attempt"; +off=1dist=100d-line+17 !off=2dist=line+17 S#9 ;6,0;d$(off,1d(off,7));" from ";dist;" yards." rand=1 dist>19rand=2  dist>29rand=3  dist>39'rand=4 kick=(*1) dist>557kick=1 *kickd(off,rand)#9 ;"Successful." ,kick>d(off,rand)#9 ;"Unsuccessful." &)kickd(off,rand)s(off)=s(off)+3 D 6000p E-kickd(off,rand)quarter=5581E N=""590N Oext=10 :8600! P`(mins=15mins=30mins=45-mins=60<)secs=08100:8000@ Qkickd(off,rand)132 Ryds=10 :down=1 T 199 Zn=317 [0n,0;" "; \n b##9 ;4,0;"Punt"; gF#9 ;6,0;j$((off),1j(off,3));" punts"; lEgain=j(off,1)+((*10 )+1)-((*10 )+1) mgain=(gain) poff=1line=line+gain qoff=2line=line-gain u(line>0line<100d650 x(#9 ;7,0;"Touchback"; y=""633y zoff=1line=80P {off=2line=20 ~ 693 "#9 ;" ";gain;" yards, to -" kickoff=line rand=(*10 )+1 Irand>5(line<7line>93])#9 ;"come to rest on "; erand>5((def=1line>6)(def=2line<94^))#9 ;"a fair catch on "; kline<502#9 ;"the ";b$(1,b(1,2)b(1,1));"' " ;line;"-yard line." uline>502#9 ;"the ";b$(2,b(2,2)b(2,1));"' " ;100d-line;"-yard line." -line=502#9 ;"the halfway line." rand<6670 'down=1:yds=10 :694 runner=(*10 )+1 ,runnerf(def,1,3)ret=1 ,runner>f(def,1,3)ret=2 #9 :#9 Y#9 ;11 ,0;"It is caught by ";f$(def,ret,1(f(def,ret,4))); Hgain=f(def,ret,1)+((*8)+1)-((*8)+1) 2gain>15gain=gain+(*f(def,ret,2)) 2gain>f(def,ret,2)gain=f(def,ret,2) off=1line=line-gain off=2line=line+gain gain=(gain) #9 ;" who returns it "; )line>100dline<16600 gain<1gain=1 3n=1gain:#9 ;12 ,0;n;" "; i=16:i .01z# =,.01z# = n #9 ;"yards "; wline>502#9 ;"to the ";b$(2,b(2,2)b(2,1));"' ";100d-line;" yard line." mline<502#9 ;"to the ";b$(1,b(1,2)b(1,1));"' ";line;" yard line." 0line=502#9 ;"to the halfway line." down=1:yds=10 =""694 dummy=off:off=def:def=dummy ext=10 :8600!  205 !$n=14:u(n)=0:n "n=517 #n,0;" "; $n %717,0;" "; &Cstrat=3#9 ;13 ,140;"Shotgun formation."; *d#9 ;3,0;b$(def,b(def,2)b(def,1));" choose your defensive strategy"; .A#9 ;5,0;"a>";5,15;"Run defense"; /B#9 ;7,0;"b>";7,15;"Pass defense"; 0E#9 ;9 ,0;"c>";9 ,15;"Prevent defense"; 1=#9 ;11 ,0;"d>";11 ,15;"Blitz"; 9 6900 :6n=512 :n,0;" ";:n ;$#9 ;5,0;u$(dpl); G#9 ;17,0;"Press 1 to amend, else any key to cont."; =""898 ="1"800   8100 ,(*95_)+1>90Z85004! play>99c1100L  8100 b#9 ;3,0;a$(off,target,1a(off,target,11 ));" - ";x$(play-96`); }dpl=1u(1)>0#9 ;4,140;"Key : ";a$(off,u(1),1a(off,u(1),11 )); 2#9 ;3,140;"Defense : ";u$(dpl) La(off,target,4)>0a(off,target,4)=a(off,target,4) *a(off,target,4)=0950 rand=(*100d)+1 "play=98brand=rand-5 "play=99crand=rand+5 3a(off,target,2)>30rand=rand+5 3a(off,target,1)>15rand=rand+3 "rand=rand-z(def,1)*2 rand<95_950 #9 ;"Breakaway"; .3,3 *gain=a(off,target,2)-(*25) gain<10 gain=10  970 8200 :block/tkle Ogain=a(off,target,1):a(off,target,3)>10 gain=gain+2 0gain=gain+a(off,target,1)-z(def,1) Fplay=97again=gain+((*4)+1)-((*4+1)) Fplay=98bgain=gain+((*2)+1)-((*2+1)) Fplay=99cgain=gain+((*6)+1)-((*6+1)) gain=gain+mod  dpl=1gain=gain-2 &u(1)=targetgain=gain-2 u(1)=0964 &u(1)targetgain=gain+2 2a(off,target,4)=0gain=gain-3 n=26 5i(off,n)>0gain=gain+a(off,i(off,n),5) n gain=gain-4 <(dpl=2dpl=4)strat=1gain=gain+4 .strat=1dpl=1gain=gain-4  gain=gain ,play=98bgain<-3gain=-3 Egain<0#9 ;12 ,0;"He loses ";gain;" yards." Tgain=0#9 ;12 ,0;"He is stopped at the line of scrimmage." -off=1line+gain100d7000X +off=2line-gain07000X 5a(off,target,4)=a(off,target,4)-1 >a(off,target,4)<0a(off,target,4)=0 gain<1997 (#9 ;12 ,0;"He gains"; n=1gain $#9 ;12 ,40(;n;" "; i=15:i .01z# =,.01z# = n #9 ;" yards." off=1line=line+gain off=2line=line-gain  1034  gainyds1020 down=down+1 &off=1line<16500d 'off=2line>99c6500d 0ext=30+(*10 )+1:8600! yds=yds-gain =""1018  205 0ext=30+(*10 )+1:8600! down=1 yds=10 =""1028  205  rand=(*100d)+1  %rand=rand+(z(off,10 )/2)  rand<104h1000 H#9 ;14,0;"FUMBLE! recovered by ";:.2~L,.2~L 3rand=(*5)+1:#9 ;h$(def,rand); rand=(*10 )+1  rand>21083; !!ret=(*10 )+(*10 ) $*off=1line-ret>01070. %,off=2line+ret<100d1070. & 1410 /.#9 ;15,0;"He returns it "; 2n=1ret 3i=110 :i 4.01z# =,.01z# = 5$#9 ;15,65A;n;" "; 7n 8#9 ;"yards."; 9off=1line=line-ret :off=2line=line+ret ;dummy=off:off=def:def=dummy <down=1:yds=10 >ext=20:8600! J=""1098J K 205 M-(*100d)+1>95_85004! O=((play=101e)play=102f)(dpl=4)8300l V_#9 ;3,0;x$(play-96`);3,557;" directed at ";a$(off,target); W1#9 ;4,0;"Defense : ";u$(dpl); XSu(2)0#9 ;5,0;"Dble cover : ";a$(off,u(2)); YSu(3)0#9 ;6,0;"Dble cover : ";a$(off,u(3)); Zcomp=a(off,c(off),6) [$comp=(comp+z(def,2))/2 \n=(*100d)+1 ]!u(2)=targetn=n+20 ^!u(3)=targetn=n+20 _W#9 ;9 ,0;a$(off,1,1a(off,1,11 ));" pass : "; `n<80P1130j adummy=(*5)+2 bdummy=target1130j ctarget=dummy e5#9 ;"is redirected to ";a$(off,i(off,target)); ftarget=i(off,target) g0(strat=2dpl=1)comp=comp+5 h"strat=3comp=comp+5 i.strat=2dpl1comp=comp-5 l2(play=103gdpl=4)comp=comp+10 m play=103gplay=101e p#play=101ecomp=comp-5 q$play=102fcomp=comp-15 t!dpl=2comp=comp-10 {0dpl=3play=100dcomp=comp+10 |0dpl=3play=102fcomp=comp-20 +comp=comp+(a(off,target,9 )*2) 3u(2)=0u(3)=01170 'u(2)=targetcomp=comp-10 'u(3)=targetcomp=comp-10 8u(2)targetu(3)targetcomp=comp+5 d(off=1line>80P)comp=comp-((z(def,13 )*5))+(a(off,target,8)*3) d(off=2line<20)comp=comp-((z(def,13 )*5))+(a(off,target,8)*3) Mdown3comp=comp-((z(off,11 )+z(def,12 ))/2)/2 comp<5comp=5 -play=102fcomp>35#comp=35# rand=(*100d) =""1194 rand>comp1310 )#9 ;11 ,0;"COMPLETE!"; e(play=100d)(a(off,target,6)<11 )gain=a(off,target,6)-(*10 )+1 i(play=100d)(a(off,target,6)>10 )gain=a(off,target,6)-(*7)-(*7) i(play=101e)(a(off,target,6)<11 )gain=a(off,target,6)-(*5)+(*5) i(play=101e)(a(off,target,6)>10 )gain=a(off,target,6)-(*7)+(*7) k(play=102f)(a(off,target,6)<11 )gain=a(off,target,6)+(*10 )+(*10 ) k(play=102f)(a(off,target,6)>10 )gain=a(off,target,6)+(*15)+(*15)  gain=gain ,z(def,4)<12 gain=gain-2 ,z(def,4)>14gain=gain+2 ,off=1line+gain>99c7100 +off=2line-gain<17100  add=gain Bgain=0#9 ;" On the line of scrimmage.";:1231 Vgain<0#9 ;" ";gain;" yards behind the line of scrimmage.";:1231 #9 ;" For a gain of "; n=1gain %#9 ;11 ,107k;n;" "; i=15:i n #9 ;"yards."; break=(*100d)+1 6a(off,target,7)>30break=break+10 .z(def,4)<12 break=break-5 .z(def,4)>14break=break+5 #dpl=2break=break-20 #dpl=3break=break-40( break<80P1290  c#9 ;13 ,0;"And he's off and running!";14,0;"For a further gain of"; gain=a(off,target,7) (gain=gain-(*(a(off,target,7))) $play=100dgain=gain-10 gain<1gain=1 1 off=1gain+add+line>99c7120 /off=2line-add-gain<17120 n=1gain %#9 ;14,100d;n;" "; i=15:i n #9 ;" yards.";  gain=gain+add  off=1line=line+gain  off=2line=line-gain  (line<1line>99c6500d  gain102f1350F 2+#9 ;12 ,0;"Incomplete."; 7ext=10 :8600! <down=down+1 >=""1342> A 8100 B 8000@ C 207 Gretn=(*5)+1 H,#9 ;12 ,0;"INTERCEPTED!"; I)n=13:.3,.3:n K+play=100dgain=(*5)+5 L-play=101egain=(*10 )+10 M-play=102fgain=(*20)+20 Poff=1line=line+gain Qoff=2line=line-gain R)line<100dline>01372\ T/#9 ;" in the endzone by ";h$(def,retn); Udown=1:yds=10 Voff=1line=80P Woff=2line=20 X=""1368X Yext=10 :8600! Z 199 _#9 ;" on the "; `-line=502#9 ;"halfway line by "; aqline>502#9 ;b$(2,b(2,2)b(2,1));"' ";100d-line;" yard-line, by"; bgline<502#9 ;b$(1,b(1,2)b(1,1));"' ";line;" yard-line, by"; c*#9 ;13 ,0;h$(def,retn); dret=(*502)-gain e"play=100dret=ret-20 fret>01390n i2#9 ;14,0;"There is no return." jext=10 :8600! l=""1388l m 199 n*off=1line-ret01410 o,off=2line+ret100d1410 q.#9 ;14,0;"He returns it "; rn=1ret s$#9 ;14,65A;n;" "; ti=110 :i vn w#9 ;" yards."; xoff=1line=line-ret yoff=2line=line+ret zdummy=off:off=def:def=dummy {ext=10 :8600! |down=1:yds=10 }=""1405} ~ 205 .#9 ;15,0;"He returns it "; off=1ret=line !off=2ret=100d-line n=1ret $#9 ;15,65A;n;" "; i=15:i .01z# =,.01z# = n #9 ;" yards for a TD!"; #s(def)=s(def)+6:6000p =""1426  dummy=def  def=off  off=dummy  7200  ext=10 :8600! =""1440  132 q60,0;" "; rp#9 ;0,0;b$(1);0,120x;"v";0,170-b(2,1);b$(2) sI#9 ;1,0;"------------------------------------------"; t)#9 ;0,100d;s(1); u-#9 ;0,135;s(2);" "; y  8100 d#9 ;2,110n;"-RUSHING-";2,165;"BLK";2,190;"--PASSING--"; N#9 ;3,110n;"ave TD max ";3,190;"ave TD ***"; n=211 'a(off,n,11 )=06440( 3z$=(n+95_):#9 ;n+3,0;z$; )#9 ;n+3,10 ;a$(off,n); 1#9 ;n+3,110n;a(off,n,1); 1#9 ;n+3,130;a(off,n,3); 1#9 ;n+3,145;a(off,n,4); 1#9 ;n+3,170;a(off,n,5); #1#9 ;n+3,190;a(off,n,6); $1#9 ;n+3,215;a(off,n,8); %1#9 ;n+3,235;a(off,n,9 ); (n )n=26 **#9 ;i(off,n)+3,95_;"*"; +n 29#9 ;16,0;"Replace any players?(y/n)"; 3z$= 4z$=""64513 5z$"y"6496` 7%#9 ;17,0;"OUT -"; 9z$= :z$=""64579 ;z=z$ =z=z-95_ > n=2 ?i(off,n)=z6467C @ n=n+1 An<76463? B 64579 C/#9 ;a$(off,z,1a(off,z,11 )); F'#9 ;17,100d;"IN - "; Hz$= Iz$=""6472H Jz=z$ K0z=z-95_:z>11 z<26472H Lelem=2 Mi(off,elem)=z6472H Nelem=elem+1 Oelem<76477M P/#9 ;a$(off,z,1a(off,z,11 )); R i(off,n)=z S)n=414:n,12 ;" ";:n T717,0;" "; X 6441) a 8100 c f?#9 ;17,0;"He's tackled, for a safety, by "; gsack=(*5)+1 i#9 ;g$(def,sack); n)n=13:.1}L,.5:n p#s(def)=s(def)+2:6000p qquarter=56513q x kickoff=(*20)+20 =""6590  6000p  8100 F#9 ;3,0;b$(off,1b(off,1));" kickoff."  150 6gain=100d-kickoff Bn=1gain Dk=13:k E.01z# =,.01z# = F##9 ;12 ,0;n;" "; Gn H6#9 ;13 ,0;"yards for a touchdown!"; =""6786 #s(def)=s(def)+6:6000p dummy=off:off=def:def=dummy  7200  =""6790  132 rand=(*100d)+1 "down=1rand=rand-10 .down=2yds<5rand=rand-10 .down=2yds>4rand=rand+10 .down=3yds>4rand=rand+10 .down=3yds<5rand=rand-502 .down=4yds<3rand=rand-502 .down=4yds>2rand=rand+20 ^(mins=28mins=29mins=58:mins=59;)play=101erand=rand+502 ^(mins=28mins=29mins=58:mins=59;)play=102frand=rand+80P  x=0 n=16 x=x+a(off,i(off,n),5) n !x>4rand=rand-20 ##play=98brand=rand-502 &rand>40(69600 ' dpl=1 (&yds>6down=36900 +i=26 ,z((*10 )+1>3)((a(off,i(off,i),1)>3)a(off,i(off,i),4)>1)u(1)=i(off,i) -i / 0rand>90Z6975? 1$rand=(*100d)+z(off,4) 2rand<60<6970: 3 dpl=4 4u(4)=4 9 : dpl=2 ?n=26 @Q(a(off,i(off,n),7)>15)((*10 )>3)u(2)=i(off,n) Bn Cdpl=2 D dpl=3 Frand=3 G[((mins>27mins<31)(mins>579))(off=1)line<60<rand=5 H[((mins>27mins<31)(mins>579))(off=2)line>40(rand=5 Iyds<12 6970: Jn=26 KQ(a(off,i(off,n),7)>15)((*10 )>3)u(2)=i(off,n) LQ(a(off,i(off,n),7)>15)((*10 )>3)u(3)=i(off,n) Mn W b)#9 ;12 ,0;"He gains "; d"off=1gain=100d-line eoff=2gain=line ln=1gain m$#9 ;12 ,40(;n;" "; ni=15:i o.01z# =,.01z# = pn q#9 ;"yds." v#s(off)=s(off)+6:6000p x)#9 ;16,0;"TOUCHDOWN"; y*n=110 :.1}L,.1}L:n z=""7034z  7200  ext=20:8600! down=1:yds=10 =""7055  132 "off=1gain=100d-line off=2gain=line #9 ;" For a gain of "; n=1gain i=15:i %#9 ;11 ,107k;n;" "; n #9 ;" yards, for a TD!";  7150 &off=1gain=100d-line-add off=2gain=line-add n=1gain %#9 ;14,100d;n;" "; i=15:i n #9 ;" yards, for a TD!"; .3,.3 #s(off)=s(off)+6:6000p =""7153 721,0;" ";  7200  ext=10 :8600! =""7190  132 %721,0;" "; &quarter=57206& * 8100 ,3#9 ;4,0;"Extra point attempt."; 4rand=(*100d)+1 5$#9 ;6,0;d$(off); 6rand>98b7250R 9*#9 ;7,0;"Successful."; :#s(off)=s(off)+1:6000p Q R%#9 ;7,0;"Fails!";  Bn=1921 C0n,0;" "; Dn EFmins=75K#9 ;20,0;"MATCH DRAWN";:8005E Idown<58039g N.5,.5 OO#9 ;20,0;b$(off,1b(off,1));" lose possession." P=""8016P Q720,0;" "; T dummy=off U off=def V def=dummy Wdown=1:yds=10 gsecs-ext>08041i h\((mins=15)(mins=30)(mins=45-)(mins=60<))secs=08070 iJ#9 ;18,0;"------------------------------------------"; jJ#9 ;19,0;b$(off,1b(off,1));" on offense." knsecs>9 #9 ;19,190;"Quarter : ";quarter;20,190;"Time : ";mins;":";secs; lpsecs<10 #9 ;19,190;"Quarter : ";quarter;20,190;"Time : ";mins;":0";secs; m721,0;" "; n1down=1#9 ;21,0;"1st"; o1down=2#9 ;21,0;"2nd"; p1down=3#9 ;21,0;"3rd"; q1down=4#9 ;21,0;"4th"; r$(off=2)(yds>line)yds=line s8(off=1)(yds>100d-line)yds=100d-line t;(off=1)(yds+line=100d)#9 ;" and goal"; u9(off=2)(yds-line=0)#9 ;" and goal"; w.(off=2)(yds-line=0)8062~ x0(off=1)(yds+line=100d)8062~ |#9 ;" and ";yds;" on"; ~Gline<502off=1#9 ;" on their own ";line;"-yd line"; Qline>502off=2#9 ;" on their own ";100d-line;"-yd line"; line>502off=1#9 ;" on the ";b$(2,b(2,2)b(2,1));" ";100d-line;"-yd line"; wline<502off=2#9 ;" on the ";b$(1,b(1,2)b(1,1));" ";line;"-yd line"; 1line=502#9 ;" on the halfway line"; 0:7  mins=75K8093 mins=308081 mins=60<8091 quarter=quarter+1 secs=0 .#9 ;20,0;"END OF QUARTER"; =""8076 '20,0;" ";  8041i 1#9 ;20,0;"END OF FIRST HALF"; secs=0 quarter=quarter+1 =""8085 (t(1)=0:t(2)=0 '20,0;" "; 4#9 ;3,0;"Start of second half.";  120x is(1)=s(2)quarter=5:secs=0:t(1)=0:t(2)=0:103g ,#9 ;20,0;"END OF MATCH";  8099 n=217 0n,0;" "; n  9(off=1line>90Z)gain=gain-(z(def,7)) 9(off=2line<10 )gain=gain-(z(def,7)) z=(*10 )+1 'z(def,1)<3.7lz=z-2 'z(def,1)>4.5z=z+2 'off=1line<90Z82400 'off=2line>10 82400 z=z-(z(def,7)*2) z=z+a(off,target,3) 1z<58270N :3#9 ;6,0;"Runs behind a block."; ; mod=2 =k(*10 )=9 #9 ;" And breaks a tackle!":mod=mod+6+(*10 ):.1}L,.3 M U'#9 ;6,0;"Tackled."; V"mod=0-(*3)-2 W play=99cmod=mod-2 k m 8100 n_#9 ;3,0;x$(play-96`);3,502;" directed at ";a$(off,target); t%#9 ;4,0;"BLITZ!"; uW#9 ;9 ,0;a$(off,1,1a(off,1,11 ));" pass : "; w=""8311w xrand=(*100d)+1 z>rand=rand+z(def,3)+z(off,8)+(u(4)*2) rand>85U8370 rand>70F8350 rand>40(8332 1200 +#9 ;11 ,0;"Incomplete."; down=down+1 =""8336 (ext=(*10 )+10 :8600! 205 Z#9 ;11 ,0;a$(off,c(off),1a(off,c(off),11 ));" is running."; +gain=(*10 )+a(off,c(off),1) gain0gain=1 972 Z#9 ;11 ,0;a$(off,c(off),1a(off,c(off),11 ));" is running."; /#9 ;13 ,0;"He's sacked by "; rand=(*5)+1 #9 ;g$(def,rand); gain=-(*15)+1 +off=1line+gain<18400 ,off=2line-gain>99c8400 off=1line=line+gain off=2line=line-gain yds=yds-gain down=down+1 8#9 ;15,0;"He loses ";gain;" yards."; =""8389 (ext=(*10 )+10 :8600! 205 6500d !.G#9 ;4,0;b$(off,1b(off,1));" kickoff."; !6.3,.4L !=%(*100d)>5028550f! !@pen=(*2)+1 !C`pen=1#9 ;10 ,0;"PENALTY AGAINST THE OFFENSE : OFFSIDE";:loss=5 !Lapen=2#9 ;10 ,0;"PENALTY AGAINST THE OFFENSE : HOLDING";:loss=10 !M5off=1line-loss<1loss=(line/2) !NBoff=2line+loss>99closs=((100d-line)/2) !Woff=1line=line-loss !Xoff=2line=line+loss !Yyds=yds+loss !\ext=10 :8600! !c=""8547c! !e 205 !jS#9 ;10 ,0;"PENALTY AGAINST THE DEFENSE : OFFSIDE";:loss=5 !z5def=1line-loss<1loss=(line/2) !{Bdef=2line+loss>99closs=((100d-line)/2) !def=1line=line-loss !def=2line=line+loss !yds=yds-loss !yds08023W !=""8595! !ext=10 :8600! ! 205 !mins<288625! !)mins>29mins<58:8625! !)mins>59;mins<73I8625! !J#9 ;16,0;"Seconds to be added without timeout : ";ext; !Jt(off)<3#9 ;17,0;"Press 1 - timeout offense ;" !Lt(def)<3#9 ;17,122z;"Press 2 - timeout defense ;" !z$= !z$=""8614! !<z$="1"t(off)<3t(off)=t(off)+1:ext=10 !<z$="2"t(def)<3t(def)=t(def)+1:ext=10 !.1}L,.4L !down=5ext=10 !secs=secs+ext !6secs60<secs=secs-60<:mins=mins+1 !umins=28secs-ext<0secs=0:#9 ;17,160;"TWO MINUTE WARNING";:.2~L,.2~L !umins=58:secs-ext<0secs=0:#9 ;17,160;"TWO MINUTE WARNING";:.2~L,.2~L !umins=73Isecs-ext<0secs=0:#9 ;17,160;"TWO MINUTE WARNING";:.2~L,.2~L !B((mins=15)(mins=30))secs-ext<0secs=0 !R((mins=45-)(mins=60<)(mins=75K))secs-ext<0secs=0 ! !5#9 ;9 ,0;"Onside kick attempted."; "ret=(*10 )+1 "]ret<3#9 ;11 ,0;"RECOVERED BY THE ";b$(off,1b(off,1)); "]ret>2#9 ;11 ,0;"RECOVERED BY THE ";b$(def,1b(def,1)); " .3,.1}L " line=502 " =""8716 " "ret>2199 "ret<3205 #(=a$(2,11 ,18):a(2,11 ,11 ) #)=b$(2,2,5):b(2,2):c(2) #**d$(2,18):d(2,7) #+:e$(2,2,18):e(2,2,4) #,:f$(2,2,18):f(2,2,4) #-<g$(2,5,18):h$(2,5,18) #.j$(2,18) #/Mj(2,3):s(2):t(2):u(4):z(2,13 ) #0,u$(4,10 ):x$(7,10 ) #1mins=0:secs = 0:yds=10 :down = 1 :quarter = 1:ext =0:c(1)=1:c(2)=1:comp=0 #2<23692\,222::"PUT IN BLANK CASSETTE AND PLAY " #4 "a$"a$(): "a"a() #5 "b$"b$(): "b"b() #6 "d$"d$(): "d"d() #7 "e$"e$(): "e"e() #8 "f$"f$(): "f"f() #9 "g$"g$(): "h$"h$() #: "j$"j$(): "j"j() #; "u$"u$(): "x$"x$() #< "i"i() #= "z"z() #> 100d