#include "angband.h"
-#ifdef MACINTOSH
+#if defined(MACINTOSH) || defined(MACH_O_CARBON)
#ifdef verify
#undef verify
#endif
*/
void reset_visuals(void)
{
- int i;
+ int i, j;
/* Extract some info about terrain features */
for (i = 0; i < max_f_idx; i++)
feature_type *f_ptr = &f_info[i];
/* Assume we will use the underlying values */
- f_ptr->x_attr = f_ptr->d_attr;
- f_ptr->x_char = f_ptr->d_char;
+ for (j = 0; j < F_LIT_MAX; j++)
+ {
+ f_ptr->x_attr[j] = f_ptr->d_attr[j];
+ f_ptr->x_char[j] = f_ptr->d_char[j];
+ }
}
/* Extract default attr/char code for objects */
flgs[i] = k_ptr->flags[i];
/* Artifact */
- if (o_ptr->name1)
+ if (object_is_fixed_artifact(o_ptr))
{
artifact_type *a_ptr = &a_info[o_ptr->name1];
}
/* Ego-item */
- if (o_ptr->name2)
+ if (object_is_ego(o_ptr))
{
ego_item_type *e_ptr = &e_info[o_ptr->name2];
for (i = 0; i < TR_FLAG_SIZE; i++)
flgs[i] |= o_ptr->art_flags[i];
- if ((o_ptr->tval > TV_CAPTURE) && o_ptr->xtra3)
+ if (object_is_smith(o_ptr))
{
int add = o_ptr->xtra3 - 1;
for (i = 0; i < TR_FLAG_SIZE; i++)
flgs[i] = 0;
- if (!object_aware_p(o_ptr)) return;
+ if (!object_is_aware(o_ptr)) return;
/* Base object */
for (i = 0; i < TR_FLAG_SIZE; i++)
flgs[i] = k_ptr->flags[i];
/* Must be identified */
- if (!object_known_p(o_ptr)) return;
+ if (!object_is_known(o_ptr)) return;
/* Ego-item (known basic flags) */
- if (o_ptr->name2)
+ if (object_is_ego(o_ptr))
{
ego_item_type *e_ptr = &e_info[o_ptr->name2];
#ifdef SPOIL_ARTIFACTS
/* Full knowledge for some artifacts */
- if (artifact_p(o_ptr) || o_ptr->art_name) spoil = TRUE;
+ if (object_is_artifact(o_ptr)) spoil = TRUE;
#endif /* SPOIL_ARTIFACTS */
#ifdef SPOIL_EGO_ITEMS
/* Full knowledge for some ego-items */
- if (ego_item_p(o_ptr)) spoil = TRUE;
+ if (object_is_ego(o_ptr)) spoil = TRUE;
#endif /* SPOIL_EGO_ITEMS */
/* Need full knowledge or spoilers */
if (spoil || (o_ptr->ident & IDENT_MENTAL))
{
/* Artifact */
- if (o_ptr->name1)
+ if (object_is_fixed_artifact(o_ptr))
{
artifact_type *a_ptr = &a_info[o_ptr->name1];
- for (i = 0; i < TR_FLAG_SIZE; i++)
- flgs[i] = a_ptr->flags[i];
- }
-
- /* Random artifact ! */
- for (i = 0; i < TR_FLAG_SIZE; i++)
- flgs[i] |= o_ptr->art_flags[i];
- }
-
- if ((o_ptr->tval > TV_CAPTURE) && o_ptr->xtra3)
- {
- int add = o_ptr->xtra3 - 1;
-
- if (add < TR_FLAG_MAX)
- {
- add_flag(flgs, add);
- }
- else if (add == ESSENCE_TMP_RES_ACID)
- {
- add_flag(flgs, TR_RES_ACID);
- }
- else if (add == ESSENCE_TMP_RES_ELEC)
- {
- add_flag(flgs, TR_RES_ELEC);
- }
- else if (add == ESSENCE_TMP_RES_FIRE)
- {
- add_flag(flgs, TR_RES_FIRE);
- }
- else if (add == ESSENCE_TMP_RES_COLD)
- {
- add_flag(flgs, TR_RES_COLD);
- }
- else if (add == ESSENCE_SH_FIRE)
- {
- add_flag(flgs, TR_RES_FIRE);
- add_flag(flgs, TR_SH_FIRE);
- }
- else if (add == ESSENCE_SH_ELEC)
- {
- add_flag(flgs, TR_RES_ELEC);
- add_flag(flgs, TR_SH_ELEC);
- }
- else if (add == ESSENCE_SH_COLD)
- {
- add_flag(flgs, TR_RES_COLD);
- add_flag(flgs, TR_SH_COLD);
- }
- else if (add == ESSENCE_RESISTANCE)
- {
- add_flag(flgs, TR_RES_ACID);
- add_flag(flgs, TR_RES_ELEC);
- add_flag(flgs, TR_RES_FIRE);
- add_flag(flgs, TR_RES_COLD);
- }
- }
-}
-
-
-/*
- * Hack -- describe an item currently in a store's inventory
- * This allows an item to *look* like the player is "aware" of it
- */
-void object_desc_store(char *buf, object_type *o_ptr, int pref, int mode)
-{
- /* Save the "aware" flag */
- bool hack_aware = object_aware_p(o_ptr);
-
- /* Save the "known" flag */
- bool hack_known = (o_ptr->ident & (IDENT_KNOWN)) ? TRUE : FALSE;
-
-
- /* Set the "known" flag */
- o_ptr->ident |= (IDENT_KNOWN);
-
- /* Force "aware" for description */
- k_info[o_ptr->k_idx].aware = TRUE;
-
-
- /* Describe the object */
- object_desc(buf, o_ptr, pref, mode);
-
-
- /* Restore "aware" flag */
- k_info[o_ptr->k_idx].aware = hack_aware;
-
- /* Clear the known flag */
- if (!hack_known) o_ptr->ident &= ~(IDENT_KNOWN);
-}
-
-
-
-
-/*
- * Determine the "Activation" (if any) for an artifact
- * Return a string, or NULL for "no activation"
- */
-cptr item_activation(object_type *o_ptr)
-{
- u32b flgs[TR_FLAG_SIZE];
-
- /* Extract the flags */
- object_flags(o_ptr, flgs);
-
- /* Require activation ability */
-#ifdef JP
-if (!(have_flag(flgs, TR_ACTIVATE))) return ("¤Ê¤·");
-#else
- if (!(have_flag(flgs, TR_ACTIVATE))) return ("nothing");
-#endif
-
-
-
- /*
- * We need to deduce somehow that it is a random artifact -- one
- * problem: It could be a random artifact which has NOT YET received
- * a name. Thus we eliminate other possibilities instead of checking
- * for art_name
- */
-
- if (!(o_ptr->name1) &&
- !(o_ptr->name2) &&
- !(o_ptr->xtra1) &&
- (o_ptr->xtra2))
- {
- switch (o_ptr->xtra2)
- {
- case ACT_SUNLIGHT:
- {
-#ifdef JP
-return "ÂÀÍÛ¸÷Àþ : 10 ¥¿¡¼¥óËè";
-#else
- return "beam of sunlight every 10 turns";
-#endif
-
- }
- case ACT_BO_MISS_1:
- {
-#ifdef JP
-return "¥Þ¥¸¥Ã¥¯¡¦¥ß¥µ¥¤¥ë(2d6) : 2 ¥¿¡¼¥óËè";
-#else
- return "magic missile (2d6) every 2 turns";
-#endif
-
- }
- case ACT_BA_POIS_1:
- {
-#ifdef JP
-return "°½±À (12), Ⱦ·Â 3 , 4+d4 ¥¿¡¼¥óËè";
-#else
- return "stinking cloud (12), rad. 3, every 4+d4 turns";
-#endif
-
- }
- case ACT_BO_ELEC_1:
- {
-#ifdef JP
-return "¥µ¥ó¥À¡¼¡¦¥Ü¥ë¥È(4d8) : 5+d5 ¥¿¡¼¥óËè";
-#else
- return "lightning bolt (4d8) every 5+d5 turns";
-#endif
-
- }
- case ACT_BO_ACID_1:
- {
-#ifdef JP
-return "¥¢¥·¥Ã¥É¡¦¥Ü¥ë¥È(5d8) : 6+d6 ¥¿¡¼¥óËè";
-#else
- return "acid bolt (5d8) every 6+d6 turns";
-#endif
-
- }
- case ACT_BO_COLD_1:
- {
-#ifdef JP
-return "¥¢¥¤¥¹¡¦¥Ü¥ë¥È(6d8) : 7+d7 ¥¿¡¼¥óËè";
-#else
- return "frost bolt (6d8) every 7+d7 turns";
-#endif
-
- }
- case ACT_BO_FIRE_1:
- {
-#ifdef JP
-return "¥Õ¥¡¥¤¥¢¡¦¥Ü¥ë¥È(9d8) : 8+d8 ¥¿¡¼¥óËè";
-#else
- return "fire bolt (9d8) every 8+d8 turns";
-#endif
-
- }
- case ACT_BA_COLD_1:
- {
-#ifdef JP
-return "¥³¡¼¥ë¥É¡¦¥Ü¡¼¥ë (48) : 400 ¥¿¡¼¥óËè";
-#else
- return "ball of cold (48) every 400 turns";
-#endif
-
- }
- case ACT_BA_FIRE_1:
- {
-#ifdef JP
-return "¥Õ¥¡¥¤¥¢¡¦¥Ü¡¼¥ë (72) : 400 ¥¿¡¼¥óËè";
-#else
- return "ball of fire (72) every 400 turns";
-#endif
-
- }
- case ACT_DRAIN_1:
- {
-#ifdef JP
-return "¥Ò¥Ã¥È¥Ý¥¤¥ó¥ÈµÛ¼ý (100) : 100+d100 ¥¿¡¼¥óËè";
-#else
- return "drain life (100) every 100+d100 turns";
-#endif
-
- }
- case ACT_BA_COLD_2:
- {
-#ifdef JP
-return "¥³¡¼¥ë¥É¡¦¥Ü¡¼¥ë (100) : 300 ¥¿¡¼¥óËè";
-#else
- return "ball of cold (100) every 300 turns";
-#endif
-
- }
- case ACT_BA_ELEC_2:
- {
-#ifdef JP
-return "¥µ¥ó¥À¡¼¡¦¥Ü¡¼¥ë (100) : 500 ¥¿¡¼¥óËè";
-#else
- return "ball of lightning (100) every 500 turns";
-#endif
-
- }
- case ACT_DRAIN_2:
- {
-#ifdef JP
-return "¥Ò¥Ã¥È¥Ý¥¤¥ó¥ÈµÛ¼ý(120) : 400 ¥¿¡¼¥óËè";
-#else
- return "drain life (120) every 400 turns";
-#endif
-
- }
- case ACT_VAMPIRE_1:
- {
-#ifdef JP
-return "µÛ·ì¥É¥ì¥¤¥ó (3*50) : 400 ¥¿¡¼¥óËè";
-#else
- return "vampiric drain (3*50) every 400 turns";
-#endif
-
- }
- case ACT_BO_MISS_2:
- {
-#ifdef JP
-return "Ìð (150) : 90+d90 ¥¿¡¼¥óËè";
-#else
- return "arrows (150) every 90+d90 turns";
-#endif
-
- }
- case ACT_BA_FIRE_2:
- {
-#ifdef JP
-return "¥Õ¥¡¥¤¥¢¡¦¥Ü¡¼¥ë (120) : 225+d225 ¥¿¡¼¥óËè";
-#else
- return "fire ball (120) every 225+d225 turns";
-#endif
-
- }
- case ACT_BA_COLD_3:
- {
-#ifdef JP
-return "¥³¡¼¥ë¥É¡¦¥Ü¡¼¥ë (200) : 325+d325 ¥¿¡¼¥óËè";
-#else
- return "ball of cold (200) every 325+d325 turns";
-#endif
-
- }
- case ACT_BA_ELEC_3:
- {
-#ifdef JP
-return "¥µ¥ó¥À¡¼¡¦¥Ü¡¼¥ë (250) : 425+d425 ¥¿¡¼¥óËè";
-#else
- return "ball of lightning (250) every 425+d425 turns";
-#endif
-
- }
- case ACT_WHIRLWIND:
- {
-#ifdef JP
-return "¥«¥Þ¥¤¥¿¥Á : 250 ¥¿¡¼¥óËè";
-#else
- return "whirlwind attack every 250 turns";
-#endif
-
- }
- case ACT_VAMPIRE_2:
- {
-#ifdef JP
-return "µÛ·ì¥É¥ì¥¤¥ó (3*100) : 400 ¥¿¡¼¥óËè";
-#else
- return "vampiric drain (3*100) every 400 turns";
-#endif
-
- }
- case ACT_CALL_CHAOS:
- {
-#ifdef JP
-return "call chaos : 350 ¥¿¡¼¥óËè"; /*nuke me*/
-#else
- return "call chaos every 350 turns";
-#endif
-
- }
- case ACT_ROCKET:
- {
-#ifdef JP
-return "¥í¥±¥Ã¥È (120+level) : 400 ¥¿¡¼¥óËè";
-#else
- return "launch rocket (120+level) every 400 turns";
-#endif
-
- }
- case ACT_DISP_EVIL:
- {
-#ifdef JP
-return "¼Ù°Â໶ (level*5) : 300+d300 ¥¿¡¼¥óËè";
-#else
- return "dispel evil (level*5) every 300+d300 turns";
-#endif
-
- }
- case ACT_BA_MISS_3:
- {
-#ifdef JP
-return "¥¨¥ì¥á¥ó¥È¤Î¥Ö¥ì¥¹ (300) : 500 ¥¿¡¼¥óËè";
-#else
- return "elemental breath (300) every 500 turns";
-#endif
-
- }
- case ACT_DISP_GOOD:
- {
-#ifdef JP
-return "Á±ÎÉÂ໶ (level*5) : 300+d300 ¥¿¡¼¥óËè";
-#else
- return "dispel good (level*5) every 300+d300 turns";
-#endif
-
- }
- case ACT_CONFUSE:
- {
-#ifdef JP
-return "¥Ñ¥Ë¥Ã¥¯¡¦¥â¥ó¥¹¥¿¡¼ : 15 ¥¿¡¼¥óËè";
-#else
- return "confuse monster every 15 turns";
-#endif
-
- }
- case ACT_SLEEP:
- {
-#ifdef JP
-return "¼þ°Ï¤Î¥â¥ó¥¹¥¿¡¼¤ò̲¤é¤»¤ë : 55 ¥¿¡¼¥óËè";
-#else
- return "sleep nearby monsters every 55 turns";
-#endif
-
- }
- case ACT_QUAKE:
- {
-#ifdef JP
-return "ÃÏ¿Ì (Ⱦ·Â 10) : 50 ¥¿¡¼¥óËè";
-#else
- return "earthquake (rad 10) every 50 turns";
-#endif
-
- }
- case ACT_TERROR:
- {
-#ifdef JP
-return "¶²¹² : 3 * (level+10) ¥¿¡¼¥óËè";
-#else
- return "terror every 3 * (level+10) turns";
-#endif
-
- }
- case ACT_TELE_AWAY:
- {
-#ifdef JP
-return "¥Æ¥ì¥Ý¡¼¥È¡¦¥¢¥¦¥§¥¤ : 150 ¥¿¡¼¥óËè";
-#else
- return "teleport away every 200 turns";
-#endif
-
- }
- case ACT_BANISH_EVIL:
- {
-#ifdef JP
-return "¼Ù°¾ÃÌÇ : 250+d250 ¥¿¡¼¥óËè";
-#else
- return "banish evil every 250+d250 turns";
-#endif
-
- }
- case ACT_GENOCIDE:
- {
-#ifdef JP
-return "Ëõ»¦ : 500 ¥¿¡¼¥óËè";
-#else
- return "genocide every 500 turns";
-#endif
-
- }
- case ACT_MASS_GENO:
- {
-#ifdef JP
-return "¼þÊÕËõ»¦ : 1000 ¥¿¡¼¥óËè";
-#else
- return "mass genocide every 1000 turns";
-#endif
-
- }
- case ACT_CHARM_ANIMAL:
- {
-#ifdef JP
-return "ưʪ̥λ : 300 ¥¿¡¼¥óËè";
-#else
- return "charm animal every 300 turns";
-#endif
-
- }
- case ACT_CHARM_UNDEAD:
- {
-#ifdef JP
-return "ÉԻཾ° : 333 ¥¿¡¼¥óËè";
-#else
- return "enslave undead every 333 turns";
-#endif
-
- }
- case ACT_CHARM_OTHER:
- {
-#ifdef JP
-return "¥â¥ó¥¹¥¿¡¼Ì¥Î» : 400 ¥¿¡¼¥óËè";
-#else
- return "charm monster every 400 turns";
-#endif
-
- }
- case ACT_CHARM_ANIMALS:
- {
-#ifdef JP
-return "ưʪͧÏ : 500 ¥¿¡¼¥óËè";
-#else
- return "animal friendship every 500 turns";
-#endif
-
- }
- case ACT_CHARM_OTHERS:
- {
-#ifdef JP
-return "¼þÊÕ̥λ : 750 ¥¿¡¼¥óËè";
-#else
- return "mass charm every 750 turns";
-#endif
-
- }
- case ACT_SUMMON_ANIMAL:
- {
-#ifdef JP
-return "ưʪ¾¤´ : 200+d300 ¥¿¡¼¥óËè";
-#else
- return "summon animal every 200+d300 turns";
-#endif
-
- }
- case ACT_SUMMON_PHANTOM:
- {
-#ifdef JP
-return "»È¤¤Î´ : 200+d200 ¥¿¡¼¥óËè";
-#else
- return "summon phantasmal servant every 200+d200 turns";
-#endif
-
- }
- case ACT_SUMMON_ELEMENTAL:
- {
-#ifdef JP
-return "¥¨¥ì¥á¥ó¥¿¥ë¾¤´ : 750 ¥¿¡¼¥óËè";
-#else
- return "summon elemental every 750 turns";
-#endif
-
- }
- case ACT_SUMMON_DEMON:
- {
-#ifdef JP
-return "°Ë⾤´ : 666+d333 ¥¿¡¼¥óËè";
-#else
- return "summon demon every 666+d333 turns";
-#endif
-
- }
- case ACT_SUMMON_UNDEAD:
- {
-#ifdef JP
-return "ÉԻྤ´ : 666+d333 ¥¿¡¼¥óËè";
-#else
- return "summon undead every 666+d333 turns";
-#endif
-
- }
- case ACT_CURE_LW:
- {
-#ifdef JP
-return "ͦµ¤²óÉü & 30 hp ²óÉü : 10 ¥¿¡¼¥óËè";
-#else
- return "remove fear & heal 30 hp every 10 turns";
-#endif
-
- }
- case ACT_CURE_MW:
- {
-#ifdef JP
-return "4d8 hp & ½ý²óÉü : 3+d3 ¥¿¡¼¥óËè";
-#else
- return "heal 4d8 & wounds every 3+d3 turns";
-#endif
-
- }
- case ACT_CURE_POISON:
- {
-#ifdef JP
-return "ͦµ¤²óÉü/ÆǾä· : 5 ¥¿¡¼¥óËè";
-#else
- return "remove fear and cure poison every 5 turns";
-#endif
-
- }
- case ACT_REST_LIFE:
- {
-#ifdef JP
-return "·Ð¸³ÃÍÉü³è : 450 ¥¿¡¼¥óËè";
-#else
- return "restore life levels every 450 turns";
-#endif
-
- }
- case ACT_REST_ALL:
- {
-#ifdef JP
-return "Á´¥¹¥Æ¡¼¥¿¥¹¤È·Ð¸³ÃͲóÉü : 750 ¥¿¡¼¥óËè";
-#else
- return "restore stats and life levels every 750 turns";
-#endif
-
- }
- case ACT_CURE_700:
- {
-#ifdef JP
-return "700 hp ²óÉü : 250 ¥¿¡¼¥óËè";
-#else
- return "heal 700 hit points every 250 turns";
-#endif
-
- }
- case ACT_CURE_1000:
- {
-#ifdef JP
-return "1000 hp ²óÉü : 888 ¥¿¡¼¥óËè";
-#else
- return "heal 1000 hit points every 888 turns";
-#endif
-
- }
- case ACT_ESP:
- {
-#ifdef JP
-return "°ì»þŪ¤Ê ESP (´ü´Ö 25+d30) : 200 ¥¿¡¼¥óËè";
-#else
- return "temporary ESP (dur 25+d30) every 200 turns";
-#endif
-
- }
- case ACT_BERSERK:
- {
-#ifdef JP
-return "»Îµ¤¹âÍȤȽËÊ¡ (´ü´Ö 50+d50) : 100+d100 ¥¿¡¼¥óËè";
-#else
- return "heroism and blessed (dur 50+d50) every 100+d100 turns";
-#endif
-
- }
- case ACT_PROT_EVIL:
- {
-#ifdef JP
-return "Âмٰ·ë³¦ (´ü´Ö level*3 + d25) : 225+d225 ¥¿¡¼¥óËè";
-#else
- return "protect evil (dur level*3 + d25) every 225+d225 turns";
-#endif
-
- }
- case ACT_RESIST_ALL:
- {
-#ifdef JP
-return "±êÎä»ÀÅÅÆǤؤÎÂÑÀ (´ü´Ö 40+d40) : 200 ¥¿¡¼¥óËè";
-#else
- return "resist elements (dur 40+d40) every 200 turns";
-#endif
-
- }
- case ACT_SPEED:
- {
-#ifdef JP
-return "²Ã® (´ü´Ö 20+d20) : 250 ¥¿¡¼¥óËè";
-#else
- return "speed (dur 20+d20) every 250 turns";
-#endif
-
- }
- case ACT_XTRA_SPEED:
- {
-#ifdef JP
-return "²Ã® (´ü´Ö 75+d75) : 200+d200 ¥¿¡¼¥óËè";
-#else
- return "speed (dur 75+d75) every 200+d200 turns";
-#endif
-
- }
- case ACT_WRAITH:
- {
-#ifdef JP
-return "¥ì¥¤¥¹²½ (level/2 + d(level/2)) : 1000 ¥¿¡¼¥óËè";
-#else
- return "wraith form (level/2 + d(level/2)) every 1000 turns";
-#endif
-
- }
- case ACT_INVULN:
- {
-#ifdef JP
-return "̵Ũ (´ü´Ö 8+d8) : 1000 ¥¿¡¼¥óËè";
-#else
- return "invulnerability (dur 8+d8) every 1000 turns";
-#endif
-
- }
- case ACT_LIGHT:
- {
-#ifdef JP
-return "¼þÊÕ¾ÈÌÀ (¥À¥á¡¼¥¸ 2d15) : 10+d10 ¥¿¡¼¥óËè";
-#else
- return "light area (dam 2d15) every 10+d10 turns";
-#endif
-
- }
- case ACT_MAP_LIGHT:
- {
-#ifdef JP
-return "¼þÊÕ¾ÈÌÀ (¥À¥á¡¼¥¸ 2d15) & ¼þÊÕ¥Þ¥Ã¥× : 50+d50 ¥¿¡¼¥óËè";
-#else
- return "light (dam 2d15) & map area every 50+d50 turns";
-#endif
-
- }
- case ACT_DETECT_ALL:
- {
-#ifdef JP
-return "Á´´¶ÃÎ : 55+d55 ¥¿¡¼¥óËè";
-#else
- return "detection every 55+d55 turns";
-#endif
-
- }
- case ACT_DETECT_XTRA:
- {
-#ifdef JP
-return "Á´´¶ÃΡ¢Ãµº÷¡¢*´ÕÄê* : 1000 ¥¿¡¼¥óËè";
-#else
- return "detection, probing and identify true every 1000 turns";
-#endif
-
- }
- case ACT_ID_FULL:
- {
-#ifdef JP
-return "*´ÕÄê* : 750 ¥¿¡¼¥óËè";
-#else
- return "identify true every 750 turns";
-#endif
-
- }
- case ACT_ID_PLAIN:
- {
-#ifdef JP
-return "´ÕÄê : 10 ¥¿¡¼¥óËè";
-#else
- return "identify spell every 10 turns";
-#endif
-
- }
- case ACT_RUNE_EXPLO:
- {
-#ifdef JP
-return "Çúȯ¥ë¡¼¥ó : 200 ¥¿¡¼¥óËè";
-#else
- return "explosive rune every 200 turns";
-#endif
-
- }
- case ACT_RUNE_PROT:
- {
-#ifdef JP
-return "¼é¤ê¤Î¥ë¡¼¥ó : 400 ¥¿¡¼¥óËè";
-#else
- return "rune of protection every 400 turns";
-#endif
-
- }
- case ACT_SATIATE:
- {
-#ifdef JP
-return "¶õÊ¢½¼Â : 200 ¥¿¡¼¥óËè";
-#else
- return "satisfy hunger every 200 turns";
-#endif
-
- }
- case ACT_DEST_DOOR:
- {
-#ifdef JP
-return "¥É¥¢Ç˲õ : 10 ¥¿¡¼¥óËè";
-#else
- return "destroy doors every 10 turns";
-#endif
-
- }
- case ACT_STONE_MUD:
- {
-#ifdef JP
-return "´äÀÐÍϲò : 5 ¥¿¡¼¥óËè";
-#else
- return "stone to mud every 5 turns";
-#endif
-
- }
- case ACT_RECHARGE:
- {
-#ifdef JP
-return "ºÆ½¼Å¶ : 70 ¥¿¡¼¥óËè";
-#else
- return "recharging every 70 turns";
-#endif
-
- }
- case ACT_ALCHEMY:
- {
-#ifdef JP
-return "Ï£¶â½Ñ : 500 ¥¿¡¼¥óËè";
-#else
- return "alchemy every 500 turns";
-#endif
-
- }
- case ACT_DIM_DOOR:
- {
-#ifdef JP
-return "¼¡¸µ¤ÎÈâ : 100 ¥¿¡¼¥óËè";
-#else
- return "dimension door every 100 turns";
-#endif
-
- }
- case ACT_TELEPORT:
- {
-#ifdef JP
-return "¥Æ¥ì¥Ý¡¼¥È (range 100) : 45 ¥¿¡¼¥óËè";
-#else
- return "teleport (range 100) every 45 turns";
-#endif
-
- }
- case ACT_RECALL:
- {
-#ifdef JP
-return "µ¢´Ô¤Î¾Û : 200 ¥¿¡¼¥óËè";
-#else
- return "word of recall every 200 turns";
-#endif
-
- }
- default:
- {
-#ifdef JP
-return "̤ÄêµÁ";
-#else
- return "something undefined";
-#endif
-
- }
- }
- }
-
- /* Some artifacts can be activated */
- switch (o_ptr->name1)
- {
- case ART_NARTHANC:
- {
-#ifdef JP
-return "¥Õ¥¡¥¤¥¢¡¦¥Ü¥ë¥È(9d8) : 8+d8 ¥¿¡¼¥óËè";
-#else
- return "fire bolt (9d8) every 8+d8 turns";
-#endif
-
- }
- case ART_NIMTHANC:
- {
-#ifdef JP
-return "¥¢¥¤¥¹¡¦¥Ü¥ë¥È(6d8) : 7+d7 ¥¿¡¼¥óËè";
-#else
- return "frost bolt (6d8) every 7+d7 turns";
-#endif
-
- }
- case ART_DETHANC:
- {
-#ifdef JP
-return "¥µ¥ó¥À¡¼¡¦¥Ü¥ë¥È(4d8) : 5+d5 ¥¿¡¼¥óËè";
-#else
- return "lightning bolt (4d8) every 6+d6 turns";
-#endif
-
- }
- case ART_RILIA:
- {
-#ifdef JP
-return "°½±À(12) : 4+d4 ¥¿¡¼¥óËè";
-#else
- return "stinking cloud (12) every 4+d4 turns";
-#endif
-
- }
- case ART_FIONA:
- {
-#ifdef JP
-return "¥¢¥¤¥¹¡¦¥Ü¡¼¥ë(48) : 5+d5 ¥¿¡¼¥óËè";
-#else
- return "frost ball (48) every 5+d5 turns";
-#endif
-
- }
- case ART_FLORA:
- {
-#ifdef JP
-return "¶²Éݽüµî/ÆǾä· : 5 ¥¿¡¼¥óËè";
-#else
- return "remove fear and cure poison every 5 turns";
-#endif
-
- }
- case ART_RINGIL:
- {
-#ifdef JP
-return "¥¢¥¤¥¹¡¦¥Ü¡¼¥ë(100) : 200 ¥¿¡¼¥óËè";
-#else
- return "frost ball (100) every 200 turns";
-#endif
-
- }
- case ART_DAWN:
- {
-#ifdef JP
-return "¶Ç¤Î»ÕÃľ¤´ : 500+d500 ¥¿¡¼¥óËè";
-#else
- return "summon the Legion of the Dawn every 500+d500 turns";
-#endif
-
- }
- case ART_ANDURIL:
- {
-#ifdef JP
-return "¥Õ¥¡¥¤¥¢¡¦¥Ü¡¼¥ë(72) : 400 ¥¿¡¼¥óËè";
-#else
- return "fire ball (72) every 400 turns";
-#endif
-
- }
- case ART_FIRESTAR:
- {
-#ifdef JP
-return "µðÂç¥Õ¥¡¥¤¥¢¡¦¥Ü¡¼¥ë(72) : 100 ¥¿¡¼¥óËè";
-#else
- return "large fire ball (72) every 100 turns";
-#endif
-
- }
- case ART_GOTHMOG:
- {
-#ifdef JP
-return "µðÂç¥Õ¥¡¥¤¥¢¡¦¥Ü¡¼¥ë(120) : 15 ¥¿¡¼¥óËè";
-#else
- return "large fire ball (120) every 15 turns";
-#endif
-
- }
- case ART_FEANOR:
- {
-#ifdef JP
-return "¥¹¥Ô¡¼¥É(20+d20¥¿¡¼¥ó) : 200 ¥¿¡¼¥óËè";
-#else
- return "haste self (20+d20 turns) every 200 turns";
-#endif
-
- }
- case ART_THEODEN:
- {
-#ifdef JP
-return "À¸Ì¿Îϵۼý(120) : 400 ¥¿¡¼¥óËè";
-#else
- return "drain life (120) every 400 turns";
-#endif
-
- }
- case ART_TURMIL:
- {
-#ifdef JP
-return "À¸Ì¿Îϵۼý(90) : 70 ¥¿¡¼¥óËè";
-#else
- return "drain life (90) every 70 turns";
-#endif
-
- }
- case ART_CASPANION:
- {
-#ifdef JP
-return "¥É¥¢/¥È¥é¥Ã¥×Ê´ºÕ : 10 ¥¿¡¼¥óËè";
-#else
- return "door and trap destruction every 10 turns";
-#endif
-
- }
- case ART_AVAVIR:
- case ART_MAGATAMA:
- {
-#ifdef JP
-return "µ¢´Ô¤Î¾Û : 200 ¥¿¡¼¥óËè";
-#else
- return "word of recall every 200 turns";
-#endif
-
- }
- case ART_TARATOL:
- {
-#ifdef JP
-return "¥¹¥Ô¡¼¥É(20+d20¥¿¡¼¥ó) : 100+d100 ¥¿¡¼¥óËè";
-#else
- return "haste self (20+d20 turns) every 100+d100 turns";
-#endif
-
- }
- case ART_ERIRIL:
- {
-#ifdef JP
-return "´ÕÄê : 10 ¥¿¡¼¥óËè";
-#else
- return "identify every 10 turns";
-#endif
-
- }
- case ART_GANDALF:
- {
-#ifdef JP
-return "õº÷¡¢Á´´¶ÃΡ¢Á´´ÕÄê : 1000 ¥¿¡¼¥óËè";
-#else
- return "probing, detection and full id every 1000 turns";
-#endif
-
- }
- case ART_EONWE:
- {
-#ifdef JP
-return "¼þÊÕËõ»¦ : 1000 ¥¿¡¼¥óËè";
-#else
- return "mass genocide every 1000 turns";
-#endif
-
- }
- case ART_LOTHARANG:
- {
-#ifdef JP
-return "½ý¤Î¼£Ìþ(4d7) : 3+d3 ¥¿¡¼¥óËè";
-#else
- return "cure wounds (4d7) every 3+d3 turns";
-#endif
-
- }
- case ART_BRAND:
- {
-#ifdef JP
-return "¿ÏÀè¤Î¥Õ¥¡¥¤¥¢¡¦¥Ü¥ë¥È : 999 ¥¿¡¼¥óËè";
-#else
- return "fire branding of bolts every 999 turns";
-#endif
-
- }
- case ART_CRIMSON:
- {
-#ifdef JP
-return "¥Õ¥¡¥¤¥¢¡ª : 15 ¥¿¡¼¥óËè";
-#else
- return "fire! every 15 turns";
-#endif
-
- }
- case ART_KUSANAGI:
- case ART_WEREWINDLE:
- {
-#ifdef JP
-return "ƨÁö : 35 ¥¿¡¼¥óËè";
-#else
- return "a getaway every 35 turns";
-#endif
-
- }
- case ART_KAMUI:
- {
-#ifdef JP
-return "¥Æ¥ì¥Ý¡¼¥È : 25 ¥¿¡¼¥óËè";
-#else
- return "a teleport every 25 turns";
-#endif
-
- }
- case ART_RUNESPEAR:
- {
-#ifdef JP
-return "¥µ¥ó¥À¡¼¡¦¥Ü¡¼¥ë (100) : 200 ¥¿¡¼¥óËè";
-#else
- return "lightning ball (100) every 200 turns";
-#endif
-
- }
- case ART_AEGLOS:
- {
-#ifdef JP
-return "¥¢¥¤¥¹¡¦¥Ü¡¼¥ë (100) : 200 ¥¿¡¼¥óËè";
-#else
- return "Frost ball (100) every 200 turns";
-#endif
-
- }
- case ART_DESTINY:
- {
-#ifdef JP
-return "´äÀÐÍϲò : 5 ¥¿¡¼¥óËè";
-#else
- return "stone to mud every 5 turns";
-#endif
-
- }
- case ART_NAIN:
- {
-#ifdef JP
-return "´äÀÐÍϲò : 2 ¥¿¡¼¥óËè";
-#else
- return "stone to mud every 2 turns";
-#endif
-
- }
- case ART_SOULKEEPER:
- {
-#ifdef JP
-return "ÂÎÎϲóÉü(1000) : 888 ¥¿¡¼¥óËè";
-#else
- return "heal (1000) every 888 turns";
-#endif
-
- }
- case ART_LOHENGRIN:
- {
-#ifdef JP
-return ("²óÉü (777)¡¢Ìþ¤·¡¢»Îµ¤¹âÍÈ : 300 ¥¿¡¼¥óËè");
-#else
- return ("heal (777), curing and heroism every 300 turns");
-#endif
-
- }
- case ART_JULIAN:
- {
-#ifdef JP
-return "Ëõ»¦ : 500 ¥¿¡¼¥óËè";
-#else
- return "genocide every 500 turns";
-#endif
-
- }
- case ART_LUTHIEN:
- {
-#ifdef JP
-return "·Ð¸³ÃÍÉü³è : 450 ¥¿¡¼¥óËè";
-#else
- return "restore life levels every 450 turns";
-#endif
-
- }
- case ART_ULMO:
- {
-#ifdef JP
-return "¥Æ¥ì¥Ý¡¼¥È¡¦¥¢¥¦¥§¥¤ : 150 ¥¿¡¼¥óËè";
-#else
- return "teleport away every 150 turns";
-#endif
-
- }
- case ART_COLLUIN:
- case ART_SEIRYU:
- {
-#ifdef JP
-return "Á´ÂÑÀ(20+d20¥¿¡¼¥ó) : 111 ¥¿¡¼¥óËè";
-#else
- return "resistance (20+d20 turns) every 111 turns";
-#endif
-
- }
- case ART_HOLCOLLETH:
- {
-#ifdef JP
-return "¥¹¥ê¡¼¥×(II) : 55 ¥¿¡¼¥óËè";
-#else
- return "Sleep II every 55 turns";
-#endif
-
- }
- case ART_THINGOL:
- {
-#ifdef JP
-return "ËâÎϽ¼Å¶ : 70 ¥¿¡¼¥óËè";
-#else
- return "recharge item I every 70 turns";
-#endif
-
- }
- case ART_COLANNON:
- {
-#ifdef JP
-return "¥Æ¥ì¥Ý¡¼¥È : 45 ¥¿¡¼¥óËè";
-#else
- return "teleport every 45 turns";
-#endif
-
- }
- case ART_TOTILA:
- {
-#ifdef JP
-return "¥Ñ¥Ë¥Ã¥¯¡¦¥â¥ó¥¹¥¿¡¼ : 15 ¥¿¡¼¥óËè";
-#else
- return "confuse monster every 15 turns";
-#endif
-
- }
- case ART_CAMMITHRIM:
- {
-#ifdef JP
-return "¥Þ¥¸¥Ã¥¯¡¦¥ß¥µ¥¤¥ë(2d6) : 2 ¥¿¡¼¥óËè";
-#else
- return "magic missile (2d6) every 2 turns";
-#endif
-
- }
- case ART_PAURHACH:
- {
-#ifdef JP
-return "¥Õ¥¡¥¤¥¢¡¦¥Ü¥ë¥È(9d8) : 8+d8 ¥¿¡¼¥óËè";
-#else
- return "fire bolt (9d8) every 8+d8 turns";
-#endif
-
- }
- case ART_PAURNIMMEN:
- {
-#ifdef JP
-return "¥¢¥¤¥¹¡¦¥Ü¥ë¥È(6d8) : 7+d7 ¥¿¡¼¥óËè";
-#else
- return "frost bolt (6d8) every 7+d7 turns";
-#endif
-
- }
- case ART_PAURAEGEN:
- {
-#ifdef JP
-return "¥µ¥ó¥À¡¼¡¦¥Ü¥ë¥È(4d8) : 5+d5 ¥¿¡¼¥óËè";
-#else
- return "lightning bolt (4d8) every 5+d5 turns";
-#endif
-
- }
- case ART_PAURNEN:
- {
-#ifdef JP
-return "¥¢¥·¥Ã¥É¡¦¥Ü¥ë¥È(5d8) : 6+d6 ¥¿¡¼¥óËè";
-#else
- return "acid bolt (5d8) every 6+d6 turns";
-#endif
-
- }
- case ART_FINGOLFIN:
- {
-#ifdef JP
-return "ËâË¡¤ÎÌð(150) : 90+d90 ¥¿¡¼¥óËè";
-#else
- return "a magical arrow (150) every 90+d90 turns";
-#endif
-
- }
- case ART_HOLHENNETH:
- {
-#ifdef JP
-return "Á´´¶ÃÎ : 55+d55 ¥¿¡¼¥óËè";
-#else
- return "detection every 55+d55 turns";
-#endif
-
- }
- case ART_AMBER:
- {
-#ifdef JP
-return "ÂÎÎϲóÉü(700) : 250 ¥¿¡¼¥óËè";
-#else
- return "heal (700) every 250 turns";
-#endif
-
- }
- case ART_RAZORBACK:
- {
-#ifdef JP
-return "¥¹¥¿¡¼¡¦¥Ü¡¼¥ë(150) : 1000 ¥¿¡¼¥óËè";
-#else
- return "star ball (150) every 1000 turns";
-#endif
-
- }
- case ART_BLADETURNER:
- {
-#ifdef JP
-return "¥¨¥ì¥á¥ó¥È¤Î¥Ö¥ì¥¹ (300), »Îµ¤¹âÍÈ¡¢½ËÊ¡¡¢ÂÑÀ";
-#else
- return "breathe elements (300), hero, bless, and resistance";
-#endif
-
- }
- case ART_GALADRIEL:
- {
-#ifdef JP
-return "¥¤¥ë¥ß¥Í¡¼¥·¥ç¥ó : 10+d10 ¥¿¡¼¥óËè";
-#else
- return "illumination every 10+d10 turns";
-#endif
-
- }
- case ART_ELENDIL:
- {
-#ifdef JP
-return "ËâË¡¤ÎÃϿޤȸ÷ : 50+d50 ¥¿¡¼¥óËè";
-#else
- return "magic mapping and light every 50+d50 turns";
-#endif
-
- }
- case ART_JUDGE:
- {
-#ifdef JP
-return "ÂÎÎϤȰú¤Âؤ¨¤ËÀéΤ´ã¤Èµ¢´Ô : 20+d20 ¥¿¡¼¥óËè";
-#else
- return "clairvoyance and recall, draining you every 20+d20 turns";
-#endif
-
- }
- case ART_INGWE:
- case ART_YATA:
- {
-#ifdef JP
-return "¼Ù°Â໶(x5) : 200+d200 ¥¿¡¼¥óËè";
-#else
- return "dispel evil (x5) every 200+d200 turns";
-#endif
-
- }
- case ART_FUNDIN:
- {
-#ifdef JP
-return "¼Ù°Â໶(x5) : 100+d100 ¥¿¡¼¥óËè";
-#else
- return "dispel evil (x5) every 100+d100 turns";
-#endif
-
- }
- case ART_CARLAMMAS:
- case ART_HERMIT:
- {
-#ifdef JP
-return "Âмٰ·ë³¦ : 225+d225 ¥¿¡¼¥óËè";
-#else
- return "protection from evil every 225+d225 turns";
-#endif
-
- }
- case ART_FRAKIR:
- {
-#ifdef JP
-return "Ã⩹¶·â(100) : 100+d100 ¥¿¡¼¥óËè";
-#else
- return "a strangling attack (100) every 100+d100 turns";
-#endif
-
- }
- case ART_TULKAS:
- {
-#ifdef JP
-return "¥¹¥Ô¡¼¥É(75+d75¥¿¡¼¥ó) : 100+d100 ¥¿¡¼¥óËè";
-#else
- return "haste self (75+d75 turns) every 150+d150 turns";
-#endif
-
- }
- case ART_NARYA:
- {
-#ifdef JP
-return "µðÂç¥Õ¥¡¥¤¥¢¡¦¥Ü¡¼¥ë(300) : 225+d225 ¥¿¡¼¥óËè";
-#else
- return "large fire ball (300) every 225+d225 turns";
-#endif
-
- }
- case ART_NENYA:
- {
-#ifdef JP
-return "µðÂ祢¥¤¥¹¡¦¥Ü¡¼¥ë(400) : 325+d325 ¥¿¡¼¥óËè";
-#else
- return "large frost ball (400) every 325+d325 turns";
-#endif
-
- }
- case ART_VILYA:
- case ART_GOURYU:
- {
-#ifdef JP
-return "µðÂ祵¥ó¥À¡¼¡¦¥Ü¡¼¥ë(500) : 425+d425 ¥¿¡¼¥óËè";
-#else
- return "large lightning ball (500) every 425+d425 turns";
-#endif
-
- }
- case ART_POWER:
- case ART_AHO:
- {
-#ifdef JP
-return "¿®¤¸Æñ¤¤¤³¤È : 450+d450 ¥¿¡¼¥óËè";
-#else
- return "bizarre things every 450+d450 turns";
-#endif
-
- }
- case ART_DOR: case ART_TERROR: case ART_STONEMASK:
- {
-#ifdef JP
- return "Á´Êý¸þ¤Ø¤Î¶²Éݤθ÷Àþ : 3*(¥ì¥Ù¥ë+10) ¥¿¡¼¥óËè";
-#else
- return "rays of fear in every direction every 3*(level+10) turns";
-#endif
-
- }
- case ART_PALANTIR:
- {
-#ifdef JP
-return "¤³¤Î³¬¤Ë¤¤¤ë¥æ¥Ë¡¼¥¯¥â¥ó¥¹¥¿¡¼¤òɽ¼¨ : 200¥¿¡¼¥óËè";
-#else
- return "list of the uniques on the level every 200 turns";
-#endif
- }
- case ART_STONE_LORE:
- {
-#ifdef JP
-return "´í¸±¤òȼ¤¦´ÕÄê : ¤¤¤Ä¤Ç¤â";
-#else
- return "perilous identify every turn";
-#endif
- }
- case ART_FARAMIR:
- {
-#ifdef JP
-return "³²Ãî¤Î¶î½ü : 55+d55¥¿¡¼¥óËè";
-#else
- return "dispel small life every 55+d55 turns";
-#endif
- }
- case ART_BOROMIR:
- {
-#ifdef JP
-return "¥â¥ó¥¹¥¿¡¼¶²¹² : 40+d40¥¿¡¼¥óËè";
-#else
- return "frighten monsters every 40+d40 turns";
-#endif
- }
- case ART_HIMRING:
- {
-#ifdef JP
-return "Âмٰ·ë³¦ : 200+d200 ¥¿¡¼¥óËè";
-#else
- return "protection from evil every 200 + d200 turns";
-#endif
- }
- case ART_ICANUS:
- {
-#ifdef JP
-return "ËâÎϤÎÌð(120) : 120+d120 ¥¿¡¼¥óËè";
-#else
- return "a mana bolt (120) every 120+d120 turns";
-#endif
- }
- case ART_HURIN:
- {
-#ifdef JP
-return "»Îµ¤¹âÍÈ, ¥¹¥Ô¡¼¥É(50+d50¥¿¡¼¥ó) : 100+d200 ¥¿¡¼¥óËè";
-#else
- return "hero and +10 to speed (50) every 100+200d turns";
-#endif
- }
- case ART_GIL_GALAD:
- {
-#ifdef JP
-return "âÁ¤·¤¤¸÷ : 250 ¥¿¡¼¥óËè";
-#else
- return "blinding light every 250 turns";
-#endif
- }
- case ART_YENDOR:
- {
-#ifdef JP
-return "ËâÎϽ¼Å¶ : 200 ¥¿¡¼¥óËè";
-#else
- return "Recharge item every 200 turns";
-#endif
- }
- case ART_MURAMASA:
- {
-#ifdef JP
-return "ÏÓÎϤξ徺 : ³ÎΨ50%¤Ç²õ¤ì¤ë¡£";
-#else
- return "Increase STR (destroyed 50%)";
-#endif
- }
- case ART_FLY_STONE:
- {
-#ifdef JP
-return "ËâÎϤÎÍò(400) : 250+d250¥¿¡¼¥óËè";
-#else
- return "a mana storm every 250+d250 turns";
-#endif
- }
- case ART_JONES:
- {
-#ifdef JP
-return "ʪÂΤò°ú¤´ó¤»¤ë(½ÅÎÌ25kg¤Þ¤Ç) : 25+d25¥¿¡¼¥óËè";
-#else
- return "a telekinesis (500 lb) every 25+d25 turns";
-#endif
- }
- case ART_ARRYU:
- {
-#ifdef JP
-return "¥Ï¥¦¥ó¥É¾¤´ : 300+d150¥¿¡¼¥óËè";
-#else
- return "summon hound every 300+d150 turns";
-#endif
- }
- case ART_GAEBOLG:
- {
-#ifdef JP
-return "µðÂ祹¥¿¡¼¡¦¥Ü¡¼¥ë(200) : 200+d200 ¥¿¡¼¥óËè";
-#else
- return "large star ball (200) every 200+d200 turns";
-#endif
-
- }
- case ART_INROU:
- {
-#ifdef JP
-return "Îã¤Î¥¢¥ì : 150+d150 ¥¿¡¼¥óËè";
-#else
- return "reveal your identity every 150+d150 turns";
-#endif
-
- }
- case ART_HYOUSIGI:
- {
-#ifdef JP
-return "Çï»ÒÌÚ¤òÂǤÁ¤Ê¤é¤¹ : ¤¤¤Ä¤Ç¤â";
-#else
- return "beat wooden clappers every turn";
-#endif
-
- }
- case ART_MATOI:
- case ART_AEGISFANG:
- {
-#ifdef JP
-return "»Îµ¤¹âÍÈ : 30+d30¥¿¡¼¥óËè";
-#else
- return "heroism every 30+d30 turns";
-#endif
-
- }
-
- case ART_EARENDIL:
- {
-#ifdef JP
-return "Ìþ¤· : 100¥¿¡¼¥óËè";
-#else
- return "curing every 100 turns";
-#endif
-
- }
-
- case ART_BOLISHOI:
- {
-#ifdef JP
-return "ưʪ̥λ : 200¥¿¡¼¥óËè";
-#else
- return "charm animal every 200 turns";
-#endif
-
- }
- case ART_ARUNRUTH:
- {
-#ifdef JP
-return "¥¢¥¤¥¹¡¦¥Ü¥ë¥È(12d8) : 50 ¥¿¡¼¥óËè";
-#else
- return "frost bolt (12d8) every 50 turns";
-#endif
-
- }
- case ART_BLOOD:
- {
-#ifdef JP
-return "°ÀÊѹ¹ : 3333 ¥¿¡¼¥óËè";
-#else
- return "change zokusei every 3333 turns";
-#endif
-
- }
- case ART_NUMAHOKO:
- {
-#ifdef JP
-return "¥¦¥©¡¼¥¿¡¼¡¦¥Ü¡¼¥ë(200) : 250 ¥¿¡¼¥óËè";
-#else
- return "water ball (200) every 250 turns";
-#endif
-
- }
- case ART_KESHO:
- {
-#ifdef JP
-return "»Í¸ÔƧ¤ß : 100+d100¥¿¡¼¥óËè";
-#else
- return "shiko every 100+d100 turns";
-#endif
-
- }
- case ART_MOOK:
- {
-#ifdef JP
-return "Î䵤¤ÎÂÑÀ : 40+d40¥¿¡¼¥óËè";
-#else
- return "resist cold every 40+d40 turns";
-#endif
-
- }
- case ART_JIZO:
- {
-#ifdef JP
-return "Âý¤ÎÂç·²¾¤´ : 300+d150¥¿¡¼¥óËè";
-#else
- return "summon octopus every 300+d150 turns";
-#endif
- }
- case ART_NIGHT:
- {
-#ifdef JP
-return "°Å¹õ¤ÎÍò(250) : 150+d150 ¥¿¡¼¥óËè";
-#else
- return "darkness storm (250) every 150+d150 turns";
-#endif
-
- }
- }
-
-
- if ((o_ptr->tval == TV_POLEARM) && (o_ptr->sval == SV_TSURIZAO))
- {
-#ifdef JP
-return "Äà¤ê¤ò¤¹¤ë : ¤¤¤Ä¤Ç¤â";
-#else
- return "fishing : every time";
-#endif
-
- }
-
- if ((o_ptr->tval > TV_CAPTURE) && o_ptr->xtra3)
- {
- switch (o_ptr->xtra3 - 1)
- {
- case ESSENCE_TMP_RES_ACID:
-#ifdef JP
- return "»À¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
-#else
- return "resist acid every 50+d50 turns";
-#endif
-
- case ESSENCE_TMP_RES_ELEC:
-#ifdef JP
- return "ÅÅ·â¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
-#else
- return "resist elec every 50+d50 turns";
-#endif
-
- case ESSENCE_TMP_RES_FIRE:
-#ifdef JP
- return "²Ð¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
-#else
- return "resist fire every 50+d50 turns";
-#endif
-
- case ESSENCE_TMP_RES_COLD:
-#ifdef JP
- return "Î䵤¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
-#else
- return "resist cold every 50+d50 turns";
-#endif
-
- case TR_IMPACT:
-#ifdef JP
- return "ÃÏ¿Ì : 100+d100 ¥¿¡¼¥óËè";
-#else
- return "earthquake every 100+d100 turns";
-#endif
- }
- }
-
- if (o_ptr->name2 == EGO_TRUMP)
- {
-#ifdef JP
-return "¥Æ¥ì¥Ý¡¼¥È : 50+d50 ¥¿¡¼¥óËè";
-#else
- return "teleport every 50+d50 turns";
-#endif
-
- }
-
- if (o_ptr->name2 == EGO_LITE_ILLUMINATION)
- {
-#ifdef JP
-return "¥¤¥ë¥ß¥Í¡¼¥·¥ç¥ó : 10+d10 ¥¿¡¼¥óËè";
-#else
- return "illumination every 10+d10 turns";
-#endif
- }
-
- else if (o_ptr->name2 == EGO_EARTHQUAKES)
- {
-#ifdef JP
-return "ÃÏ¿Ì : 100+d100 ¥¿¡¼¥óËè";
-#else
- return "earthquake every 100+d100 turns";
-#endif
-
- }
-
- else if (o_ptr->name2 == EGO_JUMP)
- {
-#ifdef JP
-return "¥·¥ç¡¼¥È¡¦¥Æ¥ì¥Ý¡¼¥È : 10+d10 ¥¿¡¼¥óËè";
-#else
- return "blink every 10+d10 turns";
-#endif
-
- }
-
- if (o_ptr->tval == TV_RING)
- {
- if (o_ptr->name2)
- {
- switch (o_ptr->name2)
- {
- case EGO_RING_HERO:
-#ifdef JP
-return "»Îµ¤¹âÍÈ : 100+d100¥¿¡¼¥óËè";
-#else
- return "heroism every 100+d100 turns";
-#endif
- case EGO_RING_MAGIC_MIS:
-#ifdef JP
-return "¥Þ¥¸¥Ã¥¯¡¦¥ß¥µ¥¤¥ë(2d6) : 2 ¥¿¡¼¥óËè";
-#else
- return "magic missile (2d6) every 2 turns";
-#endif
- case EGO_RING_FIRE_BOLT:
-#ifdef JP
-return "¥Õ¥¡¥¤¥¢¡¦¥Ü¥ë¥È(9d8) : 8+d8 ¥¿¡¼¥óËè";
-#else
- return "fire bolt (9d8) every 8+d8 turns";
-#endif
- case EGO_RING_COLD_BOLT:
-#ifdef JP
-return "¥¢¥¤¥¹¡¦¥Ü¥ë¥È(6d8) : 7+d7 ¥¿¡¼¥óËè";
-#else
- return "frost bolt (6d8) every 7+d7 turns";
-#endif
- case EGO_RING_ELEC_BOLT:
-#ifdef JP
-return "¥µ¥ó¥À¡¼¡¦¥Ü¥ë¥È(4d8) : 5+d5 ¥¿¡¼¥óËè";
-#else
- return "lightning bolt (4d8) every 5+d5 turns";
-#endif
- case EGO_RING_ACID_BOLT:
-#ifdef JP
-return "¥¢¥·¥Ã¥É¡¦¥Ü¥ë¥È(5d8) : 6+d6 ¥¿¡¼¥óËè";
-#else
- return "acid bolt (5d8) every 6+d6 turns";
-#endif
- case EGO_RING_MANA_BOLT:
-#ifdef JP
-return "ËâÎϤÎÌð(120) : 120+d120 ¥¿¡¼¥óËè";
-#else
- return "a mana bolt (120) every 120+d120 turns";
-#endif
- case EGO_RING_FIRE_BALL:
-#ifdef JP
-return "¥Õ¥¡¥¤¥¢¡¦¥Ü¡¼¥ë (100) : 80+d80 ¥¿¡¼¥óËè";
-#else
- return "fire ball (100) every 80+d80 turns";
-#endif
- case EGO_RING_COLD_BALL:
-#ifdef JP
-return "¥³¡¼¥ë¥É¡¦¥Ü¡¼¥ë (100) : 80+d80 ¥¿¡¼¥óËè";
-#else
- return "cold ball (100) every 80+d80 turns";
-#endif
- case EGO_RING_ELEC_BALL:
-#ifdef JP
-return "¥µ¥ó¥À¡¼¡¦¥Ü¡¼¥ë (100) : 80+d80 ¥¿¡¼¥óËè";
-#else
- return "elec ball (100) every 80+d80 turns";
-#endif
- case EGO_RING_ACID_BALL:
-#ifdef JP
-return "¥¢¥·¥Ã¥É¡¦¥Ü¡¼¥ë (100) : 80+d80 ¥¿¡¼¥óËè";
-#else
- return "acid ball (100) every 80+d80 turns";
-#endif
- case EGO_RING_MANA_BALL:
-#ifdef JP
-return "ËâÎϤÎÍò (250) : 300 ¥¿¡¼¥óËè";
-#else
- return "mana storm (250) every 300 turns";
-#endif
- case EGO_RING_DRAGON_F:
- if (o_ptr->sval == SV_RING_FLAMES)
-#ifdef JP
-return "²Ð±ê¤Î¥Ö¥ì¥¹ (200) ¤È²Ð¤Ø¤ÎÂÑÀ : 200 ¥¿¡¼¥óËè";
-#else
- return "breath of fire (200) and resist fire every 200 turns";
-#endif
- else
-#ifdef JP
-return "²Ð±ê¤Î¥Ö¥ì¥¹ (200) : 250 ¥¿¡¼¥óËè";
-#else
- return "fire breath (200) every 250 turns";
-#endif
- case EGO_RING_DRAGON_C:
- if (o_ptr->sval == SV_RING_ICE)
-#ifdef JP
-return "Î䵤¤Î¥Ö¥ì¥¹ (200) ¤ÈÎ䵤¤Ø¤ÎÂÑÀ : 200 ¥¿¡¼¥óËè";
-#else
- return "breath of cold (200) and resist cold every 200 turns";
-#endif
- else
-#ifdef JP
-return "Î䵤¤Î¥Ö¥ì¥¹ (200) : 250 ¥¿¡¼¥óËè";
-#else
- return "cold breath (200) every 250 turns";
-#endif
- case EGO_RING_M_DETECT:
-#ifdef JP
-return "Á´¥â¥ó¥¹¥¿¡¼´¶ÃÎ : 150 ¥¿¡¼¥óËè";
-#else
- return "detect all monsters every 150 turns";
-#endif
- case EGO_RING_D_SPEED:
-#ifdef JP
-return "¥¹¥Ô¡¼¥É(15+d30¥¿¡¼¥ó) : 100 ¥¿¡¼¥óËè";
-#else
- return "haste self (15+d30 turns) every 100 turns";
-#endif
- case EGO_RING_BERSERKER:
-#ifdef JP
-return "¶¸Àï»Î²½(25+d25¥¿¡¼¥ó) : 75+d75 ¥¿¡¼¥óËè";
-#else
- return "berserk (25+d25 turns) every 75+d75 turns";
-#endif
- case EGO_RING_TELE_AWAY:
-#ifdef JP
-return "¥Æ¥ì¥Ý¡¼¥È¡¦¥¢¥¦¥§¥¤ : 150 ¥¿¡¼¥óËè";
-#else
- return "teleport away every 150 turns";
-#endif
- case EGO_RING_TRUE:
-#ifdef JP
-return "»Îµ¤¹âÍÈ¡¢½ËÊ¡¡¢µæ¶Ë¤ÎÂÑÀ : 777 ¥¿¡¼¥óËè";
-#else
- return "hero, bless, and ultimate resistance every 777 turns";
-#endif
- }
- }
- switch (o_ptr->sval)
- {
- case SV_RING_FLAMES:
-#ifdef JP
-return "¥Õ¥¡¥¤¥¢¡¦¥Ü¡¼¥ë (100) ¤È²Ð¤Ø¤ÎÂÑÀ : 50+d50 ¥¿¡¼¥óËè";
-#else
- return "ball of fire (100) and resist fire every 50+d50 turns";
-#endif
-
- case SV_RING_ICE:
-#ifdef JP
-return "¥³¡¼¥ë¥É¡¦¥Ü¡¼¥ë (100) ¤ÈÎ䵤¤Ø¤ÎÂÑÀ : 50+d50 ¥¿¡¼¥óËè";
-#else
- return "ball of cold (100) and resist cold every 50+d50 turns";
-#endif
-
- case SV_RING_ACID:
-#ifdef JP
-return "¥¢¥·¥Ã¥É¡¦¥Ü¡¼¥ë (100) ¤È»À¤Ø¤ÎÂÑÀ : 50+d50 ¥¿¡¼¥óËè";
-#else
- return "ball of acid (100) and resist acid every 50+d50 turns";
-#endif
-
- case SV_RING_ELEC:
-#ifdef JP
-return "¥µ¥ó¥À¡¼¡¦¥Ü¡¼¥ë (100) ¤ÈÅÅ·â¤Ø¤ÎÂÑÀ : 50+d50 ¥¿¡¼¥óËè";
-#else
- return "ball of elec (100) and resist elec every 50+d50 turns";
-#endif
-
- default:
- return NULL;
+ for (i = 0; i < TR_FLAG_SIZE; i++)
+ flgs[i] = a_ptr->flags[i];
}
+
+ /* Random artifact ! */
+ for (i = 0; i < TR_FLAG_SIZE; i++)
+ flgs[i] |= o_ptr->art_flags[i];
}
- if (o_ptr->tval == TV_AMULET)
+ if (object_is_smith(o_ptr))
{
- if (o_ptr->name2)
+ int add = o_ptr->xtra3 - 1;
+
+ if (add < TR_FLAG_MAX)
{
- switch (o_ptr->name2)
- {
- case EGO_AMU_IDENT:
-#ifdef JP
- return "´ÕÄê : 10 ¥¿¡¼¥óËè";
-#else
- return "identify every 10 turns";
-#endif
- case EGO_AMU_CHARM:
-#ifdef JP
- return "¥â¥ó¥¹¥¿¡¼Ì¥Î» : 200 ¥¿¡¼¥óËè";
-#else
- return "charm monster every 200 turns";
-#endif
- case EGO_AMU_JUMP:
-#ifdef JP
- return "¥·¥ç¡¼¥È¡¦¥Æ¥ì¥Ý¡¼¥È : 10+d10 ¥¿¡¼¥óËè";
-#else
- return "blink every 10+d10 turns";
-#endif
- case EGO_AMU_TELEPORT:
-#ifdef JP
- return "¥Æ¥ì¥Ý¡¼¥È : 50+d50 ¥¿¡¼¥óËè";
-#else
- return "teleport every 50+d50 turns";
-#endif
- case EGO_AMU_D_DOOR:
-#ifdef JP
- return "¼¡¸µ¤ÎÈâ : 200 ¥¿¡¼¥óËè";
-#else
- return "dimension door every 200 turns";
-#endif
- case EGO_AMU_RES_FIRE_:
-#ifdef JP
- return "²Ð±ê¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
-#else
- return "resist fire every 50+d50 turns";
-#endif
- case EGO_AMU_RES_COLD_:
-#ifdef JP
- return "Î䵤¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
-#else
- return "resist cold every 50+d50 turns";
-#endif
- case EGO_AMU_RES_ELEC_:
-#ifdef JP
- return "ÅÅ·â¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
-#else
- return "resist elec every 50+d50 turns";
-#endif
- case EGO_AMU_RES_ACID_:
-#ifdef JP
- return "»À¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
-#else
- return "resist acid every 50+d50 turns";
-#endif
- case EGO_AMU_DETECTION:
-#ifdef JP
- return "Á´´¶ÃÎ : 55+d55¥¿¡¼¥óËè";
-#else
- return "detect all floor every 55+d55 turns";
-#endif
- }
+ add_flag(flgs, add);
+ }
+ else if (add == ESSENCE_TMP_RES_ACID)
+ {
+ add_flag(flgs, TR_RES_ACID);
+ }
+ else if (add == ESSENCE_TMP_RES_ELEC)
+ {
+ add_flag(flgs, TR_RES_ELEC);
+ }
+ else if (add == ESSENCE_TMP_RES_FIRE)
+ {
+ add_flag(flgs, TR_RES_FIRE);
+ }
+ else if (add == ESSENCE_TMP_RES_COLD)
+ {
+ add_flag(flgs, TR_RES_COLD);
+ }
+ else if (add == ESSENCE_SH_FIRE)
+ {
+ add_flag(flgs, TR_RES_FIRE);
+ add_flag(flgs, TR_SH_FIRE);
+ }
+ else if (add == ESSENCE_SH_ELEC)
+ {
+ add_flag(flgs, TR_RES_ELEC);
+ add_flag(flgs, TR_SH_ELEC);
+ }
+ else if (add == ESSENCE_SH_COLD)
+ {
+ add_flag(flgs, TR_RES_COLD);
+ add_flag(flgs, TR_SH_COLD);
+ }
+ else if (add == ESSENCE_RESISTANCE)
+ {
+ add_flag(flgs, TR_RES_ACID);
+ add_flag(flgs, TR_RES_ELEC);
+ add_flag(flgs, TR_RES_FIRE);
+ add_flag(flgs, TR_RES_COLD);
}
}
+}
- if (o_ptr->tval == TV_WHISTLE)
+
+static cptr item_activation_dragon_breath(object_type *o_ptr)
+{
+ static char desc[256];
+ u32b flgs[4]; /* for resistance flags */
+ int i, n = 0;
+
+ object_flags(o_ptr, flgs);
+ strcpy(desc, _("", "breath "));
+
+ for (i = 0; dragonbreath_info[i].flag != 0; i++)
{
-#ifdef JP
-return "¥Ú¥Ã¥È¸Æ¤Ó´ó¤» : 100+d100¥¿¡¼¥óËè";
-#else
- return "call pet every 100+d100 turns";
-#endif
+ if (have_flag(flgs, dragonbreath_info[i].flag))
+ {
+ if (n > 0) strcat(desc, _("¡¢", ", "));
+ strcat(desc, dragonbreath_info[i].name);
+ n++;
+ }
}
- if (o_ptr->tval == TV_CAPTURE)
- {
-#ifdef JP
-return "¥â¥ó¥¹¥¿¡¼¤òÊᤨ¤ë¡¢Ëô¤Ï²òÊü¤¹¤ë¡£";
-#else
- return "captures or releases a monster.";
-#endif
+ strcat(desc, _("¤Î¥Ö¥ì¥¹(250)", ""));
+
+ return (desc);
+}
+
+static cptr item_activation_aux(object_type *o_ptr)
+{
+ static char activation_detail[256];
+ cptr desc;
+ char timeout[32];
+ int constant, dice;
+ const activation_type* act_ptr = find_activation_info(o_ptr);
+
+ if (!act_ptr) return _("̤ÄêµÁ", "something undefined");
+
+ desc = act_ptr->desc;
+
+ /* Overwrite description if it is special */
+ switch (o_ptr->xtra2) {
+ case ACT_BR_FIRE:
+ if ((o_ptr->tval == TV_RING) && (o_ptr->sval == SV_RING_FLAMES))
+ desc = _("²Ð±ê¤Î¥Ö¥ì¥¹ (200) ¤È²Ð¤Ø¤ÎÂÑÀ", "breath of fire (200) and resist fire");
+ break;
+ case ACT_BR_COLD:
+ if ((o_ptr->tval == TV_RING) && (o_ptr->sval == SV_RING_ICE))
+ desc = _("Î䵤¤Î¥Ö¥ì¥¹ (200) ¤ÈÎ䵤¤Ø¤ÎÂÑÀ", "breath of cold (200) and resist cold");
+ break;
+ case ACT_BR_DRAGON:
+ desc = item_activation_dragon_breath(o_ptr);
+ break;
+ case ACT_AGGRAVATE:
+ if (o_ptr->name1 == ART_HYOUSIGI)
+ desc = _("Çï»ÒÌÚ¤òÂǤÁ¤Ê¤é¤¹", "beat wooden clappers");
+ break;
+ case ACT_RESIST_ACID:
+ if ((o_ptr->tval == TV_RING) && (o_ptr->sval == SV_RING_ACID))
+ desc = _("¥¢¥·¥Ã¥É¡¦¥Ü¡¼¥ë (100) ¤È»À¤Ø¤ÎÂÑÀ", "ball of acid (100) and resist acid");
+ break;
+ case ACT_RESIST_FIRE:
+ if ((o_ptr->tval == TV_RING) && (o_ptr->sval == SV_RING_FLAMES))
+ desc = _("¥Õ¥¡¥¤¥¢¡¦¥Ü¡¼¥ë (100) ¤È²Ð¤Ø¤ÎÂÑÀ", "ball of fire (100) and resist fire");
+ break;
+ case ACT_RESIST_COLD:
+ if ((o_ptr->tval == TV_RING) && (o_ptr->sval == SV_RING_ICE))
+ desc = _("¥¢¥¤¥¹¡¦¥Ü¡¼¥ë (100) ¤ÈÎ䵤¤Ø¤ÎÂÑÀ", "ball of cold (100) and resist cold");
+ break;
+ case ACT_RESIST_ELEC:
+ if ((o_ptr->tval == TV_RING) && (o_ptr->sval == SV_RING_ELEC))
+ desc = _("¥µ¥ó¥À¡¼¡¦¥Ü¡¼¥ë (100) ¤ÈÅÅ·â¤Ø¤ÎÂÑÀ", "ball of elec (100) and resist elec");
+ break;
+ }
+
+ /* Timeout description */
+ constant = act_ptr->timeout.constant;
+ dice = act_ptr->timeout.dice;
+ if (constant == 0 && dice == 0) {
+ /* We can activate it every turn */
+ strcpy(timeout, _("¤¤¤Ä¤Ç¤â", "every turn"));
+ } else if (constant < 0) {
+ /* Activations that have special timeout */
+ switch (o_ptr->xtra2) {
+ case ACT_BR_FIRE:
+ sprintf(timeout, _("%d ¥¿¡¼¥óËè", "every %d turns"),
+ ((o_ptr->tval == TV_RING) && (o_ptr->sval == SV_RING_FLAMES)) ? 200 : 250);
+ break;
+ case ACT_BR_COLD:
+ sprintf(timeout, _("%d ¥¿¡¼¥óËè", "every %d turns"),
+ ((o_ptr->tval == TV_RING) && (o_ptr->sval == SV_RING_ICE)) ? 200 : 250);
+ break;
+ case ACT_TERROR:
+ strcpy(timeout, _("3*(¥ì¥Ù¥ë+10) ¥¿¡¼¥óËè", "every 3 * (level+10) turns"));
+ break;
+ case ACT_MURAMASA:
+ strcpy(timeout, _("³ÎΨ50%¤Ç²õ¤ì¤ë", "(destroyed 50%)"));
+ break;
+ default:
+ strcpy(timeout, "undefined");
+ break;
+ }
+ } else {
+ /* Normal timeout activations */
+ char constant_str[16], dice_str[16];
+ sprintf(constant_str, "%d", constant);
+ sprintf(dice_str, "d%d", dice);
+ sprintf(timeout, _("%s%s%s ¥¿¡¼¥óËè", "every %s%s%s turns"),
+ (constant > 0) ? constant_str : "",
+ (constant > 0 && dice > 0) ? "+" : "",
+ (dice > 0) ? dice_str : "");
}
- /* Require dragon scale mail */
-#ifdef JP
-if (o_ptr->tval != TV_DRAG_ARMOR) return ("´ñ̯¤Ê¸÷");
-#else
- if (o_ptr->tval != TV_DRAG_ARMOR) return ("a strange glow");
-#endif
+ /* Build detail activate description */
+ sprintf(activation_detail, _("%s : %s", "%s %s"), desc, timeout);
+ return activation_detail;
+}
- /* Branch on the sub-type */
- switch (o_ptr->sval)
- {
- case SV_DRAGON_BLUE:
- {
-#ifdef JP
-return "°ðºÊ¤Î¥Ö¥ì¥¹(100) : 150+d150 ¥¿¡¼¥óËè";
-#else
- return "breathe lightning (100) every 150+d150 turns";
-#endif
+/*
+ * Determine the "Activation" (if any) for an artifact
+ * Return a string, or NULL for "no activation"
+ */
+cptr item_activation(object_type *o_ptr)
+{
+ u32b flgs[TR_FLAG_SIZE];
- }
- case SV_DRAGON_WHITE:
- {
-#ifdef JP
-return "Î䵤¤Î¥Ö¥ì¥¹(110) : 150+d150 ¥¿¡¼¥óËè";
-#else
- return "breathe frost (110) every 150+d150 turns";
-#endif
+ /* Extract the flags */
+ object_flags(o_ptr, flgs);
- }
- case SV_DRAGON_BLACK:
- {
+ /* Require activation ability */
#ifdef JP
-return "»À¤Î¥Ö¥ì¥¹(130) : 150+d150 ¥¿¡¼¥óËè";
+ if (!(have_flag(flgs, TR_ACTIVATE))) return ("¤Ê¤·");
#else
- return "breathe acid (130) every 150+d150 turns";
+ if (!(have_flag(flgs, TR_ACTIVATE))) return ("nothing");
#endif
- }
- case SV_DRAGON_GREEN:
- {
-#ifdef JP
-return "ÆǤΥ¬¥¹¤Î¥Ö¥ì¥¹(150) : 180+d180 ¥¿¡¼¥óËè";
-#else
- return "breathe poison gas (150) every 180+d180 turns";
-#endif
+ /*
+ * We need to deduce somehow that it is a random artifact -- one
+ * problem: It could be a random artifact which has NOT YET received
+ * a name. Thus we eliminate other possibilities instead of checking
+ * for art_name
+ */
- }
- case SV_DRAGON_RED:
+ /* Give priority to weaponsmith's essential activations */
+ if (object_is_smith(o_ptr))
+ {
+ switch (o_ptr->xtra3 - 1)
{
+ case ESSENCE_TMP_RES_ACID:
#ifdef JP
-return "²Ð±ê¤Î¥Ö¥ì¥¹(200) : 200+d200 ¥¿¡¼¥óËè";
+ return "»À¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
#else
- return "breathe fire (200) every 200+d200 turns";
+ return "resist acid every 50+d50 turns";
#endif
-
- }
- case SV_DRAGON_MULTIHUED:
- {
+ case ESSENCE_TMP_RES_ELEC:
#ifdef JP
-return "Ëü¿§¤Î¥Ö¥ì¥¹(250) : 200+d200 ¥¿¡¼¥óËè";
+ return "ÅÅ·â¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
#else
- return "breathe multi-hued (250) every 200+d200 turns";
+ return "resist elec every 50+d50 turns";
#endif
-
- }
- case SV_DRAGON_BRONZE:
- {
+ case ESSENCE_TMP_RES_FIRE:
#ifdef JP
-return "º®Íð¤Î¥Ö¥ì¥¹(120) : 180+d180 ¥¿¡¼¥óËè";
+ return "²Ð¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
#else
- return "breathe confusion (120) every 180+d180 turns";
+ return "resist fire every 50+d50 turns";
#endif
-
- }
- case SV_DRAGON_GOLD:
- {
+ case ESSENCE_TMP_RES_COLD:
#ifdef JP
-return "¹ì²»¤Î¥Ö¥ì¥¹(130) : 180+d180 ¥¿¡¼¥óËè";
+ return "Î䵤¤Ø¤ÎÂÑÀ : 50+d50¥¿¡¼¥óËè";
#else
- return "breathe sound (130) every 180+d180 turns";
+ return "resist cold every 50+d50 turns";
#endif
-
- }
- case SV_DRAGON_CHAOS:
- {
+ case TR_IMPACT:
#ifdef JP
-return "¥«¥ª¥¹/Îô²½¤Î¥Ö¥ì¥¹(220) : 200+d200 ¥¿¡¼¥óËè";
+ return "ÃÏ¿Ì : 100+d100 ¥¿¡¼¥óËè";
#else
- return "breathe chaos/disenchant (220) every 200+d200 turns";
+ return "earthquake every 100+d100 turns";
#endif
-
}
- case SV_DRAGON_LAW:
- {
-#ifdef JP
-return "¹ì²»/ÇËÊҤΥ֥쥹(230) : 200+d200 ¥¿¡¼¥óËè";
-#else
- return "breathe sound/shards (230) every 200+d200 turns";
-#endif
+ }
- }
- case SV_DRAGON_BALANCE:
- {
-#ifdef JP
-return "¥Ð¥é¥ó¥¹¤Î¥Ö¥ì¥¹ (250) 200+d200 ¥¿¡¼¥óËè";
-#else
- return "breathe balance (250) every 200+d200 turns";
-#endif
+ /* Paranoia - Set activation index for older save data */
+ if (object_is_fixed_artifact(o_ptr))
+ {
+ if (!o_ptr->xtra2) o_ptr->xtra2 = a_info[o_ptr->name1].act_idx;
+ }
+ else if (object_is_ego(o_ptr))
+ {
+ if (!o_ptr->xtra2) o_ptr->xtra2 = e_info[o_ptr->name2].act_idx;
+ }
+ else
+ {
+ if (!o_ptr->xtra2) o_ptr->xtra2 = k_info[o_ptr->k_idx].act_idx;
+ }
- }
- case SV_DRAGON_SHINING:
- {
+ /* Get an explain of an activation */
+ /* if ((object_is_artifact(o_ptr) || object_is_ego(o_ptr)) && (o_ptr->xtra2)) */
+ if (o_ptr->xtra2)
+ {
+ return item_activation_aux(o_ptr);
+ }
+
+ /* Special items */
+ if (o_ptr->tval == TV_WHISTLE)
+ {
#ifdef JP
-return "Á®¸÷/°Å¹õ¤Î¥Ö¥ì¥¹(200) : 200+d200 ¥¿¡¼¥óËè";
+return "¥Ú¥Ã¥È¸Æ¤Ó´ó¤» : 100+d100¥¿¡¼¥óËè";
#else
- return "breathe light/darkness (200) every 200+d200 turns";
+ return "call pet every 100+d100 turns";
#endif
+ }
- }
- case SV_DRAGON_POWER:
- {
+ if (o_ptr->tval == TV_CAPTURE)
+ {
#ifdef JP
-return "¥¨¥ì¥á¥ó¥È¤Î¥Ö¥ì¥¹(300) : 200+d200 ¥¿¡¼¥óËè";
+return "¥â¥ó¥¹¥¿¡¼¤òÊᤨ¤ë¡¢Ëô¤Ï²òÊü¤¹¤ë¡£";
#else
- return "breathe the elements (300) every 200+d200 turns";
+ return "captures or releases a monster.";
#endif
-
- }
}
/* Oops */
#ifdef JP
-return "¶õµ¤¤Î©";
+ return "²¿¤âµ¯¤¤Ê¤¤";
#else
- return "breathe air";
+ return "Nothing";
#endif
-
}
/*
* Describe a "fully identified" item
*/
-bool screen_object(object_type *o_ptr, bool real)
+bool screen_object(object_type *o_ptr, u32b mode)
{
int i = 0, j, k;
u32b flgs[TR_FLAG_SIZE];
+ char temp[70 * 20];
cptr info[128];
char o_name[MAX_NLEN];
int wid, hgt;
+ int trivial_info = 0;
+
/* Extract the flags */
object_flags(o_ptr, flgs);
/* Extract the description */
{
- char temp[70 * 20];
-
roff_to_buf(o_ptr->name1 ? (a_text + a_info[o_ptr->name1].text) :
- (k_text + k_info[lookup_kind(o_ptr->tval, o_ptr->sval)].text),
+ (k_text + k_info[o_ptr->k_idx].text),
77 - 15, temp, sizeof(temp));
for (j = 0; temp[j]; j += 1 + strlen(&temp[j]))
{ info[i] = &temp[j]; i++;}
}
+ if (object_is_equipment(o_ptr))
+ {
+ /* Descriptions of a basic equipment is just a flavor */
+ trivial_info = i;
+ }
+
/* Mega-Hack -- describe activation */
if (have_flag(flgs, TR_ACTIVATE))
{
info[i++] = "It provides no light.";
#endif
- if (o_ptr->sval == SV_LITE_FEANOR ||
- o_ptr->sval == SV_LITE_LANTERN)
+ if (o_ptr->sval == SV_LITE_FEANOR)
+ {
+#ifdef JP
+ info[i++] = "¤½¤ì¤ÏÌÀ¤«¤ê¤ÎȾ·Â¤ò¶¹¤á¤ë(Ⱦ·Â¤Ë-3)¡£";
+#else
+ info[i++] = "It decreases radius of light source by 3.";
+#endif
+ }
+ else if (o_ptr->sval == SV_LITE_LANTERN)
{
#ifdef JP
- info[i++] = "¤½¤ì¤ÏÌÀ¤ê¤ÎȾ·Â¤ò¶¹¤á¤ë(Ⱦ·Â¤Ë-2)¡£";
+ info[i++] = "¤½¤ì¤ÏÌÀ¤«¤ê¤ÎȾ·Â¤ò¶¹¤á¤ë(Ⱦ·Â¤Ë-2)¡£";
#else
info[i++] = "It decreases radius of light source by 2.";
#endif
else
{
#ifdef JP
- info[i++] = "¤½¤ì¤ÏÌÀ¤ê¤ÎȾ·Â¤ò¶¹¤á¤ë(Ⱦ·Â¤Ë-1)¡£";
+ info[i++] = "¤½¤ì¤ÏÌÀ¤«¤ê¤ÎȾ·Â¤ò¶¹¤á¤ë(Ⱦ·Â¤Ë-1)¡£";
#else
info[i++] = "It decreases radius of light source by 1.";
#endif
}
}
- else if (artifact_p(o_ptr))
+ else if (object_is_fixed_artifact(o_ptr))
{
#ifdef JP
info[i++] = "¤½¤ì¤Ï±Ê±ó¤Ê¤ëÌÀ¤«¤ê(Ⱦ·Â 3)¤ò¼ø¤±¤ë¡£";
info[i++] = "It is made for use while riding.";
#endif
else
+ {
#ifdef JP
-info[i++] = "¤½¤ì¤Ï¾èÇÏÃæ¤Ç¤â»È¤¤¤ä¤¹¤¤¡£";
+ info[i++] = "¤½¤ì¤Ï¾èÇÏÃæ¤Ç¤â»È¤¤¤ä¤¹¤¤¡£";
#else
info[i++] = "It is suitable for use while riding.";
#endif
-
+ /* This information is not important enough */
+ trivial_info++;
+ }
}
if (have_flag(flgs, TR_STR))
{
#ifdef JP
-info[i++] = "¤½¤ì¤ÏÏÓÎϤ˱ƶÁ¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤ÏÏÓÎϤ˱ƶÁ¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your strength.";
#endif
if (have_flag(flgs, TR_INT))
{
#ifdef JP
-info[i++] = "¤½¤ì¤ÏÃÎǽ¤Ë±Æ¶Á¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤ÏÃÎǽ¤Ë±Æ¶Á¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your intelligence.";
#endif
if (have_flag(flgs, TR_WIS))
{
#ifdef JP
-info[i++] = "¤½¤ì¤Ï¸¤µ¤Ë±Æ¶Á¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤Ï¸¤µ¤Ë±Æ¶Á¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your wisdom.";
#endif
if (have_flag(flgs, TR_DEX))
{
#ifdef JP
-info[i++] = "¤½¤ì¤Ï´ïÍѤµ¤Ë±Æ¶Á¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤Ï´ïÍѤµ¤Ë±Æ¶Á¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your dexterity.";
#endif
if (have_flag(flgs, TR_CON))
{
#ifdef JP
-info[i++] = "¤½¤ì¤ÏÂѵ×ÎϤ˱ƶÁ¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤ÏÂѵ×ÎϤ˱ƶÁ¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your constitution.";
#endif
if (have_flag(flgs, TR_CHR))
{
#ifdef JP
-info[i++] = "¤½¤ì¤ÏÌ¥ÎϤ˱ƶÁ¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤ÏÌ¥ÎϤ˱ƶÁ¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your charisma.";
#endif
if (have_flag(flgs, TR_MAGIC_MASTERY))
{
#ifdef JP
-info[i++] = "¤½¤ì¤ÏËâË¡Æ»¶ñ»ÈÍÑǽÎϤ˱ƶÁ¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤ÏËâË¡Æ»¶ñ»ÈÍÑǽÎϤ˱ƶÁ¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your ability to use magic devices.";
#endif
if (have_flag(flgs, TR_STEALTH))
{
#ifdef JP
-info[i++] = "¤½¤ì¤Ï±£Ì©¹ÔưǽÎϤ˱ƶÁ¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤Ï±£Ì©¹ÔưǽÎϤ˱ƶÁ¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your stealth.";
#endif
if (have_flag(flgs, TR_SEARCH))
{
#ifdef JP
-info[i++] = "¤½¤ì¤Ïõº÷ǽÎϤ˱ƶÁ¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤Ïõº÷ǽÎϤ˱ƶÁ¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your searching.";
#endif
if (have_flag(flgs, TR_INFRA))
{
#ifdef JP
-info[i++] = "¤½¤ì¤ÏÀÖ³°Àþ»ëÎϤ˱ƶÁ¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤ÏÀÖ³°Àþ»ëÎϤ˱ƶÁ¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your infravision.";
#endif
if (have_flag(flgs, TR_TUNNEL))
{
#ifdef JP
-info[i++] = "¤½¤ì¤ÏºÎ·¡Ç½ÎϤ˱ƶÁ¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤ÏºÎ·¡Ç½ÎϤ˱ƶÁ¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your ability to tunnel.";
#endif
if (have_flag(flgs, TR_SPEED))
{
#ifdef JP
-info[i++] = "¤½¤ì¤Ï¥¹¥Ô¡¼¥É¤Ë±Æ¶Á¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤Ï¥¹¥Ô¡¼¥É¤Ë±Æ¶Á¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your speed.";
#endif
if (have_flag(flgs, TR_BLOWS))
{
#ifdef JP
-info[i++] = "¤½¤ì¤ÏÂÇ·â²ó¿ô¤Ë±Æ¶Á¤òµÚ¤Ü¤¹";
+info[i++] = "¤½¤ì¤ÏÂÇ·â²ó¿ô¤Ë±Æ¶Á¤òµÚ¤Ü¤¹¡£";
#else
info[i++] = "It affects your attack speed.";
#endif
if (have_flag(flgs, TR_BRAND_ACID))
{
#ifdef JP
-info[i++] = "¤½¤ì¤Ï»À¤Ë¤è¤Ã¤ÆÂ礤ʥÀ¥á¡¼¥¸¤òÍ¿¤¨¤ë";
+info[i++] = "¤½¤ì¤Ï»À¤Ë¤è¤Ã¤ÆÂ礤ʥÀ¥á¡¼¥¸¤òÍ¿¤¨¤ë¡£";
#else
info[i++] = "It does extra damage from acid.";
#endif
if (have_flag(flgs, TR_BRAND_ELEC))
{
#ifdef JP
-info[i++] = "¤½¤ì¤ÏÅÅ·â¤Ë¤è¤Ã¤ÆÂ礤ʥÀ¥á¡¼¥¸¤òÍ¿¤¨¤ë";
+info[i++] = "¤½¤ì¤ÏÅÅ·â¤Ë¤è¤Ã¤ÆÂ礤ʥÀ¥á¡¼¥¸¤òÍ¿¤¨¤ë¡£";
#else
info[i++] = "It does extra damage from electricity.";
#endif
if (have_flag(flgs, TR_BRAND_FIRE))
{
#ifdef JP
-info[i++] = "¤½¤ì¤Ï²Ð±ê¤Ë¤è¤Ã¤ÆÂ礤ʥÀ¥á¡¼¥¸¤òÍ¿¤¨¤ë";
+info[i++] = "¤½¤ì¤Ï²Ð±ê¤Ë¤è¤Ã¤ÆÂ礤ʥÀ¥á¡¼¥¸¤òÍ¿¤¨¤ë¡£";
#else
info[i++] = "It does extra damage from fire.";
#endif
if (have_flag(flgs, TR_BRAND_COLD))
{
#ifdef JP
-info[i++] = "¤½¤ì¤ÏÎ䵤¤Ë¤è¤Ã¤ÆÂ礤ʥÀ¥á¡¼¥¸¤òÍ¿¤¨¤ë";
+info[i++] = "¤½¤ì¤ÏÎ䵤¤Ë¤è¤Ã¤ÆÂ礤ʥÀ¥á¡¼¥¸¤òÍ¿¤¨¤ë¡£";
#else
info[i++] = "It does extra damage from frost.";
#endif
}
- if (have_flag(flgs, TR_FEATHER))
+ if (have_flag(flgs, TR_LEVITATION))
{
#ifdef JP
info[i++] = "¤½¤ì¤ÏÃè¤ËÉ⤯¤³¤È¤ò²Äǽ¤Ë¤¹¤ë¡£";
}
- if (cursed_p(o_ptr))
+ if (object_is_cursed(o_ptr))
{
if (o_ptr->curse_flags & TRC_PERMA_CURSE)
{
info[i++] = "It is cursed.";
#endif
+ /*
+ * It's a trivial infomation since there is
+ * fake inscription {cursed}
+ */
+ trivial_info++;
}
}
#endif
}
- if (o_ptr->curse_flags & TRC_ADD_L_CURSE)
+ if ((o_ptr->curse_flags & TRC_ADD_L_CURSE) || have_flag(flgs, TR_ADD_L_CURSE))
{
#ifdef JP
info[i++] = "¤½¤ì¤Ï¼å¤¤¼ö¤¤¤òÁý¤ä¤¹¡£";
#endif
}
- if (o_ptr->curse_flags & TRC_ADD_H_CURSE)
+ if ((o_ptr->curse_flags & TRC_ADD_H_CURSE) || have_flag(flgs, TR_ADD_H_CURSE))
{
#ifdef JP
info[i++] = "¤½¤ì¤Ï¶¯ÎϤʼö¤¤¤òÁý¤ä¤¹¡£";
}
/* Describe about this kind of object instead of THIS fake object */
- if (!real)
+ if (mode & SCROBJ_FAKE_OBJECT)
{
switch (o_ptr->tval)
{
}
}
- /* No special effects */
- if (!i) return (FALSE);
+ if (mode & SCROBJ_FORCE_DETAIL) trivial_info = 0;
+
+ /* No relevant informations */
+ if (i <= trivial_info) return (FALSE);
/* Save the screen */
screen_save();
Term_get_size(&wid, &hgt);
/* Display Item name */
- if (real)
- object_desc(o_name, o_ptr, TRUE, 3);
+ if (!(mode & SCROBJ_FAKE_OBJECT))
+ object_desc(o_name, o_ptr, 0);
else
- object_desc_store(o_name, o_ptr, TRUE, 0);
+ object_desc(o_name, o_ptr, (OD_NAME_ONLY | OD_STORE));
prt(o_name, 0, 0);
monster_race *r_ptr = &r_info[o_ptr->pval];
int namelen = strlen(r_name + r_ptr->name);
prt(format("%s: '", r_name + r_ptr->name), 1, 15);
- c_prt(r_ptr->d_attr, format("%c", r_ptr->d_char), 1, 18+namelen);
- prt("'", 1, 19+namelen);
+ Term_queue_bigchar(18 + namelen, 1, r_ptr->x_attr, r_ptr->x_char, 0, 0);
+ prt("'", 1, (use_bigtile ? 20 : 19) + namelen);
}
else
#ifdef JP
}
+/* See cmd5.c */
+extern bool select_ring_slot;
+
+
+static bool is_ring_slot(int i)
+{
+ return (i == INVEN_RIGHT) || (i == INVEN_LEFT);
+}
+
+
/*
* Convert a label into the index of a item in the "equip"
* Return "-1" if the label does not indicate a real item
/* Verify the index */
if ((i < INVEN_RARM) || (i >= INVEN_TOTAL)) return (-1);
+ if (select_ring_slot) return is_ring_slot(i) ? i : -1;
+
/* Empty slots can never be chosen */
if (!inventory[i].k_idx) return (-1);
switch (i)
{
#ifdef JP
-case INVEN_RARM: p = p_ptr->ryoute ? " ξ¼ê" : (left_hander ? " º¸¼ê" : " ±¦¼ê"); break;
+ case INVEN_RARM: p = p_ptr->heavy_wield[0] ? "±¿ÈÂÃæ" : ((p_ptr->ryoute && p_ptr->migite) ? " ξ¼ê" : (left_hander ? " º¸¼ê" : " ±¦¼ê")); break;
#else
- case INVEN_RARM: p = "Wielding"; break;
+ case INVEN_RARM: p = p_ptr->heavy_wield[0] ? "Just lifting" : (p_ptr->migite ? "Wielding" : "On arm"); break;
#endif
#ifdef JP
-case INVEN_LARM: p = (left_hander ? " ±¦¼ê" : " º¸¼ê"); break;
+ case INVEN_LARM: p = p_ptr->heavy_wield[1] ? "±¿ÈÂÃæ" : ((p_ptr->ryoute && p_ptr->hidarite) ? " ξ¼ê" : (left_hander ? " ±¦¼ê" : " º¸¼ê")); break;
#else
- case INVEN_LARM: p = "On arm"; break;
+ case INVEN_LARM: p = p_ptr->heavy_wield[1] ? "Just lifting" : (p_ptr->hidarite ? "Wielding" : "On arm"); break;
#endif
#ifdef JP
-case INVEN_BOW: p = "¼Í·âÍÑ"; break;
+ case INVEN_BOW: p = (adj_str_hold[p_ptr->stat_ind[A_STR]] < inventory[i].weight / 10) ? "±¿ÈÂÃæ" : "¼Í·âÍÑ"; break;
#else
- case INVEN_BOW: p = "Shooting"; break;
+ case INVEN_BOW: p = (adj_str_hold[p_ptr->stat_ind[A_STR]] < inventory[i].weight / 10) ? "Just holding" : "Shooting"; break;
#endif
#ifdef JP
-case INVEN_LEFT: p = (left_hander ? "±¦¼ê»Ø" : "º¸¼ê»Ø"); break;
+ case INVEN_RIGHT: p = (left_hander ? "º¸¼ê»Ø" : "±¦¼ê»Ø"); break;
#else
- case INVEN_LEFT: p = "On left hand"; break;
+ case INVEN_RIGHT: p = (left_hander ? "On left hand" : "On right hand"); break;
#endif
#ifdef JP
-case INVEN_RIGHT: p = (left_hander ? "º¸¼ê»Ø" : "±¦¼ê»Ø"); break;
+ case INVEN_LEFT: p = (left_hander ? "±¦¼ê»Ø" : "º¸¼ê»Ø"); break;
#else
- case INVEN_RIGHT: p = "On right hand"; break;
+ case INVEN_LEFT: p = (left_hander ? "On right hand" : "On left hand"); break;
#endif
#ifdef JP
-case INVEN_NECK: p = " ¼ó"; break;
+ case INVEN_NECK: p = " ¼ó"; break;
#else
case INVEN_NECK: p = "Around neck"; break;
#endif
#ifdef JP
-case INVEN_LITE: p = " ¸÷¸»"; break;
+ case INVEN_LITE: p = " ¸÷¸»"; break;
#else
case INVEN_LITE: p = "Light source"; break;
#endif
#ifdef JP
-case INVEN_BODY: p = " ÂÎ"; break;
+ case INVEN_BODY: p = " ÂÎ"; break;
#else
case INVEN_BODY: p = "On body"; break;
#endif
#ifdef JP
-case INVEN_OUTER: p = "ÂΤξå"; break;
+ case INVEN_OUTER: p = "ÂΤξå"; break;
#else
- case INVEN_OUTER: p = "About body"; break;
-#endif
-
-#ifdef JP
-case INVEN_HEAD: p = " Ƭ"; break;
-#else
- case INVEN_HEAD: p = "On head"; break;
-#endif
-
-#ifdef JP
-case INVEN_HANDS: p = " ¼ê"; break;
-#else
- case INVEN_HANDS: p = "On hands"; break;
-#endif
-
-#ifdef JP
-case INVEN_FEET: p = " "; break;
-#else
- case INVEN_FEET: p = "On feet"; break;
+ case INVEN_OUTER: p = "About body"; break;
#endif
#ifdef JP
-default: p = "¥¶¥Ã¥¯"; break;
+ case INVEN_HEAD: p = " Ƭ"; break;
#else
- default: p = "In pack"; break;
+ case INVEN_HEAD: p = "On head"; break;
#endif
- }
-
- /* Hack -- Heavy weapon */
- if (i == INVEN_RARM)
- {
- if (p_ptr->heavy_wield[0])
- {
#ifdef JP
-p = "±¿ÈÂÃæ";
+ case INVEN_HANDS: p = " ¼ê"; break;
#else
- p = "Just lifting";
+ case INVEN_HANDS: p = "On hands"; break;
#endif
- }
- }
-
- /* Hack -- Heavy weapon */
- if (i == INVEN_LARM)
- {
- if (p_ptr->heavy_wield[1])
- {
#ifdef JP
-p = "±¿ÈÂÃæ";
+ case INVEN_FEET: p = " "; break;
#else
- p = "Just lifting";
+ case INVEN_FEET: p = "On feet"; break;
#endif
- }
- }
-
- /* Hack -- Heavy bow */
- if (i == INVEN_BOW)
- {
- object_type *o_ptr;
- o_ptr = &inventory[i];
- if (adj_str_hold[p_ptr->stat_ind[A_STR]] < o_ptr->weight / 10)
- {
#ifdef JP
-p = "±¿ÈÂÃæ";
+ default: p = "¥¶¥Ã¥¯"; break;
#else
- p = "Just holding";
+ default: p = "In pack"; break;
#endif
-
- }
}
/* Return the result */
- return (p);
+ return p;
}
switch (i)
{
#ifdef JP
-case INVEN_RARM: p = p_ptr->ryoute ? " ξ¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë" : (left_hander ? " º¸¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë" : " ±¦¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë"); break;
+ case INVEN_RARM: p = p_ptr->heavy_wield[0] ? "±¿ÈÂÃæ¤Î" : ((p_ptr->ryoute && p_ptr->migite) ? "ξ¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë" : (left_hander ? "º¸¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë" : "±¦¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë")); break;
#else
- case INVEN_RARM: p = "attacking monsters with"; break;
+ case INVEN_RARM: p = p_ptr->heavy_wield[0] ? "just lifting" : (p_ptr->migite ? "attacking monsters with" : "wearing on your arm"); break;
#endif
#ifdef JP
-case INVEN_LARM: p = (left_hander ? " ±¦¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë" : " º¸¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë"); break;
+ case INVEN_LARM: p = p_ptr->heavy_wield[1] ? "±¿ÈÂÃæ¤Î" : ((p_ptr->ryoute && p_ptr->hidarite) ? "ξ¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë" : (left_hander ? "±¦¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë" : "º¸¼ê¤ËÁõÈ÷¤·¤Æ¤¤¤ë")); break;
#else
- case INVEN_LARM: p = "wearing on your arm"; break;
+ case INVEN_LARM: p = p_ptr->heavy_wield[1] ? "just lifting" : (p_ptr->hidarite ? "attacking monsters with" : "wearing on your arm"); break;
#endif
#ifdef JP
-case INVEN_BOW: p = "¼Í·âÍѤËÁõÈ÷¤·¤Æ¤¤¤ë"; break;
+ case INVEN_BOW: p = (adj_str_hold[p_ptr->stat_ind[A_STR]] < inventory[i].weight / 10) ? "»ý¤Ä¤À¤±¤ÇÀº°ìÇÕ¤Î" : "¼Í·âÍѤËÁõÈ÷¤·¤Æ¤¤¤ë"; break;
#else
- case INVEN_BOW: p = "shooting missiles with"; break;
+ case INVEN_BOW: p = (adj_str_hold[p_ptr->stat_ind[A_STR]] < inventory[i].weight / 10) ? "just holding" : "shooting missiles with"; break;
#endif
#ifdef JP
-case INVEN_LEFT: p = (left_hander ? "±¦¼ê¤Î»Ø¤Ë¤Ï¤á¤Æ¤¤¤ë" : "º¸¼ê¤Î»Ø¤Ë¤Ï¤á¤Æ¤¤¤ë"); break;
+ case INVEN_RIGHT: p = (left_hander ? "º¸¼ê¤Î»Ø¤Ë¤Ï¤á¤Æ¤¤¤ë" : "±¦¼ê¤Î»Ø¤Ë¤Ï¤á¤Æ¤¤¤ë"); break;
#else
- case INVEN_LEFT: p = "wearing on your left hand"; break;
+ case INVEN_RIGHT: p = (left_hander ? "wearing on your left hand" : "wearing on your right hand"); break;
#endif
#ifdef JP
-case INVEN_RIGHT: p = (left_hander ? "º¸¼ê¤Î»Ø¤Ë¤Ï¤á¤Æ¤¤¤ë" : "±¦¼ê¤Î»Ø¤Ë¤Ï¤á¤Æ¤¤¤ë"); break;
+ case INVEN_LEFT: p = (left_hander ? "±¦¼ê¤Î»Ø¤Ë¤Ï¤á¤Æ¤¤¤ë" : "º¸¼ê¤Î»Ø¤Ë¤Ï¤á¤Æ¤¤¤ë"); break;
#else
- case INVEN_RIGHT: p = "wearing on your right hand"; break;
+ case INVEN_LEFT: p = (left_hander ? "wearing on your right hand" : "wearing on your left hand"); break;
#endif
#ifdef JP
-case INVEN_NECK: p = "¼ó¤Ë¤«¤±¤Æ¤¤¤ë"; break;
+ case INVEN_NECK: p = "¼ó¤Ë¤«¤±¤Æ¤¤¤ë"; break;
#else
case INVEN_NECK: p = "wearing around your neck"; break;
#endif
#ifdef JP
-case INVEN_LITE: p = "¸÷¸»¤Ë¤·¤Æ¤¤¤ë"; break;
+ case INVEN_LITE: p = "¸÷¸»¤Ë¤·¤Æ¤¤¤ë"; break;
#else
case INVEN_LITE: p = "using to light the way"; break;
#endif
#ifdef JP
-case INVEN_BODY: p = "ÂΤËÃå¤Æ¤¤¤ë"; break;
+ case INVEN_BODY: p = "ÂΤËÃå¤Æ¤¤¤ë"; break;
#else
case INVEN_BODY: p = "wearing on your body"; break;
#endif
#ifdef JP
-case INVEN_OUTER: p = "¿È¤Ë¤Þ¤È¤Ã¤Æ¤¤¤ë"; break;
+ case INVEN_OUTER: p = "¿È¤Ë¤Þ¤È¤Ã¤Æ¤¤¤ë"; break;
#else
case INVEN_OUTER: p = "wearing on your back"; break;
#endif
#ifdef JP
-case INVEN_HEAD: p = "Ƭ¤Ë¤«¤Ö¤Ã¤Æ¤¤¤ë"; break;
+ case INVEN_HEAD: p = "Ƭ¤Ë¤«¤Ö¤Ã¤Æ¤¤¤ë"; break;
#else
case INVEN_HEAD: p = "wearing on your head"; break;
#endif
#ifdef JP
-case INVEN_HANDS: p = "¼ê¤Ë¤Ä¤±¤Æ¤¤¤ë"; break;
+ case INVEN_HANDS: p = "¼ê¤Ë¤Ä¤±¤Æ¤¤¤ë"; break;
#else
case INVEN_HANDS: p = "wearing on your hands"; break;
#endif
#ifdef JP
-case INVEN_FEET: p = "¤ˤϤ¤¤Æ¤¤¤ë"; break;
+ case INVEN_FEET: p = "¤ˤϤ¤¤Æ¤¤¤ë"; break;
#else
case INVEN_FEET: p = "wearing on your feet"; break;
#endif
#ifdef JP
-default: p = "¥¶¥Ã¥¯¤ËÆþ¤Ã¤Æ¤¤¤ë"; break;
+ default: p = "¥¶¥Ã¥¯¤ËÆþ¤Ã¤Æ¤¤¤ë"; break;
#else
default: p = "carrying in your pack"; break;
#endif
-
- }
-
- /* Hack -- Heavy weapon */
- if (i == INVEN_RARM)
- {
- object_type *o_ptr;
- int hold = adj_str_hold[p_ptr->stat_ind[A_STR]];
-
- if (p_ptr->ryoute) hold *= 2;
- o_ptr = &inventory[i];
- if (hold < o_ptr->weight / 10)
- {
-#ifdef JP
-p = "±¿ÈÂÃæ¤Î";
-#else
- p = "just lifting";
-#endif
-
- }
- }
-
- /* Hack -- Heavy bow */
- if (i == INVEN_BOW)
- {
- object_type *o_ptr;
- o_ptr = &inventory[i];
- if (adj_str_hold[p_ptr->stat_ind[A_STR]] < o_ptr->weight / 10)
- {
-#ifdef JP
-p = "»ý¤Ä¤À¤±¤ÇÀº°ìÇÕ¤Î";
-#else
- p = "just holding";
-#endif
-
- }
}
/* Return the result */
if (!o_ptr->k_idx) return (FALSE);
/* Hack -- ignore "gold" */
- if (o_ptr->tval == TV_GOLD) return (FALSE);
+ if (o_ptr->tval == TV_GOLD)
+ {
+ /* See xtra2.c */
+ extern bool show_gold_on_floor;
+
+ if (!show_gold_on_floor) return (FALSE);
+ }
/* Check the tval */
if (item_tester_tval)
byte attr = TERM_WHITE;
char tmp_val[80];
char o_name[MAX_NLEN];
+ int wid, hgt;
+ /* Get size */
+ Term_get_size(&wid, &hgt);
/* Find the "final" slot */
for (i = 0; i < INVEN_PACK; i++)
Term_putstr(0, i, 3, TERM_WHITE, tmp_val);
/* Obtain an item description */
- object_desc(o_name, o_ptr, TRUE, 3);
+ object_desc(o_name, o_ptr, 0);
/* Obtain the length of the description */
n = strlen(o_name);
Term_erase(3+n, i, 255);
/* Display the weight if needed */
- if (show_weights && o_ptr->weight)
+ if (show_weights)
{
int wgt = o_ptr->weight * o_ptr->number;
#ifdef JP
sprintf(tmp_val, "%3d.%1d lb", wgt / 10, wgt % 10);
#endif
- Term_putstr(71, i, -1, TERM_WHITE, tmp_val);
+ prt(tmp_val, i, wid - 9);
}
}
/* Erase the rest of the window */
- for (i = z; i < Term->hgt; i++)
+ for (i = z; i < hgt; i++)
{
/* Erase the line */
Term_erase(0, i, 255);
byte attr = TERM_WHITE;
char tmp_val[80];
char o_name[MAX_NLEN];
+ int wid, hgt;
+ /* Get size */
+ Term_get_size(&wid, &hgt);
/* Display the equipment */
for (i = INVEN_RARM; i < INVEN_TOTAL; i++)
tmp_val[0] = tmp_val[1] = tmp_val[2] = ' ';
/* Is this item "acceptable"? */
- if (item_tester_okay(o_ptr))
+ if (select_ring_slot ? is_ring_slot(i) : item_tester_okay(o_ptr))
{
/* Prepare an "index" */
tmp_val[0] = index_to_label(i);
Term_putstr(0, i - INVEN_RARM, 3, TERM_WHITE, tmp_val);
/* Obtain an item description */
- if ((i == INVEN_LARM) && p_ptr->ryoute)
+ if ((((i == INVEN_RARM) && p_ptr->hidarite) || ((i == INVEN_LARM) && p_ptr->migite)) && p_ptr->ryoute)
{
#ifdef JP
strcpy(o_name, "(Éð´ï¤òξ¼ê»ý¤Á)");
#else
strcpy(o_name, "(wielding with two-hands)");
#endif
- attr = 1;
+ attr = TERM_WHITE;
}
else
{
- object_desc(o_name, o_ptr, TRUE, 3);
+ object_desc(o_name, o_ptr, 0);
attr = tval_to_attr[o_ptr->tval % 128];
}
/* Erase the rest of the line */
Term_erase(3+n, i - INVEN_RARM, 255);
- /* Display the slot description (if needed) */
- if (show_labels)
- {
- Term_putstr(61, i - INVEN_RARM, -1, TERM_WHITE, "<--");
- Term_putstr(65, i - INVEN_RARM, -1, TERM_WHITE, mention_use(i));
- }
-
/* Display the weight (if needed) */
- if (show_weights && o_ptr->weight)
+ if (show_weights)
{
int wgt = o_ptr->weight * o_ptr->number;
- int col = (show_labels ? 52 : 71);
#ifdef JP
sprintf(tmp_val, "%3d.%1d kg", lbtokg1(wgt) , lbtokg2(wgt));
#else
sprintf(tmp_val, "%3d.%1d lb", wgt / 10, wgt % 10);
#endif
- Term_putstr(col, i - INVEN_RARM, -1, TERM_WHITE, tmp_val);
+ prt(tmp_val, i - INVEN_RARM, wid - (show_labels ? 28 : 9));
+ }
+
+ /* Display the slot description (if needed) */
+ if (show_labels)
+ {
+ Term_putstr(wid - 20, i - INVEN_RARM, -1, TERM_WHITE, " <-- ");
+ prt(mention_use(i), i - INVEN_RARM, wid - 15);
}
}
/* Erase the rest of the window */
- for (i = INVEN_TOTAL - INVEN_RARM; i < Term->hgt; i++)
+ for (i = INVEN_TOTAL - INVEN_RARM; i < hgt; i++)
{
/* Clear that line */
Term_erase(0, i, 255);
}
-
/*
* Find the "first" inventory object with the given "tag".
*
* Also, the tag "@xn" will work as well, where "n" is a any tag-char,
* and "x" is the "current" command_cmd code.
*/
-static int get_tag(int *cp, char tag)
+static bool get_tag(int *cp, char tag, int mode)
{
- int i;
+ int i, start, end;
cptr s;
+ /* Extract index from mode */
+ switch (mode)
+ {
+ case USE_EQUIP:
+ start = INVEN_RARM;
+ end = INVEN_TOTAL - 1;
+ break;
+
+ case USE_INVEN:
+ start = 0;
+ end = INVEN_PACK - 1;
+ break;
+
+ default:
+ return FALSE;
+ }
/**** Find a tag in the form of {@x#} (allow alphabet tag) ***/
- /* Check every object */
- for (i = 0; i < INVEN_TOTAL; ++i)
+ /* Check every inventory object */
+ for (i = start; i <= end; i++)
{
object_type *o_ptr = &inventory[i];
if (!item_tester_okay(o_ptr)) continue;
/* Find a '@' */
- s = strchr(quark_str(o_ptr->inscription), '@');
+ s = my_strchr(quark_str(o_ptr->inscription), '@');
/* Process all tags */
while (s)
}
/* Find another '@' */
- s = strchr(s + 1, '@');
+ s = my_strchr(s + 1, '@');
}
}
}
/* Check every object */
- for (i = 0; i < INVEN_TOTAL; ++i)
+ for (i = start; i <= end; i++)
{
object_type *o_ptr = &inventory[i];
if (!item_tester_okay(o_ptr)) continue;
/* Find a '@' */
- s = strchr(quark_str(o_ptr->inscription), '@');
+ s = my_strchr(quark_str(o_ptr->inscription), '@');
/* Process all tags */
while (s)
}
/* Find another '@' */
- s = strchr(s + 1, '@');
+ s = my_strchr(s + 1, '@');
+ }
+ }
+
+ /* No such tag */
+ return (FALSE);
+}
+
+
+/*
+ * Find the "first" floor object with the given "tag".
+ *
+ * A "tag" is a numeral "n" appearing as "@n" anywhere in the
+ * inscription of an object. Alphabetical characters don't work as a
+ * tag in this form.
+ *
+ * Also, the tag "@xn" will work as well, where "n" is a any tag-char,
+ * and "x" is the "current" command_cmd code.
+ */
+static bool get_tag_floor(int *cp, char tag, int floor_list[], int floor_num)
+{
+ int i;
+ cptr s;
+
+ /**** Find a tag in the form of {@x#} (allow alphabet tag) ***/
+
+ /* Check every object in the grid */
+ for (i = 0; i < floor_num && i < 23; i++)
+ {
+ object_type *o_ptr = &o_list[floor_list[i]];
+
+ /* Skip empty inscriptions */
+ if (!o_ptr->inscription) continue;
+
+ /* Find a '@' */
+ s = my_strchr(quark_str(o_ptr->inscription), '@');
+
+ /* Process all tags */
+ while (s)
+ {
+ /* Check the special tags */
+ if ((s[1] == command_cmd) && (s[2] == tag))
+ {
+ /* Save the actual floor object ID */
+ *cp = i;
+
+ /* Success */
+ return (TRUE);
+ }
+
+ /* Find another '@' */
+ s = my_strchr(s + 1, '@');
+ }
+ }
+
+
+ /**** Find a tag in the form of {@#} (allows only numerals) ***/
+
+ /* Don't allow {@#} with '#' being alphabet */
+ if (tag < '0' || '9' < tag)
+ {
+ /* No such tag */
+ return FALSE;
+ }
+
+ /* Check every object in the grid */
+ for (i = 0; i < floor_num && i < 23; i++)
+ {
+ object_type *o_ptr = &o_list[floor_list[i]];
+
+ /* Skip empty inscriptions */
+ if (!o_ptr->inscription) continue;
+
+ /* Find a '@' */
+ s = my_strchr(quark_str(o_ptr->inscription), '@');
+
+ /* Process all tags */
+ while (s)
+ {
+ /* Check the normal tags */
+ if (s[1] == tag)
+ {
+ /* Save the floor object ID */
+ *cp = i;
+
+ /* Success */
+ return (TRUE);
+ }
+
+ /* Find another '@' */
+ s = my_strchr(s + 1, '@');
}
}
}
+/*
+ * Move around label characters with correspond tags
+ */
+static void prepare_label_string(char *label, int mode)
+{
+ cptr alphabet_chars = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
+ int offset = (mode == USE_EQUIP) ? INVEN_RARM : 0;
+ int i;
+
+ /* Prepare normal labels */
+ strcpy(label, alphabet_chars);
+
+ /* Move each label */
+ for (i = 0; i < 52; i++)
+ {
+ int index;
+ char c = alphabet_chars[i];
+
+ /* Find a tag with this label */
+ if (get_tag(&index, c, mode))
+ {
+ /* Delete the overwritten label */
+ if (label[i] == c) label[i] = ' ';
+
+ /* Move the label to the place of corresponding tag */
+ label[index - offset] = c;
+ }
+ }
+}
+
+
+/*
+ * Move around label characters with correspond tags (floor version)
+ */
+static void prepare_label_string_floor(char *label, int floor_list[], int floor_num)
+{
+ cptr alphabet_chars = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
+ int i;
+
+ /* Prepare normal labels */
+ strcpy(label, alphabet_chars);
+
+ /* Move each label */
+ for (i = 0; i < 52; i++)
+ {
+ int index;
+ char c = alphabet_chars[i];
+
+ /* Find a tag with this label */
+ if (get_tag_floor(&index, c, floor_list, floor_num))
+ {
+ /* Delete the overwritten label */
+ if (label[i] == c) label[i] = ' ';
+
+ /* Move the label to the place of corresponding tag */
+ label[index] = c;
+ }
+ }
+}
+
/*
* Display the inventory.
*/
int show_inven(int target_item)
{
- cptr alphabet_chars = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
int i, j, k, l, z = 0;
int col, cur_col, len;
object_type *o_ptr;
char out_desc[23][MAX_NLEN];
int target_item_label = 0;
int wid, hgt;
- char inven_spellbook_label[52+1];
-
- /* See cmd5.c */
+ char inven_label[52 + 1];
/* Starting column */
col = command_gap;
z = i + 1;
}
- /*** Move around label characters with correspond tags ***/
-
- /* Prepare normal labels */
- strcpy(inven_spellbook_label, alphabet_chars);
-
- /* Move each label */
- for (i = 0; i < 52; i++)
- {
- int index;
- char c = alphabet_chars[i];
-
- /* Find a tag with this label */
- if (get_tag(&index, c))
- {
- /* Delete the over writen label */
- if (inven_spellbook_label[i] == c)
- inven_spellbook_label[i] = ' ';
-
- /* Move the label to the place of correspond tag */
- inven_spellbook_label[index] = c;
- }
- }
+ prepare_label_string(inven_label, USE_INVEN);
/* Display the inventory */
for (k = 0, i = 0; i < z; i++)
if (!item_tester_okay(o_ptr)) continue;
/* Describe the object */
- object_desc(o_name, o_ptr, TRUE, 3);
+ object_desc(o_name, o_ptr, 0);
/* Save the object index, color, and description */
out_index[k] = i;
}
else if (i <= INVEN_PACK)
{
- sprintf(tmp_val, "%c)", inven_spellbook_label[i]);
+ /* Prepare an index --(-- */
+ sprintf(tmp_val, "%c)", inven_label[i]);
}
else
{
if (a & 0x80) a |= 0x40;
#endif
- Term_draw(cur_col, j + 1, a, c);
- if (use_bigtile)
- {
- cur_col++;
- if (a & 0x80)
- Term_draw(cur_col, j + 1, 255, -1);
- }
+ Term_queue_bigchar(cur_col, j + 1, a, c, 0, 0);
+ if (use_bigtile) cur_col++;
+
cur_col += 2;
}
(void)sprintf(tmp_val, "%3d.%1d lb", wgt / 10, wgt % 10);
#endif
- put_str(tmp_val, j + 1, wid - 9);
+ prt(tmp_val, j + 1, wid - 9);
}
}
char out_desc[23][MAX_NLEN];
int target_item_label = 0;
int wid, hgt;
-
+ char equip_label[52 + 1];
/* Starting column */
col = command_gap;
o_ptr = &inventory[i];
/* Is this item acceptable? */
- if (!item_tester_okay(o_ptr) && (!((i == INVEN_LARM) && p_ptr->ryoute) || item_tester_no_ryoute)) continue;
+ if (!(select_ring_slot ? is_ring_slot(i) : item_tester_okay(o_ptr)) &&
+ (!((((i == INVEN_RARM) && p_ptr->hidarite) || ((i == INVEN_LARM) && p_ptr->migite)) && p_ptr->ryoute) ||
+ item_tester_no_ryoute)) continue;
/* Description */
- object_desc(o_name, o_ptr, TRUE, 3);
+ object_desc(o_name, o_ptr, 0);
- if ((i == INVEN_LARM) && p_ptr->ryoute)
+ if ((((i == INVEN_RARM) && p_ptr->hidarite) || ((i == INVEN_LARM) && p_ptr->migite)) && p_ptr->ryoute)
{
#ifdef JP
(void)strcpy(out_desc[k],"(Éð´ï¤òξ¼ê»ý¤Á)");
#else
(void)strcpy(out_desc[k],"(wielding with two-hands)");
#endif
- out_color[k] = 1;
+ out_color[k] = TERM_WHITE;
}
else
{
col = (len > wid - 4) ? 0 : (wid - len - 1);
#endif
+ prepare_label_string(equip_label, USE_EQUIP);
/* Output each entry */
for (j = 0; j < k; j++)
}
else strcpy(tmp_val, " ");
}
- else
+ else if (i >= INVEN_RARM)
+ {
+ /* Prepare an index --(-- */
+ sprintf(tmp_val, "%c)", equip_label[i - INVEN_RARM]);
+ }
+ else /* Paranoia */
+ {
/* Prepare an index --(-- */
sprintf(tmp_val, "%c)", index_to_label(i));
+ }
/* Clear the line with the (possibly indented) index */
put_str(tmp_val, j+1, col);
if (a & 0x80) a |= 0x40;
#endif
- Term_draw(cur_col, j + 1, a, c);
- if (use_bigtile)
- {
- cur_col++;
- if (a & 0x80)
- Term_draw(cur_col, j + 1, 255, -1);
- }
+ Term_queue_bigchar(cur_col, j + 1, a, c, 0, 0);
+ if (use_bigtile) cur_col++;
+
cur_col += 2;
}
(void)sprintf(tmp_val, "%3d.%d lb", wgt / 10, wgt % 10);
#endif
- put_str(tmp_val, j+1, wid - 9);
+ prt(tmp_val, j + 1, wid - 9);
}
}
}
/* Describe */
- object_desc(o_name, o_ptr, TRUE, 3);
+ object_desc(o_name, o_ptr, 0);
/* Prompt */
#ifdef JP
object_type *o_ptr;
+ if (!command_cmd) return TRUE; /* command_cmd is no longer effective */
+
/* Inventory */
if (item >= 0)
{
if (!o_ptr->inscription) return (TRUE);
/* Find a '!' */
- s = strchr(quark_str(o_ptr->inscription), '!');
+ s = my_strchr(quark_str(o_ptr->inscription), '!');
/* Process preventions */
while (s)
}
/* Find another '!' */
- s = strchr(s + 1, '!');
+ s = my_strchr(s + 1, '!');
}
/* Allow it */
/* Illegal items */
if ((i < 0) || (i >= INVEN_TOTAL)) return (FALSE);
+ if (select_ring_slot) return is_ring_slot(i);
+
/* Verify the item */
if (!item_tester_okay(&inventory[i])) return (FALSE);
if (item_tester_okay(&inventory[j]))
return TRUE;
- floor_num = scan_floor(floor_list, py, px, 0x01);
+ floor_num = scan_floor(floor_list, py, px, 0x03);
if (floor_num)
return TRUE;
int max_inven = 0;
int max_equip = 0;
+#ifdef ALLOW_REPEAT
+
+ static char prev_tag = '\0';
+ char cur_tag = '\0';
+
+#endif /* ALLOW_REPEAT */
+
#ifdef ALLOW_EASY_FLOOR /* TNB */
if (easy_floor || use_menu) return get_item_floor(cp, pmt, str, mode);
#endif /* ALLOW_EASY_FLOOR -- TNB */
+ /* Extract args */
+ if (mode & USE_EQUIP) equip = TRUE;
+ if (mode & USE_INVEN) inven = TRUE;
+ if (mode & USE_FLOOR) floor = TRUE;
+
#ifdef ALLOW_REPEAT
/* Get the item index */
if (repeat_pull(cp))
{
- if (*cp == INVEN_FORCE) { /* the_force */
- item_tester_tval = 0;
- item_tester_hook = NULL;
- return (TRUE);
- } else
+ /* the_force */
+ if (select_the_force && (*cp == INVEN_FORCE))
+ {
+ item_tester_tval = 0;
+ item_tester_hook = NULL;
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
+ return (TRUE);
+ }
+
/* Floor item? */
- if (*cp < 0)
+ else if (floor && (*cp < 0))
{
object_type *o_ptr;
/* Validate the item */
if (item_tester_okay(o_ptr))
{
- /* Forget the item_tester_tval restriction */
+ /* Forget restrictions */
item_tester_tval = 0;
-
- /* Forget the item_tester_hook restriction */
item_tester_hook = NULL;
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
/* Success */
- return (TRUE);
+ return TRUE;
}
}
- /* Verify the item */
- else if (get_item_okay(*cp))
+ else if ((inven && (*cp >= 0) && (*cp < INVEN_PACK)) ||
+ (equip && (*cp >= INVEN_RARM) && (*cp < INVEN_TOTAL)))
{
- /* Forget the item_tester_tval restriction */
- item_tester_tval = 0;
+ if (prev_tag && command_cmd)
+ {
+ /* Look up the tag and validate the item */
+ if (!get_tag(&k, prev_tag, (*cp >= INVEN_RARM) ? USE_EQUIP : USE_INVEN)) /* Reject */;
+ else if ((k < INVEN_RARM) ? !inven : !equip) /* Reject */;
+ else if (!get_item_okay(k)) /* Reject */;
+ else
+ {
+ /* Accept that choice */
+ (*cp) = k;
- /* Forget the item_tester_hook restriction */
- item_tester_hook = NULL;
+ /* Forget restrictions */
+ item_tester_tval = 0;
+ item_tester_hook = NULL;
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
+
+ /* Success */
+ return TRUE;
+ }
+
+ prev_tag = '\0'; /* prev_tag is no longer effective */
+ }
+
+ /* Verify the item */
+ else if (get_item_okay(*cp))
+ {
+ /* Forget restrictions */
+ item_tester_tval = 0;
+ item_tester_hook = NULL;
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
- /* Success */
- return (TRUE);
+ /* Success */
+ return TRUE;
+ }
}
}
#endif /* ALLOW_REPEAT */
- /* Extract args */
- if (mode & (USE_EQUIP)) equip = TRUE;
- if (mode & (USE_INVEN)) inven = TRUE;
- if (mode & (USE_FLOOR)) floor = TRUE;
-
/* Paranoia XXX XXX XXX */
msg_print(NULL);
else if (use_menu)
{
for (j = INVEN_RARM; j < INVEN_TOTAL; j++)
- if (item_tester_okay(&inventory[j])) max_equip++;
+ if (select_ring_slot ? is_ring_slot(j) : item_tester_okay(&inventory[j])) max_equip++;
if (p_ptr->ryoute && !item_tester_no_ryoute) max_equip++;
}
while ((e1 <= e2) && (!get_item_okay(e1))) e1++;
while ((e1 <= e2) && (!get_item_okay(e2))) e2--;
+ if (equip && p_ptr->ryoute && !item_tester_no_ryoute)
+ {
+ if (p_ptr->migite)
+ {
+ if (e2 < INVEN_LARM) e2 = INVEN_LARM;
+ }
+ else if (p_ptr->hidarite) e1 = INVEN_RARM;
+ }
/* Restrict floor usage */
next_o_idx = o_ptr->next_o_idx;
/* Accept the item on the floor if legal */
- if (item_tester_okay(o_ptr)) allow_floor = TRUE;
+ if (item_tester_okay(o_ptr) && (o_ptr->marked & OM_FOUND)) allow_floor = TRUE;
}
}
{
/* Hack -- Start on equipment if requested */
if (command_see && command_wrk && equip)
-
{
command_wrk = TRUE;
}
int get_item_label = 0;
/* Show choices */
- if (show_choices)
+ int ni = 0;
+ int ne = 0;
+
+ /* Scan windows */
+ for (j = 0; j < 8; j++)
{
- int ni = 0;
- int ne = 0;
+ /* Unused */
+ if (!angband_term[j]) continue;
- /* Scan windows */
- for (j = 0; j < 8; j++)
- {
- /* Unused */
- if (!angband_term[j]) continue;
+ /* Count windows displaying inven */
+ if (window_flag[j] & (PW_INVEN)) ni++;
- /* Count windows displaying inven */
- if (window_flag[j] & (PW_INVEN)) ni++;
+ /* Count windows displaying equip */
+ if (window_flag[j] & (PW_EQUIP)) ne++;
+ }
- /* Count windows displaying equip */
- if (window_flag[j] & (PW_EQUIP)) ne++;
- }
+ /* Toggle if needed */
+ if ((command_wrk && ni && !ne) ||
+ (!command_wrk && !ni && ne))
+ {
+ /* Toggle */
+ toggle_inven_equip();
- /* Toggle if needed */
- if ((command_wrk && ni && !ne) ||
- (!command_wrk && !ni && ne))
- {
- /* Toggle */
- toggle_inven_equip();
+ /* Track toggles */
+ toggle = !toggle;
+ }
- /* Track toggles */
- toggle = !toggle;
- }
+ /* Update */
+ p_ptr->window |= (PW_INVEN | PW_EQUIP);
- /* Update */
- p_ptr->window |= (PW_INVEN | PW_EQUIP);
+ /* Redraw windows */
+ window_stuff();
- /* Redraw windows */
- window_stuff();
- }
/* Inventory screen */
if (!command_wrk)
{
/* Begin the prompt */
#ifdef JP
-sprintf(out_val, "»ý¤Áʪ:");
+ sprintf(out_val, "»ý¤Áʪ:");
#else
sprintf(out_val, "Inven:");
#endif
-
/* Some legal items */
if ((i1 <= i2) && !use_menu)
{
/* Build the prompt */
#ifdef JP
-sprintf(tmp_val, "%c-%c,'(',')',",
+ sprintf(tmp_val, "%c-%c,'(',')',",
#else
sprintf(tmp_val, " %c-%c,'(',')',",
#endif
-
index_to_label(i1), index_to_label(i2));
/* Append */
/* Indicate ability to "view" */
#ifdef JP
-if (!command_see && !use_menu) strcat(out_val, " '*'°ìÍ÷,");
+ if (!command_see && !use_menu) strcat(out_val, " '*'°ìÍ÷,");
#else
if (!command_see && !use_menu) strcat(out_val, " * to see,");
#endif
-
/* Append */
#ifdef JP
-if (equip) strcat(out_val, format(" %s ÁõÈ÷ÉÊ,", use_menu ? "'4'or'6'" : "'/'"));
-else if (select_the_force)
- strcat(out_val, " 'w'Îýµ¤½Ñ,");
+ if (equip) strcat(out_val, format(" %s ÁõÈ÷ÉÊ,", use_menu ? "'4'or'6'" : "'/'"));
#else
-if (equip) strcat(out_val, format(" %s for Equip,", use_menu ? "4 or 6" : "/"));
-else if (select_the_force)
- strcat(out_val, " w for the Force,");
+ if (equip) strcat(out_val, format(" %s for Equip,", use_menu ? "4 or 6" : "/"));
#endif
-
}
/* Viewing equipment */
{
/* Begin the prompt */
#ifdef JP
-sprintf(out_val, "ÁõÈ÷ÉÊ:");
+ sprintf(out_val, "ÁõÈ÷ÉÊ:");
#else
sprintf(out_val, "Equip:");
#endif
-
/* Some legal items */
if ((e1 <= e2) && !use_menu)
{
/* Build the prompt */
#ifdef JP
-sprintf(tmp_val, "%c-%c,'(',')',",
+ sprintf(tmp_val, "%c-%c,'(',')',",
#else
sprintf(tmp_val, " %c-%c,'(',')',",
#endif
-
index_to_label(e1), index_to_label(e2));
/* Append */
/* Indicate ability to "view" */
#ifdef JP
-if (!command_see && !use_menu) strcat(out_val, " '*'°ìÍ÷,");
+ if (!command_see && !use_menu) strcat(out_val, " '*'°ìÍ÷,");
#else
if (!command_see) strcat(out_val, " * to see,");
#endif
-
/* Append */
#ifdef JP
-if (inven) strcat(out_val, format(" %s »ý¤Áʪ,", use_menu ? "'4'or'6'" : "'/'"));
+ if (inven) strcat(out_val, format(" %s »ý¤Áʪ,", use_menu ? "'4'or'6'" : "'/'"));
#else
-if (inven) strcat(out_val, format(" %s for Inven,", use_menu ? "4 or 6" : "'/'"));
+ if (inven) strcat(out_val, format(" %s for Inven,", use_menu ? "4 or 6" : "'/'"));
#endif
-
}
/* Indicate legality of the "floor" item */
#ifdef JP
-if (allow_floor) strcat(out_val, " '-'¾²¾å,");
+ if (allow_floor) strcat(out_val, " '-'¾²¾å,");
+ if (select_the_force) strcat(out_val, " 'w'Îýµ¤½Ñ,");
#else
if (allow_floor) strcat(out_val, " - for floor,");
+ if (select_the_force) strcat(out_val, " w for the Force,");
#endif
-
/* Finish the prompt */
strcat(out_val, " ESC");
/* Show the prompt */
prt(tmp_val, 0, 0);
-
/* Get a key */
which = inkey();
case '7': case '8': case '9':
{
/* Look up the tag */
- if (!get_tag(&k, which))
+ if (!get_tag(&k, which, command_wrk ? USE_EQUIP : USE_INVEN))
{
bell();
break;
(*cp) = k;
item = TRUE;
done = TRUE;
+#ifdef ALLOW_REPEAT
+ cur_tag = which;
+#endif /* ALLOW_REPEAT */
break;
}
bool not_found = FALSE;
/* Look up the alphabetical tag */
- if (!get_tag(&k, which))
+ if (!get_tag(&k, which, command_wrk ? USE_EQUIP : USE_INVEN))
{
not_found = TRUE;
}
/* Hack -- Validate the item */
- if ((k < INVEN_RARM) ? !inven : !equip)
+ else if ((k < INVEN_RARM) ? !inven : !equip)
{
not_found = TRUE;
}
/* Validate the item */
- if (!get_item_okay(k))
+ else if (!get_item_okay(k))
{
not_found = TRUE;
}
(*cp) = k;
item = TRUE;
done = TRUE;
+#ifdef ALLOW_REPEAT
+ cur_tag = which;
+#endif /* ALLOW_REPEAT */
break;
}
item_tester_hook = NULL;
- /* Clean up */
- if (show_choices)
- {
- /* Toggle again if needed */
- if (toggle) toggle_inven_equip();
+ /* Clean up 'show choices' */
+ /* Toggle again if needed */
+ if (toggle) toggle_inven_equip();
- /* Update */
- p_ptr->window |= (PW_INVEN | PW_EQUIP);
+ /* Update */
+ p_ptr->window |= (PW_INVEN | PW_EQUIP);
- /* Window stuff */
- window_stuff();
- }
+ /* Window stuff */
+ window_stuff();
/* Clear the prompt line */
/* Warning if needed */
if (oops && str) msg_print(str);
+ if (item)
+ {
#ifdef ALLOW_REPEAT
- if (item) repeat_push(*cp);
+ repeat_push(*cp);
+ if (command_cmd) prev_tag = cur_tag;
#endif /* ALLOW_REPEAT */
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
+ }
+
/* Result */
return (item);
}
if ((mode & 0x01) && !item_tester_okay(o_ptr)) continue;
/* Marked */
- if ((mode & 0x02) && !o_ptr->marked) continue;
+ if ((mode & 0x02) && !(o_ptr->marked & OM_FOUND)) continue;
/* Accept this item */
/* XXX Hack -- Enforce limit */
return num;
}
+
/*
* Display a list of the items on the floor at the given location.
*/
int floor_list[23], floor_num;
int wid, hgt;
+ char floor_label[52 + 1];
+
+ bool dont_need_to_show_weights = TRUE;
/* Get size */
Term_get_size(&wid, &hgt);
/* Scan for objects in the grid, using item_tester_okay() */
- floor_num = scan_floor(floor_list, y, x, 0x01);
+ floor_num = scan_floor(floor_list, y, x, 0x03);
- /* Display the inventory */
+ /* Display the floor objects */
for (k = 0, i = 0; i < floor_num && i < 23; i++)
{
o_ptr = &o_list[floor_list[i]];
/* Describe the object */
- object_desc(o_name, o_ptr, TRUE, 3);
+ object_desc(o_name, o_ptr, 0);
/* Save the index */
out_index[k] = i;
/* Be sure to account for the weight */
if (show_weights) l += 9;
+ if (o_ptr->tval != TV_GOLD) dont_need_to_show_weights = FALSE;
+
/* Maintain the maximum length */
if (l > len) len = l;
k++;
}
+ if (show_weights && dont_need_to_show_weights) len -= 9;
+
/* Save width */
*min_width = len;
/* Find the column to start in */
col = (len > wid - 4) ? 0 : (wid - len - 1);
+ prepare_label_string_floor(floor_label, floor_list, floor_num);
+
/* Output each entry */
for (j = 0; j < k; j++)
{
else strcpy(tmp_val, " ");
}
else
+ {
/* Prepare an index --(-- */
- sprintf(tmp_val, "%c)", index_to_label(j));
+ sprintf(tmp_val, "%c)", floor_label[j]);
+ }
/* Clear the line with the (possibly indented) index */
put_str(tmp_val, j + 1, col);
c_put_str(out_color[j], out_desc[j], j + 1, col + 3);
/* Display the weight if needed */
- if (show_weights)
+ if (show_weights && (o_ptr->tval != TV_GOLD))
{
int wgt = o_ptr->weight * o_ptr->number;
#ifdef JP
sprintf(tmp_val, "%3d.%1d lb", wgt / 10, wgt % 10);
#endif
- put_str(tmp_val, j + 1, wid - 9);
+ prt(tmp_val, j + 1, wid - 9);
}
}
bool oops = FALSE;
- bool equip = FALSE;
- bool inven = FALSE;
- bool floor = FALSE;
+ /* Extract args */
+ bool equip = (mode & USE_EQUIP) ? TRUE : FALSE;
+ bool inven = (mode & USE_INVEN) ? TRUE : FALSE;
+ bool floor = (mode & USE_FLOOR) ? TRUE : FALSE;
bool allow_equip = FALSE;
bool allow_inven = FALSE;
#ifdef ALLOW_REPEAT
+ static char prev_tag = '\0';
+ char cur_tag = '\0';
+
/* Get the item index */
if (repeat_pull(cp))
{
- if (*cp == INVEN_FORCE) { /* the_force */
- item_tester_tval = 0;
- item_tester_hook = NULL;
- return (TRUE);
- } else
+ /* the_force */
+ if (select_the_force && (*cp == INVEN_FORCE))
+ {
+ item_tester_tval = 0;
+ item_tester_hook = NULL;
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
+ return (TRUE);
+ }
+
/* Floor item? */
- if (*cp < 0)
+ else if (floor && (*cp < 0))
{
- object_type *o_ptr;
+ if (prev_tag && command_cmd)
+ {
+ /* Scan all objects in the grid */
+ floor_num = scan_floor(floor_list, py, px, 0x03);
- /* Special index */
- k = 0 - (*cp);
+ /* Look up the tag */
+ if (get_tag_floor(&k, prev_tag, floor_list, floor_num))
+ {
+ /* Accept that choice */
+ (*cp) = 0 - floor_list[k];
- /* Acquire object */
- o_ptr = &o_list[k];
+ /* Forget restrictions */
+ item_tester_tval = 0;
+ item_tester_hook = NULL;
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
+
+ /* Success */
+ return TRUE;
+ }
+
+ prev_tag = '\0'; /* prev_tag is no longer effective */
+ }
/* Validate the item */
- if (item_tester_okay(o_ptr))
+ else if (item_tester_okay(&o_list[0 - (*cp)]))
{
- /* Forget the item_tester_tval restriction */
+ /* Forget restrictions */
item_tester_tval = 0;
-
- /* Forget the item_tester_hook restriction */
item_tester_hook = NULL;
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
/* Success */
- return (TRUE);
+ return TRUE;
}
}
- /* Verify the item */
- else if (get_item_okay(*cp))
+ else if ((inven && (*cp >= 0) && (*cp < INVEN_PACK)) ||
+ (equip && (*cp >= INVEN_RARM) && (*cp < INVEN_TOTAL)))
{
- /* Forget the item_tester_tval restriction */
- item_tester_tval = 0;
+ if (prev_tag && command_cmd)
+ {
+ /* Look up the tag and validate the item */
+ if (!get_tag(&k, prev_tag, (*cp >= INVEN_RARM) ? USE_EQUIP : USE_INVEN)) /* Reject */;
+ else if ((k < INVEN_RARM) ? !inven : !equip) /* Reject */;
+ else if (!get_item_okay(k)) /* Reject */;
+ else
+ {
+ /* Accept that choice */
+ (*cp) = k;
- /* Forget the item_tester_hook restriction */
- item_tester_hook = NULL;
+ /* Forget restrictions */
+ item_tester_tval = 0;
+ item_tester_hook = NULL;
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
- /* Success */
- return (TRUE);
+ /* Success */
+ return TRUE;
+ }
+
+ prev_tag = '\0'; /* prev_tag is no longer effective */
+ }
+
+ /* Verify the item */
+ else if (get_item_okay(*cp))
+ {
+ /* Forget restrictions */
+ item_tester_tval = 0;
+ item_tester_hook = NULL;
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
+
+ /* Success */
+ return TRUE;
+ }
}
}
#endif /* ALLOW_REPEAT */
- /* Extract args */
- if (mode & (USE_EQUIP)) equip = TRUE;
- if (mode & (USE_INVEN)) inven = TRUE;
- if (mode & (USE_FLOOR)) floor = TRUE;
-
/* Paranoia XXX XXX XXX */
msg_print(NULL);
else if (use_menu)
{
for (j = INVEN_RARM; j < INVEN_TOTAL; j++)
- if (item_tester_okay(&inventory[j])) max_equip++;
+ if (select_ring_slot ? is_ring_slot(j) : item_tester_okay(&inventory[j])) max_equip++;
if (p_ptr->ryoute && !item_tester_no_ryoute) max_equip++;
}
while ((e1 <= e2) && (!get_item_okay(e1))) e1++;
while ((e1 <= e2) && (!get_item_okay(e2))) e2--;
+ if (equip && p_ptr->ryoute && !item_tester_no_ryoute)
+ {
+ if (p_ptr->migite)
+ {
+ if (e2 < INVEN_LARM) e2 = INVEN_LARM;
+ }
+ else if (p_ptr->hidarite) e1 = INVEN_RARM;
+ }
+
/* Count "okay" floor items */
floor_num = 0;
if (floor)
{
/* Scan all objects in the grid */
- floor_num = scan_floor(floor_list, py, px, 0x01);
+ floor_num = scan_floor(floor_list, py, px, 0x03);
}
/* Accept inventory */
int get_item_label = 0;
/* Show choices */
- if (show_choices)
- {
- int ni = 0;
- int ne = 0;
+ int ni = 0;
+ int ne = 0;
- /* Scan windows */
- for (j = 0; j < 8; j++)
- {
- /* Unused */
- if (!angband_term[j]) continue;
+ /* Scan windows */
+ for (j = 0; j < 8; j++)
+ {
+ /* Unused */
+ if (!angband_term[j]) continue;
- /* Count windows displaying inven */
- if (window_flag[j] & (PW_INVEN)) ni++;
+ /* Count windows displaying inven */
+ if (window_flag[j] & (PW_INVEN)) ni++;
- /* Count windows displaying equip */
- if (window_flag[j] & (PW_EQUIP)) ne++;
- }
+ /* Count windows displaying equip */
+ if (window_flag[j] & (PW_EQUIP)) ne++;
+ }
- /* Toggle if needed */
- if ((command_wrk == (USE_EQUIP) && ni && !ne) ||
- (command_wrk == (USE_INVEN) && !ni && ne))
- {
- /* Toggle */
- toggle_inven_equip();
+ /* Toggle if needed */
+ if ((command_wrk == (USE_EQUIP) && ni && !ne) ||
+ (command_wrk == (USE_INVEN) && !ni && ne))
+ {
+ /* Toggle */
+ toggle_inven_equip();
- /* Track toggles */
- toggle = !toggle;
- }
+ /* Track toggles */
+ toggle = !toggle;
+ }
- /* Update */
- p_ptr->window |= (PW_INVEN | PW_EQUIP);
+ /* Update */
+ p_ptr->window |= (PW_INVEN | PW_EQUIP);
- /* Redraw windows */
- window_stuff();
- }
+ /* Redraw windows */
+ window_stuff();
/* Inventory screen */
if (command_wrk == (USE_INVEN))
{
/* Begin the prompt */
#ifdef JP
-sprintf(out_val, "»ý¤Áʪ:");
+ sprintf(out_val, "»ý¤Áʪ:");
#else
sprintf(out_val, "Inven:");
#endif
{
/* Build the prompt */
#ifdef JP
-sprintf(tmp_val, "%c-%c,'(',')',",
+ sprintf(tmp_val, "%c-%c,'(',')',",
#else
sprintf(tmp_val, " %c-%c,'(',')',",
#endif
-
index_to_label(i1), index_to_label(i2));
/* Append */
/* Indicate ability to "view" */
#ifdef JP
-if (!command_see && !use_menu) strcat(out_val, " '*'°ìÍ÷,");
+ if (!command_see && !use_menu) strcat(out_val, " '*'°ìÍ÷,");
#else
if (!command_see && !use_menu) strcat(out_val, " * to see,");
#endif
-
/* Append */
-#ifdef JP
if (allow_equip)
{
+#ifdef JP
if (!use_menu)
strcat(out_val, " '/' ÁõÈ÷ÉÊ,");
else if (allow_floor)
strcat(out_val, " '6' ÁõÈ÷ÉÊ,");
else
strcat(out_val, " '4'or'6' ÁõÈ÷ÉÊ,");
- }
- else if (select_the_force)
- strcat(out_val, " 'w'Îýµ¤½Ñ,");
#else
- if (allow_equip)
- {
if (!use_menu)
strcat(out_val, " / for Equip,");
else if (allow_floor)
strcat(out_val, " 6 for Equip,");
else
strcat(out_val, " 4 or 6 for Equip,");
- }
- else if (select_the_force)
- strcat(out_val, " w for the Force,");
#endif
+ }
/* Append */
if (allow_floor)
strcat(out_val, " 4 or 6 for floor,");
#endif
}
-
}
/* Viewing equipment */
{
/* Begin the prompt */
#ifdef JP
-sprintf(out_val, "ÁõÈ÷ÉÊ:");
+ sprintf(out_val, "ÁõÈ÷ÉÊ:");
#else
sprintf(out_val, "Equip:");
#endif
-
if (!use_menu)
{
/* Build the prompt */
#ifdef JP
-sprintf(tmp_val, "%c-%c,'(',')',",
+ sprintf(tmp_val, "%c-%c,'(',')',",
#else
sprintf(tmp_val, " %c-%c,'(',')',",
#endif
-
index_to_label(e1), index_to_label(e2));
/* Append */
/* Indicate ability to "view" */
#ifdef JP
-if (!command_see && !use_menu) strcat(out_val, " '*'°ìÍ÷,");
+ if (!command_see && !use_menu) strcat(out_val, " '*'°ìÍ÷,");
#else
if (!command_see && !use_menu) strcat(out_val, " * to see,");
#endif
-
/* Append */
if (allow_inven)
{
else
strcat(out_val, " '4'or'6' »ý¤Áʪ,");
#else
-
if (!use_menu)
strcat(out_val, " / for Inven,");
else if (allow_floor)
sprintf(out_val, "Floor:");
#endif
-
if (!use_menu)
{
/* Build the prompt */
#ifdef JP
-sprintf(tmp_val, "%c-%c,'(',')',", n1, n2);
+ sprintf(tmp_val, "%c-%c,'(',')',", n1, n2);
#else
sprintf(tmp_val, " %c-%c,'(',')',", n1, n2);
#endif
-
/* Append */
strcat(out_val, tmp_val);
}
/* Indicate ability to "view" */
#ifdef JP
-if (!command_see && !use_menu) strcat(out_val, " '*'°ìÍ÷,");
+ if (!command_see && !use_menu) strcat(out_val, " '*'°ìÍ÷,");
#else
if (!command_see && !use_menu) strcat(out_val, " * to see,");
#endif
-
if (use_menu)
{
if (allow_inven && allow_equip)
#else
strcat(out_val, " 4 for Equip, 6 for Inven,");
#endif
-
}
else if (allow_inven)
{
#else
strcat(out_val, " 4 or 6 for Inven,");
#endif
-
}
else if (allow_equip)
{
#else
strcat(out_val, " 4 or 6 for Equip,");
#endif
-
}
}
/* Append */
#else
strcat(out_val, " / for Inven,");
#endif
-
}
else if (allow_equip)
{
#else
strcat(out_val, " / for Equip,");
#endif
-
}
/* Append */
}
}
+ /* Append */
+#ifdef JP
+ if (select_the_force) strcat(out_val, " 'w'Îýµ¤½Ñ,");
+#else
+ if (select_the_force) strcat(out_val, " w for the Force,");
+#endif
+
/* Finish the prompt */
strcat(out_val, " ESC");
{
int i, o_idx;
cave_type *c_ptr = &cave[py][px];
-
+
if (command_wrk != (USE_FLOOR)) break;
/* Get the object being moved. */
- o_idx = c_ptr->o_idx;
-
+ o_idx = c_ptr->o_idx;
+
/* Only rotate a pile of two or more objects. */
if (!(o_idx && o_list[o_idx].next_o_idx)) break;
/* Remove the first object from the list. */
excise_object_idx(o_idx);
-
+
/* Find end of the list. */
i = c_ptr->o_idx;
while (o_list[i].next_o_idx)
i = o_list[i].next_o_idx;
-
+
/* Add after the last object. */
o_list[i].next_o_idx = o_idx;
-
+
/* Re-scan floor list */
- floor_num = scan_floor(floor_list, py, px, 0x01);
+ floor_num = scan_floor(floor_list, py, px, 0x03);
/* Hack -- Fix screen */
if (command_see)
case '4': case '5': case '6':
case '7': case '8': case '9':
{
- /* Look up the tag */
- if (!get_tag(&k, which))
+ if (command_wrk != USE_FLOOR)
{
- bell();
- break;
- }
+ /* Look up the tag */
+ if (!get_tag(&k, which, command_wrk))
+ {
+ bell();
+ break;
+ }
- /* Hack -- Validate the item */
- if ((k < INVEN_RARM) ? !inven : !equip)
- {
- bell();
- break;
- }
+ /* Hack -- Validate the item */
+ if ((k < INVEN_RARM) ? !inven : !equip)
+ {
+ bell();
+ break;
+ }
- /* Validate the item */
- if (!get_item_okay(k))
+ /* Validate the item */
+ if (!get_item_okay(k))
+ {
+ bell();
+ break;
+ }
+ }
+ else
{
- bell();
- break;
+ /* Look up the alphabetical tag */
+ if (get_tag_floor(&k, which, floor_list, floor_num))
+ {
+ /* Special index */
+ k = 0 - floor_list[k];
+ }
+ else
+ {
+ bell();
+ break;
+ }
}
/* Allow player to "refuse" certain actions */
(*cp) = k;
item = TRUE;
done = TRUE;
+#ifdef ALLOW_REPEAT
+ cur_tag = which;
+#endif /* ALLOW_REPEAT */
break;
}
done = TRUE;
break;
}
+
+ /* Fall through */
}
default:
{
int ver;
- bool not_found = FALSE;
- /* Look up the alphabetical tag */
- if (!get_tag(&k, which))
+ if (command_wrk != USE_FLOOR)
{
- not_found = TRUE;
- }
+ bool not_found = FALSE;
- /* Hack -- Validate the item */
- if ((k < INVEN_RARM) ? !inven : !equip)
- {
- not_found = TRUE;
- }
+ /* Look up the alphabetical tag */
+ if (!get_tag(&k, which, command_wrk))
+ {
+ not_found = TRUE;
+ }
- /* Validate the item */
- if (!get_item_okay(k))
- {
- not_found = TRUE;
- }
+ /* Hack -- Validate the item */
+ else if ((k < INVEN_RARM) ? !inven : !equip)
+ {
+ not_found = TRUE;
+ }
- if (!not_found)
+ /* Validate the item */
+ else if (!get_item_okay(k))
+ {
+ not_found = TRUE;
+ }
+
+ if (!not_found)
+ {
+ /* Accept that choice */
+ (*cp) = k;
+ item = TRUE;
+ done = TRUE;
+#ifdef ALLOW_REPEAT
+ cur_tag = which;
+#endif /* ALLOW_REPEAT */
+ break;
+ }
+ }
+ else
{
- /* Accept that choice */
- (*cp) = k;
- item = TRUE;
- done = TRUE;
- break;
+ /* Look up the alphabetical tag */
+ if (get_tag_floor(&k, which, floor_list, floor_num))
+ {
+ /* Special index */
+ k = 0 - floor_list[k];
+
+ /* Accept that choice */
+ (*cp) = k;
+ item = TRUE;
+ done = TRUE;
+#ifdef ALLOW_REPEAT
+ cur_tag = which;
+#endif /* ALLOW_REPEAT */
+ break;
+ }
}
/* Extract "query" setting */
item_tester_hook = NULL;
- /* Clean up */
- if (show_choices)
- {
- /* Toggle again if needed */
- if (toggle) toggle_inven_equip();
+ /* Clean up 'show choices' */
+ /* Toggle again if needed */
+ if (toggle) toggle_inven_equip();
- /* Update */
- p_ptr->window |= (PW_INVEN | PW_EQUIP);
+ /* Update */
+ p_ptr->window |= (PW_INVEN | PW_EQUIP);
- /* Window stuff */
- window_stuff();
- }
+ /* Window stuff */
+ window_stuff();
/* Clear the prompt line */
/* Warning if needed */
if (oops && str) msg_print(str);
+ if (item)
+ {
#ifdef ALLOW_REPEAT
- if (item) repeat_push(*cp);
+ repeat_push(*cp);
+ if (command_cmd) prev_tag = cur_tag;
#endif /* ALLOW_REPEAT */
+ command_cmd = 0; /* Hack -- command_cmd is no longer effective */
+ }
+
/* Result */
return (item);
}
*
* This is called by py_pickup() when easy_floor is TRUE.
*/
-void py_pickup_floor(int pickup)
+void py_pickup_floor(bool pickup)
{
s16b this_o_idx, next_o_idx = 0;
o_ptr = &o_list[this_o_idx];
/* Describe the object */
- object_desc(o_name, o_ptr, TRUE, 3);
+ object_desc(o_name, o_ptr, 0);
/* Access the next object */
next_o_idx = o_ptr->next_o_idx;
#endif /* ALLOW_EASY_SENSE */
/* Describe the object */
- object_desc(o_name, o_ptr, TRUE, 3);
+ object_desc(o_name, o_ptr, 0);
/* Message */
#ifdef JP
#endif /* ALLOW_EASY_SENSE */
/* Describe the object */
- object_desc(o_name, o_ptr, TRUE, 3);
+ object_desc(o_name, o_ptr, 0);
/* Message */
#ifdef JP
#endif /* ALLOW_EASY_SENSE */
/* Describe the object */
- object_desc(o_name, o_ptr, TRUE, 3);
+ object_desc(o_name, o_ptr, 0);
/* Build a prompt */
#ifdef JP