bold som hopper på bander (bouncing)

jeg har skrevet dette script:

property spritenum
property me_color
property me_size
property me_direction
global banesprite

on beginsprite
  banesprite = 1
  me_color = getat (["255","22","55","122","76"],random(5))
  me_size = getat ([point(22,20),point(25,30),point(22,25),\
point(21,31),point(30,23)],random(5))
  me_direction = getat ([point(1.1,1.2),point(1.3,1.1),point(1.1,1.3),\
point(1.5,1.2),point(1.1,1.5)],random(5))
  sprite(spritenum).forecolor = me_color 
  sprite(spritenum).width = me_size[1]
  sprite(spritenum).height = me_size[2]
  sprite(spritenum).forecolor = me_color 
end


on exitframe me
  --put me_direction
  if sprite spritenum intersects banesprite then
    --indenfor
    sprite(spritenum).loc =  sprite(spritenum).loc + me_direction
  else
    --udenfor
    me_direction = getat ([point(me_direction[1]*-1,me_direction[2]),\
point(me_direction[1],me_direction[2]*-1)],random(2))
   
    sprite(spritenum).loc =  sprite(spritenum).loc + me_direction*2
  end if
end

Hvordan kan jeg sikre at bolde ikke hopper ud af firkanten som er intersecting sprite?