You could cheat with a Joint Motor:
// Project: spacefriction
// Created: 2016-02-03
// set window properties
SetWindowTitle( "spacefriction" )
SetWindowSize( 1024, 768, 0 )
SetPhysicsScale(0.4)
p1 = createsprite(0)
setspritecolor(p1,255,255,255,255)
SetSpriteSize(p1,50,50)
SetSpritePositionByOffset(p1,500,500)
setspritephysicson (p1, 2)
SetSpriteShapeCircle(p1,0,0,25)
SetSpritePhysicsFriction(p1,0)
SetSpritePhysicsDamping(p1,0)
SetSpritePhysicsMass(p1,10)
SetSpritePhysicsRestitution(p1,0)
SetSpritePhysicsAngularDamping(p1,0)
p2 = createsprite(0)
setspritecolor(p2,255,255,255,255)
SetSpriteSize(p2,50,50)
SetSpritePositionByOffset(p2,300,300)
setspritephysicson (p2, 1)
SetSpriteShapeCircle(p2,0,0,25)
SetSpritePhysicsFriction(p2,0)
SetSpritePhysicsDamping(p2,0)
SetSpritePhysicsMass(p2,10)
SetSpritePhysicsRestitution(p2,0)
SetSpritePhysicsAngularDamping(p2,0)
CreateRevoluteJoint(1,p1,p2,GetSpriteXByOffset(p2),GetSpriteYByOffset(p2),0)
SetPhysicsGravity(0,0)
SetJointMotorOn( 1, -10, 10000 )
SetViewZoom(1.1) // just using this to quickly turn off physics walls.
// set display properties
SetVirtualResolution( 1024, 768 )
SetOrientationAllowed( 1, 1, 1, 1 )
do
Print( ScreenFPS() )
StepPhysics(0.16)
Sync()
loop