Function MoveObjectsToCoords

roomedit/source/objects.cpp:1432–1545

*/

BOOL MoveObjectsToCoords (int objtype, SelPtr obj, SHORT newx, SHORT newy,
						  SHORT grid)
{
	SHORT        n;
	SHORT        dx, dy;
	SelPtr       cur, vertices;
	static SHORT refx, refy; /* previous position */

	// Snap to grid
	if (grid > 0)
	{
		newx = (newx + grid / 2) & ~(grid - 1);
		newy = (newy + grid / 2) & ~(grid - 1);
	}

	/* only update the reference point? */
	if (obj == NULL)
	{
		refx = newx;
		refy = newy;
		return TRUE;
	}

	/* compute the displacement */
	dx = newx - refx;
	dy = newy - refy;
	/* nothing to do? */
	if (dx == 0 && dy == 0)
		return FALSE;

	/* move the object(s) */
	switch (objtype)
	{
	case OBJ_THINGS:
		for (cur = obj; cur; cur = cur->next)
		{
			assert (cur->objnum >= 0  &&  cur->objnum < NumThings);
			Thing *pThing = &Things[cur->objnum];
			pThing->xpos += dx;
			pThing->ypos += dy;
			if (pThing->type == kodEntrance)
			{
//				pThing->id = SetEntrance(RoomID, pThing->id, pThing->xpos, pThing->ypos, pThing->angle, pThing->comment);
			}
		}
		refx = newx;
		refy = newy;
		MadeChanges = TRUE;
		break;

	case OBJ_VERTEXES:
		for (cur = obj; cur; cur = cur->next)
		{
			assert_vnum(cur->objnum);
			Vertex *pVertex = &Vertexes[cur->objnum];

			pVertex->x += dx;
			pVertex->y += dy;