Well i didnt really got it but i have a diffrent prob now .
I thought that i knew how to make the colossion but its not working .
any1 have any idea how should i create the colossion of the ball and the bat ?? ,. Anyway this is what i got so far ;;
BatY1 = 35
BatY2 = 120
BatSpeed1 = 1
BatSpeed2 = 1
BallX = 320
BallY = 240
BallSpeedX = 1
BallSpeedY = 1
BOX 30,BatY1,45,BatY2
CIRCLE BallX,BallY,20
DO
CLS
cage()
CIRCLE BallX,BallY,20
BOX 30,BatY1,45,BatY2
BallX = BallX - BallSpeedX
BallY = BallY - BallSpeedY
IF BallY =< 50
BallSpeedY = BallSpeedY * - 1
ENDIF
IF BallY => 440
BallSpeedY = BallSpeedY * + 1
ENDIF
If BallX =< 40
BallSpeedX = BallSpeedX * - 1
ENDIF
IF BallX => 600
BallSpeedX = BallSpeedX * + 1
ENDIF
SET TEXT SIZE 8
PRINT "POSITION Y1 = ", BatY1
PRINT "POSITION Y2 = ", BatY2
PRINT "BALLPOSX = ",BallX
PRINT "BALLPOSY = ",BallY
IF BatY1 =< 35
BatSpeed2 = 0
ELSE
BatSpeed2 = 1
ENDIF
IF BatY2 => 455
BatSpeed1 = 0
ELSE
BatSpeed1 = 1
ENDIF
IF UPKEY() = 1
BatY1 = BatY1 - BatSpeed2
BatY2 = BatY2 - BatSpeed2
BOX 30,BatY1,45,BatY2
ENDIF
IF DOWNKEY() = 1
BatY1 = BatY1 + BatSpeed1
BatY2 = BatY2 + BatSpeed1
BOX 30,BatY1,45,BatY2
ENDIF
LOOP
WAIT KEY
FUNCTION cage()
LINE 20,30,620,30
LINE 20,460,620,460
LINE 20,30,20,460
LINE 620,30,620,461
ENDFUNCTION
