Oops, the weird camera movement is because the camera pivot needs changing too...
Make sure you create 'YourPivot' before the camera setup code, then...
Change...
Global CameraPivot=CreatePivot(CMesh)
to...
Global CameraPivot=CreatePivot(YourPivot)
Make sure you create 'YourPivot' before the camera setup code, then...
Change...
Global CameraPivot=CreatePivot(CMesh)
to...
Global CameraPivot=CreatePivot(YourPivot)