SET GLOBAL COLLISION ON This command will activate the detection of collisions with any two 3D object, irrespective of their individual collision settings.
Syntax
    SET GLOBAL COLLISION ON
Returns
This command does not return a value.
Example Code
    sync on : sync rate 60 : hide mouse:cls 0

    autocam off

    ObjectNumber=1

    SecondObject=2

    make object sphere ObjectNumber,10

    color object ObjectNumber,rgb(0,255,0)

    position object ObjectNumber, 0,0,0

    make object cone secondObject,10

    xrotate object secondObject,90

    fix object pivot secondObject

    color object SecondObject,rgb(255,0,0)

    position object SecondObject, 15,0,0

    AUTOMATIC OBJECT COLLISION ObjectNumber,5,1

    AUTOMATIC OBJECT COLLISION SecondObject,5,1

    while mouseclick()=0

    set cursor 0,0

    print "1=collision on"

    if inkey$()="1" then set global collision on

    print "2=collision off"

    if inkey$()="2"then set global collision off

    if leftkey()=1 then turn object left SecondObject,1

    if rightkey()=1 then turn object right SecondObject,1

    if upkey()=1 and OBJECT HIT(SecondObject,0)=0 then move object SecondObject,1

    if downkey()=1 and OBJECT HIT(SecondObject,0)=0 then move object SecondObject,-1

    if returnkey()=1 then position object SecondObject,15,0,0

    position camera object position x(SecondObject),object position y(SecondObject)+50,object position z(SecondObject)

    point camera object position x(SecondObject),0,object position z(SecondObject)

    sync

    endwhile

    delete object ObjectNumber

    delete object SecondObject

    end
See also
BASIC3D Commands Menu Index