This worked for me:
void main() {
object oPC = GetFirstPC();
object oCarth = GetObjectByTag("carth");
AssignCommand(oPC, ClearAllActions());
location lPC = Location(Vector(86.3,147.0,0.0), 0.0);
location lCarth = Location(Vector(85.9,145.6,0.0), 0.0);
AssignCommand(oCarth, ActionForceMoveToLocation(lCarth, FALSE));
DelayCommand(1.0, AssignCommand(oPC, ActionForceMoveToLocation(lPC, FALSE)));
}