Function cSendDroidObjToExit

scripts/Merc7.cpp:1652–1698

$$ACTION Custom Tell droid [o:Object] to find an exit from Droid Central. cSendDroidObjToExit Sends a message to a droid to find an exit. Sends droid out of Droid Central. If object is not a member of droid central, it adds it. Parameters: Object: A robot $$END */

$$END
*/
void cSendDroidObjToExit(int objhandle) {
  int i;
  bool free_slot = false;

  if (DC_EQR == -100) {
    return;
  }

  for (i = 0; i < DC_N_DROIDS; i++) {
    if (dc_nodes[i].handle == objhandle) {
      // okay, find a free exit
      int exit = FIND_FREE_INDEX(DC_Exit_Mask, DC_N_VALID_EXITS, true);
      int goalid = LEVEL_GOAL_UID(0, DC_Goal_Index++);

      // deallocate terminal if this droid was working at one!!
      if (dc_nodes[i].type == DC_TERM_GOAL) {
        DC_Term_Mask &= ~(1 << dc_nodes[i].type_index);
      }

      mprintf(0, "DC: SENDING DROID [%d] to exit %d (%x)\n", i, exit, DC_Valid_Exit_Handles[exit]);

      aAIGoalGotoObject(objhandle, DC_Valid_Exit_Handles[exit], GOAL_PRIORITY_LOW,
                        GF_FORCE_AWARENESS | GF_ORIENT_VELOCITY, goalid);
      dc_nodes[i].type = DC_EXIT_GOAL;
      dc_nodes[i].type_index = exit;
      dc_nodes[i].goalid = goalid;
      dc_nodes[i].timer = 0.0f;
      DC_Exit_Mask |= (1 << exit); // reserve index

      break;
    }
    if (dc_nodes[i].handle == OBJECT_HANDLE_NONE) {
      free_slot = true;
    }
  }

  if (i == DC_N_DROIDS) {
    if (free_slot) {
      mprintf(0, "DC: Sending an unmanaged droid to exit.  Adding...\n");
      cAddObjToDroidManager(objhandle);
      cSendDroidObjToExit(objhandle); // recursive... safeguards should be already implemented above
    } else {
      // THING TO DO: should be force an object to leave here??
      mprintf(0, "DC: Droid Manager is Full!! We should force a droid to exit.\n");
    }
  }
}

/*
$$ACTION