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