long creature_add_lair_to_room(struct Thing *creatng, struct Room *room)
{
struct Thing *lairtng;
if (!room_has_enough_free_capacity_for_creature(room, creatng))
return 0;
//return _DK_creature_add_lair_to_room(thing, room);
// Make sure we don't already have a lair on that position
lairtng = find_creature_lair_at_subtile(creatng->mappos.x.stl.num, creatng->mappos.y.stl.num, 0);
if (!thing_is_invalid(lairtng))
return 0;
struct CreatureStats *crstat;
struct CreatureControl *cctrl;
crstat = creature_stats_get_from_thing(creatng);
cctrl = creature_control_get_from_thing(creatng);
room->content_per_model[creatng->model]++;
room->used_capacity += crstat->lair_size;
if ((cctrl->lair_room_id > 0) && (cctrl->lairtng_idx > 0))
{
struct Room *room;
room = room_get(cctrl->lair_room_id);
creature_remove_lair_from_room(creatng, room);
}
cctrl->lair_room_id = room->index;
// Create the lair thing
struct CreatureData *crdata;
struct Coord3d pos;
pos.x.val = creatng->mappos.x.val;
pos.y.val = creatng->mappos.y.val;
pos.z.val = creatng->mappos.z.val;
crdata = creature_data_get_from_thing(creatng);
lairtng = create_object(&pos, crdata->field_1, creatng->owner, -1);
if (thing_is_invalid(lairtng))
{
ERRORLOG("Could not create lair totem");
remove_thing_from_mapwho(creatng);
place_thing_in_mapwho(creatng);
return 1; // Return that so we won't try to redo the action over and over
}
lairtng->mappos.z.val = get_thing_height_at(lairtng, &lairtng->mappos);
// Associate creature with the lair
cctrl->lairtng_idx = lairtng->index;
lairtng->word_13 = creatng->index;
lairtng->word_15 = 1;
// Lair size depends on creature level
lairtng->word_17 = 300 * cctrl->explevel / 20 + 300;
lairtng->field_52 = ACTION_RANDOM(0x800);
struct Objects *objdat;
unsigned long i;
objdat = get_objects_data_for_thing(lairtng);
i = convert_td_iso(objdat->field_5);
set_thing_draw(lairtng, i, objdat->field_7, lairtng->word_15, 0, -1, objdat->field_11);
thing_play_sample(creatng, 158, NORMAL_PITCH, 0, 3, 1, 2, FULL_LOUDNESS);
create_effect(&pos, imp_spangle_effects[creatng->owner], creatng->owner);
anger_set_creature_anger(creatng, 0, AngR_NoLair);
remove_thing_from_mapwho(creatng);
place_thing_in_mapwho(creatng);
return 1;
}
void draw_transfer_creature(struct GuiButton *gbtn)
{
unsigned long flgmem;
if (gbtn == NULL)
return;
SYNCDBG(7,"Starting");
flgmem = lbDisplay.DrawFlags;
lbDisplay.DrawFlags = Lb_SPRITE_TRANSPAR4;
LbTextSetFont(winfont);
LbDrawBox(gbtn->scr_pos_x, gbtn->scr_pos_y,
gbtn->width, gbtn->height, 0); // The 0 means black color
LbTextSetWindow(gbtn->scr_pos_x, gbtn->scr_pos_y,
gbtn->width, gbtn->height);
struct Dungeon *dungeon;
dungeon = get_my_dungeon();
struct Thing *thing;
thing = INVALID_THING;
int listitm_idx;
listitm_idx = selected_transfer_creature(dungeon, gbtn);
int tx_units_per_px;
tx_units_per_px = ((gbtn->height*22/26) * 16) / LbTextLineHeight();
if (listitm_idx != -1)
{
thing = get_player_list_nth_creature_of_model(dungeon->creatr_list_start, 0, listitm_idx);
}
if (!thing_is_invalid(thing))
{
const struct CreatureControl *cctrl;
cctrl = creature_control_get_from_thing(thing);
const struct CreatureData *crdata;
crdata = creature_data_get_from_thing(thing);
lbDisplay.DrawFlags = Lb_TEXT_HALIGN_LEFT;
LbTextDrawResizedFmt(0, 0, tx_units_per_px, " %s", get_string(crdata->namestr_idx));
lbDisplay.DrawFlags = Lb_TEXT_HALIGN_RIGHT;
LbTextDrawResizedFmt(0, 0, tx_units_per_px, "%s %d ", get_string(GUIStr_MnuLevel), (int)(cctrl->explevel+1));
}
lbDisplay.DrawFlags = flgmem;
}
