// virtual resolution
SetVirtualResolution ( 480, 480 )
SetClearColor(0, 0, 100)
// create a static sprite
CreateSprite ( 1, 0 )
SetSpriteSize( 1, 50, 50)
SetSpritePosition ( 1, 130, 200 )
SetSpritePhysicsOn ( 1, 1 )
// create a dynamic sprite
CreateSprite ( 2, 0 )
SetSpriteSize( 2, 50, 50)
SetSpritePosition ( 2, 230, 300 )
SetSpritePhysicsOn ( 2, 2 )
CreatePrismaticJoint( 1, 1, 2, 155, 225, 1, 0, 0 )
` Gravity would make the second sprite
` fall down and to the right, but the
` joint only permits movement to the right
SetPhysicsGravity( 1, 1 )
SetPhysicsDebugOn ( )
do
Sync ( )
loop
