- NewtonWorld:= NewtonCreate(nil, nil);
- CollisionBox:= NewtonCreateBox(NewtonWorld, 2, 2, 2, nil);
- RigidBody:= NewtonCreateBody(NewtonWorld, CollisionBox);
- NewtonReleaseCollision(NewtonWorld, CollisionBox);
- NewtonBodySetMassMatrix(RigidBody, 1, 1, 1, 1);
- NewtonBodyGetMatrix(RigidBody, @matrix[0,0]);
- matrix[3,0] := 0;
- matrix[3,1] := 1;
- matrix[3,2] := 0;
- NewtonBodySetMatrix(RigidBody, @matrix[0,0]);
- vector[0]:= 5;
- vector[1]:= 5;
- vector[2]:= 5;
- NewtonBodySetOmega(RigidBody, @vector[0]);