Update BALLCHAL.BAS

BALLCHAL.BAS

@@ -7,4 +7,4 @@
 70 X2=VX:Y2=VY:PUTSPRITE(7),(0,0),0,7:FORI=0TO1000:PX=PX+VX*T:PY=PY+VY*T:VY=VY+AY*T:VX=VX+AX*T:SPRITEON:PUTSPRITE1,(PX,PY),15,1:ONSPRITEGOSUB100:IFPX>240THENVX=-VX:LINE(251,70)-(260,175),2,BF:B=B+1:PLAY"t90s2m6000o4c"
 80 IFPY>=169THENVY=-VY:VY=VY+3:ELSEIFPX<=3THENVX=-VX:LINE(0,70)-(4,175),2,BF:B=B+1:PLAY"T90s2m6000O5C":IFB=2THENC=C+1:GOTO30
 90 NEXT 
-100 COLOR15,1,8:SPRITEOFF:SOUND8,16:SOUND0,9:SOUND1,0:SOUND7,0:SOUND6,0:SOUND12,30:SOUND13,1:FORF=0TO900:NEXT:IFG<>0ORC=10THENG=G-1:GOTO30:ELSEIFG=0THENG=0:Q=1:CLOSE#1:KEYOFF:INPUT"GAME OVER->Try again?(Y) or (N)";A$:IFA$="y"ORA$="Y"THENGOTO10ELSEG=0:END
+100 COLOR15,1,8:SPRITEOFF:SOUND8,16:SOUND0,9:SOUND1,0:SOUND7,0:SOUND6,0:SOUND12,30:SOUND13,1:FORF=0TO900:NEXT:IFG<>0THENG=G-1:GOTO30:ELSEIFG=0THENG=0:Q=1:CLOSE#1:KEYOFF:INPUT"GAME OVER->Try again?(Y) or (N)";A$:IFA$="y"ORA$="Y"THENGOTO10ELSEG=0:END