5 * @brief
\83v
\83\8c\83C
\83\84\81[
\82Ö
\82Ì
\83g
\83\89\83b
\83v
\96½
\92\86\94»
\92è /
\r
6 * Determine if a trap affects the player.
\r
7 * @param power
\8aî
\96{
\89ñ
\94ð
\93ï
\93x
\r
8 * @return
\83g
\83\89\83b
\83v
\82ª
\96½
\92\86\82µ
\82½
\8fê
\8d\87TRUE
\82ð
\95Ô
\82·
\81B
\r
10 * Always miss 5% of the time, Always hit 5% of the time.
\r
11 * Otherwise, match trap power against player armor.
\r
13 static int check_hit(int power)
\r
17 /* Percentile dice */
\r
20 /* Hack -- 5% hit, 5% miss */
\r
21 if (k < 10) return (k < 5);
\r
23 if (p_ptr->pseikaku == SEIKAKU_NAMAKE)
\r
24 if (one_in_(20)) return (TRUE);
\r
26 /* Paranoia -- No power */
\r
27 if (power <= 0) return (FALSE);
\r
30 ac = p_ptr->ac + p_ptr->to_a;
\r
32 /* Power competes against Armor */
\r
33 if (randint1(power) > ((ac * 3) / 4)) return (TRUE);
\r
41 * @brief
\97\8e\82Æ
\82µ
\8c\8a\8cn
\83g
\83\89\83b
\83v
\82Ì
\94»
\92è
\82Æ
\83v
\83\8c\83C
\83\84\81[
\82Ì
\94í
\8aQ
\8f\88\97\9d\r
42 * @param trap_feat_type
\83g
\83\89\83b
\83v
\82Ì
\8eí
\95ÊID
\r
45 static void hit_trap_pit(int trap_feat_type)
\r
48 cptr trap_name = "";
\r
49 cptr spike_name = "";
\r
51 switch (trap_feat_type)
\r
54 trap_name = _("
\97\8e\82Æ
\82µ
\8c\8a", "a pit trap");
\r
56 case TRAP_SPIKED_PIT:
\r
57 trap_name = _("
\83X
\83p
\83C
\83N
\82ª
\95~
\82©
\82ê
\82½
\97\8e\82Æ
\82µ
\8c\8a", "a spiked pit");
\r
58 spike_name = _("
\83X
\83p
\83C
\83N", "spikes");
\r
60 case TRAP_POISON_PIT:
\r
61 trap_name = _("
\83X
\83p
\83C
\83N
\82ª
\95~
\82©
\82ê
\82½
\97\8e\82Æ
\82µ
\8c\8a", "a spiked pit");
\r
62 spike_name = _("
\93Å
\82ð
\93h
\82ç
\82ê
\82½
\83X
\83p
\83C
\83N", "poisonous spikes");
\r
68 if (p_ptr->levitation)
\r
70 msg_format(_("%s
\82ð
\94ò
\82Ñ
\89z
\82¦
\82½
\81B", "You fly over %s."), trap_name);
\r
74 msg_format(_("%s
\82É
\97\8e\82¿
\82Ä
\82µ
\82Ü
\82Á
\82½
\81I", "You have fallen into %s!"), trap_name);
\r
77 dam = damroll(2, 6);
\r
79 /* Extra spike damage */
\r
80 if ((trap_feat_type == TRAP_SPIKED_PIT || trap_feat_type == TRAP_POISON_PIT) &&
\r
83 msg_format(_("%s
\82ª
\8eh
\82³
\82Á
\82½
\81I", "You are impaled on %s!"), spike_name);
\r
86 (void)set_cut(p_ptr->cut + randint1(dam));
\r
88 if (trap_feat_type == TRAP_POISON_PIT) {
\r
89 if (p_ptr->resist_pois || IS_OPPOSE_POIS())
\r
91 msg_print(_("
\82µ
\82©
\82µ
\93Å
\82Ì
\89e
\8b¿
\82Í
\82È
\82©
\82Á
\82½
\81I", "The poison does not affect you!"));
\r
96 (void)set_poisoned(p_ptr->poisoned + randint1(dam));
\r
101 /* Take the damage */
\r
102 take_hit(DAMAGE_NOESCAPE, dam, trap_name, -1);
\r
106 * @brief
\83_
\81[
\83c
\8cn
\83g
\83\89\83b
\83v
\81i
\92Ê
\8fí
\83_
\83\81\81[
\83W
\81j
\82Ì
\94»
\92è
\82Æ
\83v
\83\8c\83C
\83\84\81[
\82Ì
\94í
\8aQ
\8f\88\97\9d\r
107 * @return
\83_
\81[
\83c
\82ª
\96½
\92\86\82µ
\82½
\8fê
\8d\87TRUE
\82ð
\95Ô
\82·
\r
109 static bool hit_trap_dart(void)
\r
113 if (check_hit(125))
\r
115 msg_print(_("
\8f¬
\82³
\82È
\83_
\81[
\83c
\82ª
\94ò
\82ñ
\82Å
\82«
\82Ä
\8eh
\82³
\82Á
\82½
\81I", "A small dart hits you!"));
\r
117 take_hit(DAMAGE_ATTACK, damroll(1, 4), _("
\83_
\81[
\83c
\82Ìã©", "a dart trap"), -1);
\r
119 if (!CHECK_MULTISHADOW()) hit = TRUE;
\r
123 msg_print(_("
\8f¬
\82³
\82È
\83_
\81[
\83c
\82ª
\94ò
\82ñ
\82Å
\82«
\82½
\81I
\82ª
\81A
\89^
\97Ç
\82
\93\96\82½
\82ç
\82È
\82©
\82Á
\82½
\81B", "A small dart barely misses you."));
\r
130 * @brief
\83_
\81[
\83c
\8cn
\83g
\83\89\83b
\83v
\81i
\92Ê
\8fí
\83_
\83\81\81[
\83W
\81{
\94\
\97Í
\92l
\8c¸
\8f
\81j
\82Ì
\94»
\92è
\82Æ
\83v
\83\8c\83C
\83\84\81[
\82Ì
\94í
\8aQ
\8f\88\97\9d\r
131 * @param stat
\92á
\89º
\82·
\82é
\94\
\97Í
\92lID
\r
134 static void hit_trap_lose_stat(int stat)
\r
136 if (hit_trap_dart())
\r
143 * @brief
\83_
\81[
\83c
\8cn
\83g
\83\89\83b
\83v
\81i
\92Ê
\8fí
\83_
\83\81\81[
\83W
\81{
\8c¸
\91¬
\81j
\82Ì
\94»
\92è
\82Æ
\83v
\83\8c\83C
\83\84\81[
\82Ì
\94í
\8aQ
\8f\88\97\9d\r
146 static void hit_trap_slow(void)
\r
148 if (hit_trap_dart())
\r
150 set_slow(p_ptr->slow + randint0(20) + 20, FALSE);
\r
155 * @brief
\83_
\81[
\83c
\8cn
\83g
\83\89\83b
\83v
\81i
\92Ê
\8fí
\83_
\83\81\81[
\83W
\81{
\8fó
\91Ô
\88Ù
\8fí
\81j
\82Ì
\94»
\92è
\82Æ
\83v
\83\8c\83C
\83\84\81[
\82Ì
\94í
\8aQ
\8f\88\97\9d\r
156 * @param trap_message
\83\81\83b
\83Z
\81[
\83W
\82Ì
\95â
\8a®
\95¶
\8e\9a\97ñ
\r
157 * @param resist
\8fó
\91Ô
\88Ù
\8fí
\82É
\92ï
\8dR
\82·
\82é
\94»
\92è
\82ª
\8fo
\82½
\82È
\82çTRUE
\r
158 * @param set_status
\8fó
\91Ô
\88Ù
\8fí
\82ð
\8ew
\92è
\82·
\82é
\8aÖ
\90\94\83|
\83C
\83\93\83^
\r
159 * @param turn
\8fó
\91Ô
\88Ù
\8fí
\82Ì
\92Ç
\89Á
\83^
\81[
\83\93\97Ê
\r
162 static void hit_trap_set_abnormal_status(cptr trap_message, bool resist, bool(*set_status)(IDX), IDX turn_aux)
\r
164 msg_print(trap_message);
\r
168 set_status(turn_aux);
\r
173 * @brief
\83v
\83\8c\83C
\83\84\81[
\82Ö
\82Ì
\83g
\83\89\83b
\83v
\8dì
\93®
\8f\88\97\9d\83\81\83C
\83\93\83\8b\81[
\83`
\83\93 /
\r
174 * Handle player hitting a real trap
\r
175 * @param break_trap
\8dì
\93®
\8cã
\82Ì
\83g
\83\89\83b
\83v
\94j
\89ó
\82ª
\8am
\92è
\82µ
\82Ä
\82¢
\82é
\82È
\82ç
\82ÎTRUE
\r
178 void hit_trap(bool break_trap)
\r
181 int x = p_ptr->x, y = p_ptr->y;
\r
183 /* Get the cave grid */
\r
184 cave_type *c_ptr = &cave[y][x];
\r
185 feature_type *f_ptr = &f_info[c_ptr->feat];
\r
186 int trap_feat_type = have_flag(f_ptr->flags, FF_TRAP) ? f_ptr->subtype : NOT_TRAP;
\r
187 cptr name = _("
\83g
\83\89\83b
\83v", "a trap");
\r
189 /* Disturb the player */
\r
192 cave_alter_feat(y, x, FF_HIT_TRAP);
\r
194 /* Analyze XXX XXX XXX */
\r
195 switch (trap_feat_type)
\r
197 case TRAP_TRAPDOOR:
\r
199 if (p_ptr->levitation)
\r
201 msg_print(_("
\97\8e\82Æ
\82µ
\8cË
\82ð
\94ò
\82Ñ
\89z
\82¦
\82½
\81B", "You fly over a trap door."));
\r
205 msg_print(_("
\97\8e\82Æ
\82µ
\8cË
\82É
\97\8e\82¿
\82½
\81I", "You have fallen through a trap door!"));
\r
206 if ((p_ptr->pseikaku == SEIKAKU_COMBAT) || (inventory[INVEN_BOW].name1 == ART_CRIMSON))
\r
207 msg_print(_("
\82
\82Á
\82»
\81`
\81I", ""));
\r
210 dam = damroll(2, 8);
\r
211 name = _("
\97\8e\82Æ
\82µ
\8cË", "a trap door");
\r
213 take_hit(DAMAGE_NOESCAPE, dam, name, -1);
\r
215 /* Still alive and autosave enabled */
\r
216 if (autosave_l && (p_ptr->chp >= 0))
\r
217 do_cmd_save_game(TRUE);
\r
219 do_cmd_write_nikki(NIKKI_BUNSHOU, 0, _("
\97\8e\82Æ
\82µ
\8cË
\82É
\97\8e\82¿
\82½", "You have fallen through a trap door!"));
\r
220 prepare_change_floor_mode(CFM_SAVE_FLOORS | CFM_DOWN | CFM_RAND_PLACE | CFM_RAND_CONNECT);
\r
223 p_ptr->leaving = TRUE;
\r
229 case TRAP_SPIKED_PIT:
\r
230 case TRAP_POISON_PIT:
\r
232 hit_trap_pit(trap_feat_type);
\r
236 case TRAP_TY_CURSE:
\r
238 msg_print(_("
\89½
\82©
\82ª
\83s
\83J
\83b
\82Æ
\8cõ
\82Á
\82½
\81I", "There is a flash of shimmering light!"));
\r
239 num = 2 + randint1(3);
\r
240 for (i = 0; i < num; i++)
\r
242 (void)summon_specific(0, y, x, dun_level, 0, (PM_ALLOW_GROUP | PM_ALLOW_UNIQUE | PM_NO_PET));
\r
245 if (dun_level > randint1(100)) /* No nasty effect for low levels */
\r
247 bool stop_ty = FALSE;
\r
252 stop_ty = activate_ty_curse(stop_ty, &count);
\r
253 } while (one_in_(6));
\r
258 case TRAP_TELEPORT:
\r
260 msg_print(_("
\83e
\83\8c\83|
\81[
\83g
\81E
\83g
\83\89\83b
\83v
\82É
\82Ð
\82Á
\82©
\82©
\82Á
\82½
\81I", "You hit a teleport trap!"));
\r
261 teleport_player(100, TELEPORT_PASSIVE);
\r
267 msg_print(_("
\89\8a\82É
\95ï
\82Ü
\82ê
\82½
\81I", "You are enveloped in flames!"));
\r
268 dam = damroll(4, 6);
\r
269 (void)fire_dam(dam, _("
\89\8a\82Ì
\83g
\83\89\83b
\83v", "a fire trap"), -1, FALSE);
\r
275 msg_print(_("
\8e_
\82ª
\90\81\82«
\82©
\82¯
\82ç
\82ê
\82½
\81I", "You are splashed with acid!"));
\r
276 dam = damroll(4, 6);
\r
277 (void)acid_dam(dam, _("
\8e_
\82Ì
\83g
\83\89\83b
\83v", "an acid trap"), -1, FALSE);
\r
287 case TRAP_LOSE_STR:
\r
289 hit_trap_lose_stat(A_STR);
\r
293 case TRAP_LOSE_DEX:
\r
295 hit_trap_lose_stat(A_DEX);
\r
299 case TRAP_LOSE_CON:
\r
301 hit_trap_lose_stat(A_CON);
\r
307 hit_trap_set_abnormal_status(
\r
308 _("
\8d\95\82¢
\83K
\83X
\82É
\95ï
\82Ý
\8d\9e\82Ü
\82ê
\82½
\81I", "A black gas surrounds you!"),
\r
309 p_ptr->resist_blind,
\r
310 set_blind, p_ptr->blind + (TIME_EFFECT)randint0(50) + 25);
\r
316 hit_trap_set_abnormal_status(
\r
317 _("
\82«
\82ç
\82ß
\82
\83K
\83X
\82É
\95ï
\82Ý
\8d\9e\82Ü
\82ê
\82½
\81I", "A gas of scintillating colors surrounds you!"),
\r
318 p_ptr->resist_conf,
\r
319 set_confused, p_ptr->confused + (TIME_EFFECT)randint0(20) + 10);
\r
325 hit_trap_set_abnormal_status(
\r
326 _("
\8eh
\8c\83\93I
\82È
\97Î
\90F
\82Ì
\83K
\83X
\82É
\95ï
\82Ý
\8d\9e\82Ü
\82ê
\82½
\81I", "A pungent green gas surrounds you!"),
\r
327 p_ptr->resist_pois || IS_OPPOSE_POIS(),
\r
328 set_poisoned, p_ptr->poisoned + (TIME_EFFECT)randint0(20) + 10);
\r
334 msg_print(_("
\8aï
\96
\82È
\94\92\82¢
\96¶
\82É
\95ï
\82Ü
\82ê
\82½
\81I", "A strange white mist surrounds you!"));
\r
335 if (!p_ptr->free_act)
\r
337 msg_print(_("
\82 \82È
\82½
\82Í
\96°
\82è
\82É
\8fA
\82¢
\82½
\81B", "You fall asleep."));
\r
339 if (ironman_nightmare)
\r
341 msg_print(_("
\90g
\82Ì
\96Ñ
\82à
\82æ
\82¾
\82Â
\8cõ
\8ci
\82ª
\93ª
\82É
\95\82\82©
\82ñ
\82¾
\81B", "A horrible vision enters your mind."));
\r
343 /* Have some nightmares */
\r
344 sanity_blast(NULL, FALSE);
\r
347 (void)set_paralyzed(p_ptr->paralyzed + randint0(10) + 5);
\r
354 msg_print(_("
\82Ü
\82Î
\82ä
\82¢
\91M
\8cõ
\82ª
\91\96\82Á
\82½
\81I", "There is a bright flash of light!"));
\r
355 /* Make some new traps */
\r
356 project(0, 1, y, x, 0, GF_MAKE_TRAP, PROJECT_HIDE | PROJECT_JUMP | PROJECT_GRID, -1);
\r
363 msg_print(_("
\82¯
\82½
\82½
\82Ü
\82µ
\82¢
\89¹
\82ª
\96Â
\82è
\8b¿
\82¢
\82½
\81I", "An alarm sounds!"));
\r
365 aggravate_monsters(0);
\r
372 msg_print(_("
\91å
\89¹
\8b¿
\82Æ
\8b¤
\82É
\82Ü
\82í
\82è
\82Ì
\95Ç
\82ª
\95ö
\82ê
\82½
\81I", "Suddenly, surrounding walls are opened!"));
\r
373 (void)project(0, 3, y, x, 0, GF_DISINTEGRATE, PROJECT_GRID | PROJECT_HIDE, -1);
\r
374 (void)project(0, 3, y, x - 4, 0, GF_DISINTEGRATE, PROJECT_GRID | PROJECT_HIDE, -1);
\r
375 (void)project(0, 3, y, x + 4, 0, GF_DISINTEGRATE, PROJECT_GRID | PROJECT_HIDE, -1);
\r
376 aggravate_monsters(0);
\r
381 case TRAP_ARMAGEDDON:
\r
383 static int levs[10] = { 0, 0, 20, 10, 5, 3, 2, 1, 1, 1 };
\r
384 int evil_idx = 0, good_idx = 0;
\r
387 msg_print(_("
\93Ë
\91R
\93V
\8aE
\82Ì
\90í
\91\88\82É
\8aª
\82«
\8d\9e\82Ü
\82ê
\82½
\81I", "Suddenly, you are surrounded by immotal beings!"));
\r
389 /* Summon Demons and Angels */
\r
390 for (lev = dun_level; lev >= 20; lev -= 1 + lev / 16)
\r
392 num = levs[MIN(lev / 10, 9)];
\r
393 for (i = 0; i < num; i++)
\r
395 int x1 = rand_spread(x, 7);
\r
396 int y1 = rand_spread(y, 5);
\r
398 /* Skip illegal grids */
\r
399 if (!in_bounds(y1, x1)) continue;
\r
401 /* Require line of projection */
\r
402 if (!projectable(p_ptr->y, p_ptr->x, y1, x1)) continue;
\r
404 if (summon_specific(0, y1, x1, lev, SUMMON_ARMAGE_EVIL, (PM_NO_PET)))
\r
405 evil_idx = hack_m_idx_ii;
\r
407 if (summon_specific(0, y1, x1, lev, SUMMON_ARMAGE_GOOD, (PM_NO_PET)))
\r
409 good_idx = hack_m_idx_ii;
\r
412 /* Let them fight each other */
\r
413 if (evil_idx && good_idx)
\r
415 monster_type *evil_ptr = &m_list[evil_idx];
\r
416 monster_type *good_ptr = &m_list[good_idx];
\r
417 evil_ptr->target_y = good_ptr->fy;
\r
418 evil_ptr->target_x = good_ptr->fx;
\r
419 good_ptr->target_y = evil_ptr->fy;
\r
420 good_ptr->target_x = evil_ptr->fx;
\r
429 msg_print(_("
\93Ë
\91R
\95Ç
\82©
\82ç
\90\85\82ª
\88ì
\82ê
\8fo
\82µ
\82½
\81I
\83s
\83\89\83j
\83A
\82ª
\82¢
\82é
\81I", "Suddenly, the room is filled with water with piranhas!"));
\r
431 /* Water fills room */
\r
432 fire_ball_hide(GF_WATER_FLOW, 0, 1, 10);
\r
434 /* Summon Piranhas */
\r
435 num = 1 + dun_level / 20;
\r
436 for (i = 0; i < num; i++)
\r
438 (void)summon_specific(0, y, x, dun_level, SUMMON_PIRANHAS, (PM_ALLOW_GROUP | PM_NO_PET));
\r
444 if (break_trap && is_trap(c_ptr->feat))
\r
446 cave_alter_feat(y, x, FF_DISARM);
\r
447 msg_print(_("
\83g
\83\89\83b
\83v
\82ð
\95²
\8dÓ
\82µ
\82½
\81B", "You destroyed the trap."));
\r