;- ObjData Structure Structure ObjData PX.f PY.f PZ.f AX.f AY.f AZ.f EndStructure Global CollisionDLL=OpenLibrary(#PB_Any,"DBCcCollision.dll") If CollisionDLL=0 CallDebugger Debug "No DLL" End EndIf ;- Prototypes Prototype.l ProtoSetupObject(ObjNum,GroupNum,ObjectType,VertData,ObjectData.ObjData) Global SetupObject.ProtoSetupObject=GetFunction(CollisionDLL,"setupObject") Prototype.l ProtoSetupComplexObject(ObjNum,GroupNum,FacesPerNode,VertData,ObjectData.ObjData) Global SetupComplexObject=GetFunction(CollisionDLL,"setupComplexObject") Prototype.l ProtoUpdateObject(ObjNum,ObjectData.ObjData) Global UpdateObject.ProtoUpdateObject=GetFunction(CollisionDLL,"updateObject") Prototype.l ProtoIntersectObject(objNum,groupFlag,oldx.f,oldy.f,oldz.f,x.f,y.f,z.f,excludeObj) Global IntersectObject.ProtoIntersectObject=GetFunction(CollisionDLL,"intersectObject") Prototype.l ProtoSetObjectCollisionOn(objNum) Global SetObjectCollisionOn.ProtoSetObjectCollisionOn=GetFunction(CollisionDLL,"set_object_collision_on") Prototype.l ProtoSetObjectCollisionOff(objNum) Global SetObjectCollisionOff.ProtoSetObjectCollisionOff=GetFunction(CollisionDLL,"set_object_collision_off") Prototype.l ProtoCollisionStatus(objNum) Global CollisionStatus.ProtoCollisionStatus=GetFunction(CollisionDLL,"collisionstatus") Prototype.l ProtoGetStaticCollisionX() Global GetStaticCollisionX.ProtoGetStaticCollisionX=GetFunction(CollisionDLL,"getStaticCollisionX") Prototype.l ProtoGetStaticCollisionY() Global GetStaticCollisionY.ProtoGetStaticCollisionY=GetFunction(CollisionDLL,"getStaticCollisionY") Prototype.l ProtoGetStaticCollisionZ() Global GetStaticCollisionZ.ProtoGetStaticCollisionZ=GetFunction(CollisionDLL,"getStaticCollisionZ") Prototype.l ProtoGetCollisionNormalX() Global GetCollisionNormalX.ProtoGetCollisionNormalX=GetFunction(CollisionDLL,"getCollisionNormalX") Prototype.l ProtoGetCollisionNormalY() Global GetCollisionNormalY.ProtoGetCollisionNormalY=GetFunction(CollisionDLL,"getCollisionNormalY") Prototype.l ProtoGetCollisionNormalZ() Global GetCollisionNormalZ.ProtoGetCollisionNormalZ=GetFunction(CollisionDLL,"getCollisionNormalZ")