-----------------------------------

juniorspank

Mon Dec 08, 2003 9:33 pm


Could someone tell me what to fix for this pong?

-----------------------------------

I have many problems and need help  :oops: 

setscreen ("graphics:700;300")
var x1, y1, x2, y2, x3, y3, x4, y4, xy1, xy2, xy3, xy4 : int
x1 := 3
y1 := 200
x2 := 11
y2 := 250
x3 := 680
y3 := 200
x4 := 688
y4 := 250
xy1 := x1 and y1
xy2 := x2 and y2
xy3 := x3 and y3
xy4 := x4 and y4
var yt1, yt2 : int
var paddle : int
paddle := x1 and y1 and x2 and y2
yt1 := y2 - y1
yt2 := y4 - y3 
var ballt1, ballt2 : int
ballt1 := x2 and >= y1, = y3, = maxy then
        key := ""
        paddle_y1 := paddle_y1 - 1
        paddle_y2 := paddle_y2 - 1
    elsif paddle_y2 = maxy then
        ystep := -1
    elsif bally - 15 = maxx then
        xstep := -1
    elsif ballx - 15