- Added A_SetSize(double newradius, double newheight = -1).

- Changes the calling actor's radius and height.

src/p_actionfunctions.cpp

@@ -6846,3 +6846,19 @@ DEFINE_ACTION_FUNCTION(AActor, A_CheckTerrain)
 	}
 	return 0;
 }
+
+DEFINE_ACTION_FUNCTION(AActor, A_SetSize)
+{
+	PARAM_SELF_PROLOGUE(AActor);
+	PARAM_FLOAT(newradius);
+	PARAM_FLOAT_DEF(newheight);
+
+	if (newradius < 0.)		newradius = self->radius;
+	if (newheight < 0.)		newheight = self->Height;
+
+	self->UnlinkFromWorld();
+	self->radius = newradius;
+	self->Height = newheight;
+	self->LinkToWorld();
+	return 0;
+}

wadsrc/static/zscript/actor.txt

@@ -793,6 +793,7 @@ class Actor : Thinker native
 	native bool A_CopySpriteFrame(int from, int to, int flags = 0);
 	native bool A_SetVisibleRotation(double anglestart = 0, double angleend = 0, double pitchstart = 0, double pitchend = 0, int flags = 0, int ptr = AAPTR_DEFAULT);
 	native void A_SetTranslation(name transname);
+	native void A_SetSize(double newradius, double newheight = -1);
 
 	native void A_RearrangePointers(int newtarget, int newmaster = AAPTR_DEFAULT, int newtracer = AAPTR_DEFAULT, int flags=0);
 	native void A_TransferPointer(int ptr_source, int ptr_recepient, int sourcefield, int recepientfield=AAPTR_DEFAULT, int flags=0);