crawl-ref/source/spl-selfench.cc

   1 /*
   2  *  File:     spl-selfench.cc
   3  *  Summary:  Self-enchantment spells.
   4  */
   5
   6 #include "AppHdr.h"
   7
   8 #include "spl-selfench.h"
   9 #include "externs.h"
  10
  11 #include "areas.h"
  12 #include "delay.h"
  13 #include "env.h"
  14 #include "godconduct.h"
  15 #include "hints.h"
  16 #include "it_use2.h"
  17 #include "itemprop.h"
  18 #include "libutil.h"
  19 #include "message.h"
  20 #include "misc.h"
  21 #include "religion.h"
  22 #include "spl-cast.h"
  23 #include "spl-other.h"
  24 #include "spl-util.h"
  25 #include "stuff.h"
  26 #include "transform.h"
  27 #include "view.h"
  28
  29 int allowed_deaths_door_hp(void)
  30 {
  31     int hp = you.skills[SK_NECROMANCY] / 2;
  32
  33     if (you.religion == GOD_KIKUBAAQUDGHA && !player_under_penance())
  34         hp += you.piety / 15;
  35
  36     return std::max(hp, 1);
  37 }
  38
  39 bool cast_deaths_door(int pow)
  40 {
  41     if (you.is_undead)
  42         mpr("You're already dead!");
  43     else if (you.duration[DUR_DEATHS_DOOR])
  44         mpr("Your appeal for an extension has been denied.");
  45     else
  46     {
  47         mpr("You feel invincible!");
  48         mpr("You seem to hear sand running through an hourglass...",
  49             MSGCH_SOUND);
  50
  51         set_hp(allowed_deaths_door_hp(), false);
  52         deflate_hp(you.hp_max, false);
  53
  54         you.set_duration(DUR_DEATHS_DOOR, 10 + random2avg(13, 3)
  55                                            + (random2(pow) / 10));
  56
  57         if (you.duration[DUR_DEATHS_DOOR] > 25 * BASELINE_DELAY)
  58             you.duration[DUR_DEATHS_DOOR] = (23 + random2(5)) * BASELINE_DELAY;
  59         return true;
  60     }
  61
  62     return false;
  63 }
  64
  65 static bool _know_spell(spell_type spell)
  66 {
  67     if (spell == NUM_SPELLS)
  68         return (false);
  69
  70     if (!you.has_spell(spell))
  71     {
  72         mprf("You don't know how to extend %s.", spell_title(spell));
  73         return (false);
  74     }
  75
  76     int fail = spell_fail(spell);
  77     dprf("fail = %d", fail);
  78
  79     if (fail > random2(50) + 50)
  80     {
  81         mprf("Your knowledge of %s fails you.", spell_title(spell));
  82         return (false);
  83     }
  84
  85     return (true);
  86 }
  87
  88 static spell_type _brand_spell()
  89 {
  90     const item_def *wpn = you.weapon();
  91
  92     if (!wpn)
  93         return NUM_SPELLS;
  94
  95     const int wpn_type = get_vorpal_type(*wpn);
  96     switch(get_weapon_brand(*wpn))
  97     {
  98         case SPWPN_FLAMING:
  99         case SPWPN_FLAME:
 100             return SPELL_FIRE_BRAND;
 101         case SPWPN_FREEZING:
 102         case SPWPN_FROST:
 103             return SPELL_FREEZING_AURA;
 104         case SPWPN_VORPAL:
 105             if (wpn_type == DVORP_CRUSHING)
 106                 return SPELL_MAXWELLS_SILVER_HAMMER;
 107             return NUM_SPELLS;
 108         case SPWPN_VENOM:
 109             if (wpn_type == DVORP_CRUSHING)
 110                 return NUM_SPELLS;
 111             return SPELL_POISON_WEAPON;
 112         case SPWPN_PAIN:
 113             return SPELL_EXCRUCIATING_WOUNDS;
 114         case SPWPN_DRAINING:
 115             return SPELL_LETHAL_INFUSION;
 116         case SPWPN_DISTORTION:
 117             return SPELL_WARP_BRAND;
 118         default:
 119             return NUM_SPELLS;
 120     }
 121 }
 122
 123 static spell_type _transform_spell()
 124 {
 125     switch(you.form)
 126     {
 127     case TRAN_BLADE_HANDS:
 128         return SPELL_BLADE_HANDS;
 129     case TRAN_SPIDER:
 130         return SPELL_SPIDER_FORM;
 131     case TRAN_STATUE:
 132         return SPELL_STATUE_FORM;
 133     case TRAN_ICE_BEAST:
 134         return SPELL_ICE_FORM;
 135     case TRAN_DRAGON:
 136         return SPELL_DRAGON_FORM;
 137     case TRAN_LICH:
 138         return SPELL_NECROMUTATION;
 139     case TRAN_BAT:
 140         return NUM_SPELLS; // no spell
 141     case TRAN_PIG:
 142         return SPELL_PORKALATOR; // Kirke/Nemelex only
 143     default:
 144         return NUM_SPELLS;
 145     }
 146 }
 147
 148 void extension(int pow)
 149 {
 150     int contamination = random2(2);
 151
 152     if (you.duration[DUR_HASTE] && _know_spell(SPELL_HASTE))
 153     {
 154         potion_effect(POT_SPEED, pow);
 155         contamination++;
 156     }
 157
 158     if (you.duration[DUR_SLOW] && _know_spell(SPELL_SLOW)) // heh heh
 159         potion_effect(POT_SLOWING, pow);
 160
 161     if (you.duration[DUR_LEVITATION] && !you.duration[DUR_CONTROLLED_FLIGHT]
 162         && _know_spell(SPELL_LEVITATION))
 163     {
 164         levitate_player(pow);
 165     }
 166
 167     if (you.duration[DUR_INVIS] && _know_spell(SPELL_INVISIBILITY))
 168     {
 169         potion_effect(POT_INVISIBILITY, pow);
 170         contamination++;
 171     }
 172
 173     if (you.duration[DUR_ICY_ARMOUR] && _know_spell(SPELL_OZOCUBUS_ARMOUR))
 174         ice_armour(pow, true);
 175
 176     if (you.duration[DUR_REPEL_MISSILES] && _know_spell(SPELL_REPEL_MISSILES))
 177         missile_prot(pow);
 178
 179     if (you.duration[DUR_REGENERATION] && _know_spell(SPELL_REGENERATION)
 180         && you.form != TRAN_LICH)
 181     {
 182         cast_regen(pow);
 183     }
 184
 185     if (you.duration[DUR_DEFLECT_MISSILES]
 186         && _know_spell(SPELL_DEFLECT_MISSILES))
 187     {
 188         deflection(pow);
 189     }
 190
 191     if (you.duration[DUR_FIRE_SHIELD] && _know_spell(SPELL_RING_OF_FLAMES))
 192     {
 193         you.increase_duration(DUR_FIRE_SHIELD, random2(pow / 20), 50);
 194         mpr("Your ring of flames roars with new vigour!");
 195     }
 196
 197     if (!you.duration[DUR_WEAPON_BRAND] < 1 && _know_spell(_brand_spell()))
 198     {
 199         you.increase_duration(DUR_WEAPON_BRAND, 5 + random2(8), 80);
 200     }
 201
 202     if (you.duration[DUR_SWIFTNESS] && _know_spell(SPELL_SWIFTNESS))
 203         cast_swiftness(pow);
 204
 205     if (you.duration[DUR_INSULATION] && _know_spell(SPELL_INSULATION))
 206         cast_insulation(pow);
 207
 208     if (you.duration[DUR_CONTROLLED_FLIGHT] && _know_spell(SPELL_FLY))
 209         cast_fly(pow);
 210
 211     if (you.duration[DUR_CONTROL_TELEPORT]
 212         && _know_spell(SPELL_CONTROL_TELEPORT))
 213     {
 214         cast_teleport_control(pow);
 215     }
 216
 217     if (you.duration[DUR_RESIST_POISON] && _know_spell(SPELL_RESIST_POISON))
 218         cast_resist_poison(pow);
 219
 220     if (you.duration[DUR_TRANSFORMATION] && _know_spell(_transform_spell()))
 221     {
 222         mpr("Your transformation has been extended.");
 223         you.increase_duration(DUR_TRANSFORMATION, random2(pow), 100,
 224                               "Your transformation has been extended.");
 225
 226         if (you.form == TRAN_LICH
 227             && is_good_god(you.religion))
 228         {
 229             // possible with Xom or a card
 230             excommunication();
 231         }
 232
 233         // Give a warning if it won't last long enough for the
 234         // timeout messages.
 235         transformation_expiration_warning();
 236     }
 237
 238     if (you.duration[DUR_STONESKIN] && _know_spell(SPELL_STONESKIN))
 239         cast_stoneskin(pow);
 240
 241     if (you.duration[DUR_PHASE_SHIFT] && _know_spell(SPELL_PHASE_SHIFT))
 242         cast_phase_shift(pow);
 243
 244     if (you.duration[DUR_SEE_INVISIBLE] && _know_spell(SPELL_SEE_INVISIBLE))
 245         cast_see_invisible(pow);
 246
 247     if (you.duration[DUR_SILENCE] && _know_spell(SPELL_SILENCE))
 248         cast_silence(pow);    //how precisely did you cast extension?
 249
 250     if (you.duration[DUR_CONDENSATION_SHIELD]
 251         && _know_spell(SPELL_CONDENSATION_SHIELD))
 252     {
 253         cast_condensation_shield(pow);
 254     }
 255
 256     if (you.duration[DUR_DEATH_CHANNEL] && _know_spell(SPELL_DEATH_CHANNEL))
 257         cast_death_channel(pow);
 258
 259     if (you.duration[DUR_DEATHS_DOOR] && _know_spell(SPELL_DEATHS_DOOR))
 260         cast_deaths_door(pow);   // just for the fail message
 261
 262     if (contamination)
 263         contaminate_player(contamination, true);
 264 }
 265
 266 void remove_ice_armour()
 267 {
 268     mpr("Your icy armour melts away.", MSGCH_DURATION);
 269     you.redraw_armour_class = true;
 270     you.duration[DUR_ICY_ARMOUR] = 0;
 271 }
 272
 273 void ice_armour(int pow, bool extending)
 274 {
 275     if (!player_effectively_in_light_armour())
 276     {
 277         if (!extending)
 278             mpr("You are wearing too much armour.");
 279
 280         return;
 281     }
 282
 283     if (you.duration[DUR_STONEMAIL] || you.duration[DUR_STONESKIN])
 284     {
 285         if (!extending)
 286             mpr("The spell conflicts with another spell still in effect.");
 287
 288         return;
 289     }
 290
 291     if (you.duration[DUR_ICY_ARMOUR])
 292         mpr("Your icy armour thickens.");
 293     else
 294     {
 295         if (you.form == TRAN_ICE_BEAST)
 296             mpr("Your icy body feels more resilient.");
 297         else
 298             mpr("A film of ice covers your body!");
 299
 300         you.redraw_armour_class = true;
 301     }
 302
 303     you.increase_duration(DUR_ICY_ARMOUR, 20 + random2(pow) + random2(pow), 50,
 304                           NULL);
 305 }
 306
 307 void missile_prot(int pow)
 308 {
 309     you.increase_duration(DUR_REPEL_MISSILES, 8 + roll_dice(2, pow), 100,
 310                           "You feel protected from missiles.");
 311 }
 312
 313 void deflection(int pow)
 314 {
 315     you.increase_duration(DUR_DEFLECT_MISSILES, 15 + random2(pow), 100,
 316                           "You feel very safe from missiles.");
 317 }
 318
 319 void remove_regen(bool divine_ability)
 320 {
 321     mpr("Your skin stops crawling.", MSGCH_DURATION);
 322     you.duration[DUR_REGENERATION] = 0;
 323     if (divine_ability)
 324     {
 325         mpr("You feel less resistant to magic.", MSGCH_DURATION);
 326         you.attribute[ATTR_DIVINE_REGENERATION] = 0;
 327     }
 328 }
 329
 330 void cast_regen(int pow, bool divine_ability)
 331 {
 332     you.increase_duration(DUR_REGENERATION, 5 + roll_dice(2, pow / 3 + 1), 100,
 333                           "Your skin crawls.");
 334
 335     if (divine_ability)
 336     {
 337         mpr("You feel resistant to magic.");
 338         you.attribute[ATTR_DIVINE_REGENERATION] = 1;
 339     }
 340 }
 341
 342 void cast_berserk(void)
 343 {
 344     go_berserk(true);
 345 }
 346
 347 void cast_swiftness(int power)
 348 {
 349     if (you.in_water())
 350     {
 351         mpr("The water foams!");
 352         return;
 353     }
 354
 355     if (!you.duration[DUR_SWIFTNESS] && player_movement_speed() <= 6)
 356     {
 357         mpr("You can't move any more quickly.");
 358         return;
 359     }
 360
 361     // [dshaligram] Removed the on-your-feet bit.  Sounds odd when
 362     // you're levitating, for instance.
 363     you.increase_duration(DUR_SWIFTNESS, 20 + random2(power), 100,
 364                           "You feel quick.");
 365     did_god_conduct(DID_HASTY, 8, true);
 366 }
 367
 368 void cast_fly(int power)
 369 {
 370     const int dur_change = 25 + random2(power) + random2(power);
 371     const bool was_levitating = you.airborne();
 372
 373     you.increase_duration(DUR_LEVITATION, dur_change, 100);
 374     you.increase_duration(DUR_CONTROLLED_FLIGHT, dur_change, 100);
 375
 376     burden_change();
 377
 378     if (!was_levitating)
 379         float_player(true);
 380     else
 381         mpr("You feel more buoyant.");
 382 }
 383
 384 void cast_insulation(int power)
 385 {
 386     you.increase_duration(DUR_INSULATION, 10 + random2(power), 100,
 387                           "You feel insulated.");
 388 }
 389
 390 void cast_resist_poison(int power)
 391 {
 392     you.increase_duration(DUR_RESIST_POISON, 10 + random2(power), 100,
 393                           "You feel resistant to poison.");
 394 }
 395
 396 void cast_teleport_control(int power)
 397 {
 398     you.increase_duration(DUR_CONTROL_TELEPORT, 10 + random2(power), 50,
 399                           "You feel in control.");
 400 }
 401
 402 int cast_selective_amnesia(std::string *pre_msg)
 403 {
 404     if (you.spell_no == 0)
 405     {
 406         canned_msg(MSG_NO_SPELLS);
 407         return (0);
 408     }
 409
 410     int keyin = 0;
 411     spell_type spell;
 412     int slot;
 413
 414     // Pick a spell to forget.
 415     while (true)
 416     {
 417         mpr("Forget which spell ([?*] list [ESC] exit)? ", MSGCH_PROMPT);
 418         keyin = get_ch();
 419
 420         if (key_is_escape(keyin))
 421         {
 422             canned_msg(MSG_OK);
 423             return (-1);
 424         }
 425
 426         if (keyin == '?' || keyin == '*')
 427         {
 428             keyin = list_spells(false, false, false);
 429             redraw_screen();
 430         }
 431
 432         if (!isaalpha(keyin))
 433         {
 434             mesclr();
 435             continue;
 436         }
 437
 438         spell = get_spell_by_letter(keyin);
 439         slot = get_spell_slot_by_letter(keyin);
 440
 441         if (spell == SPELL_NO_SPELL)
 442             mpr("You don't know that spell.");
 443         else
 444             break;
 445     }
 446
 447     if (pre_msg)
 448         mpr(pre_msg->c_str());
 449
 450     const int ep_gain = spell_mana(spell);
 451     del_spell_from_memory_by_slot(slot);
 452
 453     if (ep_gain > 0)
 454     {
 455         inc_mp(ep_gain, false);
 456         mpr("The spell releases its latent energy back to you as "
 457             "it unravels.");
 458     }
 459
 460     return (1);
 461 }
 462
 463 void cast_see_invisible(int pow)
 464 {
 465     if (you.can_see_invisible())
 466         mpr("You feel as though your vision will be sharpened longer.");
 467     else
 468     {
 469         mpr("Your vision seems to sharpen.");
 470
 471         // We might have to turn autopickup back on again.
 472         // TODO: Once the spell times out we might want to check all monsters
 473         //       in LOS for invisibility and turn autopickup off again, if
 474         //       needed.
 475         autotoggle_autopickup(false);
 476     }
 477
 478     // No message if you already are under the spell.
 479     you.increase_duration(DUR_SEE_INVISIBLE, 10 + random2(2 + pow/2), 100);
 480 }
 481
 482 void cast_silence(int pow)
 483 {
 484     if (!you.attribute[ATTR_WAS_SILENCED])
 485         mpr("A profound silence engulfs you.");
 486
 487     you.attribute[ATTR_WAS_SILENCED] = 1;
 488
 489     you.increase_duration(DUR_SILENCE, 10 + random2avg(pow, 2), 100);
 490     invalidate_agrid(true);
 491
 492     if (you.beheld())
 493         you.update_beholders();
 494
 495     learned_something_new(HINT_YOU_SILENCE);
 496 }
 497
 498 void cast_liquefaction(int pow)
 499 {
 500     flash_view_delay(BROWN, 80);
 501     flash_view_delay(YELLOW, 80);
 502     flash_view_delay(BROWN, 140);
 503
 504     mpr("The ground around you becomes liquefied!");
 505
 506     you.increase_duration(DUR_LIQUEFYING, 10 + random2avg(pow, 2), 100);
 507     invalidate_agrid(true);
 508 }