Method Inst_SenseNextResLevel

avida-core/source/cpu/cHardwareCPU.cc:4481–4512

Must be nop-modified. * Places the number of resources in the group either +1 or -1 in register BX, * wrapping from the top group back to group 1 (skipping 0), * +1 group if the nop register has a positive number * -1 group if the nop register has a negative number. */

 * -1 group if the nop register has a negative number. 
 */
bool cHardwareCPU::Inst_SenseNextResLevel(cAvidaContext& ctx)
{
  // Check for an opinion.
  if (!m_organism->GetOrgInterface().HasOpinion(m_organism)) return false;
  if (m_world->GetConfig().USE_FORM_GROUPS.Get() != 2) return false;
  int opinion = m_organism->GetOpinion().first;
  
  const int num_groups = m_organism->GetOrgInterface().GetResources(ctx).GetSize();
  if (num_groups <= 2) return false;
  
  // If not nop-modified, fails to execute.
  if (!(m_inst_set->IsNop(getIP().GetNextInst()))) return false;
  // Retreives the value from the nop-modifying register.
  const int nop_register = FindModifiedRegister(REG_BX);
  int register_value = GetRegister(nop_register);
  if (register_value == 0) return false;
  
  const Apto::Array<double> res_count = m_organism->GetOrgInterface().GetResources(ctx);
  if (opinion == (num_groups - 1)) {
    if (register_value > 0) GetRegister(REG_BX) = (int) (res_count[1] * 100 + 0.5);
    else if (register_value < 0) GetRegister(REG_BX) = (int) (res_count[opinion - 1] * 100 + 0.5);
  }
  else if ((opinion == 1) || (opinion == 0)) {
    if (register_value > 0) GetRegister(REG_BX) = (int) (res_count[opinion + 1] * 100 + 0.5);
    else if (register_value < 0) GetRegister(REG_BX) = (int) (res_count[num_groups - 1] * 100 + 0.5);
  }
  else if ((opinion != (num_groups - 1)) && (opinion != 1) && (opinion != 0)) {
    if (register_value > 0) GetRegister(REG_BX) = (int) (res_count[opinion + 1] * 100 + 0.5);
    else if (register_value < 0) GetRegister(REG_BX) = (int) (res_count[opinion - 1] * 100 + 0.5);
  }
  return true;
}

bool cHardwareCPU::Inst_SenseDiffFaced(cAvidaContext& ctx) 
{