Method ComputeNest

scripts/AIGame.cpp:7981–8043

}

void BarnSwallow::ComputeNest(int me) {
  memory->num_friends = 0;
  int scan_objs[100];
  int n_scan;
  int i;
  vector pos;
  int room;
  int type;
  uint16_t id;

  memory->num_friends = 0;

  for (i = 0; i < BS_MAX_FRIENDS; i++)
    memory->friends[i] = OBJECT_HANDLE_NONE;

  Obj_Value(me, VF_GET, OBJV_V_POS, &pos);
  Obj_Value(me, VF_GET, OBJV_I_ROOMNUM, &room);
  Obj_Value(me, VF_GET, OBJV_I_TYPE, &type);
  Obj_Value(me, VF_GET, OBJV_US_ID, &id);

  memory->home_room = room;
  memory->nest_center =
      pos; // Each robot will have a different center point becuase thier initial positions are weighted twice
  memory->nest_rad = 0.0f;

  n_scan = AI_GetNearbyObjs(&pos, room, 1000.0f, scan_objs, 100, false, true, false, true);

  for (i = 0; i < n_scan; i++) {
    if (scan_objs[i] != me) {
      int c_type;
      uint16_t c_id;
      Obj_Value(scan_objs[i], VF_GET, OBJV_I_TYPE, &c_type);
      Obj_Value(scan_objs[i], VF_GET, OBJV_US_ID, &c_id);

      // See if we are the same species
      if (type == c_type && id == c_id) {
        vector c_pos;
        Obj_Value(scan_objs[i], VF_GET, OBJV_V_POS, &c_pos);

        memory->nest_center += c_pos;

        memory->friends[memory->num_friends++] = scan_objs[i];
      }
    }
  }

  if (memory->num_friends)
    memory->nest_center /= memory->num_friends + 1;

  // Determine the farthest distance from the center of the nest
  for (i = 0; i < memory->num_friends; i++) {
    vector c_pos;
    float dist;
    Obj_Value(memory->friends[i], VF_GET, OBJV_V_POS, &c_pos);
    dist = vm_VectorDistance(&memory->nest_center, &c_pos);

    if (dist * 0.9f > memory->nest_rad)
      memory->nest_rad = dist * 0.9f;