// ------------------------------------------------------------------------------------------------------
int ObjectMoveDown(void)
{
object *obj;
vms_vector uvec;
vms_vector newpos;
if (Cur_object_index == -1) {
editor_status("No current object, cannot move.");
return 1;
}
obj = &Objects[Cur_object_index];
extract_up_vector_from_segment(&Segments[obj->segnum], &uvec);
vm_vec_normalize(&uvec);
vm_vec_sub(&newpos, &obj->pos, vm_vec_scale(&uvec, OBJ_SCALE));
if (!verify_object_seg(obj, &newpos))
obj->pos = newpos;
Update_flags |= UF_WORLD_CHANGED;
return 1;
}
static void move_object_to_position(const vobjptridx_t objp, const vms_vector &newpos)
{
if (get_seg_masks(newpos, vcsegptr(objp->segnum), objp->size).facemask == 0)
{
objp->pos = newpos;
} else {
if (verify_object_seg(objp, newpos)) {
int fate;
object temp_viewer_obj;
fvi_query fq;
fvi_info hit_info;
temp_viewer_obj = *Viewer;
auto viewer_segnum = find_object_seg(vobjptr(Viewer));
temp_viewer_obj.segnum = viewer_segnum;
// If the viewer is outside the mine, get him in the mine!
if (viewer_segnum == segment_none) {
editor_status("Unable to move object, viewer not in mine. Aborting");
return;
#if 0
vms_vector last_outside_pos;
// While outside mine, move towards object
count = 0;
while (viewer_segnum == segment_none) {
vms_vector temp_vec;
last_outside_pos = temp_viewer_obj.pos;
vm_vec_avg(&temp_vec, &temp_viewer_obj.pos, newpos);
temp_viewer_obj.pos = temp_vec;
viewer_segnum = find_object_seg(&temp_viewer_obj);
temp_viewer_obj.segnum = viewer_segnum;
if (count > 5) {
editor_status("Unable to move object, can't get viewer in mine. Aborting");
return;
}
}
count = 0;
// While inside mine, move away from object.
while (viewer_segnum != segment_none) {
vms_vector temp_vec;
vm_vec_avg(&temp_vec, &temp_viewer_obj.pos, &last_outside_pos);
temp_viewer_obj.pos = temp_vec;
update_object_seg(&temp_viewer_obj);
viewer_segnum = find_object_seg(&temp_viewer_obj);
temp_viewer_obj.segnum = viewer_segnum;
if (count > 5) {
editor_status("Unable to move object, can't get viewer back out of mine. Aborting");
return;
}
}
#endif
}
fq.p0 = &temp_viewer_obj.pos;
fq.startseg = temp_viewer_obj.segnum;
fq.p1 = &newpos;
fq.rad = temp_viewer_obj.size;
fq.thisobjnum = object_none;
fq.ignore_obj_list.first = nullptr;
fq.flags = 0;
fate = find_vector_intersection(fq, hit_info);
if (fate == HIT_WALL) {
objp->pos = hit_info.hit_pnt;
const auto &&segp = find_object_seg(objp);
if (segp != segment_none)
obj_relink(objp, segp);
} else {
editor_status("Attempted to move object out of mine. Object not moved.");
}
}
}
Update_flags |= UF_WORLD_CHANGED;
}
void move_object_to_position(int objnum, vms_vector *newpos)
{
object *objp = &Objects[objnum];
segmasks result = get_seg_masks(newpos, objp->segnum, objp->size);
if (result.facemask == 0) {
//mprintf((0, "Object #%i moved from (%7.3f %7.3f %7.3f) to (%7.3f %7.3f %7.3f)\n", objnum, f2fl(objp->pos.x), f2fl(objp->pos.y), f2fl(objp->pos.z), f2fl(newpos->x), f2fl(newpos->y), f2fl(newpos->z)));
objp->pos = *newpos;
} else {
if (verify_object_seg(&Objects[objnum], newpos)) {
int fate, count;
int viewer_segnum;
object temp_viewer_obj;
fvi_query fq;
fvi_info hit_info;
vms_vector last_outside_pos;
vms_vector last_inside_pos;
temp_viewer_obj = *Viewer;
viewer_segnum = find_object_seg(&temp_viewer_obj);
temp_viewer_obj.segnum = viewer_segnum;
// If the viewer is outside the mine, get him in the mine!
if (viewer_segnum == -1) {
// While outside mine, move towards object
count = 0;
while (viewer_segnum == -1) {
vms_vector temp_vec;
//mprintf((0, "[towards %7.3f %7.3f %7.3f]\n", f2fl(temp_viewer_obj.pos.x), f2fl(temp_viewer_obj.pos.y), f2fl(temp_viewer_obj.pos.z)));
last_outside_pos = temp_viewer_obj.pos;
vm_vec_avg(&temp_vec, &temp_viewer_obj.pos, newpos);
temp_viewer_obj.pos = temp_vec;
viewer_segnum = find_object_seg(&temp_viewer_obj);
temp_viewer_obj.segnum = viewer_segnum;
if (count > 5) {
editor_status("Unable to move object, can't get viewer in mine. Aborting");
return;
}
}
count = 0;
// While inside mine, move away from object.
while (viewer_segnum != -1) {
vms_vector temp_vec;
//mprintf((0, "[away %7.3f %7.3f %7.3f]\n", f2fl(temp_viewer_obj.pos.x), f2fl(temp_viewer_obj.pos.y), f2fl(temp_viewer_obj.pos.z)));
last_inside_pos = temp_viewer_obj.pos;
vm_vec_avg(&temp_vec, &temp_viewer_obj.pos, &last_outside_pos);
temp_viewer_obj.pos = temp_vec;
update_object_seg(&temp_viewer_obj);
viewer_segnum = find_object_seg(&temp_viewer_obj);
temp_viewer_obj.segnum = viewer_segnum;
if (count > 5) {
editor_status("Unable to move object, can't get viewer back out of mine. Aborting");
return;
}
}
}
fq.p0 = &temp_viewer_obj.pos;
fq.startseg = temp_viewer_obj.segnum;
fq.p1 = newpos;
fq.rad = temp_viewer_obj.size;
fq.thisobjnum = -1;
fq.ignore_obj_list = NULL;
fq.flags = 0;
fate = find_vector_intersection(&fq,&hit_info);
if (fate == HIT_WALL) {
int new_segnum;
//mprintf((0, "Hit wall seg:side = %i:%i, point = (%7.3f %7.3f %7.3f)\n", hit_info.hit_seg, hit_info.hit_side, f2fl(hit_info.hit_pnt.x), f2fl(hit_info.hit_pnt.y), f2fl(hit_info.hit_pnt.z)));
objp->pos = hit_info.hit_pnt;
new_segnum = find_object_seg(objp);
Assert(new_segnum != -1);
obj_relink(objp-Objects, new_segnum);
//mprintf((0, "Object moved from segment %i to %i\n", old_segnum, objp->segnum));
} else {
editor_status("Attempted to move object out of mine. Object not moved.");
//mprintf((0,"Attempted to move object out of mine. Object not moved."));
}
}
}
Update_flags |= UF_WORLD_CHANGED;
}
