Listing of file='FOTBAL.BAS;01' on disk='vmedia/games2-sector.ccvf'
5 PLOT 12 10 INPUT "WHAT IS HIS NAME?";A$ 20 INPUT "WHAT TEAM DOES HE PLAY FOR?";B$ 30 INPUT "HOW MANY GAMES HAS HE PLAYED?";A 40 INPUT "HOW MANY GOALS HAS HE SCORED?";B 50 D= B/ A 60 PRINT D;" IS HIS AVERAGE GOALS PER GAME" 70 PRINT " RATING" 80 IF B$= "WEST HAM"THEN PLOT 29,17,31:PRINT "SUPER STAR":PLOT 18,15,14:GOTO 105 90 IF D< 2AND D> 1THEN PRINT "STAR PLAYER" 100 IF D< 1AND D> 0THEN PRINT "OKAY" 103 IF D= 0THEN PRINT "HOPELESS" 105 PRINT :PRINT 110 PRINT "COPYRIGHT B.CARNEY 1980" 120 END