bool player::install_bionics(it_bionic *type)
{
if (type == NULL) {
debugmsg("Tried to install NULL bionic");
return false;
}
if (bionics.count(type->id) == 0) {
popup("invalid / unknown bionic id %s", type->id.c_str());
return false;
}
if (has_bionic(type->id)) {
if (!(type->id == "bio_power_storage" || type->id == "bio_power_storage_mkII")) {
popup(_("You have already installed this bionic."));
return false;
}
}
int chance_of_success = bionic_manip_cos(int_cur,
skillLevel("electronics"),
skillLevel("firstaid"),
skillLevel("mechanics"),
type->difficulty);
if (!query_yn(
_("WARNING: %i percent chance of genetic damage, blood loss, or damage to existing bionics! Install anyway?"),
100 - chance_of_success)) {
return false;
}
int pow_up = 0;
if (type->id == "bio_power_storage" || type->id == "bio_power_storage_mkII") {
pow_up = BATTERY_AMOUNT;
if (type->id == "bio_power_storage_mkII") {
pow_up = 250;
}
}
practice( "electronics", int((100 - chance_of_success) * 1.5) );
practice( "firstaid", int((100 - chance_of_success) * 1.0) );
practice( "mechanics", int((100 - chance_of_success) * 0.5) );
int success = chance_of_success - rng(1, 100);
if (success > 0) {
add_memorial_log(pgettext("memorial_male", "Installed bionic: %s."),
pgettext("memorial_female", "Installed bionic: %s."),
bionics[type->id]->name.c_str());
if (pow_up) {
max_power_level += pow_up;
add_msg_if_player(m_good, _("Increased storage capacity by %i"), pow_up);
} else {
add_msg(m_good, _("Successfully installed %s."), bionics[type->id]->name.c_str());
add_bionic(type->id);
}
} else {
add_memorial_log(pgettext("memorial_male", "Installed bionic: %s."),
pgettext("memorial_female", "Installed bionic: %s."),
bionics[type->id]->name.c_str());
bionics_install_failure(this, type, success);
}
g->refresh_all();
return true;
}
void Character::drop_inventory_overflow() {
if( volume_carried() > volume_capacity() ) {
for( auto &item_to_drop :
inv.remove_randomly_by_volume( volume_carried() - volume_capacity() ) ) {
g->m.add_item_or_charges( pos(), item_to_drop );
}
add_msg_if_player( m_bad, _("Some items tumble to the ground.") );
}
}
bool player::disassemble( item &obj, int pos, bool ground, bool interactive )
{
// check sufficient tools for disassembly
std::string err;
if( !can_disassemble( obj, crafting_inventory(), &err ) ) {
if( interactive ) {
add_msg_if_player( m_info, "%s", err.c_str() );
}
return false;
}
const auto &r = recipe_dictionary::get_uncraft( obj.typeId() );
// last chance to back out
if( interactive && get_option<bool>( "QUERY_DISASSEMBLE" ) ) {
const auto components( r.disassembly_requirements().get_components() );
std::ostringstream list;
for( const auto &elem : components ) {
list << "- " << elem.front().to_string() << std::endl;
}
if( !query_yn( _( "Disassembling the %s may yield:\n%s\nReally disassemble?" ), obj.tname().c_str(),
list.str().c_str() ) ) {
return false;
}
}
if( activity.id() != activity_id( "ACT_DISASSEMBLE" ) ) {
assign_activity( activity_id( "ACT_DISASSEMBLE" ), r.time );
} else if( activity.moves_left <= 0 ) {
activity.moves_left = r.time;
}
activity.values.push_back( pos );
activity.coords.push_back( ground ? this->pos() : tripoint_min );
activity.str_values.push_back( r.result );
return true;
}
void game::throw_item(player &p, int tarx, int tary, item &thrown,
std::vector<point> &trajectory)
{
int deviation = 0;
int trange = 1.5 * rl_dist(p.posx, p.posy, tarx, tary);
std::set<std::string> no_effects;
// Throwing attempts below "Basic Competency" level are extra-bad
int skillLevel = p.skillLevel("throw");
if (skillLevel < 3)
deviation += rng(0, 8 - skillLevel);
if (skillLevel < 8)
deviation += rng(0, 8 - skillLevel);
else
deviation -= skillLevel - 6;
deviation += p.throw_dex_mod();
if (p.per_cur < 6)
deviation += rng(0, 8 - p.per_cur);
else if (p.per_cur > 8)
deviation -= p.per_cur - 8;
deviation += rng(0, p.encumb(bp_hands) * 2 + p.encumb(bp_eyes) + 1);
if (thrown.volume() > 5)
deviation += rng(0, 1 + (thrown.volume() - 5) / 4);
if (thrown.volume() == 0)
deviation += rng(0, 3);
deviation += rng(0, 1 + abs(p.str_cur - thrown.weight() / 113));
double missed_by = .01 * deviation * trange;
bool missed = false;
int tart;
if (missed_by >= 1)
{
// We missed D:
// Shoot a random nearby space?
if (missed_by > 9)
missed_by = 9;
tarx += rng(0 - int(sqrt(double(missed_by))), int(sqrt(double(missed_by))));
tary += rng(0 - int(sqrt(double(missed_by))), int(sqrt(double(missed_by))));
if (m.sees(p.posx, p.posy, tarx, tary, -1, tart))
trajectory = line_to(p.posx, p.posy, tarx, tary, tart);
else
trajectory = line_to(p.posx, p.posy, tarx, tary, 0);
missed = true;
add_msg_if_player(&p,_("You miss!"));
}
else if (missed_by >= .6)
{
// Hit the space, but not necessarily the monster there
missed = true;
add_msg_if_player(&p,_("You barely miss!"));
}
std::string message;
int real_dam = (thrown.weight() / 452 + thrown.type->melee_dam / 2 + p.str_cur / 2) /
double(2 + double(thrown.volume() / 4));
if (real_dam > thrown.weight() / 40)
real_dam = thrown.weight() / 40;
if (p.has_active_bionic("bio_railgun") && (thrown.made_of("iron") || thrown.made_of("steel")))
{
real_dam *= 2;
}
int dam = real_dam;
int i = 0, tx = 0, ty = 0;
for (i = 0; i < trajectory.size() && dam >= 0; i++)
{
message = "";
double goodhit = missed_by;
tx = trajectory[i].x;
ty = trajectory[i].y;
// If there's a monster in the path of our item, and either our aim was true,
// OR it's not the monster we were aiming at and we were lucky enough to hit it
if (mon_at(tx, ty) != -1 &&
(!missed || one_in(7 - int(z[mon_at(tx, ty)].type->size))))
{
if (rng(0, 100) < 20 + skillLevel * 12 &&
thrown.type->melee_cut > 0)
{
if (!p.is_npc())
{
message += string_format(_(" You cut the %s!"), z[mon_at(tx, ty)].name().c_str());
}
if (thrown.type->melee_cut > z[mon_at(tx, ty)].armor_cut())
dam += (thrown.type->melee_cut - z[mon_at(tx, ty)].armor_cut());
}
if (thrown.made_of("glass") && !thrown.active && // active = molotov, etc.
rng(0, thrown.volume() + 8) - rng(0, p.str_cur) < thrown.volume())
{
if (u_see(tx, ty))
add_msg(_("The %s shatters!"), thrown.tname().c_str());
for (int i = 0; i < thrown.contents.size(); i++)
m.add_item_or_charges(tx, ty, thrown.contents[i]);
sound(tx, ty, 16, _("glass breaking!"));
int glassdam = rng(0, thrown.volume() * 2);
if (glassdam > z[mon_at(tx, ty)].armor_cut())
dam += (glassdam - z[mon_at(tx, ty)].armor_cut());
}
else
m.add_item_or_charges(tx, ty, thrown);
if (i < trajectory.size() - 1)
goodhit = double(double(rand() / RAND_MAX) / 2);
if (goodhit < .1 && !z[mon_at(tx, ty)].has_flag(MF_NOHEAD))
{
message = _("Headshot!");
dam = rng(dam, dam * 3);
p.practice(turn, "throw", 5);
}
else if (goodhit < .2)
{
message = _("Critical!");
dam = rng(dam, dam * 2);
p.practice(turn, "throw", 2);
}
else if (goodhit < .4)
dam = rng(int(dam / 2), int(dam * 1.5));
else if (goodhit < .5)
{
message = _("Grazing hit.");
dam = rng(0, dam);
}
if (u_see(tx, ty)) {
g->add_msg_player_or_npc(&p,
_("%s You hit the %s for %d damage."),
_("%s <npcname> hits the %s for %d damage."),
message.c_str(), z[mon_at(tx, ty)].name().c_str(), dam);
}
if (z[mon_at(tx, ty)].hurt(dam, real_dam))
kill_mon(mon_at(tx, ty), !p.is_npc());
return;
}
else // No monster hit, but the terrain might be.
{
m.shoot(this, tx, ty, dam, false, no_effects);
}
if (m.move_cost(tx, ty) == 0)
{
if (i > 0)
{
tx = trajectory[i - 1].x;
ty = trajectory[i - 1].y;
}
else
{
tx = u.posx;
ty = u.posy;
}
i = trajectory.size();
}
if (p.has_active_bionic("bio_railgun") && (thrown.made_of("iron") || thrown.made_of("steel")))
{
m.add_field(this, tx, ty, fd_electricity, rng(2,3));
}
}
if (m.move_cost(tx, ty) == 0)
{
if (i > 1)
{
tx = trajectory[i - 2].x;
ty = trajectory[i - 2].y;
}
else
{
tx = u.posx;
ty = u.posy;
}
}
if (thrown.made_of("glass") && !thrown.active && // active means molotov, etc
rng(0, thrown.volume() + 8) - rng(0, p.str_cur) < thrown.volume())
{
if (u_see(tx, ty))
add_msg(_("The %s shatters!"), thrown.tname().c_str());
for (int i = 0; i < thrown.contents.size(); i++)
m.add_item_or_charges(tx, ty, thrown.contents[i]);
sound(tx, ty, 16, _("glass breaking!"));
}
else
{
sound(tx, ty, 8, _("thud."));
m.add_item_or_charges(tx, ty, thrown);
}
}
bool player::mutate_towards( const trait_id &mut )
{
if (has_child_flag(mut)) {
remove_child_flag(mut);
return true;
}
const mutation_branch &mdata = mut.obj();
bool has_prereqs = false;
bool prereq1 = false;
bool prereq2 = false;
std::vector<trait_id> canceltrait;
std::vector<trait_id> prereq = mdata.prereqs;
std::vector<trait_id> prereqs2 = mdata.prereqs2;
std::vector<trait_id> cancel = mdata.cancels;
for (size_t i = 0; i < cancel.size(); i++) {
if (!has_trait( cancel[i] )) {
cancel.erase(cancel.begin() + i);
i--;
} else if (has_base_trait( cancel[i] )) {
//If we have the trait, but it's a base trait, don't allow it to be removed normally
canceltrait.push_back( cancel[i]);
cancel.erase(cancel.begin() + i);
i--;
}
}
for (size_t i = 0; i < cancel.size(); i++) {
if (!cancel.empty()) {
trait_id removed = cancel[i];
remove_mutation(removed);
cancel.erase(cancel.begin() + i);
i--;
// This checks for cases where one trait knocks out several others
// Probably a better way, but gets it Fixed Now--KA101
return mutate_towards(mut);
}
}
for (size_t i = 0; (!prereq1) && i < prereq.size(); i++) {
if (has_trait(prereq[i])) {
prereq1 = true;
}
}
for (size_t i = 0; (!prereq2) && i < prereqs2.size(); i++) {
if (has_trait(prereqs2[i])) {
prereq2 = true;
}
}
if (prereq1 && prereq2) {
has_prereqs = true;
}
if (!has_prereqs && (!prereq.empty() || !prereqs2.empty())) {
if (!prereq1 && !prereq.empty()) {
return mutate_towards( random_entry( prereq ) );
} else if (!prereq2 && !prereqs2.empty()) {
return mutate_towards( random_entry( prereqs2 ) );
}
}
// Check for threshold mutation, if needed
bool threshold = mdata.threshold;
bool profession = mdata.profession;
bool has_threshreq = false;
std::vector<trait_id> threshreq = mdata.threshreq;
// It shouldn't pick a Threshold anyway--they're supposed to be non-Valid
// and aren't categorized. This can happen if someone makes a threshold mutation into a prerequisite.
if (threshold) {
add_msg_if_player(_("You feel something straining deep inside you, yearning to be free..."));
return false;
}
if (profession) {
// Profession picks fail silently
return false;
}
for (size_t i = 0; !has_threshreq && i < threshreq.size(); i++) {
if (has_trait(threshreq[i])) {
has_threshreq = true;
}
}
// No crossing The Threshold by simply not having it
if (!has_threshreq && !threshreq.empty()) {
add_msg_if_player(_("You feel something straining deep inside you, yearning to be free..."));
return false;
}
// Check if one of the prerequisites that we have TURNS INTO this one
trait_id replacing = trait_id::NULL_ID();
prereq = mdata.prereqs; // Reset it
for( auto &elem : prereq ) {
if( has_trait( elem ) ) {
trait_id pre = elem;
const auto &p = pre.obj();
for (size_t j = 0; !replacing && j < p.replacements.size(); j++) {
if (p.replacements[j] == mut) {
replacing = pre;
}
}
}
}
// Loop through again for prereqs2
trait_id replacing2 = trait_id::NULL_ID();
prereq = mdata.prereqs2; // Reset it
for( auto &elem : prereq ) {
if( has_trait( elem ) ) {
trait_id pre2 = elem;
const auto &p = pre2.obj();
for (size_t j = 0; !replacing2 && j < p.replacements.size(); j++) {
if (p.replacements[j] == mut) {
replacing2 = pre2;
}
}
}
}
set_mutation(mut);
bool mutation_replaced = false;
game_message_type rating;
if( replacing ) {
const auto &replace_mdata = replacing.obj();
if(mdata.mixed_effect || replace_mdata.mixed_effect) {
rating = m_mixed;
} else if(replace_mdata.points - mdata.points < 0) {
rating = m_good;
} else if(mdata.points - replace_mdata.points < 0) {
rating = m_bad;
} else {
rating = m_neutral;
}
// TODO: Limit this to visible mutations
// TODO: In case invisible mutation turns into visible or vice versa
// print only the visible mutation appearing/disappearing
add_msg_player_or_npc(rating,
_("Your %1$s mutation turns into %2$s!"),
_("<npcname>'s %1$s mutation turns into %2$s!"),
replace_mdata.name.c_str(), mdata.name.c_str() );
add_memorial_log(pgettext("memorial_male", "'%s' mutation turned into '%s'"),
pgettext("memorial_female", "'%s' mutation turned into '%s'"),
replace_mdata.name.c_str(), mdata.name.c_str());
unset_mutation(replacing);
mutation_loss_effect(replacing);
mutation_effect(mut);
mutation_replaced = true;
}
if( replacing2 ) {
const auto &replace_mdata = replacing2.obj();
if(mdata.mixed_effect || replace_mdata.mixed_effect) {
rating = m_mixed;
} else if(replace_mdata.points - mdata.points < 0) {
rating = m_good;
} else if(mdata.points - replace_mdata.points < 0) {
rating = m_bad;
} else {
rating = m_neutral;
}
add_msg_player_or_npc(rating,
_("Your %1$s mutation turns into %2$s!"),
_("<npcname>'s %1$s mutation turns into %2$s!"),
replace_mdata.name.c_str(), mdata.name.c_str() );
add_memorial_log(pgettext("memorial_male", "'%s' mutation turned into '%s'"),
pgettext("memorial_female", "'%s' mutation turned into '%s'"),
replace_mdata.name.c_str(), mdata.name.c_str());
unset_mutation(replacing2);
mutation_loss_effect(replacing2);
mutation_effect(mut);
mutation_replaced = true;
}
for (size_t i = 0; i < canceltrait.size(); i++) {
const auto &cancel_mdata = canceltrait[i].obj();
if(mdata.mixed_effect || cancel_mdata.mixed_effect) {
rating = m_mixed;
} else if(mdata.points < cancel_mdata.points) {
rating = m_bad;
} else if(mdata.points > cancel_mdata.points) {
rating = m_good;
} else if(mdata.points == cancel_mdata.points) {
rating = m_neutral;
} else {
rating = m_mixed;
}
// If this new mutation cancels a base trait, remove it and add the mutation at the same time
add_msg_player_or_npc( rating,
_("Your innate %1$s trait turns into %2$s!"),
_("<npcname>'s innate %1$s trait turns into %2$s!"),
cancel_mdata.name.c_str(), mdata.name.c_str() );
add_memorial_log(pgettext("memorial_male", "'%s' mutation turned into '%s'"),
pgettext("memorial_female", "'%s' mutation turned into '%s'"),
cancel_mdata.name.c_str(), mdata.name.c_str());
unset_mutation(canceltrait[i]);
mutation_loss_effect(canceltrait[i]);
mutation_effect(mut);
mutation_replaced = true;
}
if (!mutation_replaced) {
if(mdata.mixed_effect) {
rating = m_mixed;
} else if(mdata.points > 0) {
rating = m_good;
} else if(mdata.points < 0) {
rating = m_bad;
} else {
rating = m_neutral;
}
// TODO: Limit to visible mutations
add_msg_player_or_npc( rating,
_("You gain a mutation called %s!"),
_("<npcname> gains a mutation called %s!"),
mdata.name.c_str() );
add_memorial_log(pgettext("memorial_male", "Gained the mutation '%s'."),
pgettext("memorial_female", "Gained the mutation '%s'."),
mdata.name.c_str());
mutation_effect(mut);
}
set_highest_cat_level();
drench_mut_calc();
return true;
}
void player::activate_mutation( const trait_id &mut )
{
const mutation_branch &mdata = mut.obj();
auto &tdata = my_mutations[mut];
int cost = mdata.cost;
// You can take yourself halfway to Near Death levels of hunger/thirst.
// Fatigue can go to Exhausted.
if ((mdata.hunger && get_hunger() >= 700) || (mdata.thirst && get_thirst() >= 260) ||
(mdata.fatigue && get_fatigue() >= EXHAUSTED)) {
// Insufficient Foo to *maintain* operation is handled in player::suffer
add_msg_if_player(m_warning, _("You feel like using your %s would kill you!"), mdata.name.c_str());
return;
}
if (tdata.powered && tdata.charge > 0) {
// Already-on units just lose a bit of charge
tdata.charge--;
} else {
// Not-on units, or those with zero charge, have to pay the power cost
if (mdata.cooldown > 0) {
tdata.charge = mdata.cooldown - 1;
}
if (mdata.hunger){
mod_hunger(cost);
}
if (mdata.thirst){
mod_thirst(cost);
}
if (mdata.fatigue){
mod_fatigue(cost);
}
tdata.powered = true;
// Handle stat changes from activation
apply_mods(mut, true);
recalc_sight_limits();
}
if( mut == trait_WEB_WEAVER ) {
g->m.add_field( pos(), fd_web, 1 );
add_msg_if_player(_("You start spinning web with your spinnerets!"));
} else if (mut == "BURROW"){
if( is_underwater() ) {
add_msg_if_player(m_info, _("You can't do that while underwater."));
tdata.powered = false;
return;
}
tripoint dirp;
if (!choose_adjacent(_("Burrow where?"), dirp)) {
tdata.powered = false;
return;
}
if( dirp == pos() ) {
add_msg_if_player(_("You've got places to go and critters to beat."));
add_msg_if_player(_("Let the lesser folks eat their hearts out."));
tdata.powered = false;
return;
}
time_duration time_to_do = 0_turns;
if (g->m.is_bashable(dirp) && g->m.has_flag("SUPPORTS_ROOF", dirp) &&
g->m.ter(dirp) != t_tree) {
// Being better-adapted to the task means that skillful Survivors can do it almost twice as fast.
time_to_do = 30_minutes;
} else if (g->m.move_cost(dirp) == 2 && g->get_levz() == 0 &&
g->m.ter(dirp) != t_dirt && g->m.ter(dirp) != t_grass) {
time_to_do = 10_minutes;
} else {
add_msg_if_player(m_info, _("You can't burrow there."));
tdata.powered = false;
return;
}
assign_activity( activity_id( "ACT_BURROW" ), to_moves<int>( time_to_do ), -1, 0 );
activity.placement = dirp;
add_msg_if_player(_("You tear into the %s with your teeth and claws."),
g->m.tername(dirp).c_str());
tdata.powered = false;
return; // handled when the activity finishes
} else if( mut == trait_SLIMESPAWNER ) {
std::vector<tripoint> valid;
for( const tripoint &dest : g->m.points_in_radius( pos(), 1 ) ) {
if (g->is_empty(dest)) {
valid.push_back( dest );
}
}
// Oops, no room to divide!
if( valid.empty() ) {
add_msg_if_player(m_bad, _("You focus, but are too hemmed in to birth a new slimespring!"));
tdata.powered = false;
return;
}
add_msg_if_player(m_good, _("You focus, and with a pleasant splitting feeling, birth a new slimespring!"));
int numslime = 1;
for (int i = 0; i < numslime && !valid.empty(); i++) {
const tripoint target = random_entry_removed( valid );
if( monster * const slime = g->summon_mon( mtype_id( "mon_player_blob" ), target ) ) {
slime->friendly = -1;
}
}
if (one_in(3)) {
//~ Usual enthusiastic slimespring small voices! :D
add_msg_if_player(m_good, _("wow! you look just like me! we should look out for each other!"));
} else if (one_in(2)) {
//~ Usual enthusiastic slimespring small voices! :D
add_msg_if_player(m_good, _("come on, big me, let's go!"));
} else {
//~ Usual enthusiastic slimespring small voices! :D
add_msg_if_player(m_good, _("we're a team, we've got this!"));
}
tdata.powered = false;
return;
} else if( mut == trait_NAUSEA || mut == trait_VOMITOUS ) {
vomit();
tdata.powered = false;
return;
} else if( mut == trait_M_FERTILE ) {
spores();
tdata.powered = false;
return;
} else if( mut == trait_M_BLOOM ) {
blossoms();
tdata.powered = false;
return;
} else if( mut == trait_SELFAWARE ) {
print_health();
tdata.powered = false;
return;
} else if( !mdata.spawn_item.empty() ) {
item tmpitem( mdata.spawn_item );
i_add_or_drop( tmpitem );
add_msg_if_player( _( mdata.spawn_item_message.c_str() ) );
tdata.powered = false;
return;
}
}
bool Character::move_effects(bool attacking)
{
if (has_effect("downed")) {
if (rng(0, 40) > get_dex() + int(get_str() / 2)) {
add_msg_if_player(_("You struggle to stand."));
} else {
add_msg_player_or_npc(m_good, _("You stand up."),
_("<npcname> stands up."));
remove_effect("downed");
}
return false;
}
if (has_effect("webbed")) {
if (x_in_y(get_str(), 6 * get_effect_int("webbed"))) {
add_msg_player_or_npc(m_good, _("You free yourself from the webs!"),
_("<npcname> frees themselves from the webs!"));
remove_effect("webbed");
} else {
add_msg_if_player(_("You try to free yourself from the webs, but can't get loose!"));
}
return false;
}
if (has_effect("lightsnare")) {
if(x_in_y(get_str(), 12) || x_in_y(get_dex(), 8)) {
remove_effect("lightsnare");
add_msg_player_or_npc(m_good, _("You free yourself from the light snare!"),
_("<npcname> frees themselves from the light snare!"));
item string("string_36", calendar::turn);
item snare("snare_trigger", calendar::turn);
g->m.add_item_or_charges(posx(), posy(), string);
g->m.add_item_or_charges(posx(), posy(), snare);
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the light snare, but can't get loose!"));
}
return false;
}
if (has_effect("heavysnare")) {
if(x_in_y(get_str(), 32) || x_in_y(get_dex(), 16)) {
remove_effect("heavysnare");
add_msg_player_or_npc(m_good, _("You free yourself from the heavy snare!"),
_("<npcname> frees themselves from the heavy snare!"));
item rope("rope_6", calendar::turn);
item snare("snare_trigger", calendar::turn);
g->m.add_item_or_charges(posx(), posy(), rope);
g->m.add_item_or_charges(posx(), posy(), snare);
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the heavy snare, but can't get loose!"));
}
return false;
}
if (has_effect("beartrap")) {
/* Real bear traps can't be removed without the proper tools or immense strength; eventually this should
allow normal players two options: removal of the limb or removal of the trap from the ground
(at which point the player could later remove it from the leg with the right tools).
As such we are currently making it a bit easier for players and NPC's to get out of bear traps.
*/
if(x_in_y(get_str(), 100)) {
remove_effect("beartrap");
add_msg_player_or_npc(m_good, _("You free yourself from the bear trap!"),
_("<npcname> frees themselves from the bear trap!"));
item beartrap("beartrap", calendar::turn);
g->m.add_item_or_charges(posx(), posy(), beartrap);
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the bear trap, but can't get loose!"));
}
return false;
}
if (has_effect("crushed")) {
// Strength helps in getting free, but dex also helps you worm your way out of the rubble
if(x_in_y(get_str() + get_dex() / 4, 100)) {
remove_effect("crushed");
add_msg_player_or_npc(m_good, _("You free yourself from the rubble!"),
_("<npcname> frees themselves from the rubble!"));
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the rubble, but can't get loose!"));
}
return false;
}
// Below this point are things that allow for movement if they succeed
// Currently we only have one thing that forces movement if you succeed, should we get more
// than this will need to be reworked to only have success effects if /all/ checks succeed
if (has_effect("in_pit")) {
if (rng(0, 40) > get_str() + int(get_dex() / 2)) {
add_msg_if_player(m_bad, _("You try to escape the pit, but slip back in."));
return false;
} else {
add_msg_player_or_npc(m_good, _("You escape the pit!"),
_("<npcname> escapes the pit!"));
remove_effect("in_pit");
}
}
if (has_effect("grabbed")){
int zed_number = 0;
for( auto &&dest : g->m.points_in_radius( pos(), 1, 0 ) ){
if (g->mon_at(dest) != -1){
zed_number ++;
}
}
if (attacking == true || zed_number == 0){
return true;
}
if (get_dex() > get_str() ? rng(0, get_dex()) : rng( 0, get_str()) < rng( get_effect_int("grabbed") , 8) ){
add_msg_player_or_npc(m_bad, _("You try break out of the grab, but fail!"),
_("<npcname> tries to break out of the grab, but fails!"));
return false;
} else {
add_msg_player_or_npc(m_good, _("You break out of the grab!"),
_("<npcname> breaks out of the grab!"));
remove_effect("grabbed");
}
}
return Creature::move_effects(attacking);
}
void player::consume_effects( item &food, bool rotten )
{
if( !food.is_food() ) {
debugmsg( "called player::consume_effects with non-comestible" );
return;
}
const auto comest = food.type->comestible.get();
const int capacity = stomach_capacity();
if( has_trait( "THRESH_PLANT" ) && food.type->can_use( "PLANTBLECH" ) ) {
// Just keep nutrition capped, to prevent vomiting
cap_nutrition_thirst( *this, capacity, true, true );
return;
}
if( ( has_trait( "HERBIVORE" ) || has_trait( "RUMINANT" ) ) &&
food.has_any_flag( herbivore_blacklist ) ) {
// No good can come of this.
return;
}
float factor = 1.0f;
float hunger_factor = 1.0f;
bool unhealthy_allowed = true;
if( has_trait( "GIZZARD" ) ) {
factor *= 0.6f;
}
if( has_trait( "CARNIVORE" ) && food.has_flag( "CARNIVORE_OK" ) ) {
// At least partially edible
if( food.has_any_flag( carnivore_blacklist ) ) {
// Other things are in it, we only get partial benefits
add_msg_if_player( _( "You pick out the edible parts and throw away the rest." ) );
factor *= 0.5f;
} else {
// Carnivores don't get unhealthy off pure meat diets
unhealthy_allowed = false;
}
}
// Saprophages get full nutrition from rotting food
if( rotten && !has_trait( "SAPROPHAGE" ) ) {
// everyone else only gets a portion of the nutrition
hunger_factor *= rng_float( 0, 1 );
// and takes a health penalty if they aren't adapted
if( !has_trait( "SAPROVORE" ) && !has_bionic( "bio_digestion" ) ) {
mod_healthy_mod( -30, -200 );
}
}
// Bio-digestion gives extra nutrition
if( has_bionic( "bio_digestion" ) ) {
hunger_factor += rng_float( 0, 1 );
}
const auto nutr = nutrition_for( food.type );
mod_hunger( -nutr * factor * hunger_factor );
mod_thirst( -comest->quench * factor );
mod_stomach_food( nutr * factor * hunger_factor );
mod_stomach_water( comest->quench * factor );
if( unhealthy_allowed || comest->healthy > 0 ) {
// Effectively no cap on health modifiers from food
mod_healthy_mod( comest->healthy, ( comest->healthy >= 0 ) ? 200 : -200 );
}
if( comest->stim != 0 &&
( abs( stim ) < ( abs( comest->stim ) * 3 ) ||
sgn( stim ) != sgn( comest->stim ) ) ) {
if( comest->stim < 0 ) {
stim = std::max( comest->stim * 3, stim + comest->stim );
} else {
stim = std::min( comest->stim * 3, stim + comest->stim );
}
}
add_addiction( comest->add, comest->addict );
if( addiction_craving( comest->add ) != MORALE_NULL ) {
rem_morale( addiction_craving( comest->add ) );
}
if( food.has_flag( "HOT" ) && food.has_flag( "EATEN_HOT" ) ) {
add_morale( MORALE_FOOD_HOT, 5, 10 );
}
auto fun = comest->fun;
if( food.has_flag( "COLD" ) && food.has_flag( "EATEN_COLD" ) && fun > 0 ) {
if( fun > 0 ) {
add_morale( MORALE_FOOD_GOOD, fun * 3, fun * 3, 60, 30, false, food.type );
} else {
fun = 1;
}
}
const bool gourmand = has_trait( "GOURMAND" );
const bool hibernate = has_active_mutation( "HIBERNATE" );
if( gourmand ) {
if( fun < -2 ) {
add_morale( MORALE_FOOD_BAD, fun * 0.5, fun, 60, 30, false, food.type );
} else if( fun > 0 ) {
add_morale( MORALE_FOOD_GOOD, fun * 3, fun * 6, 60, 30, false, food.type );
}
} else if( fun < 0 ) {
add_morale( MORALE_FOOD_BAD, fun, fun * 6, 60, 30, false, food.type );
} else if( fun > 0 ) {
add_morale( MORALE_FOOD_GOOD, fun, fun * 4, 60, 30, false, food.type );
}
if( hibernate ) {
if( ( nutr > 0 && get_hunger() < -60 ) || ( comest->quench > 0 && get_thirst() < -60 ) ) {
//Tell the player what's going on
add_msg_if_player( _( "You gorge yourself, preparing to hibernate." ) );
if( one_in( 2 ) ) {
//50% chance of the food tiring you
mod_fatigue( nutr );
}
}
if( ( nutr > 0 && get_hunger() < -200 ) || ( comest->quench > 0 && get_thirst() < -200 ) ) {
//Hibernation should cut burn to 60/day
add_msg_if_player( _( "You feel stocked for a day or two. Got your bed all ready and secured?" ) );
if( one_in( 2 ) ) {
//And another 50%, intended cumulative
mod_fatigue( nutr );
}
}
if( ( nutr > 0 && get_hunger() < -400 ) || ( comest->quench > 0 && get_thirst() < -400 ) ) {
add_msg_if_player(
_( "Mmm. You can still fit some more in...but maybe you should get comfortable and sleep." ) );
if( !one_in( 3 ) ) {
//Third check, this one at 66%
mod_fatigue( nutr );
}
}
if( ( nutr > 0 && get_hunger() < -600 ) || ( comest->quench > 0 && get_thirst() < -600 ) ) {
add_msg_if_player( _( "That filled a hole! Time for bed..." ) );
// At this point, you're done. Schlaf gut.
mod_fatigue( nutr );
}
}
// Moved here and changed a bit - it was too complex
// Incredibly minor stuff like this shouldn't require complexity
if( !is_npc() && has_trait( "SLIMESPAWNER" ) &&
( get_hunger() < capacity + 40 || get_thirst() < capacity + 40 ) ) {
add_msg_if_player( m_mixed,
_( "You feel as though you're going to split open! In a good way?" ) );
mod_pain( 5 );
std::vector<tripoint> valid;
for( const tripoint &dest : g->m.points_in_radius( pos(), 1 ) ) {
if( g->is_empty( dest ) ) {
valid.push_back( dest );
}
}
int numslime = 1;
for( int i = 0; i < numslime && !valid.empty(); i++ ) {
const tripoint target = random_entry_removed( valid );
if( g->summon_mon( mon_player_blob, target ) ) {
monster *slime = g->monster_at( target );
slime->friendly = -1;
}
}
mod_hunger( 40 );
mod_thirst( 40 );
//~slimespawns have *small voices* which may be the Nice equivalent
//~of the Rat King's ALL CAPS invective. Probably shared-brain telepathy.
add_msg_if_player( m_good, _( "hey, you look like me! let's work together!" ) );
}
// Last thing that happens before capping hunger
if( get_hunger() < capacity && has_trait( "EATHEALTH" ) ) {
int excess_food = capacity - get_hunger();
add_msg_player_or_npc( _( "You feel the %s filling you out." ),
_( "<npcname> looks better after eating the %s." ),
food.tname().c_str() );
// Guaranteed 1 HP healing, no matter what. You're welcome. ;-)
if( excess_food <= 5 ) {
healall( 1 );
} else {
// Straight conversion, except it's divided amongst all your body parts.
healall( excess_food /= 5 );
}
// Note: We want this here to prevent "you can't finish this" messages
set_hunger( capacity );
}
cap_nutrition_thirst( *this, capacity, nutr > 0, comest->quench > 0 );
}
bool Character::move_effects()
{
if (has_effect("downed")) {
if (rng(0, 40) > get_dex() + int(get_str() / 2)) {
add_msg_if_player(_("You struggle to stand."));
} else {
add_msg_player_or_npc(m_good, _("You stand up."),
_("<npcname> stands up."));
remove_effect("downed");
}
return false;
}
if (has_effect("webbed")) {
if (x_in_y(get_str(), 6 * get_effect_int("webbed"))) {
add_msg_player_or_npc(m_good, _("You free yourself from the webs!"),
_("<npcname> frees themselves from the webs!"));
remove_effect("webbed");
} else {
add_msg_if_player(_("You try to free yourself from the webs, but can't get loose!"));
}
return false;
}
if (has_effect("lightsnare")) {
if(x_in_y(get_str(), 12) || x_in_y(get_dex(), 8)) {
remove_effect("lightsnare");
add_msg_player_or_npc(m_good, _("You free yourself from the light snare!"),
_("<npcname> frees themselves from the light snare!"));
item string("string_36", calendar::turn);
item snare("snare_trigger", calendar::turn);
g->m.add_item_or_charges(posx(), posy(), string);
g->m.add_item_or_charges(posx(), posy(), snare);
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the light snare, but can't get loose!"));
}
return false;
}
if (has_effect("heavysnare")) {
if(x_in_y(get_str(), 32) || x_in_y(get_dex(), 16)) {
remove_effect("heavysnare");
add_msg_player_or_npc(m_good, _("You free yourself from the heavy snare!"),
_("<npcname> frees themselves from the heavy snare!"));
item rope("rope_6", calendar::turn);
item snare("snare_trigger", calendar::turn);
g->m.add_item_or_charges(posx(), posy(), rope);
g->m.add_item_or_charges(posx(), posy(), snare);
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the heavy snare, but can't get loose!"));
}
return false;
}
if (has_effect("beartrap")) {
/* Real bear traps can't be removed without the proper tools or immense strength; eventually this should
allow normal players two options: removal of the limb or removal of the trap from the ground
(at which point the player could later remove it from the leg with the right tools).
As such we are currently making it a bit easier for players and NPC's to get out of bear traps.
*/
if(x_in_y(get_str(), 100)) {
remove_effect("beartrap");
add_msg_player_or_npc(m_good, _("You free yourself from the bear trap!"),
_("<npcname> frees themselves from the bear trap!"));
item beartrap("beartrap", calendar::turn);
g->m.add_item_or_charges(posx(), posy(), beartrap);
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the bear trap, but can't get loose!"));
}
return false;
}
if (has_effect("crushed")) {
// Strength helps in getting free, but dex also helps you worm your way out of the rubble
if(x_in_y(get_str() + get_dex() / 4, 100)) {
remove_effect("crushed");
add_msg_player_or_npc(m_good, _("You free yourself from the rubble!"),
_("<npcname> frees themselves from the rubble!"));
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the rubble, but can't get loose!"));
}
return false;
}
if (has_effect("amigara")) {
int curdist = 999, newdist = 999;
for (int cx = 0; cx < SEEX * MAPSIZE; cx++) {
for (int cy = 0; cy < SEEY * MAPSIZE; cy++) {
if (g->m.ter(cx, cy) == t_fault) {
int dist = rl_dist(cx, cy, posx(), posy());
if (dist < curdist) {
curdist = dist;
}
dist = rl_dist(cx, cy, posx(), posy());
if (dist < newdist) {
newdist = dist;
}
}
}
}
if (newdist > curdist) {
add_msg_if_player(m_info, _("You cannot pull yourself away from the faultline..."));
return false;
}
}
// Below this point are things that allow for movement if they succeed
// Currently we only have one thing that forces movement if you succeed, should we get more
// than this will need to be reworked to only have success effects if /all/ checks succeed
if (has_effect("in_pit")) {
if (rng(0, 40) > get_str() + int(get_dex() / 2)) {
add_msg_if_player(m_bad, _("You try to escape the pit, but slip back in."));
return false;
} else {
add_msg_player_or_npc(m_good, _("You escape the pit!"),
_("<npcname> escapes the pit!"));
remove_effect("in_pit");
}
}
return Creature::move_effects();
}
void player::power_mutations()
{
if( !is_player() ) {
// TODO: Implement NPCs activating muts
return;
}
std::vector <std::string> passive;
std::vector <std::string> active;
for( auto &mut : my_mutations ) {
if (!mutation_branch::get( mut.first ).activated) {
passive.push_back(mut.first);
} else {
active.push_back(mut.first);
}
// New mutations are initialized with no key at all, so we have to do this here.
if( mut.second.key == ' ' ) {
for( const auto &letter : mutation_chars ) {
if( trait_by_invlet( letter ).empty() ) {
mut.second.key = letter;
break;
}
}
}
}
// maximal number of rows in both columns
const int mutations_count = std::max(passive.size(), active.size());
int TITLE_HEIGHT = 2;
int DESCRIPTION_HEIGHT = 5;
// Main window
/** Total required height is:
* top frame line: + 1
* height of title window: + TITLE_HEIGHT
* line after the title: + 1
* line with active/passive mutation captions: + 1
* height of the biggest list of active/passive mutations: + mutations_count
* line before mutation description: + 1
* height of description window: + DESCRIPTION_HEIGHT
* bottom frame line: + 1
* TOTAL: TITLE_HEIGHT + mutations_count + DESCRIPTION_HEIGHT + 5
*/
int HEIGHT = std::min(TERMY, std::max(FULL_SCREEN_HEIGHT,
TITLE_HEIGHT + mutations_count + DESCRIPTION_HEIGHT + 5));
int WIDTH = FULL_SCREEN_WIDTH + (TERMX - FULL_SCREEN_WIDTH) / 2;
int START_X = (TERMX - WIDTH) / 2;
int START_Y = (TERMY - HEIGHT) / 2;
WINDOW *wBio = newwin(HEIGHT, WIDTH, START_Y, START_X);
// Description window @ the bottom of the bio window
int DESCRIPTION_START_Y = START_Y + HEIGHT - DESCRIPTION_HEIGHT - 1;
int DESCRIPTION_LINE_Y = DESCRIPTION_START_Y - START_Y - 1;
WINDOW *w_description = newwin(DESCRIPTION_HEIGHT, WIDTH - 2,
DESCRIPTION_START_Y, START_X + 1);
// Title window
int TITLE_START_Y = START_Y + 1;
int HEADER_LINE_Y = TITLE_HEIGHT + 1; // + lines with text in titlebar, local
WINDOW *w_title = newwin(TITLE_HEIGHT, WIDTH - 2, TITLE_START_Y, START_X + 1);
int scroll_position = 0;
int second_column = 32 + (TERMX - FULL_SCREEN_WIDTH) /
4; // X-coordinate of the list of active mutations
input_context ctxt("MUTATIONS");
ctxt.register_updown();
ctxt.register_action("ANY_INPUT");
ctxt.register_action("TOGGLE_EXAMINE");
ctxt.register_action("REASSIGN");
ctxt.register_action("HELP_KEYBINDINGS");
bool redraw = true;
std::string menu_mode = "activating";
while(true) {
// offset for display: mutation with index i is drawn at y=list_start_y+i
// drawing the mutation starts with mutation[scroll_position]
const int list_start_y = HEADER_LINE_Y + 2 - scroll_position;
int max_scroll_position = HEADER_LINE_Y + 2 + mutations_count -
((menu_mode == "examining") ? DESCRIPTION_LINE_Y : (HEIGHT - 1));
if(redraw) {
redraw = false;
werase(wBio);
draw_border(wBio);
// Draw line under title
mvwhline(wBio, HEADER_LINE_Y, 1, LINE_OXOX, WIDTH - 2);
// Draw symbols to connect additional lines to border
mvwputch(wBio, HEADER_LINE_Y, 0, BORDER_COLOR, LINE_XXXO); // |-
mvwputch(wBio, HEADER_LINE_Y, WIDTH - 1, BORDER_COLOR, LINE_XOXX); // -|
// Captions
mvwprintz(wBio, HEADER_LINE_Y + 1, 2, c_ltblue, _("Passive:"));
mvwprintz(wBio, HEADER_LINE_Y + 1, second_column, c_ltblue, _("Active:"));
draw_exam_window(wBio, DESCRIPTION_LINE_Y, menu_mode == "examining");
nc_color type;
if (passive.empty()) {
mvwprintz(wBio, list_start_y, 2, c_ltgray, _("None"));
} else {
for (size_t i = scroll_position; i < passive.size(); i++) {
const auto &md = mutation_branch::get( passive[i] );
const auto &td = my_mutations[passive[i]];
if (list_start_y + static_cast<int>(i) ==
(menu_mode == "examining" ? DESCRIPTION_LINE_Y : HEIGHT - 1)) {
break;
}
type = c_cyan;
mvwprintz(wBio, list_start_y + i, 2, type, "%c %s", td.key, md.name.c_str());
}
}
if (active.empty()) {
mvwprintz(wBio, list_start_y, second_column, c_ltgray, _("None"));
} else {
for (size_t i = scroll_position; i < active.size(); i++) {
const auto &md = mutation_branch::get( active[i] );
const auto &td = my_mutations[active[i]];
if (list_start_y + static_cast<int>(i) ==
(menu_mode == "examining" ? DESCRIPTION_LINE_Y : HEIGHT - 1)) {
break;
}
if (!td.powered) {
type = c_red;
}else if (td.powered) {
type = c_ltgreen;
} else {
type = c_ltred;
}
// TODO: track resource(s) used and specify
mvwputch( wBio, list_start_y + i, second_column, type, td.key );
std::stringstream mut_desc;
mut_desc << md.name;
if ( md.cost > 0 && md.cooldown > 0 ) {
mut_desc << string_format( _(" - %d RU / %d turns"),
md.cost, md.cooldown );
} else if ( md.cost > 0 ) {
mut_desc << string_format( _(" - %d RU"), md.cost );
} else if ( md.cooldown > 0 ) {
mut_desc << string_format( _(" - %d turns"), md.cooldown );
}
if ( td.powered ) {
mut_desc << _(" - Active");
}
mvwprintz( wBio, list_start_y + i, second_column + 2, type,
mut_desc.str().c_str() );
}
}
// Scrollbar
if(scroll_position > 0) {
mvwputch(wBio, HEADER_LINE_Y + 2, 0, c_ltgreen, '^');
}
if(scroll_position < max_scroll_position && max_scroll_position > 0) {
mvwputch(wBio, (menu_mode == "examining" ? DESCRIPTION_LINE_Y : HEIGHT - 1) - 1,
0, c_ltgreen, 'v');
}
}
wrefresh(wBio);
show_mutations_titlebar(w_title, this, menu_mode);
const std::string action = ctxt.handle_input();
const long ch = ctxt.get_raw_input().get_first_input();
if (menu_mode == "reassigning") {
menu_mode = "activating";
const auto mut_id = trait_by_invlet( ch );
if( mut_id.empty() ) {
// Selected an non-existing mutation (or escape, or ...)
continue;
}
redraw = true;
const long newch = popup_getkey(_("%s; enter new letter."),
mutation_branch::get_name( mut_id ).c_str());
wrefresh(wBio);
if(newch == ch || newch == ' ' || newch == KEY_ESCAPE) {
continue;
}
if( !mutation_chars.valid( newch ) ) {
popup( _("Invalid mutation letter. Only those characters are valid:\n\n%s"),
mutation_chars.get_allowed_chars().c_str() );
continue;
}
const auto other_mut_id = trait_by_invlet( newch );
if( !other_mut_id.empty() ) {
std::swap(my_mutations[mut_id].key, my_mutations[other_mut_id].key);
} else {
my_mutations[mut_id].key = newch;
}
// TODO: show a message like when reassigning a key to an item?
} else if (action == "DOWN") {
if(scroll_position < max_scroll_position) {
scroll_position++;
redraw = true;
}
} else if (action == "UP") {
if(scroll_position > 0) {
scroll_position--;
redraw = true;
}
} else if (action == "REASSIGN") {
menu_mode = "reassigning";
} else if (action == "TOGGLE_EXAMINE") { // switches between activation and examination
menu_mode = menu_mode == "activating" ? "examining" : "activating";
werase(w_description);
draw_exam_window(wBio, DESCRIPTION_LINE_Y, false);
redraw = true;
}else if (action == "HELP_KEYBINDINGS") {
redraw = true;
} else {
const auto mut_id = trait_by_invlet( ch );
if( mut_id.empty() ) {
// entered a key that is not mapped to any mutation,
// -> leave screen
break;
}
const auto &mut_data = mutation_branch::get( mut_id );
if (menu_mode == "activating") {
if (mut_data.activated) {
if (my_mutations[mut_id].powered) {
add_msg_if_player(m_neutral, _("You stop using your %s."), mut_data.name.c_str());
deactivate_mutation( mut_id );
delwin(w_title);
delwin(w_description);
delwin(wBio);
// Action done, leave screen
break;
} else if( (!mut_data.hunger || get_hunger() <= 400) &&
(!mut_data.thirst || get_thirst() <= 400) &&
(!mut_data.fatigue || get_fatigue() <= 400) ) {
// this will clear the mutations menu for targeting purposes
werase(wBio);
wrefresh(wBio);
delwin(w_title);
delwin(w_description);
delwin(wBio);
g->draw();
add_msg_if_player( m_neutral, _("You activate your %s."), mut_data.name.c_str() );
activate_mutation( mut_id );
// Action done, leave screen
break;
} else {
popup( _( "You don't have enough in you to activate your %s!" ), mut_data.name.c_str() );
redraw = true;
continue;
}
} else {
popup(_("\
You cannot activate %s! To read a description of \
%s, press '!', then '%c'."), mut_data.name.c_str(), mut_data.name.c_str(),
my_mutations[mut_id].key );
redraw = true;
}
}
if (menu_mode == "examining") { // Describing mutations, not activating them!
draw_exam_window(wBio, DESCRIPTION_LINE_Y, true);
// Clear the lines first
werase(w_description);
fold_and_print(w_description, 0, 0, WIDTH - 2, c_ltblue, mut_data.description);
wrefresh(w_description);
}
}
}
//if we activated a mutation, already killed the windows
if(!(menu_mode == "activating")) {
werase(wBio);
wrefresh(wBio);
delwin(w_title);
delwin(w_description);
delwin(wBio);
}
}
// Why put this in a Big Switch? Why not let bionics have pointers to
// functions, much like monsters and items?
//
// Well, because like diseases, which are also in a Big Switch, bionics don't
// share functions....
void player::activate_bionic(int b)
{
bionic bio = my_bionics[b];
int power_cost = bionics[bio.id]->power_cost;
if ((weapon.type->id == "bio_claws_weapon" && bio.id == "bio_claws_weapon") ||
(weapon.type->id == "bio_blade_weapon" && bio.id == "bio_blade_weapon")) {
power_cost = 0;
}
if (power_level < power_cost) {
if (my_bionics[b].powered) {
add_msg(m_neutral, _("Your %s powers down."), bionics[bio.id]->name.c_str());
my_bionics[b].powered = false;
} else {
add_msg(m_info, _("You cannot power your %s"), bionics[bio.id]->name.c_str());
}
return;
}
if (my_bionics[b].powered && my_bionics[b].charge > 0) {
// Already-on units just lose a bit of charge
my_bionics[b].charge--;
} else {
// Not-on units, or those with zero charge, have to pay the power cost
if (bionics[bio.id]->charge_time > 0) {
my_bionics[b].powered = true;
my_bionics[b].charge = bionics[bio.id]->charge_time - 1;
}
power_level -= power_cost;
}
std::vector<point> traj;
std::vector<std::string> good;
std::vector<std::string> bad;
int dirx, diry;
item tmp_item;
if(bio.id == "bio_painkiller") {
pkill += 6;
pain -= 2;
if (pkill > pain) {
pkill = pain;
}
} else if (bio.id == "bio_nanobots") {
rem_disease("bleed");
healall(4);
} else if (bio.id == "bio_night") {
if (calendar::turn % 5) {
add_msg(m_neutral, _("Artificial night generator active!"));
}
} else if (bio.id == "bio_resonator") {
g->sound(posx, posy, 30, _("VRRRRMP!"));
for (int i = posx - 1; i <= posx + 1; i++) {
for (int j = posy - 1; j <= posy + 1; j++) {
g->m.bash( i, j, 40 );
g->m.bash( i, j, 40 ); // Multibash effect, so that doors &c will fall
g->m.bash( i, j, 40 );
if (g->m.is_destructable(i, j) && rng(1, 10) >= 4) {
g->m.ter_set(i, j, t_rubble);
}
}
}
} else if (bio.id == "bio_time_freeze") {
moves += power_level;
power_level = 0;
add_msg(m_good, _("Your speed suddenly increases!"));
if (one_in(3)) {
add_msg(m_bad, _("Your muscles tear with the strain."));
apply_damage( nullptr, bp_arm_l, rng( 5, 10 ) );
apply_damage( nullptr, bp_arm_r, rng( 5, 10 ) );
apply_damage( nullptr, bp_leg_l, rng( 7, 12 ) );
apply_damage( nullptr, bp_leg_r, rng( 7, 12 ) );
apply_damage( nullptr, bp_torso, rng( 5, 15 ) );
}
if (one_in(5)) {
add_disease("teleglow", rng(50, 400));
}
} else if (bio.id == "bio_teleport") {
g->teleport();
add_disease("teleglow", 300);
}
// TODO: More stuff here (and bio_blood_filter)
else if(bio.id == "bio_blood_anal") {
WINDOW *w = newwin(20, 40, 3 + ((TERMY > 25) ? (TERMY - 25) / 2 : 0),
10 + ((TERMX > 80) ? (TERMX - 80) / 2 : 0));
draw_border(w);
if (has_disease("fungus")) {
bad.push_back(_("Fungal Parasite"));
}
if (has_disease("dermatik")) {
bad.push_back(_("Insect Parasite"));
}
if (has_effect("stung")) {
bad.push_back(_("Stung"));
}
if (has_effect("poison")) {
bad.push_back(_("Poison"));
}
if (radiation > 0) {
bad.push_back(_("Irradiated"));
}
if (has_disease("pkill1")) {
good.push_back(_("Minor Painkiller"));
}
if (has_disease("pkill2")) {
good.push_back(_("Moderate Painkiller"));
}
if (has_disease("pkill3")) {
good.push_back(_("Heavy Painkiller"));
}
if (has_disease("pkill_l")) {
good.push_back(_("Slow-Release Painkiller"));
}
if (has_disease("drunk")) {
good.push_back(_("Alcohol"));
}
if (has_disease("cig")) {
good.push_back(_("Nicotine"));
}
if (has_disease("meth")) {
good.push_back(_("Methamphetamines"));
}
if (has_disease("high")) {
good.push_back(_("Intoxicant: Other"));
}
if (has_disease("weed_high")) {
good.push_back(_("THC Intoxication"));
}
if (has_disease("hallu") || has_disease("visuals")) {
bad.push_back(_("Magic Mushroom"));
}
if (has_disease("iodine")) {
good.push_back(_("Iodine"));
}
if (has_disease("datura")) {
good.push_back(_("Anticholinergic Tropane Alkaloids"));
}
if (has_disease("took_xanax")) {
good.push_back(_("Xanax"));
}
if (has_disease("took_prozac")) {
good.push_back(_("Prozac"));
}
if (has_disease("took_flumed")) {
good.push_back(_("Antihistamines"));
}
if (has_disease("adrenaline")) {
good.push_back(_("Adrenaline Spike"));
}
if (has_disease("tapeworm")) { // This little guy is immune to the blood filter though, as he lives in your bowels.
good.push_back(_("Intestinal Parasite"));
}
if (has_disease("bloodworms")) {
good.push_back(_("Hemolytic Parasites"));
}
if (has_disease("brainworm")) { // This little guy is immune to the blood filter too, as he lives in your brain.
good.push_back(_("Intracranial Parasite"));
}
if (has_disease("paincysts")) { // These little guys are immune to the blood filter too, as they live in your muscles.
good.push_back(_("Intramuscular Parasites"));
}
if (has_disease("tetanus")) { // Tetanus infection.
good.push_back(_("Clostridium Tetani Infection"));
}
if (good.empty() && bad.empty()) {
mvwprintz(w, 1, 1, c_white, _("No effects."));
} else {
for (unsigned line = 1; line < 39 && line <= good.size() + bad.size(); line++) {
if (line <= bad.size()) {
mvwprintz(w, line, 1, c_red, "%s", bad[line - 1].c_str());
} else {
mvwprintz(w, line, 1, c_green, "%s", good[line - 1 - bad.size()].c_str());
}
}
}
wrefresh(w);
refresh();
getch();
delwin(w);
} else if(bio.id == "bio_blood_filter") {
add_msg(m_neutral, _("You activate your blood filtration system."));
rem_disease("fungus");
rem_disease("dermatik");
rem_disease("bloodworms");
rem_disease("tetanus");
remove_effect("poison");
remove_effect("stung");
rem_disease("pkill1");
rem_disease("pkill2");
rem_disease("pkill3");
rem_disease("pkill_l");
rem_disease("drunk");
rem_disease("cig");
rem_disease("high");
rem_disease("hallu");
rem_disease("visuals");
rem_disease("iodine");
rem_disease("datura");
rem_disease("took_xanax");
rem_disease("took_prozac");
rem_disease("took_flumed");
rem_disease("adrenaline");
rem_disease("meth");
pkill = 0;
stim = 0;
} else if(bio.id == "bio_evap") {
item water = item("water_clean", 0);
int humidity = g->weatherGen.get_weather(pos(), calendar::turn).humidity;
int water_charges = (humidity * 3.0) / 100.0 + 0.5;
// At 50% relative humidity or more, the player will draw 2 units of water
// At 16% relative humidity or less, the player will draw 0 units of water
water.charges = water_charges;
if (water_charges == 0) {
add_msg_if_player(m_bad, _("There was not enough moisture in the air from which to draw water!"));
}
if (g->handle_liquid(water, true, false)) {
moves -= 100;
} else if (query_yn(_("Drink from your hands?"))) {
inv.push_back(water);
consume(inv.position_by_type(water.typeId()));
moves -= 350;
} else if (water.charges == water_charges && water_charges != 0) {
power_level += bionics["bio_evap"]->power_cost;
}
} else if(bio.id == "bio_lighter") {
if(!choose_adjacent(_("Start a fire where?"), dirx, diry) ||
(!g->m.add_field(dirx, diry, fd_fire, 1))) {
add_msg_if_player(m_info, _("You can't light a fire there."));
power_level += bionics["bio_lighter"]->power_cost;
}
}
if(bio.id == "bio_leukocyte") {
add_msg(m_neutral, _("You activate your leukocyte breeder system."));
g->u.set_healthy(std::min(100, g->u.get_healthy() + 2));
g->u.mod_healthy_mod(20);
}
if(bio.id == "bio_geiger") {
add_msg(m_info, _("Your radiation level: %d"), radiation);
}
if(bio.id == "bio_radscrubber") {
add_msg(m_neutral, _("You activate your radiation scrubber system."));
if (radiation > 4) {
radiation -= 5;
} else {
radiation = 0;
}
}
if(bio.id == "bio_adrenaline") {
add_msg(m_neutral, _("You activate your adrenaline pump."));
if (has_disease("adrenaline")) {
add_disease("adrenaline", 50);
} else {
add_disease("adrenaline", 200);
}
} else if(bio.id == "bio_claws") {
if (weapon.type->id == "bio_claws_weapon") {
add_msg(m_neutral, _("You withdraw your claws."));
weapon = ret_null;
} else if (weapon.has_flag ("NO_UNWIELD")) {
add_msg(m_info, _("Deactivate your %s first!"),
weapon.tname().c_str());
power_level += bionics[bio.id]->power_cost;
return;
} else if(weapon.type->id != "null") {
add_msg(m_warning, _("Your claws extend, forcing you to drop your %s."),
weapon.tname().c_str());
g->m.add_item_or_charges(posx, posy, weapon);
weapon = item("bio_claws_weapon", 0);
weapon.invlet = '#';
} else {
add_msg(m_neutral, _("Your claws extend!"));
weapon = item("bio_claws_weapon", 0);
weapon.invlet = '#';
}
} else if(bio.id == "bio_blade") {
if (weapon.type->id == "bio_blade_weapon") {
add_msg(m_neutral, _("You retract your blade."));
weapon = ret_null;
} else if (weapon.has_flag ("NO_UNWIELD")) {
add_msg(m_info, _("Deactivate your %s first!"),
weapon.tname().c_str());
power_level += bionics[bio.id]->power_cost;
return;
} else if(weapon.type->id != "null") {
add_msg(m_warning, _("Your blade extends, forcing you to drop your %s."),
weapon.tname().c_str());
g->m.add_item_or_charges(posx, posy, weapon);
weapon = item("bio_blade_weapon", 0);
weapon.invlet = '#';
} else {
add_msg(m_neutral, _("You extend your blade!"));
weapon = item("bio_blade_weapon", 0);
weapon.invlet = '#';
}
} else if(bio.id == "bio_blaster") {
tmp_item = weapon;
weapon = item("bio_blaster_gun", 0);
g->refresh_all();
g->plfire(false);
if(weapon.charges == 1) { // not fired
power_level += bionics[bio.id]->power_cost;
}
weapon = tmp_item;
} else if (bio.id == "bio_laser") {
tmp_item = weapon;
weapon = item("bio_laser_gun", 0);
g->refresh_all();
g->plfire(false);
if(weapon.charges == 1) { // not fired
power_level += bionics[bio.id]->power_cost;
}
weapon = tmp_item;
} else if(bio.id == "bio_chain_lightning") {
tmp_item = weapon;
weapon = item("bio_lightning", 0);
g->refresh_all();
g->plfire(false);
if(weapon.charges == 1) { // not fired
power_level += bionics[bio.id]->power_cost;
}
weapon = tmp_item;
} else if (bio.id == "bio_emp") {
if(choose_adjacent(_("Create an EMP where?"), dirx, diry)) {
g->emp_blast(dirx, diry);
} else {
power_level += bionics["bio_emp"]->power_cost;
}
} else if (bio.id == "bio_hydraulics") {
add_msg(m_good, _("Your muscles hiss as hydraulic strength fills them!"));
// Sound of hissing hydraulic muscle! (not quite as loud as a car horn)
g->sound(posx, posy, 19, _("HISISSS!"));
} else if (bio.id == "bio_water_extractor") {
bool extracted = false;
for (std::vector<item>::iterator it = g->m.i_at(posx, posy).begin();
it != g->m.i_at(posx, posy).end(); ++it) {
if (it->type->id == "corpse" ) {
int avail = 0;
if ( it->item_vars.find("remaining_water") != it->item_vars.end() ) {
avail = atoi ( it->item_vars["remaining_water"].c_str() );
} else {
avail = it->volume() / 2;
}
if(avail > 0 && query_yn(_("Extract water from the %s"), it->tname().c_str())) {
item water = item("water_clean", 0);
if (g->handle_liquid(water, true, true)) {
moves -= 100;
} else if (query_yn(_("Drink directly from the condenser?"))) {
inv.push_back(water);
consume(inv.position_by_type(water.typeId()));
moves -= 350;
}
extracted = true;
avail--;
it->item_vars["remaining_water"] = string_format("%d", avail);
break;
}
}
}
if (!extracted) {
power_level += bionics["bio_water_extractor"]->power_cost;
}
} else if(bio.id == "bio_magnet") {
for (int i = posx - 10; i <= posx + 10; i++) {
for (int j = posy - 10; j <= posy + 10; j++) {
if (g->m.i_at(i, j).size() > 0) {
int t; //not sure why map:sees really needs this, but w/e
if (g->m.sees(i, j, posx, posy, -1, t)) {
traj = line_to(i, j, posx, posy, t);
} else {
traj = line_to(i, j, posx, posy, 0);
}
}
traj.insert(traj.begin(), point(i, j));
for (unsigned k = 0; k < g->m.i_at(i, j).size(); k++) {
if (g->m.i_at(i, j)[k].made_of("iron") || g->m.i_at(i, j)[k].made_of("steel")) {
tmp_item = g->m.i_at(i, j)[k];
g->m.i_rem(i, j, k);
std::vector<point>::iterator it;
for (it = traj.begin(); it != traj.end(); ++it) {
int index = g->mon_at(it->x, it->y);
if (index != -1) {
g->zombie(index).apply_damage( this, bp_torso, tmp_item.weight() / 225 );
g->m.add_item_or_charges(it->x, it->y, tmp_item);
break;
} else if (it != traj.begin() && g->m.move_cost(it->x, it->y) == 0) {
g->m.bash( it->x, it->y, tmp_item.weight() / 225 );
if (g->m.move_cost(it->x, it->y) == 0) {
g->m.add_item_or_charges((it - 1)->x, (it - 1)->y, tmp_item);
break;
}
}
}
if (it == traj.end()) {
g->m.add_item_or_charges(posx, posy, tmp_item);
}
}
}
}
}
} else if(bio.id == "bio_lockpick") {
if(!choose_adjacent(_("Activate your bio lockpick where?"), dirx, diry)) {
power_level += bionics["bio_lockpick"]->power_cost;
return;
}
ter_id type = g->m.ter(dirx, diry);
if (type == t_door_locked || type == t_door_locked_alarm || type == t_door_locked_interior ) {
moves -= 40;
std::string door_name = rm_prefix(_("<door_name>door"));
add_msg_if_player(m_neutral, _("With a satisfying click, the lock on the %s opens."),
door_name.c_str());
g->m.ter_set(dirx, diry, t_door_c);
// Locked metal doors are the Lab and Bunker entries. Those need to stay locked.
} else if(type == t_door_bar_locked) {
moves -= 40;
std::string door_name = rm_prefix(_("<door_name>door"));
add_msg_if_player(m_neutral, _("The %s swings open..."),
door_name.c_str()); //Could better copy the messages from lockpick....
g->m.ter_set(dirx, diry, t_door_bar_o);
} else if(type == t_chaingate_l) {
moves -= 40;
std::string gate_name = rm_prefix (_("<door_name>gate"));
add_msg_if_player(m_neutral, _("With a satisfying click, the lock on the %s opens."),
gate_name.c_str());
g->m.ter_set(dirx, diry, t_chaingate_c);
} else if(type == t_door_c) {
add_msg(m_info, _("That door isn't locked."));
} else {
add_msg_if_player(m_neutral, _("You can't unlock that %s."),
g->m.tername(dirx, diry).c_str());
}
} else if(bio.id == "bio_flashbang") {
add_msg_if_player(m_neutral, _("You activate your integrated flashbang generator!"));
g->flashbang(posx, posy, true);
} else if(bio.id == "bio_shockwave") {
g->shockwave(posx, posy, 3, 4, 2, 8, true);
add_msg_if_player(m_neutral, _("You unleash a powerful shockwave!"));
}
}
void player::consume_effects( const item &food )
{
if( !food.is_comestible() ) {
debugmsg( "called player::consume_effects with non-comestible" );
return;
}
const auto &comest = *food.type->comestible;
const int capacity = stomach_capacity();
if( has_trait( trait_id( "THRESH_PLANT" ) ) && food.type->can_use( "PLANTBLECH" ) ) {
// Just keep nutrition capped, to prevent vomiting
cap_nutrition_thirst( *this, capacity, true, true );
return;
}
if( ( has_trait( trait_id( "HERBIVORE" ) ) || has_trait( trait_id( "RUMINANT" ) ) ) &&
food.has_any_flag( herbivore_blacklist ) ) {
// No good can come of this.
return;
}
// Rotten food causes health loss
const float relative_rot = food.get_relative_rot();
if( relative_rot > 1.0f && !has_trait( trait_id( "SAPROPHAGE" ) ) &&
!has_trait( trait_id( "SAPROVORE" ) ) && !has_bionic( bio_digestion ) ) {
const float rottedness = clamp( 2 * relative_rot - 2.0f, 0.1f, 1.0f );
// ~-1 health per 1 nutrition at halfway-rotten-away, ~0 at "just got rotten"
// But always round down
int h_loss = -rottedness * comest.nutr;
mod_healthy_mod( h_loss, -200 );
add_msg( m_debug, "%d health from %0.2f%% rotten food", h_loss, rottedness );
}
const auto nutr = nutrition_for( food );
mod_hunger( -nutr );
mod_thirst( -comest.quench );
mod_stomach_food( nutr );
mod_stomach_water( comest.quench );
if( comest.healthy != 0 ) {
// Effectively no cap on health modifiers from food
mod_healthy_mod( comest.healthy, ( comest.healthy >= 0 ) ? 200 : -200 );
}
if( comest.stim != 0 &&
( abs( stim ) < ( abs( comest.stim ) * 3 ) ||
sgn( stim ) != sgn( comest.stim ) ) ) {
if( comest.stim < 0 ) {
stim = std::max( comest.stim * 3, stim + comest.stim );
} else {
stim = std::min( comest.stim * 3, stim + comest.stim );
}
}
add_addiction( comest.add, comest.addict );
if( addiction_craving( comest.add ) != MORALE_NULL ) {
rem_morale( addiction_craving( comest.add ) );
}
// Morale is in minutes
int morale_time = HOURS( 2 ) / MINUTES( 1 );
if( food.has_flag( "HOT" ) && food.has_flag( "EATEN_HOT" ) ) {
morale_time = HOURS( 3 ) / MINUTES( 1 );
int clamped_nutr = std::max( 5, std::min( 20, nutr / 10 ) );
add_morale( MORALE_FOOD_HOT, clamped_nutr, 20, morale_time, morale_time / 2 );
}
std::pair<int, int> fun = fun_for( food );
if( fun.first < 0 ) {
add_morale( MORALE_FOOD_BAD, fun.first, fun.second, morale_time, morale_time / 2, false,
food.type );
} else if( fun.first > 0 ) {
add_morale( MORALE_FOOD_GOOD, fun.first, fun.second, morale_time, morale_time / 2, false,
food.type );
}
const bool hibernate = has_active_mutation( trait_id( "HIBERNATE" ) );
if( hibernate ) {
if( ( nutr > 0 && get_hunger() < -60 ) || ( comest.quench > 0 && get_thirst() < -60 ) ) {
//Tell the player what's going on
add_msg_if_player( _( "You gorge yourself, preparing to hibernate." ) );
if( one_in( 2 ) ) {
//50% chance of the food tiring you
mod_fatigue( nutr );
}
}
if( ( nutr > 0 && get_hunger() < -200 ) || ( comest.quench > 0 && get_thirst() < -200 ) ) {
//Hibernation should cut burn to 60/day
add_msg_if_player( _( "You feel stocked for a day or two. Got your bed all ready and secured?" ) );
if( one_in( 2 ) ) {
//And another 50%, intended cumulative
mod_fatigue( nutr );
}
}
if( ( nutr > 0 && get_hunger() < -400 ) || ( comest.quench > 0 && get_thirst() < -400 ) ) {
add_msg_if_player(
_( "Mmm. You can still fit some more in...but maybe you should get comfortable and sleep." ) );
if( !one_in( 3 ) ) {
//Third check, this one at 66%
mod_fatigue( nutr );
}
}
if( ( nutr > 0 && get_hunger() < -600 ) || ( comest.quench > 0 && get_thirst() < -600 ) ) {
add_msg_if_player( _( "That filled a hole! Time for bed..." ) );
// At this point, you're done. Schlaf gut.
mod_fatigue( nutr );
}
}
// Moved here and changed a bit - it was too complex
// Incredibly minor stuff like this shouldn't require complexity
if( !is_npc() && has_trait( trait_id( "SLIMESPAWNER" ) ) &&
( get_hunger() < capacity + 40 || get_thirst() < capacity + 40 ) ) {
add_msg_if_player( m_mixed,
_( "You feel as though you're going to split open! In a good way?" ) );
mod_pain( 5 );
std::vector<tripoint> valid;
for( const tripoint &dest : g->m.points_in_radius( pos(), 1 ) ) {
if( g->is_empty( dest ) ) {
valid.push_back( dest );
}
}
int numslime = 1;
for( int i = 0; i < numslime && !valid.empty(); i++ ) {
const tripoint target = random_entry_removed( valid );
if( monster *const slime = g->summon_mon( mon_player_blob, target ) ) {
slime->friendly = -1;
}
}
mod_hunger( 40 );
mod_thirst( 40 );
//~slimespawns have *small voices* which may be the Nice equivalent
//~of the Rat King's ALL CAPS invective. Probably shared-brain telepathy.
add_msg_if_player( m_good, _( "hey, you look like me! let's work together!" ) );
}
// Last thing that happens before capping hunger
if( get_hunger() < capacity && has_trait( trait_id( "EATHEALTH" ) ) ) {
int excess_food = capacity - get_hunger();
add_msg_player_or_npc( _( "You feel the %s filling you out." ),
_( "<npcname> looks better after eating the %s." ),
food.tname().c_str() );
// Guaranteed 1 HP healing, no matter what. You're welcome. ;-)
if( excess_food <= 5 ) {
healall( 1 );
} else {
// Straight conversion, except it's divided amongst all your body parts.
healall( excess_food /= 5 );
}
// Note: We want this here to prevent "you can't finish this" messages
set_hunger( capacity );
}
cap_nutrition_thirst( *this, capacity, nutr > 0, comest.quench > 0 );
}
bool player::eat( item &food, bool force )
{
if( !food.is_food() ) {
return false;
}
// Check if it's rotten before eating!
food.calc_rot( global_square_location() );
const auto ret = force ? can_eat( food ) : will_eat( food, is_player() );
if( !ret.success() ) {
return false;
}
if( food.type->has_use() ) {
if( food.type->invoke( *this, food, pos() ) <= 0 ) {
return false;
}
}
// Note: the block below assumes we decided to eat it
// No coming back from here
const bool hibernate = has_active_mutation( trait_id( "HIBERNATE" ) );
const int nutr = nutrition_for( food );
const int quench = food.type->comestible->quench;
const bool spoiled = food.rotten();
// The item is solid food
const bool chew = food.type->comestible->comesttype == "FOOD" || food.has_flag( "USE_EAT_VERB" );
// This item is a drink and not a solid food (and not a thick soup)
const bool drinkable = !chew && food.type->comestible->comesttype == "DRINK";
// If neither of the above is true then it's a drug and shouldn't get mealtime penalty/bonus
if( hibernate &&
( get_hunger() > -60 && get_thirst() > -60 ) &&
( get_hunger() - nutr < -60 || get_thirst() - quench < -60 ) ) {
add_memorial_log( pgettext( "memorial_male", "Began preparing for hibernation." ),
pgettext( "memorial_female", "Began preparing for hibernation." ) );
add_msg_if_player(
_( "You've begun stockpiling calories and liquid for hibernation. You get the feeling that you should prepare for bed, just in case, but...you're hungry again, and you could eat a whole week's worth of food RIGHT NOW." ) );
}
const bool will_vomit = get_hunger() < 0 && nutr >= 5 && !has_trait( trait_id( "GOURMAND" ) ) &&
!hibernate &&
!has_trait( trait_id( "SLIMESPAWNER" ) ) && !has_trait( trait_id( "EATHEALTH" ) ) &&
rng( -200, 0 ) > get_hunger() - nutr;
const bool saprophage = has_trait( trait_id( "SAPROPHAGE" ) );
if( spoiled && !saprophage ) {
add_msg_if_player( m_bad, _( "Ick, this %s doesn't taste so good..." ), food.tname().c_str() );
if( !has_trait( trait_id( "SAPROVORE" ) ) && !has_trait( trait_id( "EATDEAD" ) ) &&
( !has_bionic( bio_digestion ) || one_in( 3 ) ) ) {
add_effect( effect_foodpoison, rng( 60, ( nutr + 1 ) * 60 ) );
}
consume_effects( food );
} else if( spoiled && saprophage ) {
add_msg_if_player( m_good, _( "Mmm, this %s tastes delicious..." ), food.tname().c_str() );
consume_effects( food );
} else {
consume_effects( food );
}
const bool amorphous = has_trait( trait_id( "AMORPHOUS" ) );
int mealtime = 250;
if( drinkable || chew ) {
// Those bonuses/penalties only apply to food
// Not to smoking weed or applying bandages!
if( has_trait( trait_id( "MOUTH_TENTACLES" ) ) || has_trait( trait_id( "MANDIBLES" ) ) ) {
mealtime /= 2;
} else if( has_trait( trait_id( "GOURMAND" ) ) ) {
// Don't stack those two - that would be 25 moves per item
mealtime -= 100;
}
if( has_trait( trait_id( "BEAK_HUM" ) ) && !drinkable ) {
mealtime += 200; // Much better than PROBOSCIS but still optimized for fluids
} else if( has_trait( trait_id( "SABER_TEETH" ) ) ) {
mealtime += 250; // They get In The Way
}
if( amorphous ) {
mealtime *= 1.1;
// Minor speed penalty for having to flow around it
// rather than just grab & munch
}
}
moves -= mealtime;
// If it's poisonous... poison us.
// TODO: Move this to a flag
if( food.poison > 0 && !has_trait( trait_id( "EATPOISON" ) ) &&
!has_trait( trait_id( "EATDEAD" ) ) ) {
if( food.poison >= rng( 2, 4 ) ) {
add_effect( effect_poison, food.poison * 100 );
}
add_effect( effect_foodpoison, food.poison * 300 );
}
if( amorphous ) {
add_msg_player_or_npc( _( "You assimilate your %s." ), _( "<npcname> assimilates a %s." ),
food.tname().c_str() );
} else if( drinkable ) {
add_msg_player_or_npc( _( "You drink your %s." ), _( "<npcname> drinks a %s." ),
food.tname().c_str() );
} else if( chew ) {
add_msg_player_or_npc( _( "You eat your %s." ), _( "<npcname> eats a %s." ),
food.tname().c_str() );
}
if( item::find_type( food.type->comestible->tool )->tool ) {
// Tools like lighters get used
use_charges( food.type->comestible->tool, 1 );
}
if( has_bionic( bio_ethanol ) && food.type->can_use( "ALCOHOL" ) ) {
charge_power( rng( 50, 200 ) );
}
if( has_bionic( bio_ethanol ) && food.type->can_use( "ALCOHOL_WEAK" ) ) {
charge_power( rng( 25, 100 ) );
}
if( has_bionic( bio_ethanol ) && food.type->can_use( "ALCOHOL_STRONG" ) ) {
charge_power( rng( 75, 300 ) );
}
if( food.has_flag( "CANNIBALISM" ) ) {
// Sapiovores don't recognize humans as the same species.
// But let them possibly feel cool about eating sapient stuff - treat like psycho
const bool cannibal = has_trait( trait_id( "CANNIBAL" ) );
const bool psycho = has_trait( trait_id( "PSYCHOPATH" ) ) || has_trait( trait_id( "SAPIOVORE" ) );
const bool spiritual = has_trait( trait_id( "SPIRITUAL" ) );
if( cannibal && psycho && spiritual ) {
add_msg_if_player( m_good,
_( "You feast upon the human flesh, and in doing so, devour their spirit." ) );
// You're not really consuming anything special; you just think you are.
add_morale( MORALE_CANNIBAL, 25, 300 );
} else if( cannibal && psycho ) {
add_msg_if_player( m_good, _( "You feast upon the human flesh." ) );
add_morale( MORALE_CANNIBAL, 15, 200 );
} else if( cannibal && spiritual ) {
add_msg_if_player( m_good, _( "You consume the sacred human flesh." ) );
// Boosted because you understand the philosophical implications of your actions, and YOU LIKE THEM.
add_morale( MORALE_CANNIBAL, 15, 200 );
} else if( cannibal ) {
add_msg_if_player( m_good, _( "You indulge your shameful hunger." ) );
add_morale( MORALE_CANNIBAL, 10, 50 );
} else if( psycho && spiritual ) {
add_msg_if_player( _( "You greedily devour the taboo meat." ) );
// Small bonus for violating a taboo.
add_morale( MORALE_CANNIBAL, 5, 50 );
} else if( psycho ) {
add_msg_if_player( _( "Meh. You've eaten worse." ) );
} else if( spiritual ) {
add_msg_if_player( m_bad,
_( "This is probably going to count against you if there's still an afterlife." ) );
add_morale( MORALE_CANNIBAL, -60, -400, 600, 300 );
} else {
add_msg_if_player( m_bad, _( "You feel horrible for eating a person." ) );
add_morale( MORALE_CANNIBAL, -60, -400, 600, 300 );
}
}
// Allergy check
const auto allergy = allergy_type( food );
if( allergy != MORALE_NULL ) {
add_msg_if_player( m_bad, _( "Yuck! How can anybody eat this stuff?" ) );
add_morale( allergy, -75, -400, 300, 240 );
}
// Carnivores CAN eat junk food, but they won't like it much.
// Pizza-scraping happens in consume_effects.
if( has_trait( trait_id( "CARNIVORE" ) ) && food.has_flag( "ALLERGEN_JUNK" ) &&
!food.has_flag( "CARNIVORE_OK" ) ) {
add_msg_if_player( m_bad, _( "Your stomach begins gurgling and you feel bloated and ill." ) );
add_morale( MORALE_NO_DIGEST, -25, -125, 300, 240 );
}
if( !spoiled && chew && has_trait( trait_id( "SAPROPHAGE" ) ) ) {
// It's OK to *drink* things that haven't rotted. Alternative is to ban water. D:
add_msg_if_player( m_bad, _( "Your stomach begins gurgling and you feel bloated and ill." ) );
add_morale( MORALE_NO_DIGEST, -75, -400, 300, 240 );
}
if( food.has_flag( "URSINE_HONEY" ) && ( !crossed_threshold() ||
has_trait( trait_id( "THRESH_URSINE" ) ) ) &&
mutation_category_level["MUTCAT_URSINE"] > 40 ) {
//Need at least 5 bear mutations for effect to show, to filter out mutations in common with other mutcats
int honey_fun = has_trait( trait_id( "THRESH_URSINE" ) ) ?
std::min( mutation_category_level["MUTCAT_URSINE"] / 8, 20 ) :
mutation_category_level["MUTCAT_URSINE"] / 12;
if( honey_fun < 10 ) {
add_msg_if_player( m_good, _( "You find the sweet taste of honey surprisingly palatable." ) );
} else {
add_msg_if_player( m_good, _( "You feast upon the sweet honey." ) );
}
add_morale( MORALE_HONEY, honey_fun, 100 );
}
if( will_vomit ) {
vomit();
}
// chance to become parasitised
if( !( has_bionic( bio_digestion ) || has_trait( trait_id( "PARAIMMUNE" ) ) ) ) {
if( food.type->comestible->parasites > 0 && one_in( food.type->comestible->parasites ) ) {
switch( rng( 0, 3 ) ) {
case 0:
if( !has_trait( trait_id( "EATHEALTH" ) ) ) {
add_effect( effect_tapeworm, 1, num_bp, true );
}
break;
case 1:
if( !has_trait( trait_id( "ACIDBLOOD" ) ) ) {
add_effect( effect_bloodworms, 1, num_bp, true );
}
break;
case 2:
add_effect( effect_brainworms, 1, num_bp, true );
break;
case 3:
add_effect( effect_paincysts, 1, num_bp, true );
}
}
}
for( const auto &v : this->vitamins_from( food ) ) {
auto qty = has_effect( effect_tapeworm ) ? v.second / 2 : v.second;
// can never develop hypervitaminosis from consuming food
vitamin_mod( v.first, qty );
}
food.mod_charges( -1 );
return true;
}
ret_val<edible_rating> player::will_eat( const item &food, bool interactive ) const
{
const auto ret = can_eat( food );
if( !ret.success() ) {
if( interactive ) {
add_msg_if_player( m_info, "%s", ret.c_str() );
}
return ret;
}
std::vector<ret_val<edible_rating>> consequences;
const auto add_consequence = [&consequences]( const std::string & msg, edible_rating code ) {
consequences.emplace_back( ret_val<edible_rating>::make_failure( code, msg ) );
};
const bool saprophage = has_trait( trait_id( "SAPROPHAGE" ) );
const auto &comest = food.type->comestible;
if( food.rotten() ) {
const bool saprovore = has_trait( trait_id( "SAPROVORE" ) );
if( !saprophage && !saprovore ) {
add_consequence( _( "This is rotten and smells awful!" ), ROTTEN );
}
}
const bool carnivore = has_trait( trait_id( "CARNIVORE" ) );
if( food.has_flag( "CANNIBALISM" ) && !has_trait_flag( "CANNIBAL" ) ) {
add_consequence( _( "The thought of eating human flesh makes you feel sick." ), CANNIBALISM );
}
const bool edible = comest->comesttype == "FOOD" || food.has_flag( "USE_EAT_VERB" );
if( edible && has_effect( effect_nausea ) ) {
add_consequence( _( "You still feel nauseous and will probably puke it all up again." ), NAUSEA );
}
if( ( allergy_type( food ) != MORALE_NULL ) || ( carnivore && food.has_flag( "ALLERGEN_JUNK" ) &&
!food.has_flag( "CARNIVORE_OK" ) ) ) {
add_consequence( _( "Your stomach won't be happy (allergy)." ), ALLERGY );
}
if( saprophage && edible && food.rotten() && !food.has_flag( "FERTILIZER" ) ) {
// Note: We're allowing all non-solid "food". This includes drugs
// Hard-coding fertilizer for now - should be a separate flag later
//~ No, we don't eat "rotten" food. We eat properly aged food, like a normal person.
//~ Semantic difference, but greatly facilitates people being proud of their character.
add_consequence( _( "Your stomach won't be happy (not rotten enough)." ), ALLERGY_WEAK );
}
const int nutr = nutrition_for( food );
const int quench = comest->quench;
const int temp_hunger = get_hunger() - nutr;
const int temp_thirst = get_thirst() - quench;
if( !has_active_mutation( trait_id( "EATHEALTH" ) ) &&
!has_active_mutation( trait_id( "HIBERNATE" ) ) &&
!has_trait( trait_id( "SLIMESPAWNER" ) ) ) {
if( get_hunger() < 0 && nutr >= 5 && !has_active_mutation( trait_id( "GOURMAND" ) ) ) {
add_consequence( _( "You're full already and will be forcing yourself to eat." ), TOO_FULL );
} else if( ( ( nutr > 0 && temp_hunger < stomach_capacity() ) ||
( comest->quench > 0 && temp_thirst < stomach_capacity() ) ) &&
!food.has_infinite_charges() ) {
add_consequence( _( "You will not be able to finish it all." ), TOO_FULL );
}
}
if( !consequences.empty() ) {
if( !interactive ) {
return consequences.front();
}
std::ostringstream req;
for( const auto &elem : consequences ) {
req << elem.str() << std::endl;
}
const bool eat_verb = food.has_flag( "USE_EAT_VERB" );
if( eat_verb || comest->comesttype == "FOOD" ) {
req << string_format( _( "Eat your %s anyway?" ), food.tname().c_str() );
} else if( !eat_verb && comest->comesttype == "DRINK" ) {
req << string_format( _( "Drink your %s anyway?" ), food.tname().c_str() );
} else {
req << string_format( _( "Consume your %s anyway?" ), food.tname().c_str() );
}
if( !query_yn( req.str() ) ) {
return consequences.front();
}
}
// All checks ended, it's edible (or we're pretending it is)
return ret_val<edible_rating>::make_success();
}
int Creature::deal_projectile_attack(Creature *source, double missed_by,
const projectile &proj, dealt_damage_instance &dealt_dam)
{
bool u_see_this = g->u_see(this);
body_part bp_hit;
int side = rng(0, 1);
// do 10,speed because speed could potentially be > 10000
if (dodge_roll() >= dice(10, proj.speed)) {
if (is_player())
add_msg(_("You dodge %s projectile!"),
source->disp_name(true).c_str());
else if (u_see_this)
add_msg(_("%s dodges %s projectile."),
disp_name().c_str(), source->disp_name(true).c_str());
return 0;
}
// Bounce applies whether it does damage or not.
if (proj.proj_effects.count("BOUNCE")) {
add_effect("bounced", 1);
}
double hit_value = missed_by + rng_float(-0.5, 0.5);
// headshots considered elsewhere
if (hit_value <= 0.4) {
bp_hit = bp_torso;
} else if (one_in(4)) {
bp_hit = bp_legs;
} else {
bp_hit = bp_arms;
}
double monster_speed_penalty = std::max(double(get_speed()) / 80., 1.0);
double goodhit = missed_by / monster_speed_penalty;
double damage_mult = 1.0;
std::string message = "";
game_message_type gmtSCTcolor = m_neutral;
if (goodhit <= .1) {
message = _("Headshot!");
source->add_msg_if_player(m_good, message.c_str());
gmtSCTcolor = m_headshot;
damage_mult *= rng_float(2.45, 3.35);
bp_hit = bp_head; // headshot hits the head, of course
} else if (goodhit <= .2) {
message = _("Critical!");
source->add_msg_if_player(m_good, message.c_str());
gmtSCTcolor = m_critical;
damage_mult *= rng_float(1.75, 2.3);
} else if (goodhit <= .4) {
message = _("Good hit!");
source->add_msg_if_player(m_good, message.c_str());
gmtSCTcolor = m_good;
damage_mult *= rng_float(1, 1.5);
} else if (goodhit <= .6) {
damage_mult *= rng_float(0.5, 1);
} else if (goodhit <= .8) {
message = _("Grazing hit.");
source->add_msg_if_player(m_good, message.c_str());
gmtSCTcolor = m_grazing;
damage_mult *= rng_float(0, .25);
} else {
damage_mult *= 0;
}
// copy it, since we're mutating
damage_instance impact = proj.impact;
if( item(proj.ammo->id, 0).has_flag("NOGIB") ) {
impact.add_effect("NOGIB");
}
impact.mult_damage(damage_mult);
dealt_dam = deal_damage(source, bp_hit, side, impact);
dealt_dam.bp_hit = bp_hit;
// Apply ammo effects to target.
const std::string target_material = get_material();
if (proj.proj_effects.count("FLAME")) {
if (0 == target_material.compare("veggy") || 0 == target_material.compare("cotton") ||
0 == target_material.compare("wool") || 0 == target_material.compare("paper") ||
0 == target_material.compare("wood" ) ) {
add_effect("onfire", rng(8, 20));
} else if (0 == target_material.compare("flesh") || 0 == target_material.compare("iflesh") ) {
add_effect("onfire", rng(5, 10));
}
} else if (proj.proj_effects.count("INCENDIARY") ) {
if (0 == target_material.compare("veggy") || 0 == target_material.compare("cotton") ||
0 == target_material.compare("wool") || 0 == target_material.compare("paper") ||
0 == target_material.compare("wood") ) {
add_effect("onfire", rng(2, 6));
} else if ( (0 == target_material.compare("flesh") || 0 == target_material.compare("iflesh") ) &&
one_in(4) ) {
add_effect("onfire", rng(1, 4));
}
} else if (proj.proj_effects.count("IGNITE")) {
if (0 == target_material.compare("veggy") || 0 == target_material.compare("cotton") ||
0 == target_material.compare("wool") || 0 == target_material.compare("paper") ||
0 == target_material.compare("wood") ) {
add_effect("onfire", rng(6, 6));
} else if (0 == target_material.compare("flesh") || 0 == target_material.compare("iflesh") ) {
add_effect("onfire", rng(10, 10));
}
}
int stun_strength = 0;
if (proj.proj_effects.count("BEANBAG")) {
stun_strength = 4;
}
if(proj.proj_effects.count("WHIP")) {
stun_strength = rng(4, 10);
}
if (proj.proj_effects.count("LARGE_BEANBAG")) {
stun_strength = 16;
}
if( stun_strength > 0 ) {
switch( get_size() ) {
case MS_TINY:
stun_strength *= 4;
break;
case MS_SMALL:
stun_strength *= 2;
break;
case MS_MEDIUM:
default:
break;
case MS_LARGE:
stun_strength /= 2;
break;
case MS_HUGE:
stun_strength /= 4;
break;
}
add_effect( "stunned", rng(stun_strength / 2, stun_strength) );
}
if(u_see_this) {
if (damage_mult == 0) {
if(source != NULL) {
add_msg(source->is_player() ? _("You miss!") : _("The shot misses!"));
}
} else if (dealt_dam.total_damage() == 0) {
add_msg(_("The shot reflects off %s %s!"), disp_name(true).c_str(),
skin_name().c_str());
} else if (source != NULL) {
if (source->is_player()) {
//player hits monster ranged
nc_color color;
std::string health_bar = "";
get_HP_Bar(dealt_dam.total_damage(), this->get_hp_max(), color, health_bar, true);
SCT.add(this->xpos(),
this->ypos(),
direction_from(0, 0, this->xpos() - source->xpos(), this->ypos() - source->ypos()),
health_bar, m_good,
message, gmtSCTcolor);
if (this->get_hp() > 0) {
get_HP_Bar(this->get_hp(), this->get_hp_max(), color, health_bar, true);
SCT.add(this->xpos(),
this->ypos(),
direction_from(0, 0, this->xpos() - source->xpos(), this->ypos() - source->ypos()),
health_bar, m_good,
"hp", m_neutral,
"hp");
} else {
SCT.removeCreatureHP();
}
add_msg(m_good, _("You hit the %s for %d damage."),
disp_name().c_str(), dealt_dam.total_damage());
} else if(this->is_player()) {
//monster hits player ranged
add_msg_if_player( m_bad, _( "You were hit in the %s for %d damage." ),
body_part_name( bp_hit, side ).c_str( ),
dealt_dam.total_damage( ) );
} else if( u_see_this ) {
add_msg(_("%s shoots %s."),
source->disp_name().c_str(), disp_name().c_str());
}
}
}
return 0;
}
void Character::mutation_effect(std::string mut)
{
bool destroy = false;
std::vector<body_part> bps;
if (mut == "TOUGH" || mut == "TOUGH2" || mut == "TOUGH3" || mut == "GLASSJAW" ||
mut == "FLIMSY" || mut == "FLIMSY2" || mut == "FLIMSY3" ||
mut == "MUT_TOUGH" || mut == "MUT_TOUGH2" || mut == "MUT_TOUGH3") {
recalc_hp();
} else if (mut == "WEBBED" || mut == "PAWS" || mut == "PAWS_LARGE" || mut == "ARM_TENTACLES" ||
mut == "ARM_TENTACLES_4" || mut == "ARM_TENTACLES_8") {
// Push off gloves
bps.push_back(bp_hand_l);
bps.push_back(bp_hand_r);
} else if (mut == "TALONS") {
// Destroy gloves
destroy = true;
bps.push_back(bp_hand_l);
bps.push_back(bp_hand_r);
} else if (mut == "BEAK" || mut == "BEAK_PECK" || mut == "BEAK_HUM" || mut == "MANDIBLES" ||
mut == "SABER_TEETH") {
// Destroy mouthwear
destroy = true;
bps.push_back(bp_mouth);
} else if (mut == "MINOTAUR" || mut == "MUZZLE" || mut == "MUZZLE_BEAR" || mut == "MUZZLE_LONG" ||
mut == "PROBOSCIS" || mut == "MUZZLE_RAT") {
// Push off mouthwear
bps.push_back(bp_mouth);
} else if (mut == "HOOVES" || mut == "RAP_TALONS") {
// Destroy footwear
destroy = true;
bps.push_back(bp_foot_l);
bps.push_back(bp_foot_r);
} else if (mut == "SHELL") {
// Destroy torsowear
destroy = true;
bps.push_back(bp_torso);
} else if ( (mut == "INSECT_ARMS") || (mut == "ARACHNID_ARMS") || (mut == "WINGS_BUTTERFLY") ) {
// Push off torsowear
bps.push_back(bp_torso);
} else if (mut == "HORNS_CURLED" || mut == "CHITIN3") {
// Push off all helmets
bps.push_back(bp_head);
} else if (mut == "HORNS_POINTED" || mut == "ANTENNAE" || mut == "ANTLERS") {
// Push off non-cloth helmets
bps.push_back(bp_head);
} else if (mut == "HUGE") {
// And there goes your clothing; by now you shouldn't need it anymore
add_msg(m_bad, _("You rip out of your clothing!"));
destroy = true;
bps.push_back(bp_torso);
bps.push_back(bp_leg_l);
bps.push_back(bp_leg_r);
bps.push_back(bp_arm_l);
bps.push_back(bp_arm_r);
bps.push_back(bp_hand_l);
bps.push_back(bp_hand_r);
bps.push_back(bp_head);
bps.push_back(bp_foot_l);
bps.push_back(bp_foot_r);
} else if (mut == "STR_ALPHA") {
if (str_max <= 6) {
str_max = 8;
} else if (str_max <= 7) {
str_max = 11;
} else if (str_max <= 14) {
str_max = 15;
} else {
str_max = 18;
}
recalc_hp();
} else if (mut == "DEX_ALPHA") {
if (dex_max <= 6) {
dex_max = 8;
} else if (dex_max <= 7) {
dex_max = 11;
} else if (dex_max <= 14) {
dex_max = 15;
} else {
dex_max = 18;
}
} else if (mut == "INT_ALPHA") {
if (int_max <= 6) {
int_max = 8;
} else if (int_max <= 7) {
int_max = 11;
} else if (int_max <= 14) {
int_max = 15;
} else {
int_max = 18;
}
} else if (mut == "INT_SLIME") {
int_max *= 2; // Now, can you keep it? :-)
} else if (mut == "PER_ALPHA") {
if (per_max <= 6) {
per_max = 8;
} else if (per_max <= 7) {
per_max = 11;
} else if (per_max <= 14) {
per_max = 15;
} else {
per_max = 18;
}
} else {
apply_mods(mut, true);
}
const auto covers_any = [&bps]( const item& armor ) {
for( auto &bp : bps ) {
if( armor.covers( bp ) ) {
return true;
}
}
return false;
};
remove_worn_items_with( [&]( item& armor ) {
static const std::string mutation_safe = "OVERSIZE";
if( armor.has_flag( mutation_safe ) ) {
return false;
}
if( !covers_any( armor ) ) {
return false;
}
if( destroy ) {
add_msg_if_player( m_bad, _("Your %s is destroyed!"), armor.tname().c_str() );
for( item& remain : armor.contents ) {
g->m.add_item_or_charges( pos(), remain );
}
} else {
add_msg_if_player( m_bad, _("Your %s is pushed off."), armor.tname().c_str() );
g->m.add_item_or_charges( pos(), armor );
}
return true;
} );
}
bool Character::move_effects(bool attacking)
{
if (has_effect("downed")) {
///\EFFECT_DEX increases chance to stand up when knocked down
///\EFFECT_STR increases chance to stand up when knocked down, slightly
if (rng(0, 40) > get_dex() + get_str() / 2) {
add_msg_if_player(_("You struggle to stand."));
} else {
add_msg_player_or_npc(m_good, _("You stand up."),
_("<npcname> stands up."));
remove_effect("downed");
}
return false;
}
if (has_effect("webbed")) {
///\EFFECT_STR increases chance to escape webs
if (x_in_y(get_str(), 6 * get_effect_int("webbed"))) {
add_msg_player_or_npc(m_good, _("You free yourself from the webs!"),
_("<npcname> frees themselves from the webs!"));
remove_effect("webbed");
} else {
add_msg_if_player(_("You try to free yourself from the webs, but can't get loose!"));
}
return false;
}
if (has_effect("lightsnare")) {
///\EFFECT_STR increases chance to escape light snare
///\EFFECT_DEX increases chance to escape light snare
if(x_in_y(get_str(), 12) || x_in_y(get_dex(), 8)) {
remove_effect("lightsnare");
add_msg_player_or_npc(m_good, _("You free yourself from the light snare!"),
_("<npcname> frees themselves from the light snare!"));
item string("string_36", calendar::turn);
item snare("snare_trigger", calendar::turn);
g->m.add_item_or_charges(posx(), posy(), string);
g->m.add_item_or_charges(posx(), posy(), snare);
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the light snare, but can't get loose!"));
}
return false;
}
if (has_effect("heavysnare")) {
///\EFFECT_STR increases chance to escape heavy snare, slightly
///\EFFECT_DEX increases chance to escape light snare
if(x_in_y(get_str(), 32) || x_in_y(get_dex(), 16)) {
remove_effect("heavysnare");
add_msg_player_or_npc(m_good, _("You free yourself from the heavy snare!"),
_("<npcname> frees themselves from the heavy snare!"));
item rope("rope_6", calendar::turn);
item snare("snare_trigger", calendar::turn);
g->m.add_item_or_charges(posx(), posy(), rope);
g->m.add_item_or_charges(posx(), posy(), snare);
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the heavy snare, but can't get loose!"));
}
return false;
}
if (has_effect("beartrap")) {
/* Real bear traps can't be removed without the proper tools or immense strength; eventually this should
allow normal players two options: removal of the limb or removal of the trap from the ground
(at which point the player could later remove it from the leg with the right tools).
As such we are currently making it a bit easier for players and NPC's to get out of bear traps.
*/
///\EFFECT_STR increases chance to escape bear trap
if(x_in_y(get_str(), 100)) {
remove_effect("beartrap");
add_msg_player_or_npc(m_good, _("You free yourself from the bear trap!"),
_("<npcname> frees themselves from the bear trap!"));
item beartrap("beartrap", calendar::turn);
g->m.add_item_or_charges(posx(), posy(), beartrap);
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the bear trap, but can't get loose!"));
}
return false;
}
if (has_effect("crushed")) {
///\EFFECT_STR increases chance to escape crushing rubble
///\EFFECT_DEX increases chance to escape crushing rubble, slightly
if(x_in_y(get_str() + get_dex() / 4, 100)) {
remove_effect("crushed");
add_msg_player_or_npc(m_good, _("You free yourself from the rubble!"),
_("<npcname> frees themselves from the rubble!"));
} else {
add_msg_if_player(m_bad, _("You try to free yourself from the rubble, but can't get loose!"));
}
return false;
}
// Below this point are things that allow for movement if they succeed
// Currently we only have one thing that forces movement if you succeed, should we get more
// than this will need to be reworked to only have success effects if /all/ checks succeed
if (has_effect("in_pit")) {
///\EFFECT_STR increases chance to escape pit
///\EFFECT_DEX increases chance to escape pit, slightly
if (rng(0, 40) > get_str() + get_dex() / 2) {
add_msg_if_player(m_bad, _("You try to escape the pit, but slip back in."));
return false;
} else {
add_msg_player_or_npc(m_good, _("You escape the pit!"),
_("<npcname> escapes the pit!"));
remove_effect("in_pit");
}
}
if( has_effect( "grabbed" ) && !attacking ) {
int zed_number = 0;
for( auto &&dest : g->m.points_in_radius( pos(), 1, 0 ) ){
if( g->mon_at( dest ) != -1 &&
( g->zombie( g->mon_at( dest ) ).has_flag( MF_GRABS ) ||
g->zombie( g->mon_at( dest ) ).type->has_special_attack( "GRAB" ) ) ) {
zed_number ++;
}
}
if( zed_number == 0 ) {
add_msg_player_or_npc( m_good, _( "You find yourself no longer grabbed." ),
_( "<npcname> finds themselves no longer grabbed." ) );
remove_effect( "grabbed" );
///\EFFECT_DEX increases chance to escape grab, if >STR
///\EFFECT_STR increases chance to escape grab, if >DEX
} else if( rng( 0, std::max( get_dex(), get_str() ) ) < rng( get_effect_int( "grabbed" ), 8 ) ) {
// Randomly compare higher of dex or str to grab intensity.
add_msg_player_or_npc( m_bad, _( "You try break out of the grab, but fail!" ),
_( "<npcname> tries to break out of the grab, but fails!" ) );
return false;
} else {
add_msg_player_or_npc( m_good, _( "You break out of the grab!" ),
_( "<npcname> breaks out of the grab!" ) );
remove_effect( "grabbed" );
}
}
return Creature::move_effects( attacking );
}
void player::activate_mutation( const std::string &mut )
{
const auto &mdata = mutation_branch::get( mut );
auto &tdata = my_mutations[mut];
int cost = mdata.cost;
// You can take yourself halfway to Near Death levels of hunger/thirst.
// Fatigue can go to Exhausted.
if ((mdata.hunger && hunger >= 700) || (mdata.thirst && thirst >= 260) ||
(mdata.fatigue && fatigue >= 575)) {
// Insufficient Foo to *maintain* operation is handled in player::suffer
add_msg(m_warning, _("You feel like using your %s would kill you!"), mdata.name.c_str());
return;
}
if (tdata.powered && tdata.charge > 0) {
// Already-on units just lose a bit of charge
tdata.charge--;
} else {
// Not-on units, or those with zero charge, have to pay the power cost
if (mdata.cooldown > 0) {
tdata.charge = mdata.cooldown - 1;
}
if (mdata.hunger){
hunger += cost;
}
if (mdata.thirst){
thirst += cost;
}
if (mdata.fatigue){
fatigue += cost;
}
tdata.powered = true;
// Handle stat changes from activation
apply_mods(mut, true);
recalc_sight_limits();
}
if( mut == "WEB_WEAVER" ) {
g->m.add_field(pos(), fd_web, 1, 0);
add_msg(_("You start spinning web with your spinnerets!"));
} else if (mut == "BURROW"){
if (g->u.is_underwater()) {
add_msg_if_player(m_info, _("You can't do that while underwater."));
tdata.powered = false;
return;
}
int dirx, diry;
if (!choose_adjacent(_("Burrow where?"), dirx, diry)) {
tdata.powered = false;
return;
}
if (dirx == g->u.posx() && diry == g->u.posy()) {
add_msg_if_player(_("You've got places to go and critters to beat."));
add_msg_if_player(_("Let the lesser folks eat their hearts out."));
tdata.powered = false;
return;
}
int turns;
if (g->m.is_bashable(dirx, diry) && g->m.has_flag("SUPPORTS_ROOF", dirx, diry) &&
g->m.ter(dirx, diry) != t_tree) {
// Takes about 100 minutes (not quite two hours) base time.
// Being better-adapted to the task means that skillful Survivors can do it almost twice as fast.
turns = (100000 - 5000 * g->u.skillLevel("carpentry"));
} else if (g->m.move_cost(dirx, diry) == 2 && g->get_levz() == 0 &&
g->m.ter(dirx, diry) != t_dirt && g->m.ter(dirx, diry) != t_grass) {
turns = 18000;
} else {
add_msg_if_player(m_info, _("You can't burrow there."));
tdata.powered = false;
return;
}
g->u.assign_activity(ACT_BURROW, turns, -1, 0);
g->u.activity.placement = tripoint(dirx, diry,0);
add_msg_if_player(_("You tear into the %s with your teeth and claws."),
g->m.tername(dirx, diry).c_str());
tdata.powered = false;
return; // handled when the activity finishes
} else if (mut == "SLIMESPAWNER") {
std::vector<tripoint> valid;
for (int x = posx() - 1; x <= posx() + 1; x++) {
for (int y = posy() - 1; y <= posy() + 1; y++) {
tripoint dest(x, y, posz());
if (g->is_empty(dest)) {
valid.push_back( dest );
}
}
}
// Oops, no room to divide!
if (valid.size() == 0) {
add_msg(m_bad, _("You focus, but are too hemmed in to birth a new slimespring!"));
tdata.powered = false;
return;
}
add_msg(m_good, _("You focus, and with a pleasant splitting feeling, birth a new slimespring!"));
int numslime = 1;
for (int i = 0; i < numslime && !valid.empty(); i++) {
const tripoint target = random_entry_removed( valid );
if (g->summon_mon("mon_player_blob", target)) {
monster *slime = g->monster_at( target );
slime->friendly = -1;
}
}
//~ Usual enthusiastic slimespring small voices! :D
if (one_in(3)) {
add_msg(m_good, _("wow! you look just like me! we should look out for each other!"));
} else if (one_in(2)) {
add_msg(m_good, _("come on, big me, let's go!"));
} else {
add_msg(m_good, _("we're a team, we've got this!"));
}
tdata.powered = false;
return;
} else if (mut == "SHOUT1") {
sounds::sound(pos(), 10 + 2 * str_cur, _("You shout loudly!"));
tdata.powered = false;
return;
} else if (mut == "SHOUT2"){
sounds::sound(pos(), 15 + 3 * str_cur, _("You scream loudly!"));
tdata.powered = false;
return;
} else if (mut == "SHOUT3"){
sounds::sound(pos(), 20 + 4 * str_cur, _("You let out a piercing howl!"));
tdata.powered = false;
return;
} else if ((mut == "NAUSEA") || (mut == "VOMITOUS") ){
vomit();
tdata.powered = false;
return;
} else if (mut == "M_FERTILE"){
spores();
tdata.powered = false;
return;
} else if (mut == "M_BLOOM"){
blossoms();
tdata.powered = false;
return;
} else if (mut == "VINES3"){
item newit("vine_30", calendar::turn, false);
if (!can_pickVolume(newit.volume())) { //Accounts for result_mult
add_msg(_("You detach a vine but don't have room to carry it, so you drop it."));
g->m.add_item_or_charges(posx(), posy(), newit);
} else if (!can_pickWeight(newit.weight(), !OPTIONS["DANGEROUS_PICKUPS"])) {
add_msg(_("Your freshly-detached vine is too heavy to carry, so you drop it."));
g->m.add_item_or_charges(posx(), posy(), newit);
} else {
inv.assign_empty_invlet(newit);
newit = i_add(newit);
add_msg(m_info, "%c - %s", newit.invlet == 0 ? ' ' : newit.invlet, newit.tname().c_str());
}
tdata.powered = false;
return;
}
}
/**
* Attempts to harm a creature with a projectile.
*
* @param source Pointer to the creature who shot the projectile.
* @param attack A structure describing the attack and its results.
*/
void Creature::deal_projectile_attack( Creature *source, dealt_projectile_attack &attack )
{
const double missed_by = attack.missed_by;
if( missed_by >= 1.0 ) {
// Total miss
return;
}
const projectile &proj = attack.proj;
dealt_damage_instance &dealt_dam = attack.dealt_dam;
const auto &proj_effects = proj.proj_effects;
const bool u_see_this = g->u.sees(*this);
const int avoid_roll = dodge_roll();
// Do dice(10, speed) instead of dice(speed, 10) because speed could potentially be > 10000
const int diff_roll = dice( 10, proj.speed );
// Partial dodge, capped at [0.0, 1.0], added to missed_by
const double dodge_rescaled = avoid_roll / static_cast<double>( diff_roll );
const double goodhit = missed_by + std::max( 0.0, std::min( 1.0, dodge_rescaled ) ) ;
if( goodhit >= 1.0 ) {
// "Avoid" rather than "dodge", because it includes removing self from the line of fire
// rather than just Matrix-style bullet dodging
if( source != nullptr && g->u.sees( *source ) ) {
add_msg_player_or_npc(
m_warning,
_("You avoid %s projectile!"),
_("<npcname> avoids %s projectile."),
source->disp_name(true).c_str() );
} else {
add_msg_player_or_npc(
m_warning,
_("You avoid an incoming projectile!"),
_("<npcname> avoids an incoming projectile.") );
}
attack.missed_by = 1.0; // Arbitrary value
return;
}
// Bounce applies whether it does damage or not.
if( proj.proj_effects.count( "BOUNCE" ) ) {
add_effect( effect_bounced, 1_turns );
}
body_part bp_hit;
double hit_value = missed_by + rng_float(-0.5, 0.5);
// Headshots considered elsewhere
if( hit_value <= 0.4 ) {
bp_hit = bp_torso;
} else if (one_in(4)) {
if( one_in(2)) {
bp_hit = bp_leg_l;
} else {
bp_hit = bp_leg_r;
}
} else {
if( one_in(2)) {
bp_hit = bp_arm_l;
} else {
bp_hit = bp_arm_r;
}
}
double damage_mult = 1.0;
std::string message = "";
game_message_type gmtSCTcolor = m_neutral;
if( goodhit < accuracy_headshot ) {
message = _("Headshot!");
gmtSCTcolor = m_headshot;
damage_mult *= rng_float(1.95, 2.05);
bp_hit = bp_head; // headshot hits the head, of course
} else if( goodhit < accuracy_critical ) {
message = _("Critical!");
gmtSCTcolor = m_critical;
damage_mult *= rng_float(1.5, 2.0);
} else if( goodhit < accuracy_goodhit ) {
message = _("Good hit!");
gmtSCTcolor = m_good;
damage_mult *= rng_float(1, 1.5);
} else if( goodhit < accuracy_standard ) {
damage_mult *= rng_float(0.5, 1);
} else if( goodhit < accuracy_grazing ) {
message = _("Grazing hit.");
gmtSCTcolor = m_grazing;
damage_mult *= rng_float(0, .25);
}
if( source != nullptr && !message.empty() ) {
source->add_msg_if_player(m_good, message.c_str());
}
attack.missed_by = goodhit;
// copy it, since we're mutating
damage_instance impact = proj.impact;
if( damage_mult > 0.0f && proj_effects.count( "NO_DAMAGE_SCALING" ) ) {
damage_mult = 1.0f;
}
impact.mult_damage(damage_mult);
if( proj_effects.count( "NOGIB" ) > 0 ) {
float dmg_ratio = (float)impact.total_damage() / get_hp_max( player::bp_to_hp( bp_hit ) );
if( dmg_ratio > 1.25f ) {
impact.mult_damage( 1.0f / dmg_ratio );
}
}
dealt_dam = deal_damage(source, bp_hit, impact);
dealt_dam.bp_hit = bp_hit;
// Apply ammo effects to target.
if (proj.proj_effects.count("FLAME")) {
if (made_of( material_id( "veggy" ) ) || made_of( material_id( "cotton" ) ) ||
made_of( material_id( "wool" ) ) || made_of( material_id( "paper" ) ) ||
made_of( material_id( "wood" ) ) ) {
add_effect( effect_onfire, rng( 8_turns, 20_turns ), bp_hit );
} else if (made_of( material_id( "flesh" ) ) || made_of( material_id( "iflesh" ) ) ) {
add_effect( effect_onfire, rng( 5_turns, 10_turns ), bp_hit );
}
} else if (proj.proj_effects.count("INCENDIARY") ) {
if (made_of( material_id( "veggy" ) ) || made_of( material_id( "cotton" ) ) ||
made_of( material_id( "wool" ) ) || made_of( material_id( "paper" ) ) ||
made_of( material_id( "wood" ) ) ) {
add_effect( effect_onfire, rng( 2_turns, 6_turns ), bp_hit );
} else if ( (made_of( material_id( "flesh" ) ) || made_of( material_id( "iflesh" ) ) ) &&
one_in(4) ) {
add_effect( effect_onfire, rng( 1_turns, 4_turns ), bp_hit );
}
} else if (proj.proj_effects.count("IGNITE")) {
if (made_of( material_id( "veggy" ) ) || made_of( material_id( "cotton" ) ) ||
made_of( material_id( "wool" ) ) || made_of( material_id( "paper" ) ) ||
made_of( material_id( "wood" ) ) ) {
add_effect( effect_onfire, 6_turns, bp_hit );
} else if (made_of( material_id( "flesh" ) ) || made_of( material_id( "iflesh" ) ) ) {
add_effect( effect_onfire, 10_turns, bp_hit );
}
}
if( bp_hit == bp_head && proj_effects.count( "BLINDS_EYES" ) ) {
// TODO: Change this to require bp_eyes
add_env_effect( effect_blind, bp_eyes, 5, rng( 3_turns, 10_turns ) );
}
if( proj_effects.count( "APPLY_SAP" ) ) {
add_effect( effect_sap, 1_turns * dealt_dam.total_damage() );
}
int stun_strength = 0;
if (proj.proj_effects.count("BEANBAG")) {
stun_strength = 4;
}
if (proj.proj_effects.count("LARGE_BEANBAG")) {
stun_strength = 16;
}
if( stun_strength > 0 ) {
switch( get_size() ) {
case MS_TINY:
stun_strength *= 4;
break;
case MS_SMALL:
stun_strength *= 2;
break;
case MS_MEDIUM:
default:
break;
case MS_LARGE:
stun_strength /= 2;
break;
case MS_HUGE:
stun_strength /= 4;
break;
}
add_effect( effect_stunned, 1_turns * rng( stun_strength / 2, stun_strength ) );
}
if(u_see_this) {
if( damage_mult == 0 ) {
if( source != nullptr ) {
add_msg( source->is_player() ? _("You miss!") : _("The shot misses!") );
}
} else if( dealt_dam.total_damage() == 0 ) {
//~ 1$ - monster name, 2$ - character's bodypart or monster's skin/armor
add_msg( _("The shot reflects off %1$s %2$s!"), disp_name(true).c_str(),
is_monster() ?
skin_name().c_str() :
body_part_name_accusative(bp_hit).c_str() );
} else if( is_player() ) {
//monster hits player ranged
//~ Hit message. 1$s is bodypart name in accusative. 2$d is damage value.
add_msg_if_player(m_bad, _( "You were hit in the %1$s for %2$d damage." ),
body_part_name_accusative(bp_hit).c_str(),
dealt_dam.total_damage());
} else if( source != nullptr ) {
if( source->is_player() ) {
//player hits monster ranged
SCT.add(posx(), posy(),
direction_from(0, 0, posx() - source->posx(), posy() - source->posy()),
get_hp_bar(dealt_dam.total_damage(), get_hp_max(), true).first,
m_good, message, gmtSCTcolor);
if (get_hp() > 0) {
SCT.add(posx(), posy(),
direction_from(0, 0, posx() - source->posx(), posy() - source->posy()),
get_hp_bar(get_hp(), get_hp_max(), true).first, m_good,
//~ "hit points", used in scrolling combat text
_("hp"), m_neutral, "hp");
} else {
SCT.removeCreatureHP();
}
add_msg(m_good, _("You hit %s for %d damage."),
disp_name().c_str(), dealt_dam.total_damage());
} else if( u_see_this ) {
//~ 1$ - shooter, 2$ - target
add_msg(_("%1$s shoots %2$s."),
source->disp_name().c_str(), disp_name().c_str());
}
}
}
check_dead_state();
attack.hit_critter = this;
attack.missed_by = goodhit;
}
edible_rating player::can_eat( const item &food, bool interactive, bool force ) const
{
if( is_npc() || force ) {
// Just to be sure
interactive = false;
}
const std::string &itname = food.tname();
// Helper to avoid ton of `if( interactive )`
// Prints if interactive is true, does nothing otherwise
const auto maybe_print = [interactive, &itname]
( game_message_type type, const char *str ) {
if( interactive ) {
add_msg( type, str, itname.c_str() );
}
};
// As above, but for queries
// Asks if interactive and not force
// Always true if force
// Never true otherwise
const auto maybe_query = [force, interactive, &itname, this]( const char *str ) {
if( force ) {
return true;
} else if( !interactive ) {
return false;
}
return query_yn( str, itname.c_str() );
};
const auto comest = food.type->comestible.get();
if( comest == nullptr ) {
maybe_print( m_info, _( "That doesn't look edible." ) );
return INEDIBLE;
}
if( comest->tool != "null" ) {
bool has = has_amount( comest->tool, 1 );
if( item::count_by_charges( comest->tool ) ) {
has = has_charges( comest->tool, 1 );
}
if( !has ) {
if( interactive ) {
add_msg_if_player( m_info, _( "You need a %s to consume that!" ),
item::nname( comest->tool ).c_str() );
}
return NO_TOOL;
}
}
if( is_underwater() ) {
maybe_print( m_info, _( "You can't do that while underwater." ) );
return INEDIBLE;
}
// For all those folks who loved eating marloss berries. D:< mwuhahaha
if( has_trait( "M_DEPENDENT" ) && food.type->id != "mycus_fruit" ) {
maybe_print( m_info, _( "We can't eat that. It's not right for us." ) );
return INEDIBLE_MUTATION;
}
const bool drinkable = comest->comesttype == "DRINK" && !food.has_flag( "USE_EAT_VERB" );
// Here's why PROBOSCIS is such a negative trait.
if( has_trait( "PROBOSCIS" ) && !drinkable ) {
maybe_print( m_info, _( "Ugh, you can't drink that!" ) );
return INEDIBLE_MUTATION;
}
int capacity = stomach_capacity();
// TODO: Move this cache to a structure and pass it around
// to speed up checking entire inventory for edibles
const bool gourmand = has_trait( "GOURMAND" );
const bool hibernate = has_active_mutation( "HIBERNATE" );
const bool eathealth = has_trait( "EATHEALTH" );
const bool slimespawner = has_trait( "SLIMESPAWNER" );
const int nutr = nutrition_for( food.type );
const int quench = comest->quench;
bool spoiled = food.rotten();
const int temp_hunger = get_hunger() - nutr;
const int temp_thirst = get_thirst() - quench;
const bool overeating = get_hunger() < 0 && nutr >= 5 && !gourmand && !eathealth && !slimespawner &&
!hibernate;
if( interactive && hibernate &&
( get_hunger() >= -60 && get_thirst() >= -60 ) &&
( temp_hunger < -60 || temp_thirst < -60 ) ) {
if( !maybe_query( _( "You're adequately fueled. Prepare for hibernation?" ) ) ) {
return TOO_FULL;
}
}
const bool carnivore = has_trait( "CARNIVORE" );
if( carnivore && nutr > 0 &&
food.has_any_flag( carnivore_blacklist ) && !food.has_flag( "CARNIVORE_OK" ) ) {
maybe_print( m_info, _( "Eww. Inedible plant stuff!" ) );
return INEDIBLE_MUTATION;
}
if( ( has_trait( "HERBIVORE" ) || has_trait( "RUMINANT" ) ) &&
food.has_any_flag( herbivore_blacklist ) ) {
// Like non-cannibal, but more strict!
maybe_print( m_info, _( "The thought of eating that makes you feel sick. You decide not to." ) );
return INEDIBLE_MUTATION;
}
if( food.has_flag( "CANNIBALISM" ) ) {
if( !has_trait_flag( "CANNIBAL" ) &&
!maybe_query( _( "The thought of eating that makes you feel sick. Really do it?" ) ) ) {
return CANNIBALISM;
}
}
if( is_allergic( food ) &&
!maybe_query( _( "Really eat that %s? Your stomach won't be happy." ) ) ) {
return ALLERGY;
}
if( carnivore && food.has_flag( "ALLERGEN_JUNK" ) && !food.has_flag( "CARNIVORE_OK" ) &&
!maybe_query( _( "Really eat that %s? Your stomach won't be happy." ) ) ) {
return ALLERGY;
}
const bool saprophage = has_trait( "SAPROPHAGE" );
// The item is solid food
const bool chew = comest->comesttype == "FOOD" || food.has_flag( "USE_EAT_VERB" );
if( spoiled ) {
if( !saprophage && !has_trait( "SAPROVORE" ) &&
!maybe_query( _( "This %s smells awful! Eat it?" ) ) ) {
return ROTTEN;
}
} else if( saprophage && chew && !food.has_flag( "FERTILIZER" ) &&
!maybe_query( _( "Really eat that %s? Your stomach won't be happy." ) ) ) {
// Note: We're allowing all non-solid "food". This includes drugs
// Hardcoding fertilizer for now - should be a separate flag later
//~ No, we don't eat "rotten" food. We eat properly aged food, like a normal person.
//~ Semantic difference, but greatly facilitates people being proud of their character.
maybe_print( m_info, _( "It's too fresh, let it age a little first." ) );
return ROTTEN;
}
// Print at most one of those
bool overfull = false;
if( overeating ) {
overfull = !maybe_query( _( "You're full. Force yourself to eat?" ) );
} else if( ( ( nutr > 0 && temp_hunger < capacity ) ||
( comest->quench > 0 && temp_thirst < capacity ) ) &&
!eathealth && !slimespawner ) {
overfull = !maybe_query( _( "You will not be able to finish it all. Consume it?" ) );
}
if( overfull ) {
return TOO_FULL;
}
// All checks ended, it's edible (or we're pretending it is)
return EDIBLE;
}
