I suppose a new challenge should arise...

[Oz]

Mmmmmmmm......pong

Code:

'-----Dr_Davenstein
'Hippy Ball...formerly known as Pong
'By UnKnown% QBN members???
'$DYNAMIC

Type BallType
X as Single
Y as Single
  VecX as Single
  VecY as Single
End Type


DECLARE SUB Alex.Draw.Background ()

'-----Dark_Prevail
SCREEN 13

'Lets GET those funky hippy pong paddles!
FOR i = 0 TO 24
  LINE (0, i)-(4, i), (i * 2) + 32
NEXT
DIM hippypaddle((25 * 5) / 2 + 1) AS INTEGER
GET (0, 0)-(4, 24), hippypaddle

I have no code at the moment to add, but i thought it would b easier to see everything together

Alex~