- Collider := NewtonCreateTreeCollision(NewtonWorld, nil);
- NewtonTreeCollisionBeginBuild(Collider);
- V[0] := V3(-200, -200, 1.0);
- V[1] := V3( 200, -200, 1.0);
- V[2] := V3( 200, 200, 1.0);
- V[3] := V3(-200, 200, 1.0);
- NewtonTreeCollisionAddFace(Collider, 4, @V, SizeOf(TVector3f), 1);
- NewtonTreeCollisionEndBuild(Collider, 0);
- FloorBody := NewtonCreateBody(NewtonWorld, Collider);
- Matrix_SetIdentity(FloorMatrix);
- Matrix_SetTransform(FloorMatrix, V4(0, 0, 0));
- NewtonBodySetMatrix(FloorBody, @FloorMatrix);
- NewtonCollisionCalculateAABB(Collider, @FloorMatrix, @Min, @Max);
- NewtonSetWorldSize(NewtonWorld, @Min, @Max);
- NewtonReleaseCollision(NewtonWorld, Collider);