TbBool attempt_job_work_in_room_for_player(struct Thing *creatng, PlayerNumber plyr_idx, CreatureJob new_job)
{
struct Coord3d pos;
struct Room *room;
RoomKind rkind;
rkind = get_room_for_job(new_job);
SYNCDBG(6,"Starting for %s (owner %d) and job %s in %s room",thing_model_name(creatng),(int)creatng->owner,creature_job_code_name(new_job),room_code_name(rkind));
if ((get_flags_for_job(new_job) & JoKF_NeedsCapacity) != 0) {
room = find_nearest_room_for_thing_with_spare_capacity(creatng, creatng->owner, rkind, NavRtF_Default, 1);
} else {
room = find_nearest_room_for_thing(creatng, creatng->owner, rkind, NavRtF_Default);
}
if (room_is_invalid(room)) {
return false;
}
if (!find_random_valid_position_for_thing_in_room(creatng, room, &pos)) {
return false;
}
if (get_arrive_at_state_for_job(new_job) == CrSt_Unused) {
ERRORLOG("No arrive at state for job %s in %s room",creature_job_code_name(new_job),room_code_name(room->kind));
return false;
}
if (!setup_person_move_to_coord(creatng, &pos, NavRtF_Default)) {
return false;
}
struct CreatureControl *cctrl;
cctrl = creature_control_get_from_thing(creatng);
creatng->continue_state = get_arrive_at_state_for_job(new_job);
cctrl->target_room_id = room->index;
return true;
}
TbBool attempt_anger_job_destroy_rooms(struct Thing *creatng)
{
//return _DK_attempt_anger_job_destroy_rooms(creatng);
if (!can_change_from_state_to(creatng, creatng->active_state, CrSt_CreatureVandaliseRooms)) {
return false;
}
struct Room *room;
struct Coord3d pos;
room = find_nearest_room_for_thing_excluding_two_types(creatng, creatng->owner, 7, 1, 1);
if (room_is_invalid(room)) {
return false;
}
if (!find_random_valid_position_for_thing_in_room(creatng, room, &pos)) {
return false;
}
if (!creature_can_navigate_to_with_storage(creatng, &pos, NavRtF_NoOwner)) {
return false;
}
if (!external_set_thing_state(creatng, CrSt_CreatureVandaliseRooms)) {
return false;
}
if (!setup_random_head_for_room(creatng, room, NavRtF_NoOwner)) {
return false;
}
struct CreatureControl *cctrl;
cctrl = creature_control_get_from_thing(creatng);
creatng->continue_state = CrSt_CreatureVandaliseRooms;
cctrl->target_room_id = room->index;
return true;
}
TbBool good_setup_loot_research_room(struct Thing *thing, long dngn_id)
{
struct CreatureControl *cctrl;
struct Room *room;
room = find_random_room_creature_can_navigate_to(thing, dngn_id, RoK_LIBRARY, NavRtF_Default);
if (room_is_invalid(room))
{
SYNCDBG(6,"No accessible player %d library found",(int)dngn_id);
return false;
}
struct Coord3d pos;
if (!find_random_valid_position_for_thing_in_room(thing, room, &pos))
{
SYNCDBG(6,"No position for %s index %d in %s owned by player %d",
thing_model_name(thing),(int)thing->index,room_code_name(room->kind),(int)room->owner);
return false;
}
if (!setup_person_move_to_coord(thing, &pos, NavRtF_Default))
{
SYNCDBG(6,"Cannot setup move %s index %d to %s owned by player %d",
thing_model_name(thing),(int)thing->index,room_code_name(room->kind),(int)room->owner);
return false;
}
cctrl = creature_control_get_from_thing(thing);
thing->continue_state = CrSt_CreatureSearchForSpellToStealInRoom;
cctrl->target_room_id = room->index;
return true;
}
TbBool good_setup_attack_rooms(struct Thing *creatng, long dngn_id)
{
struct Room *room;
struct CreatureControl *cctrl;
struct Coord3d pos;
room = find_nearest_room_for_thing_excluding_two_types(creatng, dngn_id, 7, 1, 1);
if (room_is_invalid(room))
{
return false;
}
if (!find_random_valid_position_for_thing_in_room(creatng, room, &pos)
|| !creature_can_navigate_to_with_storage(creatng, &pos, NavRtF_NoOwner) )
{
ERRORLOG("The %s cannot destroy %s because it can't reach position within it",thing_model_name(creatng),room_code_name(room->kind));
return false;
}
if (!setup_random_head_for_room(creatng, room, NavRtF_NoOwner))
{
ERRORLOG("The %s cannot destroy %s because it can't head for it",thing_model_name(creatng),room_code_name(room->kind));
return false;
}
cctrl = creature_control_get_from_thing(creatng);
creatng->continue_state = CrSt_GoodArrivedAtAttackRoom;
cctrl->target_room_id = room->index;
return true;
}
short creature_scavenged_disappear(struct Thing *thing)
{
struct CreatureControl *cctrl;
struct Dungeon *dungeon;
struct Room *room;
struct Coord3d pos;
long stl_x, stl_y;
long i;
//return _DK_creature_scavenged_disappear(thing);
cctrl = creature_control_get_from_thing(thing);
cctrl->byte_9A--;
if (cctrl->byte_9A > 0)
{
if ((cctrl->byte_9A == 7) && (cctrl->byte_9B < PLAYERS_COUNT))
{
create_effect(&thing->mappos, get_scavenge_effect_element(cctrl->byte_9B), thing->owner);
}
return 0;
}
// We don't really have to convert coordinates into numbers and back to XY.
i = get_subtile_number(cctrl->scavenge.stl_9D_x, cctrl->scavenge.stl_9D_y);
stl_x = stl_num_decode_x(i);
stl_y = stl_num_decode_y(i);
room = subtile_room_get(stl_x, stl_y);
if (room_is_invalid(room) || (room->kind != RoK_SCAVENGER))
{
ERRORLOG("Room %s at (%d,%d) disappeared.",room_code_name(RoK_SCAVENGER),(int)stl_x,(int)stl_y);
kill_creature(thing, INVALID_THING, -1, CrDed_NoEffects);
return -1;
}
if (find_random_valid_position_for_thing_in_room(thing, room, &pos))
{
move_thing_in_map(thing, &pos);
anger_set_creature_anger_all_types(thing, 0);
dungeon = get_dungeon(cctrl->byte_9B);
dungeon->creatures_scavenge_gain++;
if (is_my_player_number(thing->owner))
output_message(SMsg_MinionScanvenged, 0, true);
cctrl->byte_9C = thing->owner;
change_creature_owner(thing, cctrl->byte_9B);
internal_set_thing_state(thing, CrSt_CreatureScavengedReappear);
return 0;
} else
{
ERRORLOG("No valid position inside %s room for %s.",room_code_name(room->kind),thing_model_name(thing));
kill_creature(thing, INVALID_THING, -1, CrDed_NoEffects);
return -1;
}
}
void setup_move_to_new_training_position(struct Thing *thing, struct Room *room, unsigned long restart)
{
struct CreatureControl *cctrl;
struct CreatureStats *crstat;
struct Thing *prtng;
struct CreatureControl *prctrl;
struct Coord3d pos;
long i;
SYNCDBG(8,"Starting for %s",thing_model_name(thing));
//_DK_setup_move_to_new_training_position(thing, room, a3);
cctrl = creature_control_get_from_thing(thing);
crstat = creature_stats_get_from_thing(thing);
if ( restart )
cctrl->training.search_timeout = 50;
// Try partner training
if ((crstat->partner_training > 0) && (ACTION_RANDOM(100) < crstat->partner_training))
{
prtng = get_creature_in_training_room_which_could_accept_partner(room, thing);
if (!thing_is_invalid(prtng))
{
SYNCDBG(7,"The %s found %s as training partner.",thing_model_name(thing),thing_model_name(prtng));
prctrl = creature_control_get_from_thing(prtng);
prctrl->training.mode = CrTrMd_PartnerTraining;
prctrl->training.train_timeout = 75;
prctrl->training.partner_idx = thing->index;
prctrl->training.partner_creation = thing->creation_turn;
cctrl->training.mode = CrTrMd_PartnerTraining;
cctrl->training.train_timeout = 75;
cctrl->training.partner_idx = prtng->index;
cctrl->training.partner_creation = prtng->creation_turn;
return;
}
}
// No partner - train at some random position
cctrl->training.mode = CrTrMd_SearchForTrainPost;
if (find_random_valid_position_for_thing_in_room(thing, room, &pos))
{
SYNCDBG(8,"Going to train at (%d,%d)",(int)pos.x.stl.num,(int)pos.y.stl.num);
i = get_subtile_number(pos.x.stl.num,pos.y.stl.num);
setup_training_move(thing, i);
} else {
SYNCDBG(8,"No new position found, staying at (%d,%d)",(int)cctrl->moveto_pos.x.stl.num,(int)cctrl->moveto_pos.x.stl.num);
}
if (cctrl->instance_id == CrInst_NULL)
{
set_creature_instance(thing, CrInst_SWING_WEAPON_SWORD, 1, 0, 0);
}
}
TbBool attempt_anger_job_steal_gold(struct Thing *creatng)
{
//return _DK_attempt_anger_job_steal_gold(creatng);
if (!can_change_from_state_to(creatng, creatng->active_state, CrSt_CreatureStealGold)) {
return false;
}
struct CreatureStats *crstat;
crstat = creature_stats_get_from_thing(creatng);
if (creatng->creature.gold_carried >= crstat->gold_hold) {
return false;
}
struct Room *room;
struct Coord3d pos;
room = find_nearest_room_for_thing_with_used_capacity(creatng, creatng->owner, RoK_TREASURE, NavRtF_NoOwner, 1);
if (room_is_invalid(room)) {
return false;
}
if (!find_random_valid_position_for_thing_in_room(creatng, room, &pos)) {
return false;
}
if (!creature_can_navigate_to_with_storage(creatng, &pos, NavRtF_NoOwner)) {
return false;
}
if (!external_set_thing_state(creatng, CrSt_CreatureStealGold)) {
return false;
}
if (!setup_random_head_for_room(creatng, room, NavRtF_NoOwner))
{
ERRORLOG("Cannot setup head for treasury.");
return false;
}
struct CreatureControl *cctrl;
cctrl = creature_control_get_from_thing(creatng);
creatng->continue_state = CrSt_CreatureSearchForGoldToStealInRoom1;
cctrl->target_room_id = room->index;
return true;
}
TbBool creature_scavenge_from_creature_pool(struct Thing *calltng)
{
struct Room *room;
struct Coord3d pos;
room = get_room_thing_is_on(calltng);
if (!room_initially_valid_as_type_for_thing(room, RoK_SCAVENGER, calltng)) {
WARNLOG("Room %s owned by player %d is bad work place for %s owned by played %d",room_code_name(room->kind),(int)room->owner,thing_model_name(calltng),(int)calltng->owner);
return false;
}
if (game.pool.crtr_kind[calltng->model] <= 0) {
ERRORLOG("Tried to generate %s but it is not in pool",thing_model_name(calltng));
return false;
}
if ( !find_random_valid_position_for_thing_in_room(calltng, room, &pos) ) {
ERRORLOG("Could not find valid position for thing to be generated");
return false;
}
struct Thing *scavtng;
scavtng = create_creature(&pos, calltng->model, calltng->owner);
if (thing_is_invalid(scavtng)) {
ERRORLOG("Tried to generate %s but creation failed",thing_model_name(calltng));
return false;
}
if (!remove_creature_from_generate_pool(calltng->model))
{
ERRORLOG("Could not remove %s from pool",thing_model_name(calltng));
return false;
}
{
struct Dungeon *dungeon;
dungeon = get_dungeon(calltng->owner);
dungeon->creatures_scavenge_gain++;
}
internal_set_thing_state(scavtng, CrSt_CreatureScavengedReappear);
return true;
}
