src/mind/mind-force-trainer.cpp

   1 #include "mind/mind-force-trainer.h"
   2 #include "avatar/avatar.h"
   3 #include "core/disturbance.h"
   4 #include "core/player-redraw-types.h"
   5 #include "core/player-update-types.h"
   6 #include "core/stuff-handler.h"
   7 #include "effect/attribute-types.h"
   8 #include "effect/spells-effect-util.h"
   9 #include "floor/cave.h"
  10 #include "floor/geometry.h"
  11 #include "game-option/disturbance-options.h"
  12 #include "grid/grid.h"
  13 #include "mind/mind-magic-resistance.h"
  14 #include "mind/mind-numbers.h"
  15 #include "monster-floor/monster-summon.h"
  16 #include "monster-floor/place-monster-types.h"
  17 #include "monster-race/monster-race.h"
  18 #include "monster-race/race-flags7.h"
  19 #include "monster/monster-describer.h"
  20 #include "monster/monster-status.h"
  21 #include "monster/monster-update.h"
  22 #include "pet/pet-util.h"
  23 #include "player-base/player-class.h"
  24 #include "player-info/equipment-info.h"
  25 #include "player-info/force-trainer-data-type.h"
  26 #include "player/player-damage.h"
  27 #include "spell-kind/spells-launcher.h"
  28 #include "spell-kind/spells-lite.h"
  29 #include "spell/summon-types.h"
  30 #include "status/temporary-resistance.h"
  31 #include "system/floor-type-definition.h"
  32 #include "system/grid-type-definition.h"
  33 #include "system/monster-race-definition.h"
  34 #include "system/monster-type-definition.h"
  35 #include "system/player-type-definition.h"
  36 #include "target/projection-path-calculator.h"
  37 #include "target/target-checker.h"
  38 #include "target/target-getter.h"
  39 #include "target/target-setter.h"
  40 #include "target/target-types.h"
  41 #include "view/display-messages.h"
  42
  43 /*!
  44  * @brief 練気術師が「練気」で溜めた気の量を返す
  45  * @param player_ptr プレイヤーの参照ポインタ
  46  * @return 現在溜まっている気の量
  47  */
  48 int32_t get_current_ki(PlayerType *player_ptr)
  49 {
  50     auto data = PlayerClass(player_ptr).get_specific_data<force_trainer_data_type>();
  51
  52     return data ? data->ki : 0;
  53 }
  54
  55 /*!
  56  * @brief 練気術師において、気を溜める
  57  * @param player_ptr プレイヤーの参照ポインタ
  58  * @param is_reset TRUEなら気の量をkiにセットし、FALSEなら加減算を行う
  59  * @param ki 気の量
  60  */
  61 void set_current_ki(PlayerType *player_ptr, bool is_reset, int32_t ki)
  62 {
  63     auto data = PlayerClass(player_ptr).get_specific_data<force_trainer_data_type>();
  64     if (!data) {
  65         return;
  66     }
  67
  68     if (is_reset) {
  69         data->ki = ki;
  70         return;
  71     }
  72
  73     data->ki += ki;
  74 }
  75
  76 bool clear_mind(PlayerType *player_ptr)
  77 {
  78     if (total_friends) {
  79         msg_print(_("今はペットを操ることに集中していないと。", "Your pets demand all of your attention."));
  80         return false;
  81     }
  82
  83     msg_print(_("少し頭がハッキリした。", "You feel your head clear a little."));
  84
  85     player_ptr->csp += (3 + player_ptr->lev / 20);
  86     if (player_ptr->csp >= player_ptr->msp) {
  87         player_ptr->csp = player_ptr->msp;
  88         player_ptr->csp_frac = 0;
  89     }
  90
  91     player_ptr->redraw |= (PR_MANA);
  92     return true;
  93 }
  94
  95 /*!
  96  * @brief 光速移動の継続時間をセットする / Set "lightspeed", notice observable changes
  97  * @param v 継続時間
  98  * @param do_dec 現在の継続時間より長い値のみ上書きする
  99  */
 100 void set_lightspeed(PlayerType *player_ptr, TIME_EFFECT v, bool do_dec)
 101 {
 102     bool notice = false;
 103     v = (v > 10000) ? 10000 : (v < 0) ? 0
 104                                       : v;
 105
 106     if (player_ptr->is_dead) {
 107         return;
 108     }
 109
 110     if (player_ptr->wild_mode) {
 111         v = 0;
 112     }
 113
 114     if (v) {
 115         if (player_ptr->lightspeed && !do_dec) {
 116             if (player_ptr->lightspeed > v) {
 117                 return;
 118             }
 119         } else if (!player_ptr->lightspeed) {
 120             msg_print(_("非常に素早く動けるようになった！", "You feel yourself moving extremely fast!"));
 121             notice = true;
 122             chg_virtue(player_ptr, V_PATIENCE, -1);
 123             chg_virtue(player_ptr, V_DILIGENCE, 1);
 124         }
 125     } else {
 126         if (player_ptr->lightspeed) {
 127             msg_print(_("動きの素早さがなくなったようだ。", "You feel yourself slow down."));
 128             notice = true;
 129         }
 130     }
 131
 132     player_ptr->lightspeed = v;
 133
 134     if (!notice) {
 135         return;
 136     }
 137
 138     if (disturb_state) {
 139         disturb(player_ptr, false, false);
 140     }
 141     player_ptr->update |= (PU_BONUS);
 142     handle_stuff(player_ptr);
 143 }
 144
 145 /*!
 146  * @brief 一時的闘気のオーラの継続時間をセットする / Set "tim_sh_touki", notice observable changes
 147  * @param v 継続時間
 148  * @param do_dec 現在の継続時間より長い値のみ上書きする
 149  * @return ステータスに影響を及ぼす変化があった場合TRUEを返す。
 150  */
 151 bool set_tim_sh_force(PlayerType *player_ptr, TIME_EFFECT v, bool do_dec)
 152 {
 153     bool notice = false;
 154     v = (v > 10000) ? 10000 : (v < 0) ? 0
 155                                       : v;
 156
 157     if (player_ptr->is_dead) {
 158         return false;
 159     }
 160
 161     if (v) {
 162         if (player_ptr->tim_sh_touki && !do_dec) {
 163             if (player_ptr->tim_sh_touki > v) {
 164                 return false;
 165             }
 166         } else if (!player_ptr->tim_sh_touki) {
 167             msg_print(_("体が闘気のオーラで覆われた。", "You are enveloped by an aura of the Force!"));
 168             notice = true;
 169         }
 170     } else {
 171         if (player_ptr->tim_sh_touki) {
 172             msg_print(_("闘気が消えた。", "The aura of the Force disappeared."));
 173             notice = true;
 174         }
 175     }
 176
 177     player_ptr->tim_sh_touki = v;
 178     player_ptr->redraw |= (PR_STATUS);
 179
 180     if (!notice) {
 181         return false;
 182     }
 183
 184     if (disturb_state) {
 185         disturb(player_ptr, false, false);
 186     }
 187     handle_stuff(player_ptr);
 188     return true;
 189 }
 190
 191 /*!
 192  * @brief 衝波
 193  * @param player_ptr プレイヤーへの参照ポインタ
 194  * @return 命中したらTRUE
 195  */
 196 bool shock_power(PlayerType *player_ptr)
 197 {
 198     int boost = get_current_ki(player_ptr);
 199     if (heavy_armor(player_ptr)) {
 200         boost /= 2;
 201     }
 202
 203     project_length = 1;
 204     DIRECTION dir;
 205     if (!get_aim_dir(player_ptr, &dir)) {
 206         return false;
 207     }
 208
 209     POSITION y = player_ptr->y + ddy[dir];
 210     POSITION x = player_ptr->x + ddx[dir];
 211     PLAYER_LEVEL plev = player_ptr->lev;
 212     int dam = damroll(8 + ((plev - 5) / 4) + boost / 12, 8);
 213     fire_beam(player_ptr, AttributeType::MISSILE, dir, dam);
 214     if (!player_ptr->current_floor_ptr->grid_array[y][x].m_idx) {
 215         return true;
 216     }
 217
 218     POSITION ty = y, tx = x;
 219     POSITION oy = y, ox = x;
 220     MONSTER_IDX m_idx = player_ptr->current_floor_ptr->grid_array[y][x].m_idx;
 221     auto *m_ptr = &player_ptr->current_floor_ptr->m_list[m_idx];
 222     auto *r_ptr = &r_info[m_ptr->r_idx];
 223     GAME_TEXT m_name[MAX_NLEN];
 224     monster_desc(player_ptr, m_name, m_ptr, 0);
 225
 226     if (randint1(r_ptr->level * 3 / 2) > randint0(dam / 2) + dam / 2) {
 227         msg_format(_("%sは飛ばされなかった。", "%^s was not blown away."), m_name);
 228         return true;
 229     }
 230
 231     for (int i = 0; i < 5; i++) {
 232         y += ddy[dir];
 233         x += ddx[dir];
 234         if (is_cave_empty_bold(player_ptr, y, x)) {
 235             ty = y;
 236             tx = x;
 237         } else {
 238             break;
 239         }
 240     }
 241
 242     bool is_shock_successful = ty != oy;
 243     is_shock_successful |= tx != ox;
 244     if (is_shock_successful) {
 245         return true;
 246     }
 247
 248     msg_format(_("%sを吹き飛ばした！", "You blow %s away!"), m_name);
 249     player_ptr->current_floor_ptr->grid_array[oy][ox].m_idx = 0;
 250     player_ptr->current_floor_ptr->grid_array[ty][tx].m_idx = m_idx;
 251     m_ptr->fy = ty;
 252     m_ptr->fx = tx;
 253
 254     update_monster(player_ptr, m_idx, true);
 255     lite_spot(player_ptr, oy, ox);
 256     lite_spot(player_ptr, ty, tx);
 257
 258     if (r_ptr->flags7 & (RF7_LITE_MASK | RF7_DARK_MASK)) {
 259         player_ptr->update |= (PU_MON_LITE);
 260     }
 261
 262     return true;
 263 }
 264
 265 /*!
 266  * @brief 練気術の発動 /
 267  * do_cmd_cast calls this function if the player's class is 'ForceTrainer'.
 268  * @param spell 発動する特殊技能のID
 269  * @return 処理を実行したらTRUE、キャンセルした場合FALSEを返す。
 270  */
 271 bool cast_force_spell(PlayerType *player_ptr, mind_force_trainer_type spell)
 272 {
 273     DIRECTION dir;
 274     PLAYER_LEVEL plev = player_ptr->lev;
 275     int boost = get_current_ki(player_ptr);
 276     if (heavy_armor(player_ptr)) {
 277         boost /= 2;
 278     }
 279
 280     switch (spell) {
 281     case SMALL_FORCE_BALL:
 282         if (!get_aim_dir(player_ptr, &dir)) {
 283             return false;
 284         }
 285
 286         fire_ball(player_ptr, AttributeType::MISSILE, dir, damroll(3 + ((plev - 1) / 5) + boost / 12, 4), 0);
 287         break;
 288     case FLASH_LIGHT:
 289         (void)lite_area(player_ptr, damroll(2, (plev / 2)), (plev / 10) + 1);
 290         break;
 291     case FLYING_TECHNIQUE:
 292         set_tim_levitation(player_ptr, randint1(30) + 30 + boost / 5, false);
 293         break;
 294     case KAMEHAMEHA:
 295         project_length = plev / 8 + 3;
 296         if (!get_aim_dir(player_ptr, &dir)) {
 297             return false;
 298         }
 299
 300         fire_beam(player_ptr, AttributeType::MISSILE, dir, damroll(5 + ((plev - 1) / 5) + boost / 10, 5));
 301         break;
 302     case MAGIC_RESISTANCE:
 303         set_resist_magic(player_ptr, randint1(20) + 20 + boost / 5, false);
 304         break;
 305     case IMPROVE_FORCE:
 306         msg_print(_("気を練った。", "You improved the Force."));
 307         set_current_ki(player_ptr, false, 70 + plev);
 308         player_ptr->update |= (PU_BONUS);
 309         if (randint1(get_current_ki(player_ptr)) > (plev * 4 + 120)) {
 310             msg_print(_("気が暴走した！", "The Force exploded!"));
 311             fire_ball(player_ptr, AttributeType::MANA, 0, get_current_ki(player_ptr) / 2, 10);
 312             auto data = PlayerClass(player_ptr).get_specific_data<force_trainer_data_type>();
 313             take_hit(player_ptr, DAMAGE_LOSELIFE, data->ki / 2, _("気の暴走", "Explosion of the Force"));
 314         } else {
 315             return true;
 316         }
 317
 318         break;
 319     case AURA_OF_FORCE:
 320         set_tim_sh_force(player_ptr, randint1(plev / 2) + 15 + boost / 7, false);
 321         break;
 322     case SHOCK_POWER:
 323         return shock_power(player_ptr);
 324         break;
 325     case LARGE_FORCE_BALL:
 326         if (!get_aim_dir(player_ptr, &dir)) {
 327             return false;
 328         }
 329
 330         fire_ball(player_ptr, AttributeType::MISSILE, dir, damroll(10, 6) + plev * 3 / 2 + boost * 3 / 5, (plev < 30) ? 2 : 3);
 331         break;
 332     case DISPEL_MAGIC: {
 333         if (!target_set(player_ptr, TARGET_KILL)) {
 334             return false;
 335         }
 336
 337         MONSTER_IDX m_idx = player_ptr->current_floor_ptr->grid_array[target_row][target_col].m_idx;
 338         if ((m_idx == 0) || !player_has_los_bold(player_ptr, target_row, target_col) || !projectable(player_ptr, player_ptr->y, player_ptr->x, target_row, target_col)) {
 339             break;
 340         }
 341
 342         dispel_monster_status(player_ptr, m_idx);
 343         break;
 344     }
 345     case SUMMON_GHOST: {
 346         bool success = false;
 347         for (int i = 0; i < 1 + boost / 100; i++) {
 348             if (summon_specific(player_ptr, -1, player_ptr->y, player_ptr->x, plev, SUMMON_PHANTOM, PM_FORCE_PET)) {
 349                 success = true;
 350             }
 351         }
 352
 353         if (success) {
 354             msg_print(_("御用でございますが、御主人様？", "'Your wish, master?'"));
 355         } else {
 356             msg_print(_("何も現れなかった。", "Nothing happens."));
 357         }
 358
 359         break;
 360     }
 361     case EXPLODING_FLAME:
 362         fire_ball(player_ptr, AttributeType::FIRE, 0, 200 + (2 * plev) + boost * 2, 10);
 363         break;
 364     case SUPER_KAMEHAMEHA:
 365         if (!get_aim_dir(player_ptr, &dir)) {
 366             return false;
 367         }
 368
 369         fire_beam(player_ptr, AttributeType::MANA, dir, damroll(10 + (plev / 2) + boost * 3 / 10, 15));
 370         break;
 371     case LIGHT_SPEED:
 372         set_lightspeed(player_ptr, randint1(16) + 16 + boost / 20, false);
 373         break;
 374     default:
 375         msg_print(_("なに？", "Zap?"));
 376     }
 377
 378     set_current_ki(player_ptr, true, 0);
 379     player_ptr->update |= PU_BONUS;
 380     return true;
 381 }