Help Me Finish Game Of Pong For School!

[jr20446]

ok i need help finishing my game. i need someone to finish mine or make a new 1 but make it not so hard so that i can explain it to my teacher. here's wat i got so far.

% Programmer : Jordan Reed

% Start Date : December 12 1007

% Title of Program : Pong

% Description of Program : A game that 2 people use the keyboard to bounce a ball back and forth
% using pong paddles on the screen until someone scores.The first person to score 10 points is
% the winner.The way you score is to get the ball past your opponents paddle.

%Import the GUI library
import GUI

% Declare global variables
var Player1, Player2 : string
var Player1Controls : array char of boolean
var Player2Controls : array char of boolean
var x1, y1, x2, y2 : int
var pic : int

% Introduction
GUI.SetBackgroundColour (brightblue)
Text.ColourBack (brightblue)
put "WELCOME TO PONG."
put "Player 1, What is your name?"
get Player1 : *
put "Player 2, What is your name?"
get Player2 : *
put ""
put ""
put Player1, " VS ", Player2
delay (2500)
cls

% Set your screen
View.Set ("graphics:600,500,nobuttonbar,title:Jordan Reed's Pong Game!!!")
GUI.SetBackgroundColour (green)

% Controlls For Player 1
Draw.FillBox (0, 10, 20, 75, blue)
x1 := 0
y1 := 0
x2 := 1
y2 := 1
pic := Pic.New (0, 0, 300, 150)
Pic.Draw (pic, 0, 0, picMerge)
loop
Pic.Draw (pic, x1, y1, picCopy)
delay (0)
Pic.Draw (pic, x1, y1, picMerge)
Input.KeyDown (Player1Controls)
if Player1Controls (KEY_UP_ARROW) then
y1 := y1 + y2
end if
if Player1Controls (KEY_DOWN_ARROW) then
y1 := y1 - y2
end if
end loop

%Controlls For Player 2
% Draw.FillBox (0, 0, 0, 0, blue)
% x1 := 0
% y1 := 0
% x2 := 0
% y2 := 0
% pic := Pic.New (0, 0, 0, 0)
% Pic.Draw (pic, 0, 0, picMerge)
% loop
% Pic.Draw (pic, x1, y1, picCopy)
% delay (0)
% Pic.Draw (pic, x1, y1, picMerge)
% Input.KeyDown (Player1Controls)
% if Player1Controls (KEY_UP_ARROW) then
% y1 := y1 + y2
% end if
% if Player1Controls (KEY_DOWN_ARROW) then
% y1 := y1 - y2
% end if
% end loop

[StealthArcher]

End topic please.

We do not do work for you here, we help and offer advice, but no freebies.

[ericfourfour]

This assignment is dated: December 12 1007
Time travel exists! WAKE UP SHEEPLE!!!

[CodeMonkey2000]

All your time are belong to us!! But seriously, this was due last year. What have you been doing for so long?

[Dan]

LOCKED, as the above mentioned we do not do work for you here.

P.S. CodeMonkey it is a bit more then one year :p

[Clayton]

Well... technically, it's still due this semester.