short good_attack_room(struct Thing *thing)
{
// Debug code to find incorrect states
if (!is_hero_thing(thing))
{
ERRORLOG("Non hero %s index %d owner %d - reset",thing_model_name(thing),(int)thing->index,(int)thing->owner);
set_start_state(thing);
return 0;
}
//return _DK_good_attack_room(thing);
MapSlabCoord base_slb_x,base_slb_y;
base_slb_x = subtile_slab_fast(thing->mappos.x.stl.num);
base_slb_y = subtile_slab_fast(thing->mappos.y.stl.num);
struct Room *room;
room = slab_room_get(base_slb_x, base_slb_y);
// If the current tile can be destroyed
if (room_exists(room) && (room->owner != thing->owner) && !room_cannot_vandalise(room->kind))
{
struct CreatureControl *cctrl;
cctrl = creature_control_get_from_thing(thing);
if (cctrl->instance_id == CrInst_NULL)
{
set_creature_instance(thing, CrInst_ATTACK_ROOM_SLAB, 1, 0, 0);
MapCoord ev_coord_x,ev_coord_y;
ev_coord_x = subtile_coord_center(room->central_stl_x);
ev_coord_y = subtile_coord_center(room->central_stl_y);
event_create_event_or_update_nearby_existing_event(ev_coord_x, ev_coord_y, EvKind_RoomUnderAttack, room->owner, 0);
if (is_my_player_number(room->owner))
output_message(SMsg_EnemyDestroyRooms, MESSAGE_DELAY_FIGHT, true);
}
return 1;
}
// Otherwise, search around for a tile to destroy
long m,n;
m = ACTION_RANDOM(SMALL_AROUND_SLAB_LENGTH);
for (n=0; n < SMALL_AROUND_SLAB_LENGTH; n++)
{
MapSlabCoord slb_x,slb_y;
slb_x = base_slb_x + (long)small_around[m].delta_x;
slb_y = base_slb_y + (long)small_around[m].delta_y;
room = slab_room_get(slb_x, slb_y);
if (room_exists(room) && (room->owner != thing->owner))
{
if (setup_person_move_to_position(thing, slb_x, slb_y, NavRtF_Default))
{
thing->continue_state = CrSt_GoodAttackRoom1;
return 1;
}
}
m = (m+1) % SMALL_AROUND_SLAB_LENGTH;
}
set_start_state(thing);
return 0;
}
void do_slab_efficiency_alteration(MapSlabCoord slb_x, MapSlabCoord slb_y)
{
long n;
for (n=0; n < SMALL_AROUND_SLAB_LENGTH; n++)
{
MapSlabCoord sslb_x, sslb_y;
sslb_x = slb_x + small_around[n].delta_x;
sslb_y = slb_y + small_around[n].delta_y;
struct SlabMap *slb;
struct SlabAttr *slbattr;
slb = get_slabmap_block(sslb_x, sslb_y);
if (slabmap_block_invalid(slb)) {
continue;
}
slbattr = get_slab_attrs(slb);
if (slbattr->category == SlbAtCtg_RoomInterior)
{
struct Room *room;
room = slab_room_get(sslb_x, sslb_y);
set_room_efficiency(room);
set_room_capacity(room, true);
}
}
}
TbBool find_place_to_put_door_around_room(const struct Room *room, struct Coord3d *pos)
{
long m,n;
m = ACTION_RANDOM(SMALL_AROUND_SLAB_LENGTH);
for (n = 0; n < SMALL_AROUND_SLAB_LENGTH; n++)
{
// Get position containing room center
MapSlabCoord slb_x,slb_y;
slb_x = subtile_slab_fast(room->central_stl_x);
slb_y = subtile_slab_fast(room->central_stl_y);
// Move the position to edge of the room
struct Room *sibroom;
sibroom = slab_room_get(slb_x, slb_y);
while (!room_is_invalid(sibroom) && (sibroom->index == room->index))
{
slb_x += small_around[m].delta_x;
slb_y += small_around[m].delta_y;
sibroom = slab_room_get(slb_x, slb_y);
}
// Move the position a few tiles further in that direction searching for a place to put door
//TODO COMPUTER_PLAYER Why we can only have doors if corridor is at center of the room? This should be fixed to allow doors everywhere around room.
int i;
for (i = 4; i > 0; i--)
{
struct SlabMap *slb;
slb = get_slabmap_block(slb_x, slb_y);
if ((slabmap_owner(slb) != room->owner) || (slb->kind != SlbT_CLAIMED)) {
i = 0;
break;
}
if (tag_cursor_blocks_place_door(room->owner, slab_subtile_center(slb_x), slab_subtile_center(slb_y))) {
break;
}
if (!subtile_has_door_thing_on(slab_subtile_center(slb_x), slab_subtile_center(slb_y))) {
// No door - the position looks ok
break;
}
slb_x += small_around[m].delta_x;
slb_y += small_around[m].delta_y;
}
// Now if we were able to move, then the position seem ok. One last check - make sure the corridor is not dead end and doesn't already have a door
if (i > 0)
{
MapSlabCoord nxslb_x,nxslb_y;
nxslb_x = slb_x + small_around[m].delta_x;
nxslb_y = slb_y + small_around[m].delta_y;
struct SlabMap *nxslb;
nxslb = get_slabmap_block(nxslb_x, nxslb_y);
if ((slabmap_owner(nxslb) == room->owner) && (nxslb->kind == SlbT_CLAIMED))
{
if (!subtile_has_door_thing_on(slab_subtile_center(nxslb_x), slab_subtile_center(nxslb_y))) {
pos->x.val = subtile_coord_center(slab_subtile_center(slb_x));
pos->y.val = subtile_coord_center(slab_subtile_center(slb_y));
pos->z.val = subtile_coord(1,0);
return true;
}
}
}
m = (m + 1) % SMALL_AROUND_SLAB_LENGTH;
}
return false;
}
