]> git.localhorst.tv Git - blobs.git/blobdiff - src/creature/goal.cpp
introduce random genetic mutations
[blobs.git] / src / creature / goal.cpp
index 1b9d5d07fd0bef94038e3332dadad640320bd68f..9d3e1254c870670e15db2f38eb28d08358af57e6 100644 (file)
@@ -1,15 +1,91 @@
+#include "BlobBackgroundTask.hpp"
 #include "Goal.hpp"
+#include "IdleGoal.hpp"
 #include "LocateResourceGoal.hpp"
 
 #include "Creature.hpp"
+#include "../app/Assets.hpp"
 #include "../world/Planet.hpp"
+#include "../world/Resource.hpp"
+#include "../world/Simulation.hpp"
 #include "../world/TileType.hpp"
 
+#include <iostream>
+#include <glm/gtx/io.hpp>
+
+
 namespace blobs {
 namespace creature {
 
-Goal::Goal()
-: urgency(0.0)
+BlobBackgroundTask::BlobBackgroundTask(Creature &c)
+: Goal(c) {
+}
+
+BlobBackgroundTask::~BlobBackgroundTask() {
+}
+
+std::string BlobBackgroundTask::Describe() const {
+       return "being a blob";
+}
+
+void BlobBackgroundTask::Tick(double dt) {
+}
+
+void BlobBackgroundTask::Action() {
+       // check if eligible to split
+       if (GetCreature().Mass() > GetCreature().GetProperties().Birth().mass * 1.8) {
+               double fert = GetCreature().Fertility();
+               double rand = Assets().random.UNorm();
+               if (fert > rand) {
+                       std::cout << "[" << int(GetCreature().GetSimulation().Time())
+                               << "s] " << GetCreature().Name() << " split" << std::endl;
+                       Split(GetCreature());
+                       return;
+               }
+       }
+       // check for random property mutation
+       if (GetCreature().Mutability() > Assets().random.UNorm()) {
+               double amount = 1.0 + (Assets().random.SNorm() * 0.05);
+               auto &props = GetCreature().GetGenome().properties;
+               double r = Assets().random.UNorm();
+               math::Distribution *d = nullptr;
+               if (Assets().random.UNorm() < 0.5) {
+                       auto &set = props.props[(int(Assets().random.UNorm() * 4.0) % 4) + 1];
+                       if (r < 0.25) {
+                               d = &set.age;
+                       } else if (r < 0.5) {
+                               d = &set.mass;
+                       } else if (r < 0.75) {
+                               d = &set.fertility;
+                       } else {
+                               d = &set.highlight;
+                       }
+               } else {
+                       if (r < 0.2) {
+                               d = &props.strength;
+                       } else if (r < 0.4) {
+                               d = &props.stamina;
+                       } else if (r < 0.6) {
+                               d = &props.dexerty;
+                       } else if (r < 0.8) {
+                               d = &props.intelligence;
+                       } else {
+                               d = &props.mutability;
+                       }
+               }
+               if (Assets().random.UNorm() < 0.5) {
+                       d->Mean(d->Mean() * amount);
+               } else {
+                       d->StandardDeviation(d->StandardDeviation() * amount);
+               }
+       }
+}
+
+
+Goal::Goal(Creature &c)
+: c(c)
+, on_complete()
+, urgency(0.0)
 , interruptible(true)
 , complete(false) {
 }
@@ -17,68 +93,218 @@ Goal::Goal()
 Goal::~Goal() noexcept {
 }
 
+Situation &Goal::GetSituation() noexcept {
+       return c.GetSituation();
+}
+
+const Situation &Goal::GetSituation() const noexcept {
+       return c.GetSituation();
+}
+
+Steering &Goal::GetSteering() noexcept {
+       return c.GetSteering();
+}
+
+const Steering &Goal::GetSteering() const noexcept {
+       return c.GetSteering();
+}
+
+app::Assets &Goal::Assets() noexcept {
+       return c.GetSimulation().Assets();
+}
+
+const app::Assets &Goal::Assets() const noexcept {
+       return c.GetSimulation().Assets();
+}
+
+void Goal::SetComplete() noexcept {
+       if (!complete) {
+               complete = true;
+               if (on_complete) {
+                       on_complete(*this);
+               }
+       }
+}
+
+void Goal::OnComplete(std::function<void(Goal &)> cb) noexcept {
+       on_complete = cb;
+       if (complete) {
+               on_complete(*this);
+       }
+}
+
+
+IdleGoal::IdleGoal(Creature &c)
+: Goal(c) {
+       Urgency(-1.0);
+       Interruptible(true);
+}
+
+IdleGoal::~IdleGoal() {
+}
+
+std::string IdleGoal::Describe() const {
+       return "idle";
+}
+
+void IdleGoal::Enable() {
+}
+
+void IdleGoal::Tick(double dt) {
+}
+
+void IdleGoal::Action() {
+}
+
 
-LocateResourceGoal::LocateResourceGoal(int res)
-: res(res) {
+LocateResourceGoal::LocateResourceGoal(Creature &c, int res)
+: Goal(c)
+, res(res)
+, found(false)
+, target_pos(0.0)
+, target_srf(0)
+, target_tile(0)
+, searching(false)
+, reevaluate(0.0) {
 }
 
 LocateResourceGoal::~LocateResourceGoal() noexcept {
 }
 
-void LocateResourceGoal::Enable(Creature &c) {
+std::string LocateResourceGoal::Describe() const {
+       return "locate " + GetCreature().GetSimulation().Resources()[res].name;
+}
+
+void LocateResourceGoal::Enable() {
+
 }
 
 void LocateResourceGoal::Tick(double dt) {
+       reevaluate -= dt;
+}
+
+void LocateResourceGoal::Action() {
+       if (reevaluate < 0.0) {
+               LocateResource();
+               reevaluate = 3.0;
+       } else if (!found) {
+               if (!searching) {
+                       LocateResource();
+               } else {
+                       double dist = glm::length2(GetSituation().Position() - target_pos);
+                       if (dist < 0.0001) {
+                               LocateResource();
+                       } else {
+                               GetSteering().GoTo(target_pos);
+                       }
+               }
+       } else if (OnTargetTile()) {
+               GetSteering().Halt();
+               if (!GetSituation().Moving()) {
+                       SetComplete();
+               }
+       } else {
+               GetSteering().GoTo(target_pos);
+       }
+       GetSteering().Haste(Urgency());
 }
 
-void LocateResourceGoal::Action(Creature &c) {
-       if (c.GetSituation().OnSurface()) {
-               const world::TileType &t = c.GetSituation().GetTileType();
+void LocateResourceGoal::LocateResource() {
+       if (GetSituation().OnSurface()) {
+               const world::TileType &t = GetSituation().GetTileType();
                auto yield = t.FindResource(res);
                if (yield != t.resources.cend()) {
                        // hoooray
-                       c.GetSteering().Halt();
-                       Complete(true);
+                       GetSteering().Halt();
+                       found = true;
+                       searching = false;
+                       target_pos = GetSituation().Position();
+                       target_srf = GetSituation().Surface();
+                       target_tile = GetSituation().GetPlanet().SurfacePosition(target_srf, target_pos);
                } else {
                        // go find somewhere else
-                       const world::Planet &planet = c.GetSituation().GetPlanet();
-                       double side_length = planet.SideLength();
-                       double offset = side_length * 0.5;
-                       glm::ivec2 loc = glm::ivec2(c.GetSituation().Position() + offset);
-                       glm::ivec2 seek_radius(2);
-                       glm::ivec2 begin(glm::max(glm::ivec2(0), loc - seek_radius));
-                       glm::ivec2 end(glm::min(glm::ivec2(side_length), loc + seek_radius));
-                       const world::TileType::Yield *best = nullptr;
-                       glm::ivec2 best_pos;
-                       double best_distance = 2 * side_length * side_length;
-                       for (int y = begin.y; y < end.y; ++y) {
-                               for (int x = begin.x; x < end.x; ++x) {
-                                       const world::TileType &type = planet.TypeAt(c.GetSituation().Surface(), x, y);
-                                       auto yield = type.FindResource(res);
-                                       if (yield != type.resources.cend()) {
-                                               double dist = glm::length2(glm::dvec3(x - offset + 0.5, y - offset + 0.5, 0.0) - c.GetSituation().Position());
-                                               if (!best) {
-                                                       best = &*yield;
-                                                       best_pos = glm::ivec2(x, y);
-                                                       best_distance = dist;
-                                               } else if (yield->ubiquity + (dist * 0.125) > best->ubiquity + (best_distance * 0.125)) {
-                                                       best = &*yield;
-                                                       best_pos = glm::ivec2(x, y);
-                                                       best_distance = dist;
-                                               }
-                                       }
-                               }
-                       }
-                       if (best) {
-                               c.GetSteering().GoTo(glm::dvec3(best_pos.x - offset + 0.5, best_pos.y - offset + 0.5, 0.0));
-                       } else {
-                               // oh crap
-                       }
+                       SearchVicinity();
                }
        } else {
                // well, what now?
        }
 }
 
+void LocateResourceGoal::SearchVicinity() {
+       const world::Planet &planet = GetSituation().GetPlanet();
+       int srf = GetSituation().Surface();
+       const glm::dvec3 &pos = GetSituation().Position();
+
+       glm::ivec2 loc = planet.SurfacePosition(srf, pos);
+       glm::ivec2 seek_radius(2);
+       glm::ivec2 begin(glm::max(glm::ivec2(0), loc - seek_radius));
+       glm::ivec2 end(glm::min(glm::ivec2(planet.SideLength()), loc + seek_radius + glm::ivec2(1)));
+
+       double rating[end.y - begin.y][end.x - begin.x] { 0.0 };
+
+       // find close and rich field
+       for (int y = begin.y; y < end.y; ++y) {
+               for (int x = begin.x; x < end.x; ++x) {
+                       const world::TileType &type = planet.TypeAt(srf, x, y);
+                       auto yield = type.FindResource(res);
+                       if (yield != type.resources.cend()) {
+                               // TODO: subtract minimum yield
+                               rating[y - begin.y][x - begin.x] = yield->ubiquity;
+                               double dist = std::max(0.125, 0.25 * glm::length(planet.TileCenter(srf, x, y) - pos));
+                               rating[y - begin.y][x - begin.x] /= dist;
+                       }
+               }
+       }
+
+       // demote crowded tiles
+       for (auto &c : planet.Creatures()) {
+               if (&*c == &GetCreature()) continue;
+               if (c->GetSituation().Surface() != srf) continue;
+               glm::ivec2 coords(c->GetSituation().SurfacePosition());
+               if (coords.x < begin.x || coords.x >= end.x) continue;
+               if (coords.y < begin.y || coords.y >= end.y) continue;
+               rating[coords.y - begin.y][coords.x - begin.x] *= 0.9;
+       }
+
+       glm::ivec2 best_pos(0);
+       double best_rating = -1.0;
+
+       for (int y = begin.y; y < end.y; ++y) {
+               for (int x = begin.x; x < end.x; ++x) {
+                       if (rating[y - begin.y][x - begin.x] > best_rating) {
+                               best_pos = glm::ivec2(x, y);
+                               best_rating = rating[y - begin.y][x - begin.x];
+                       }
+               }
+       }
+
+       if (best_rating) {
+               found = true;
+               searching = false;
+               target_pos = planet.TileCenter(srf, best_pos.x, best_pos.y);
+               target_srf = srf;
+               target_tile = best_pos;
+               GetSteering().GoTo(target_pos);
+       } else if (!searching) {
+               found = false;
+               searching = true;
+               target_pos = GetSituation().Position();
+               target_pos[(srf + 0) % 3] += Assets().random.SNorm();
+               target_pos[(srf + 1) % 3] += Assets().random.SNorm();
+               // bias towards current direction
+               target_pos += glm::normalize(GetSituation().Velocity()) * 0.5;
+               target_pos = clamp(target_pos, -planet.Radius(), planet.Radius());
+               GetSteering().GoTo(target_pos);
+       }
+}
+
+bool LocateResourceGoal::OnTargetTile() const noexcept {
+       const Situation &s = GetSituation();
+       return s.OnSurface()
+               && s.Surface() == target_srf
+               && s.OnTile()
+               && s.SurfacePosition() == target_tile;
+}
+
 }
 }