src/status/shape-changer.cpp

   1 #include "status/shape-changer.h"
   2 #include "autopick/autopick-reader-writer.h"
   3 #include "birth/birth-body-spec.h"
   4 #include "birth/birth-stat.h"
   5 #include "core/disturbance.h"
   6 #include "core/hp-mp-processor.h"
   7 #include "core/player-redraw-types.h"
   8 #include "core/player-update-types.h"
   9 #include "core/stuff-handler.h"
  10 #include "game-option/disturbance-options.h"
  11 #include "grid/grid.h"
  12 #include "mutation/mutation-investor-remover.h"
  13 #include "player-info/avatar.h"
  14 #include "player/player-class.h"
  15 #include "player/player-damage.h"
  16 #include "player/player-personality.h"
  17 #include "player/player-sex.h"
  18 #include "player/race-info-table.h"
  19 #include "spell/spells-status.h"
  20 #include "status/bad-status-setter.h"
  21 #include "status/base-status.h"
  22 #include "view/display-messages.h"
  23 #ifdef JP
  24 #else
  25 #include "locale/english.h"
  26 #endif
  27
  28 void do_poly_wounds(player_type *creature_ptr)
  29 {
  30     s16b wounds = creature_ptr->cut;
  31     s16b hit_p = (creature_ptr->mhp - creature_ptr->chp);
  32     s16b change = damroll(creature_ptr->lev, 5);
  33     bool Nasty_effect = one_in_(5);
  34     if (!(wounds || hit_p || Nasty_effect))
  35         return;
  36
  37     msg_print(_("傷がより軽いものに変化した。", "Your wounds are polymorphed into less serious ones."));
  38     hp_player(creature_ptr, change);
  39     if (Nasty_effect) {
  40         msg_print(_("新たな傷ができた！", "A new wound was created!"));
  41         take_hit(creature_ptr, DAMAGE_LOSELIFE, change / 2, _("変化した傷", "a polymorphed wound"));
  42         set_cut(creature_ptr, change);
  43     } else {
  44         set_cut(creature_ptr, creature_ptr->cut - (change / 2));
  45     }
  46 }
  47
  48 /*
  49  * Change player race
  50  */
  51 void change_race(player_type *creature_ptr, player_race_type new_race, concptr effect_msg)
  52 {
  53     concptr title = race_info[new_race].title;
  54     int old_race = creature_ptr->prace;
  55 #ifdef JP
  56     msg_format("あなたは%s%sに変化した！", effect_msg, title);
  57 #else
  58     msg_format("You turn into %s %s%s!", (is_a_vowel((effect_msg[0]) ? effect_msg[0] : title[0]) ? "an" : "a"), effect_msg, title);
  59 #endif
  60
  61     chg_virtue(creature_ptr, V_CHANCE, 2);
  62     if (creature_ptr->prace < 32) {
  63         creature_ptr->old_race1 |= 1UL << creature_ptr->prace;
  64     } else {
  65         creature_ptr->old_race2 |= 1UL << (creature_ptr->prace - 32);
  66     }
  67
  68     creature_ptr->prace = new_race;
  69     rp_ptr = &race_info[creature_ptr->prace];
  70     creature_ptr->expfact = rp_ptr->r_exp + cp_ptr->c_exp;
  71
  72     bool is_special_class = creature_ptr->pclass == CLASS_MONK;
  73     is_special_class |= creature_ptr->pclass == CLASS_FORCETRAINER;
  74     is_special_class |= creature_ptr->pclass == CLASS_NINJA;
  75     bool is_special_race = creature_ptr->prace == RACE_KLACKON;
  76     is_special_race |= creature_ptr->prace == RACE_SPRITE;
  77     if (is_special_class && is_special_race)
  78         creature_ptr->expfact -= 15;
  79
  80     get_height_weight(creature_ptr);
  81
  82     if (creature_ptr->pclass == CLASS_SORCERER)
  83         creature_ptr->hitdie = rp_ptr->r_mhp / 2 + cp_ptr->c_mhp + ap_ptr->a_mhp;
  84     else
  85         creature_ptr->hitdie = rp_ptr->r_mhp + cp_ptr->c_mhp + ap_ptr->a_mhp;
  86
  87     roll_hitdice(creature_ptr, SPOP_NONE);
  88     check_experience(creature_ptr);
  89     creature_ptr->redraw |= (PR_BASIC);
  90     creature_ptr->update |= (PU_BONUS);
  91     handle_stuff(creature_ptr);
  92
  93     if (old_race != creature_ptr->prace)
  94         autopick_load_pref(creature_ptr, FALSE);
  95
  96     lite_spot(creature_ptr, creature_ptr->y, creature_ptr->x);
  97 }
  98
  99 void do_poly_self(player_type *creature_ptr)
 100 {
 101     int power = creature_ptr->lev;
 102
 103     msg_print(_("あなたは変化の訪れを感じた...", "You feel a change coming over you..."));
 104     chg_virtue(creature_ptr, V_CHANCE, 1);
 105
 106     if ((power > randint0(20)) && one_in_(3) && (creature_ptr->prace != RACE_ANDROID)) {
 107         char effect_msg[80] = "";
 108         char sex_msg[32] = "";
 109         player_race_type new_race;
 110
 111         power -= 10;
 112         if ((power > randint0(5)) && one_in_(4)) {
 113             power -= 2;
 114             if (creature_ptr->psex == SEX_MALE) {
 115                 creature_ptr->psex = SEX_FEMALE;
 116                 sp_ptr = &sex_info[creature_ptr->psex];
 117                 sprintf(sex_msg, _("女性の", "female"));
 118             } else {
 119                 creature_ptr->psex = SEX_MALE;
 120                 sp_ptr = &sex_info[creature_ptr->psex];
 121                 sprintf(sex_msg, _("男性の", "male"));
 122             }
 123         }
 124
 125         if ((power > randint0(30)) && one_in_(5)) {
 126             int tmp = 0;
 127             power -= 15;
 128             while (tmp < A_MAX) {
 129                 if (one_in_(2)) {
 130                     (void)dec_stat(creature_ptr, tmp, randint1(6) + 6, one_in_(3));
 131                     power -= 1;
 132                 }
 133                 tmp++;
 134             }
 135
 136             (void)dec_stat(creature_ptr, A_CHR, randint1(6), TRUE);
 137
 138             if (sex_msg[0]) {
 139                 sprintf(effect_msg, _("奇形の%s", "deformed %s "), sex_msg);
 140             } else {
 141                 sprintf(effect_msg, _("奇形の", "deformed "));
 142             }
 143         }
 144
 145         while ((power > randint0(20)) && one_in_(10)) {
 146             power -= 10;
 147
 148             if (!lose_mutation(creature_ptr, 0))
 149                 msg_print(_("奇妙なくらい普通になった気がする。", "You feel oddly normal."));
 150         }
 151
 152         do {
 153             new_race = (player_race_type)randint0(MAX_RACES);
 154         } while ((new_race == creature_ptr->prace) || (new_race == RACE_ANDROID));
 155
 156         change_race(creature_ptr, new_race, effect_msg);
 157     }
 158
 159     if ((power > randint0(30)) && one_in_(6)) {
 160         int tmp = 0;
 161         power -= 20;
 162         msg_format(_("%sの構成が変化した！", "Your internal organs are rearranged!"), creature_ptr->prace == RACE_ANDROID ? "機械" : "内臓");
 163
 164         while (tmp < A_MAX) {
 165             (void)dec_stat(creature_ptr, tmp, randint1(6) + 6, one_in_(3));
 166             tmp++;
 167         }
 168         if (one_in_(6)) {
 169             msg_print(_("現在の姿で生きていくのは困難なようだ！", "You find living difficult in your present form!"));
 170             take_hit(creature_ptr, DAMAGE_LOSELIFE, damroll(randint1(10), creature_ptr->lev), _("致命的な突然変異", "a lethal mutation"));
 171
 172             power -= 10;
 173         }
 174     }
 175
 176     if ((power > randint0(20)) && one_in_(4)) {
 177         power -= 10;
 178
 179         get_max_stats(creature_ptr);
 180         roll_hitdice(creature_ptr, SPOP_NONE);
 181     }
 182
 183     while ((power > randint0(15)) && one_in_(3)) {
 184         power -= 7;
 185         (void)gain_mutation(creature_ptr, 0);
 186     }
 187
 188     if (power > randint0(5)) {
 189         power -= 5;
 190         do_poly_wounds(creature_ptr);
 191     }
 192
 193     while (power > 0) {
 194         status_shuffle(creature_ptr);
 195         power--;
 196     }
 197 }