sub TranslateActor( actor, x, y, z )