Method Inst_ExploitForward3

avida-core/source/cpu/cHardwareCPU.cc:8818–8876

Sense neighboring cells, and rotate and move to the neighbor with the strongest pheromone. If there is no winner, just move forward. This instruction doesn't sense the three cells behind the organism, or the ones to the sides.

// This instruction doesn't sense the three cells behind the organism,
// or the ones to the sides.
bool cHardwareCPU::Inst_ExploitForward3(cAvidaContext& ctx)
{
  int num_rotations = 0;
  double phero_amount = 0;
  double max_pheromone = 0;
  
  cPopulation& pop = m_world->GetPopulation();
  int cellid = m_organism->GetCellID();
  
  if (cellid == -1) {
    return false;
  }
  
  cPopulationCell& mycell = pop.GetCell(cellid);
  cDeme &deme = pop.GetDeme(pop.GetCell(cellid).GetDemeID());
  const cResourceCount& deme_resource_count = deme.GetDemeResourceCount();
  Apto::Array<double> cell_resources;
  
  if ( (m_world->GetConfig().EXPLOIT_EXPLORE_PROB.Get() >= 0) &&
      (ctx.GetRandom().P(m_world->GetConfig().EXPLOIT_EXPLORE_PROB.Get())) ) {
    num_rotations = ctx.GetRandom().GetUInt(m_organism->GetNeighborhoodSize());
  } else {
    // Find which neighbor has the strongest pheromone
    for (int i = 0; i < mycell.ConnectionList().GetSize(); i++) {
      
      // Skip the cells in the back
      if (i == 2 || i == 3 || i == 4 || i == 5 || i == 6) {
        mycell.ConnectionList().CircNext();
        continue;
      }
      
      phero_amount = 0;
      cell_resources = deme_resource_count.GetCellResources(deme.GetRelativeCellID(mycell.GetCellFaced().GetID()), ctx); 
      
      for (int j = 0; j < deme_resource_count.GetSize(); j++) {
        if (strncmp(deme_resource_count.GetResName(j), "pheromone", 9) == 0) {
          phero_amount += cell_resources[j];
        }
      }
      
      if (phero_amount > max_pheromone) {
        num_rotations = i;
        max_pheromone = phero_amount;
      }
      
      mycell.ConnectionList().CircNext();
    }
  }
  
  // Rotate until we face the neighbor with the strongest pheromone.
  // If there was no winner, just move forward.
  for (int i = 0; i < num_rotations; i++) {
    mycell.ConnectionList().CircNext();
  }
  
  m_organism->Move(ctx);
  
  return true;