Agents now leave corpses on death.

andrewanderson · Oct 13, 2010 · 1ea88de · 1ea88de
1 parent 6eef9ce
commit 1ea88de
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 4 deletions.
diff --git a/Cas/Core/SimulationBase.cs b/Cas/Core/SimulationBase.cs
@@ -330,9 +330,14 @@ private void ProcessLocation(ILocation location, List<KeyValuePair<IAgent, ILoca
             // Deaths (remove from the back first)
             for (int i = deathIndecies.Count - 1; i >= 0; i--)
             {
+                // Kill the agent
                 var condemned = location.Agents[deathIndecies[i]];
                 location.Agents.RemoveAt(deathIndecies[i]);
                 this.RegisterDeath(condemned);
+
+                // Add a corpse object with the dead agent's genetic material to the location
+                var corpse = new Corpse(condemned);
+                location.CurrentResources.Add(corpse);
             }
 
             // Age all surviving agents

diff --git a/Cas/Core/Species.cs b/Cas/Core/Species.cs
@@ -139,6 +139,10 @@ public void RecordConsumptionOf(IIsUnique prey, int amount)
 
                 (prey as ISpecies).RecordPredation(this);
             }
+            else if (prey is Corpse)
+            {
+                ResourcesFromAgents += amount;
+            }
             else // IResourceNode
             {
                 ResourcesFromResourceNodes += amount;

diff --git a/Cas/WebCritters/WebCrittersForm.Designer.cs b/Cas/WebCritters/WebCrittersForm.Designer.cs