A 2D football game. Still working on it.

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    ` quarter back cordinates
qbx=300
qby=250
` center cordinates
cx=300
cy=240
` right guard cordinates
rgx=315
rgy=245
` right tackle cordinates
rtx=330
rty=245
` right tight end cordinates
rtex=345
rtey=245
` left quard cordinates
lgx=285
lgy=245
` left tackle cordinates
ltx=270
lty=245
` left tight end cordinates
ltex=255
ltey=245
sync on
do
cls
if qbx<295
qbx=295
endif
if qbx>305
qbx=305
endif
if qby<250
qby=250
endif
if qby>280
qby=280
endif
if rtey <180
rtey=180
rtex=rtex-2
endif
if rtex <300
rtex=300
endif
ink rgb(254,254,254),l
line 0,245,640,245
if upkey()=1 then qby=qby-1
if downkey()=1 then qby=qby+1
if spacekey()=1 then rtey=rtey-3 : qby=qby+1
if leftkey()=1 then qbx=qbx-1
if rightkey()=1 then qbx=qbx+1
` quarterback
ink rgb(254,0,0),1
circle qbx,qby,4
circle qbx,qby,3.5
circle qbx,qby,3
circle qbx,qby,2.5
circle qbx,qby,2
circle qbx,qby,1.5
circle qbx,qby,1
circle qbx,qby,0.5
dot qbx,qby
` center
ink rgb(0,0,254),2
circle cx,cy,3
dot cx,cy
` right guard
circle rgx,rgy,3
dot rgx,rgy
` right tackle
circle rtx,rty,3
dot rtx,rty
` right tight end
circle rtex,rtey,3
dot rtex,rtey
` left guard
circle lgx,lgy,3
dot lgx,lgy
` left tackle
circle ltx,lty,3
dot ltx,lty
` left tight end
circle ltex,ltey,3
dot ltex,ltey
sync
return
loop