ZXTape!Baseball  ("10 ,10 ;"Please wait" ( 1500 2 1430 < Fi=19 P"Your innings." Z1a=19 :w(a)=1:a:pla=0 dm=19 nw(m)=1450 x7w(m)=0pla=pla+1:pla=3150 m 100d "Your team are out!" @"At the end of innings ";i;","'"your team has scored ";hsc;"." "The computer now plays!" co=0 "Press ENTER to continue ";a$  m=19 830> co=3260 m "The computer team is out!" ""Press ENTER to continue ";a$: i "csc>hsc330J ,csc=hsc350^ 6+"Your team wins ";hsc;" runs to ";csc;"." @,"Press ENTER to play again ";a$:502 J."The computer wins ";csc;" runs to ";hsc;"." T 320@ ^1"It's a Draw, we must have a"'"second innings!" h1a=19 :w(a)=1:a:pla=0 rm=19 |w(m)=1450 7w(m)=0pla=pla+1:pla=3250 m m=19  830> m  290"  str=1 $"________________________________" p$(m);" comes into bat." f=(*10 )+1 a"Will ";p$(m);" hit up, and try for a home run, or will he hit down and play safe (d or u)?" h$  ch=((-f)+10 )*10 (an=0:h$="u"h$="U"an=502 (ce=(ch*an)/100d:rn=(*25) &rn.9ffff1200:w(m)=0: :X>.9ffff1200:str=str+1:"Press ENTER for next strike ";a$:540 D-990:"Press ENTER to continue ";a$: N9f>5h$="u"h$="U""The ball is in the outfield." X8f<6h$="d"h$="D""The ball is in the infield." bd"Your score so far is ";hsc'pla;" player";("s are"pla1);(" is"pla=1);" out so far." l@rn=(*(f-1)/1.5@)+1:rn>4rn=4 vrn=4650 Tp$(m);" steals ";rn;("st"rn=1);("nd"rn=2);("rd"rn=3);" base."  t(m)=rn rn=4760  ba=0 a=1m-1 4t(a)4ba=ba+1:ba>2750 $>.5t(a)4730 a  >.3750 3:p$(a);" is run out.":w(a)=0::Eh? - RLB 6p$(a);" gets home.":hsc=hsc+1:t(a)=4: +p$(m);" get a home run!":hsc=hsc+1  c=1m  a>.73333t(c)4rn4p$(c);" is run out.":t(c)=4:w(c)=0:800  Gt(c)4t(c)=4:p$(c);" also gets home.":hsc=hsc+1  c: *0p$(m);" is caught":w(m)=0:t(m)=4 4 >:str=1 Ha=(*2) Ra=1h$="d" \a=0h$="u" ff=(*10 )+1 pstr=3 zW>.9ffff1200:str=str+1:"Press ENTER for next pitch ";a$:890z 50,0;"________________________________" 31,0;"The computer has ";csc;" runs." !2,0;"You pitch,",,  990 #2,11 ;"and they hit!" B>.9ffff"They score a home run!":csc=csc+1:970 L>.4La$"d""Your team catches the ball.":co=co+1:970 #"Press ENTER for next pitch ";a$  810 ,4;6;"";11 ,4;"" :10 ,20;5;"";11 ,20;""  10 810 ,4;6;"";11 ,4;"" di=.1}L:ff=.2~L a=45-1652 !1;8;a,95_+di $!1;8;a,95_+di . di=di+ff 8a>100dff=ff-.03{u\ Ba L"10 ,20;5;"" Vh$="d"h$="D"1350F ` s=95_ ja=1650-5 t8;a,s ~ 2 1;8;a,s  s=s+1 a  810 ,4;6;"";11 ,4;"" :10 ,20;5;"";11 ,20;""  10 810 ,4;6;"";11 ,4;"" di=.1}L:ff=.2~L a=45-1902 !1;8;a,95_+di  1 !1;8;a,95_+di  di=di+ff a>100dff=ff-.03{u\ a ( 0,0;"Strike ";str 2+str=3"You're out!":co=co+1 < F ff=.3 Pa=16530-3 Z8;a,95_-ff d!1;8;a,95_-ff nff=ff+.5 xff>5ff=-ff a  1:1:7: 9w(9 ):p$(9 ,8):c(9 ):t(9 ) hsc=0:csc=0 )1430:a=19 :p$(a):a  co=0 R"Jenkins","Harwood","Zeber","Holtop","Gregelis","Todd","Bruda","Pulsman","Fogan"  !1500:a="a""l"+7 user:a,user a: A7,7,7,7,7,7,3,3 K0,0,0,224,152,134,128,128 H7,15,31,25,25,17,32 ,96` N128,128,128,128,192,248,12 ,4 "C3,3,3,3,7,31,97a,1 ,M0,0,192,192,192,192,192,192 6H12 ,12 ,15,7,15,31,63?,31 @I7,15,14,60<,480,480,96`,192 JK0,0,0,192,224,240,240,224 TL224,224,112p,480,568,24,12 ,15 ^E7,7,7,7,15,15,31,31 hL0,0,28,252,224,128,128,128 r