Here's an example of how to add forces to sprites:
rem Landscape App
SetDisplayAspect( 4.0/3.0 )
setPrintSize(3)
createSprite(1,0)
setSpriteSize(1,4,-1)
setSpriteOffset(1,2,getSpriteHeight(1)/2)
setSpritePosition(1,50,50)
setSpritePhysicsOn(1,2)
rem A Wizard Did It!
do
Print("Left Click to apply a vertical force on the sprite")
Print("Right Click to apply a pointer based force")
if getRawMouseLeftState()=1
setSpritePhysicsImpulse(1,getSpriteXbyOffset(1),getSpriteYbyOffset(1),0,-10)
endif
if getRawMouseRightState()=1
dx# = getSpriteXbyOffset(1)-getPointerX()
dy# = getSpriteYbyOffset(1)-getPointerY()
fx# = 142-dx#
fy# = 142-dy#
setSpritePhysicsImpulse(1,getPointerX(),getPointerY(),dx#,dy#)
endif
Sync()
loop
