Initial import of Red Planet v4.10 Win32 source

Imports the current Win32 source for the pod-racing game 'Red Planet', built on the MUNGA engine and its L4 (Win32/DirectX) platform layer: - MUNGA / MUNGA_L4: cross-platform engine core and Win32 backend - RP / RP_L4: Red Planet game logic and Win32 application - DivLoader, Setup1: asset loader and installer project - lib, MUNGA_L4/openal, MUNGA_L4/sos: third-party audio dependencies Removed stale Subversion metadata and added .gitignore/.gitattributes. Co-Authored-By: Claude Opus 4.8 <noreply@anthropic.com>
2026-06-30 07:59:51 -05:00
commit 4abbf8879f
551 changed files with 254956 additions and 0 deletions
@@ -0,0 +1,144 @@
+#include "munga.h"
+#pragma hdrstop
+
+#include "collorgn.h"
+#include "mover.h"
+#include "doorfram.h"
+
+//
+//#############################################################################
+// CollisionOrigin
+//#############################################################################
+//
+CollisionOrigin::CollisionOrigin(InterestZoneID interest_zone_ID):
+	InterestOrigin(
+		interest_zone_ID,
+		CollisionInterestType,
+      DefaultInterestDepth
+   ),
+   movingEntitySocket(NULL)
+{
+}
+
+//
+//#############################################################################
+// ~CollisionOrigin
+//#############################################################################
+//
+CollisionOrigin::~CollisionOrigin()
+{
+}
+
+//
+//#############################################################################
+// TestInstance
+//#############################################################################
+//
+Logical
+	CollisionOrigin::TestInstance() const
+{
+	InterestOrigin::TestInstance();
+   Check(&movingEntitySocket);
+	return True;
+}
+
+//
+//#############################################################################
+// AddInterestingEntity
+//#############################################################################
+//
+void
+	CollisionOrigin::AddInterestingEntity(Entity *interesting_entity)
+{
+	Check(this);
+	Check(interesting_entity);
+
+	//
+	//--------------------------------------------------------------------------
+	// Make sure that we don't check against something that doesn't move
+	//--------------------------------------------------------------------------
+	//
+	if (interesting_entity->IsDynamic())
+	{
+		//
+		//-----------------------------------------------------------------------
+		// If it is a mover and tangible, or a door, add it to our list
+		//-----------------------------------------------------------------------
+		//
+		if (interesting_entity->IsDerivedFrom(*Mover::GetClassDerivations()))
+		{
+			Mover *mover = Cast_Object(Mover*, interesting_entity);
+			if (mover->IsCollisionTestable())
+			{
+				movingEntitySocket.Add(interesting_entity);
+			}
+		}
+		else if (interesting_entity->IsDerivedFrom(*DoorFrame::GetClassDerivations()))
+		{
+			movingEntitySocket.Add(interesting_entity);
+		}
+	}
+}
+
+//
+//#############################################################################
+// RemoveUninterestingEntity
+//#############################################################################
+//
+void
+	CollisionOrigin::RemoveUninterestingEntity(Entity *uninteresting_entity)
+{
+	Check(this);
+   Check(uninteresting_entity);
+
+	//
+	// HACK - ECH The following may not be a legitimate assertion
+	//
+	#if DEBUG_LEVEL>0 && 0
+	{
+		SChainIteratorOf<Mover*> iterator(&movingEntitySocket);
+		Verify(iterator.IsPlugMember(uninteresting_entity) == True);
+	}
+	#endif
+
+	//
+	// Remove from socket
+	//
+	PlugIterator iterator(uninteresting_entity);
+
+   Check(&iterator);
+	iterator.RemoveSocket(&movingEntitySocket);
+}
+
+//
+//#############################################################################
+// RemoveUninterestingEntities
+//#############################################################################
+//
+void
+	CollisionOrigin::RemoveUninterestingEntities()
+{
+	Check(this);
+
+	SChainIteratorOf<Entity*> iterator(&movingEntitySocket);
+
+   Check(&iterator);
+   while (iterator.GetCurrent() != NULL)
+   {
+		Check(iterator.GetCurrent());
+   	iterator.Remove();
+   }
+}
+
+//~~~~~~~~~~~~~~~~~~~ CollisionOrigin__MovingEntityIterator ~~~~~~~~~~~~~~~~~~~
+
+CollisionOrigin__MovingEntityIterator::CollisionOrigin__MovingEntityIterator(
+   CollisionOrigin *collision_origin
+):
+	SChainIteratorOf<Entity*>(collision_origin->movingEntitySocket)
+{
+}
+
+CollisionOrigin__MovingEntityIterator::~CollisionOrigin__MovingEntityIterator()
+{
+}