OSDN Git Service

set trivial flags
authorSHIRAKATA Kentaro <argrath@ub32.org>
Sat, 14 Mar 2020 16:27:26 +0000 (01:27 +0900)
committerSHIRAKATA Kentaro <argrath@ub32.org>
Mon, 16 Mar 2020 20:51:25 +0000 (05:51 +0900)
77 files changed:
src/apply.c
src/attrib.c
src/ball.c
src/botl.c
src/cmd.c
src/dbridge.c
src/decl.c
src/detect.c
src/dig.c
src/do.c
src/do_name.c
src/do_wear.c
src/dog.c
src/dogmove.c
src/dokick.c
src/dothrow.c
src/drawing.c
src/dungeon.c
src/eat.c
src/end.c
src/engrave.c
src/exper.c
src/explode.c
src/files.c
src/fountain.c
src/hack.c
src/invent.c
src/light.c
src/lock.c
src/mail.c
src/mcastu.c
src/mhitm.c
src/mhitu.c
src/minion.c
src/mklev.c
src/mkobj.c
src/mon.c
src/mondata.c
src/monmove.c
src/mthrowu.c
src/muse.c
src/music.c
src/objnam.c
src/options.c
src/pager.c
src/pickup.c
src/polyself.c
src/potion.c
src/pray.c
src/priest.c
src/quest.c
src/read.c
src/region.c
src/restore.c
src/role.c
src/rumors.c
src/shk.c
src/shknam.c
src/sit.c
src/sounds.c
src/spell.c
src/steal.c
src/steed.c
src/teleport.c
src/timeout.c
src/topten.c
src/trap.c
src/uhitm.c
src/vault.c
src/weapon.c
src/were.c
src/wield.c
src/wizard.c
src/worm.c
src/worn.c
src/write.c
src/zap.c

index d807560..cdae9d5 100644 (file)
@@ -83,7 +83,7 @@ struct obj *obj;
     if (obj->cursed && !rn2(2)) {
         (void) zapyourself(obj, TRUE);
     } else if (u.uswallow) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("take a picture of %s %s.", s_suffix(mon_nam(u.ustuck)),
             mbodypart(u.ustuck, STOMACH));
 #else
@@ -132,7 +132,7 @@ struct obj *obj;
         case 2:
             old = Glib;
             incr_itimeout(&Glib, rn1(10, 3));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Your("%s %s!", makeplural(body_part(HAND)),
                  (old ? "are filthier than ever" : "get slimy"));
 #else
@@ -146,7 +146,7 @@ struct obj *obj;
             if (!ublindf) {
                 old = u.ucreamed;
                 u.ucreamed += rn1(10, 3);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Yecch!  Your %s %s gunk on it!", body_part(FACE),
                       (old ? "has more" : "now has"));
 #else
@@ -157,7 +157,7 @@ struct obj *obj;
             } else {
                 const char *what;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 what = (ublindf->otyp == LENSES)
                            ? "lenses"
                            : (obj->otyp == ublindf->otyp) ? "other towel"
@@ -169,7 +169,7 @@ struct obj *obj;
                                                           : "\96Ú\89B\82µ";
 #endif
                 if (ublindf->cursed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("push your %s %s.", what,
                         rn2(2) ? "cock-eyed" : "crooked");
 #else
@@ -226,7 +226,7 @@ struct obj *obj;
         return 1;
     }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Your("%s and %s are already clean.", body_part(FACE),
          makeplural(body_part(HAND)));
 #else
@@ -419,7 +419,7 @@ register struct obj *obj;
                             && !rn2(Role_if(PM_HEALER) ? 10 : 3));
 
     if (nohands(youmonst.data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("have no hands!"); /* not `body_part(HAND)' */
 #else
         pline("\82 \82È\82½\82É\82Í\8eè\82ª\82È\82¢\81I");
@@ -589,7 +589,7 @@ register struct obj *obj;
     }
 
     if (!its_dead(rx, ry, &res))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("hear nothing special."); /* not You_hear()  */
 #else
         pline("\93Á\82É\89½\82à\95·\82±\82¦\82È\82¢\81D");
@@ -618,7 +618,7 @@ struct obj *obj;
         You("%s\82ð\92Ê\82µ\82Ä\96A\82ð\8fo\82µ\82½\81D", xname(obj));
     } else {
         if (Deaf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_feel("rushing air tickle your %s.",
                         body_part(NOSE));
 #else
@@ -648,7 +648,7 @@ struct obj *obj;
 */
         You("\93J\82ð\8eg\82¤\94\\97Í\82ª\82È\82¢\81D");
     } else if (obj->cursed && !rn2(2)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("produce a %shigh-pitched humming noise.",
             Underwater ? "very " : "");
 #else
@@ -660,7 +660,7 @@ struct obj *obj;
         int pet_cnt = 0, omx, omy;
 
         /* it's magic!  it works underwater too (at a higher pitch) */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You(whistle_str,
             Hallucination ? "normal" : Underwater ? "strange, high-pitched"
                                                   : "strange");
@@ -803,7 +803,7 @@ struct obj *obj;
            it from the engulfer versus from some other creature
            (note: the two in-use cases can't actually occur; all
            leashes are released when the hero gets engulfed) */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_cant((!obj->leashmon
                   ? "leash %s from inside."
                   : (obj->leashmon == (int) u.ustuck->m_id)
@@ -871,7 +871,7 @@ struct obj *obj;
            (and also that it doesn't change location by retry time) */
         map_invisible(cc.x, cc.y);
     } else if (!mtmp->mtame) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s leashed!", Monnam(mtmp),
               (!obj->leashmon) ? "cannot be" : "is not");
 #else
@@ -881,7 +881,7 @@ struct obj *obj;
     } else if (!obj->leashmon) {
         /* applying a leash which isn't currently in use */
         if (mtmp->mleashed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("This %s is already leashed.",
                   spotmon ? l_monnam(mtmp) : "creature");
 #else
@@ -889,7 +889,7 @@ struct obj *obj;
                   spotmon ? l_monnam(mtmp) : "\89ö\95¨");
 #endif
         } else if (!leashable(mtmp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("The leash won't fit onto %s%s.", spotmon ? "your " : "",
                   l_monnam(mtmp));
 #else
@@ -897,7 +897,7 @@ struct obj *obj;
                   l_monnam(mtmp));
 #endif
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("slip the leash around %s%s.", spotmon ? "your " : "",
                 l_monnam(mtmp));
 #else
@@ -924,7 +924,7 @@ struct obj *obj;
         } else {
             mtmp->mleashed = 0;
             obj->leashmon = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("remove the leash from %s%s.",
                 spotmon ? "your " : "", l_monnam(mtmp));
 #else
@@ -970,7 +970,7 @@ next_to_u()
                         && otmp->leashmon == (int) mtmp->m_id) {
                         if (otmp->cursed)
                             return FALSE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You_feel("%s leash go slack.",
                                  (number_leashed() > 1) ? "a" : "the");
 #else
@@ -1181,7 +1181,7 @@ struct obj *obj;
     }
     if (u.uswallow) {
         if (useeit)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("reflect %s %s.", s_suffix(mon_nam(u.ustuck)),
                 mbodypart(u.ustuck, STOMACH));
 #else
@@ -1192,7 +1192,7 @@ struct obj *obj;
     }
     if (Underwater) {
         if (useeit)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You(Hallucination ? "give the fish a chance to fix their makeup."
                               : "reflect the murky water.");
 #else
@@ -1248,7 +1248,7 @@ struct obj *obj;
         /* infravision doesn't produce an image in the mirror */
     } else if ((how_seen & SEENMON) == MONSEEN_INFRAVIS) {
         if (vis) /* (redundant) */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s is too far away to see %sself in the dark.",
                   Monnam(mtmp), mhim(mtmp));
 #else
@@ -1352,7 +1352,7 @@ struct obj *obj;
         else if ((mtmp->minvis && !perceives(mtmp->data))
                  /* redundant: can't get here if these are true */
                  || !haseyes(mtmp->data) || notonhead || !mtmp->mcansee)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s doesn't seem to notice %s reflection.", Monnam(mtmp),
                   mhis(mtmp));
 #else
@@ -1555,7 +1555,7 @@ register struct obj *obj;
     }
     if (u.uswallow || obj->cursed) {
         if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("%s %s for a moment, then %s.", s, vtense(s, "flicker"),
                       vtense(s, "die"));
 #else
@@ -1564,7 +1564,7 @@ register struct obj *obj;
         return;
     }
     if (obj->spe < 7) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         There("%s only %d %s in %s.", vtense(s, "are"), obj->spe, s,
               the(xname(obj)));
 #else
@@ -1572,7 +1572,7 @@ register struct obj *obj;
               xname(obj), obj->spe);
 #endif
         if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s lit.  %s dimly.", obj->spe == 1 ? "It is" : "They are",
                   Tobjnam(obj, "shine"));
 #else
@@ -1580,7 +1580,7 @@ register struct obj *obj;
                   xname(obj), xname(obj));
 #endif
     } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s's %s burn%s", The(xname(obj)), s,
               (Blind ? "." : " brightly!"));
 #else
@@ -1677,7 +1677,7 @@ struct obj **optr;
 #endif
         } else
             *optr = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("attach %ld%s %s to %s.", obj->quan, !otmp->spe ? "" : " more", s,
             the(xname(otmp)));
 #else
@@ -1708,7 +1708,7 @@ struct obj **optr;
             verbalize("\89Î\82ð\82Â\82¯\82½\82È\82ç\81C\94\83\82Á\82Ä\82à\82ç\82¨\82¤\81I");
 #endif
         if (obj->quan < 7L && otmp->spe == 7)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s now has seven%s candles attached.", The(xname(otmp)),
                   otmp->lamplit ? " lit" : "");
 #else
@@ -1746,7 +1746,7 @@ struct obj *otmp;
 
         (void) get_obj_location(otmp, &x, &y, 0);
         if (otmp->where == OBJ_MINVENT ? cansee(x, y) : !Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s%scandle%s flame%s extinguished.", Shk_Your(buf, otmp),
                   (candle ? "" : "candelabrum's "), (many ? "s'" : "'s"),
                   (many ? "s are" : " is"));
@@ -1854,7 +1854,7 @@ struct obj *obj;
         return;
     }
     if (Underwater) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline(!Is_candle(obj) ? "This is not a diving lamp"
                               : "Sorry, fire and water don't mix.");
 #else
@@ -1880,7 +1880,7 @@ struct obj *obj;
     }
     if (obj->cursed && !rn2(2)) {
         if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s for a moment, then %s.", Tobjnam(obj, "flicker"),
                   otense(obj, "die"));
 #else
@@ -1896,7 +1896,7 @@ struct obj *obj;
 */
             pline("%s\83\89\83\93\83v\82É\93\94\82ª\93\94\82Á\82½\81D", Shk_Your(buf, obj));
         } else { /* candle(s) */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s flame%s %s%s", s_suffix(Yname2(obj)), plur(obj->quan),
                   otense(obj, "burn"), Blind ? "." : " brightly!");
 #else
@@ -1958,7 +1958,7 @@ struct obj **optr;
     if (split1off)
         obj = splitobj(obj, 1L);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You("light %spotion.%s", shk_your(buf, obj),
         Blind ? "" : "  It gives off a dim light.");
 #else
@@ -2341,7 +2341,7 @@ int magic; /* 0=Physical, otherwise skill level */
 */
             pline("%s\82Í\92µ\82×\82é\8fó\91Ô\82Å\82Í\82È\82¢\81D", Monnam(u.usteed));
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Your("%s%s %s in no shape for jumping.",
                  (wl == LEFT_SIDE) ? "left " : (wl == RIGHT_SIDE) ? "right "
                                                                   : "",
@@ -2418,7 +2418,7 @@ int magic; /* 0=Physical, otherwise skill level */
                 return 1;
             case TT_BURIEDBALL:
             case TT_INFLOOR:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("strain your %s, but you're still %s.",
                     makeplural(body_part(LEG)),
                     (u.utraptype == TT_INFLOOR)
@@ -2511,7 +2511,7 @@ struct obj *obj;
         char kbuf[BUFSZ];
 
         if (poly_when_stoned(youmonst.data))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("tin %s without wearing gloves.",
                 an(mons[corpse->corpsenm].mname));
 #else
@@ -2519,14 +2519,14 @@ struct obj *obj;
                 mons[corpse->corpsenm].mname);
 #endif
         else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Tinning %s without wearing gloves is a fatal mistake...",
                   an(mons[corpse->corpsenm].mname));
 #else
             pline("%s\82ð\8f¬\8eè\82È\82µ\82Å\8aÊ\8bl\82É\82·\82é\82Ì\82Í\92v\96½\93I\82È\8aÔ\88á\82¢\82¾\81D\81D\81D",
                   mons[corpse->corpsenm].mname);
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(kbuf, "trying to tin %s without gloves",
                     an(mons[corpse->corpsenm].mname));
 #else
@@ -2580,7 +2580,7 @@ struct obj *obj;
                 verbalize(you_buy_it);
             useupf(corpse, 1L);
         }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         (void) hold_another_object(can, "You make, but cannot pick up, %s.",
                                    doname(can), (const char *) 0);
 #else
@@ -2615,7 +2615,7 @@ struct obj *obj;
             break;
         case 2:
             if (!Confusion)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("suddenly feel %s.",
                     Hallucination ? "trippy" : "confused");
 #else
@@ -2770,7 +2770,7 @@ struct obj *obj;
     if (did_attr || did_prop)
         context.botl = TRUE;
     if (did_attr)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("This makes you feel %s!",
               (did_prop + did_attr) == (trouble_count + unfixable_trbl)
                   ? "great"
@@ -2856,7 +2856,7 @@ long timeout;
         switch (figurine->where) {
         case OBJ_INVENT:
             if (Blind || suppress_see)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_feel("%s %s from your pack!", something,
                          locomotion(mtmp->data, "drop"));
 #else
@@ -2975,7 +2975,7 @@ boolean quietly;
     if (IS_ROCK(levl[x][y].typ)
         && !(passes_walls(&mons[obj->corpsenm]) && may_passwall(x, y))) {
         if (!quietly)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("cannot place a figurine in %s!",
                 IS_TREE(levl[x][y].typ) ? "a tree" : "solid rock");
 #else
@@ -3020,7 +3020,7 @@ struct obj **optr;
     /* Passing FALSE arg here will result in messages displayed */
     if (!figurine_location_checks(obj, &cc, FALSE))
         return;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You("%s and it %stransforms.",
         (u.dx || u.dy) ? "set the figurine beside you"
                        : (Is_airlevel(&u.uz) || Is_waterlevel(&u.uz)
@@ -3055,7 +3055,7 @@ struct obj *obj;
     struct obj *otmp;
 
     if (Glib) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s from your %s.", Tobjnam(obj, "slip"),
               makeplural(body_part(FINGER)));
 #else
@@ -3070,7 +3070,7 @@ struct obj *obj;
         if ((obj->cursed || Fumbling) && !rn2(2)) {
             consume_obj_charge(obj, TRUE);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s from your %s.", Tobjnam(obj, "slip"),
                   makeplural(body_part(FINGER)));
 #else
@@ -3180,7 +3180,7 @@ struct obj *tstone;
 */
             pline("\83\8f\81[\83H\81I\82È\82ñ\82Ä\82«\82ê\82¢\82È\94j\95Ð\82È\82ñ\82¾\81D");
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("A sharp crack shatters %s%s.",
                   (obj->quan > 1L) ? "one of " : "", the(xname(obj)));
 #else
@@ -3195,7 +3195,7 @@ struct obj *tstone;
         pline(scritch);
         return;
     } else if (Hallucination) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Oh wow, man: Fractals!");
 #else
         pline("\83\8f\81[\83H\81I\83t\83\89\83N\83^\83\8b\96Í\97l\82¾\81I");
@@ -3232,7 +3232,7 @@ struct obj *tstone;
     default:
         switch (objects[obj->otyp].oc_material) {
         case CLOTH:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s a little more polished now.", Tobjnam(tstone, "look"));
 #else
             pline("%s\82Í\82³\82ç\82É\82Â\82â\82ª\8fo\82½\82æ\82¤\82É\8c©\82¦\82é\81D", xname(tstone));
@@ -3240,27 +3240,27 @@ struct obj *tstone;
             return;
         case LIQUID:
             if (!obj->known) /* note: not "whetstone" */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("must think this is a wetstone, do you?");
 #else
                 You("\82±\82ê\82Í\93u\90Î\82¾\82Æ\8ev\82Á\82½\81H");
 #endif
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s a little wetter now.", Tobjnam(tstone, "are"));
 #else
                 pline("%s\82Í\8f­\82µ\82Ê\82ê\82½\81D", xname(tstone));
 #endif
             return;
         case WAX:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             streak_color = "waxy";
 #else
             streak_color = "\8e\89\82Á\82Û\82¢";
 #endif
             break; /* okay even if not touchstone */
         case WOOD:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             streak_color = "wooden";
 #else
             streak_color = "\82¨\82ª\82­\82¸\82Ì\82æ\82¤\82È";
@@ -3268,7 +3268,7 @@ struct obj *tstone;
             break; /* okay even if not touchstone */
         case GOLD:
             do_scratch = TRUE; /* scratching and streaks */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             streak_color = "golden";
 #else
             streak_color = "\8bà\90F\82Ì";
@@ -3276,7 +3276,7 @@ struct obj *tstone;
             break;
         case SILVER:
             do_scratch = TRUE; /* scratching and streaks */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             streak_color = "silvery";
 #else
             streak_color = "\8bâ\90F\82Ì";
@@ -3299,7 +3299,7 @@ struct obj *tstone;
     Sprintf(stonebuf, "stone%s", plur(tstone->quan));
 #endif
     if (do_scratch)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("make %s%sscratch marks on the %s.",
             streak_color ? streak_color : (const char *) "",
             streak_color ? " " : "", stonebuf);
@@ -3340,7 +3340,7 @@ struct obj *otmp;
     const char *what = (char *) 0;
     char buf[BUFSZ];
     int levtyp = levl[u.ux][u.uy].typ;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     const char *occutext = "setting the trap";
 #else
     const char *occutext = "ã©\82ð\8ed\8a|\82¯\82Ä\82¢\82é";
@@ -3383,7 +3383,7 @@ struct obj *otmp;
 */
         what = "\97n\8aâ\82Ì\92\86\82Å\82Í";
     else if (On_stairs(u.ux, u.uy))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         what = (u.ux == xdnladder || u.ux == xupladder) ? "on the ladder"
                                                         : "on the stairs";
 #else
@@ -3397,7 +3397,7 @@ struct obj *otmp;
 */
         what = "\82±\82±\82Å\82Í";
     else if (Is_airlevel(&u.uz) || Is_waterlevel(&u.uz))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         what = (levtyp == AIR)
                    ? "in midair"
                    : (levtyp == CLOUD)
@@ -3639,7 +3639,7 @@ struct obj *obj;
                 return 1;
             }
             if (otmp && proficient) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("wrap your bullwhip around %s on the %s.",
                     an(singular(otmp, xname)), surface(u.ux, u.uy));
 #else
@@ -3766,7 +3766,7 @@ struct obj *obj;
 */
             You("\95Ú\82ð%s\82É\82©\82ç\82Ü\82¹\82½\81D", xname(otmp));
             if (gotit && mwelded(otmp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s welded to %s %s%c",
                       (otmp->quan == 1L) ? "It is" : "They are", mhis(mtmp),
                       mon_hand, !otmp->bknown ? '!' : '.');
@@ -3852,7 +3852,7 @@ struct obj *obj;
                     break;
                 default:
                     /* to floor beneath mon */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("yank %s from %s %s!", the(onambuf),
                         s_suffix(mon_nam(mtmp)), mon_hand);
 #else
@@ -4146,7 +4146,7 @@ struct obj *obj;
 */
         You("\83N\83\8a\81[\83\80\83p\83b\83N\82ð\82µ\82½\81D");
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("You immerse your %s in %s%s.", body_part(FACE),
               several ? "one of " : "",
               several ? makeplural(the(xname(obj))) : the(xname(obj)));
@@ -4160,7 +4160,7 @@ struct obj *obj;
         u.ucreamed += blindinc;
         make_blinded(Blinded + (long) blindinc, FALSE);
         if (!Blind || (Blind && wasblind))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("There's %ssticky goop all over your %s.",
                   wascreamed ? "more " : "", body_part(FACE));
 #else
@@ -4257,7 +4257,7 @@ struct obj *obj;
         add_menu(tmpwin, NO_GLYPH, &any, 0, 0, ATR_NONE, buf,
                  MENU_UNSELECTED);
         any.a_int++;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         add_menu(tmpwin, NO_GLYPH, &any, 0, 0, ATR_NONE, "a monster",
                  MENU_UNSELECTED);
 #else
@@ -4392,7 +4392,7 @@ struct obj *obj;
 */
     boolean is_fragile = (!strcmp(OBJ_DESCR(objects[obj->otyp]), "\83o\83\8b\83T\82Ì\8fñ"));
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     if (!paranoid_query(ParanoidBreakwand,
                        safe_qbuf(confirm,
                                  "Are you really sure you want to break ",
@@ -4720,7 +4720,7 @@ doapply()
         } else if (!ublindf) {
             Blindf_on(obj);
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are already %s.", ublindf->otyp == TOWEL
                                        ? "covered by a towel"
                                        : ublindf->otyp == BLINDFOLD
index 429b886..ccc6954 100644 (file)
 
 /* part of the output on gain or loss of attribute */
 static const char
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     *const plusattr[] = { "strong", "smart", "wise",
                           "agile",  "tough", "charismatic" },
 #else
     *const plusattr[] = { "\8b­\82¢", "\8c«\96¾\82¾", "\8c«\82¢",
                           "\8b@\95q\82¾", "\8aæ\8fä\82¾", "\96£\97Í\93I\82¾" },
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     *const minusattr[] = { "weak",    "stupid",
                            "foolish", "clumsy",
                            "fragile", "repulsive" };
@@ -33,7 +33,7 @@ static const char
 #endif
 /* also used by enlightenment for non-abbreviated status info */
 const char
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     *const attrname[] = { "strength", "intelligence", "wisdom",
                           "dexterity", "constitution", "charisma" };
 #else
@@ -274,7 +274,7 @@ int msgflg; /* positive => no message, zero => message, and */
     if (ACURR(ndx) == old_acurr) {
         if (msgflg == 0 && flags.verbose) {
             if (ABASE(ndx) == old_abase && AMAX(ndx) == old_amax) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("You're %s as %s as you can get.",
                       abonflg ? "currently" : "already", attrstr);
 #else
@@ -284,7 +284,7 @@ int msgflg; /* positive => no message, zero => message, and */
             } else {
                 /* current stayed the same but base value changed, or
                    base is at minimum and reduction caused max to drop */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("innate %s has %s.", attrname[ndx],
                      (incr > 0) ? "improved" : "declined");
 #else
@@ -352,32 +352,32 @@ static const struct poison_effect_message {
     void VDECL((*delivery_func), (const char *, ...));
     const char *effect_msg;
 } poiseff[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { You_feel, "weaker" },             /* A_STR */
 #else
     { You_feel, "\8eã\82­\82È\82Á\82½" },         /* A_STR */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { Your, "brain is on fire" },       /* A_INT */
 #else
     { You, "\93ª\82É\8c\8c\82ª\82Ì\82Ú\82Á\82½" },        /* A_INT */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { Your, "judgement is impaired" },  /* A_WIS */
 #else
     { You, "\94»\92f\97Í\82ð\8e¸\82Á\82½" },          /* A_WIS */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { Your, "muscles won't obey you" }, /* A_DEX */
 #else
     { You, "\8ev\82¤\82æ\82¤\82É\93®\82¯\82È\82¢" },      /* A_DEX */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { You_feel, "very sick" },          /* A_CON */
 #else
     { You_feel, "\82Æ\82Ä\82à\8bC\95ª\82ª\88«\82­\82È\82Á\82½" }, /* A_CON */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { You, "break out in hives" }       /* A_CHA */
 #else
     { You, "\82\82ñ\82Ü\82µ\82ñ\82ª\82 \82ç\82í\82ê\82½" }   /* A_CHA */
@@ -430,7 +430,7 @@ boolean thrown_weapon; /* thrown weapons are less deadly */
     /* inform player about being poisoned unless that's already been done;
        "blast" has given a "blast of poison gas" message; "poison arrow",
        "poison dart", etc have implicitly given poison messages too... */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     if (strcmp(reason, "blast") && !strstri(reason, "poison")) {
 #else
     if (strcmp(reason, "\95\97") && strcmp(reason, "\91§") && !strstri(reason, "\93Å")) {
@@ -440,7 +440,7 @@ boolean thrown_weapon; /* thrown weapons are less deadly */
 #endif
 
         /* avoid "The" Orcus's sting was poisoned... */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s%s %s poisoned!",
               isupper((uchar) *reason) ? "" : "The ", reason,
               plural ? "were" : "was");
@@ -690,7 +690,7 @@ exerper()
 /* exercise/abuse text (must be in attribute order, not botl order);
    phrased as "You must have been [][0]." or "You haven't been [][1]." */
 static NEARDATA const char *const exertext[A_MAX][2] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { "exercising diligently", "exercising properly" },           /* Str */
     { 0, 0 },                                                     /* Int */
     { "very observant", "paying attention" },                     /* Wis */
@@ -780,7 +780,7 @@ exerchk()
                 /* if you actually changed an attrib - zero accumulation */
                 AEXE(i) = ax = 0;
                 /* then print an explanation */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("%s %s.",
                     (mod_val > 0) ? "must have been" : "haven't been",
                     exertext[i][(mod_val > 0) ? 0 : 1]);
@@ -1071,7 +1071,7 @@ int propidx; /* special cases can have negative values */
 */
                 Strcpy(buf, "\8c»\8dÝ\82Ì\8ep\82É\82æ\82Á\82Ä");
             else if (propidx == FAST && Very_fast)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(buf, because_of,
                         ((HFast & TIMEOUT) != 0L) ? "a potion or spell"
                           : ((EFast & W_ARMF) != 0L && uarmf->dknown
@@ -1400,7 +1400,7 @@ int reason; /* 0==conversion, 1==helm-of-OA on, 2==helm-of-OA off */
         /* worn helm of opposite alignment might block change */
         if (!uarmh || uarmh->otyp != HELM_OF_OPPOSITE_ALIGNMENT)
             u.ualign.type = u.ualignbase[A_CURRENT];
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("have a %ssense of a new direction.",
             (u.ualign.type != oldalign) ? "sudden " : "");
 #else
@@ -1416,7 +1416,7 @@ int reason; /* 0==conversion, 1==helm-of-OA on, 2==helm-of-OA off */
 */
             You("%s\90Q\95Ô\82Á\82½\81D", Hallucination ? "\8dr\82Á\82Û\82­" : "\82 \82Á\82³\82è\82Æ");
         else if (reason == 2)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Your("mind is %s.", Hallucination
                                     ? "much of a muchness"
                                     : "back in sync with your body");
index e3e1196..fb163dc 100644 (file)
@@ -612,7 +612,7 @@ boolean allow_drag;
  drag:
 
     if (near_capacity() > SLT_ENCUMBER && dist2(x, y, u.ux, u.uy) <= 2) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("cannot %sdrag the heavy iron ball.",
             invent ? "carry all that and also " : "");
 #else
@@ -780,7 +780,7 @@ xchar x, y;
                 pline(pullmsg, "\8cF\82Ìã©");
                 set_wounded_legs(side, rn1(1000, 500));
                 if (!u.usteed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Your("%s %s is severely damaged.",
                          (side == LEFT_SIDE) ? "left" : "right",
                          body_part(LEG));
@@ -789,7 +789,7 @@ xchar x, y;
                          (side == LEFT_SIDE) ? "\8d¶" : "\89E",
                          body_part(LEG));
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     losehp(Maybe_Half_Phys(2),
                            "leg damage from being pulled out of a bear trap",
                            KILLED_BY);
@@ -851,7 +851,7 @@ litter()
         nextobj = otmp->nobj;
         if ((otmp != uball) && (rnd(capacity) <= (int) otmp->owt)) {
             if (canletgo(otmp, "")) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("drop %s and %s %s down the stairs with you.",
                     yname(otmp), (otmp->quan == 1L) ? "it" : "they",
                     otense(otmp, "fall"));
index e1f5f04..ff720ac 100644 (file)
@@ -15,7 +15,7 @@
 
 extern const char *hu_stat[]; /* defined in eat.c */
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 const char *const enc_stat[] = { "",         "Burdened",  "Stressed",
                                  "Strained", "Overtaxed", "Overloaded" };
 #else
@@ -97,7 +97,7 @@ do_statusline1()
     if ((i - j) > 0)
         Sprintf(nb = eos(nb), "%*s", i - j, " "); /* pad with spaces */
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(nb = eos(nb), "St:%s Dx:%-1d Co:%-1d In:%-1d Wi:%-1d Ch:%-1d",
             get_strength_str(),
             ACURR(A_DEX), ACURR(A_CON), ACURR(A_INT), ACURR(A_WIS),
@@ -108,7 +108,7 @@ do_statusline1()
             ACURR(A_DEX), ACURR(A_CON), ACURR(A_INT), ACURR(A_WIS),
             ACURR(A_CHA));
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(nb = eos(nb),
             (u.ualign.type == A_CHAOTIC)
                 ? "  Chaotic"
@@ -168,7 +168,7 @@ do_statusline2()
     hpmax = Upolyd ? u.mhmax : u.uhpmax;
     if (hp < 0)
         hp = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(hlth, "HP:%d(%d) Pw:%d(%d) AC:%-2d",
             min(hp, 9999), min(hpmax, 9999),
             min(u.uen, 9999), min(u.uenmax, 9999), u.uac);
@@ -716,7 +716,7 @@ bot_via_windowport()
     blstats[idx][BL_CH].a.a_int = ACURR(A_CHA);
 
     /* Alignment */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Strcpy(blstats[idx][BL_ALIGN].val, (u.ualign.type == A_CHAOTIC)
                                           ? "Chaotic"
                                           : (u.ualign.type == A_NEUTRAL)
index eed4cc8..3a90e23 100644 (file)
--- a/src/cmd.c
+++ b/src/cmd.c
@@ -367,7 +367,7 @@ doextcmd(VOID_ARGS)
             return 0;
         }
         if (iflags.menu_requested && !accept_menu_prefix(func)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("'%s' prefix has no effect for the %s command.",
                   visctrl(Cmd.spkeys[NHKF_REQMENU]),
                   extcmdlist[idx].ef_txt);
@@ -397,7 +397,7 @@ doextlist(VOID_ARGS)
     int n, pass;
     int menumode = 0, menushown[2], onelist = 0;
     boolean redisplay = TRUE, search = FALSE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     static const char *headings[] = { "Extended commands",
                                       "Debugging Extended Commands" };
 #else
@@ -412,7 +412,7 @@ doextlist(VOID_ARGS)
         redisplay = FALSE;
         any = zeroany;
         start_menu(menuwin);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         add_menu(menuwin, NO_GLYPH, &any, 0, 0, ATR_NONE,
                  "Extended Commands List", MENU_UNSELECTED);
 #else
@@ -422,7 +422,7 @@ doextlist(VOID_ARGS)
         add_menu(menuwin, NO_GLYPH, &any, 0, 0, ATR_NONE,
                  "", MENU_UNSELECTED);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Strcpy(buf, menumode ? "Show" : "Hide");
         Strcat(buf, " commands that don't autocomplete");
         if (!menumode)
@@ -442,7 +442,7 @@ doextlist(VOID_ARGS)
                actual list of extended commands shown via separator lines;
                having ':' as an explicit selector overrides the default
                menu behavior for it; we retain 's' as a group accelerator */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             add_menu(menuwin, NO_GLYPH, &any, ':', 's', ATR_NONE,
                      "Search extended commands", MENU_UNSELECTED);
 #else
@@ -450,7 +450,7 @@ doextlist(VOID_ARGS)
                      "\8ag\92£\83R\83}\83\93\83h\82ð\8c\9f\8dõ\82·\82é", MENU_UNSELECTED);
 #endif
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Strcpy(buf, "Show all, clear search");
 #else
             Strcpy(buf, "\91S\82Ä\95\\8e¦; \8c\9f\8dõ\82ð\83N\83\8a\83A");
@@ -468,7 +468,7 @@ doextlist(VOID_ARGS)
         }
         if (wizard) {
             any.a_int = 4;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             add_menu(menuwin, NO_GLYPH, &any, 'z', 0, ATR_NONE,
                      onelist ? "Show debugging commands in separate section"
                      : "Show all alphabetically, including debugging commands",
@@ -540,7 +540,7 @@ doextlist(VOID_ARGS)
                          "", MENU_UNSELECTED);
         }
         if (*searchbuf && !n)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             add_menu(menuwin, NO_GLYPH, &any, 0, 0, ATR_NONE,
                      "no matches", MENU_UNSELECTED);
 #else
@@ -577,7 +577,7 @@ doextlist(VOID_ARGS)
             searchbuf[0] = '\0';
         }
         if (search) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Strcpy(promptbuf, "Extended command list search phrase");
             Strcat(promptbuf, "?");
 #else
@@ -1840,7 +1840,7 @@ char *outbuf;
     /* Protection amount is typically larger than damage or to-hit;
        reduce magnitude by a third in order to stretch modifier ranges
        (small:1..5, moderate:6..10, large:11..19, huge:20+) */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     if (!strcmp(inctyp, "defense"))
 #else
     if (!strcmp(inctyp, "\96h\8cä"))
@@ -1921,7 +1921,7 @@ int final;
         category_name = "\95s\96¾";
         break;
     }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(buf, " %s %s damage", (final || wizard) ? "half" : "reduced",
             category_name);
     enl_msg(You_, "take", "took", buf, from_what(category));
@@ -1995,7 +1995,7 @@ int final; /* ENL_GAMEINPROGRESS:0, ENL_GAMEOVERALIVE, ENL_GAMEOVERDEAD */
     *tmpbuf = highc(*tmpbuf); /* same adjustment as bottom line */
     /* as in background_enlightenment, when poly'd we need to use the saved
        gender in u.mfemale rather than the current you-as-monster gender */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(buf, "%s the %s's attributes:", tmpbuf,
             ((Upolyd ? u.mfemale : flags.female) && urole.name.f)
                 ? urole.name.f
@@ -2085,7 +2085,7 @@ int final;
             Sprintf(tmpbuf, "%s ", genders[flags.female ? 1 : 0].adj);
 */
             Sprintf(tmpbuf, "%s\82Ì", genders[flags.female ? 1 : 0].adj);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%sin %s%s form", !final ? "currently " : "", tmpbuf,
                 uasmon->mname);
 #else
@@ -2109,14 +2109,14 @@ int final;
         Sprintf(tmpbuf, "%s", genders[innategend].adj);
     buf[0] = '\0';
     if (Upolyd)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Strcpy(buf, "actually "); /* "You are actually a ..." */
 #else
         Strcpy(buf, "\8eÀ\8dÛ\82É\82Í"); /* "\82 \82È\82½\82Í\8eÀ\8dÛ\82É\82Í..." */
 #endif
     if (!strcmpi(rank_titl, role_titl)) {
         /* omit role when rank title matches it */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(eos(buf), "%s, level %d %s%s", an(rank_titl), u.ulevel,
                 tmpbuf, urace.noun);
 #else
@@ -2124,7 +2124,7 @@ int final;
                 tmpbuf, urace.adj, role_titl);
 #endif
     } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(eos(buf), "%s, a level %d %s%s %s", an(rank_titl), u.ulevel,
                 tmpbuf, urace.adj, role_titl);
 #else
@@ -2181,7 +2181,7 @@ int final;
     Strcpy(buf, "\82 \82È\82½\82Í");
 #endif
     if (u.ualign.type != A_LAWFUL)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(eos(buf), " %s (%s) and", align_gname(A_LAWFUL),
                 align_str(A_LAWFUL));
 #else
@@ -2189,7 +2189,7 @@ int final;
                 align_str(A_LAWFUL));
 #endif
     if (u.ualign.type != A_NEUTRAL)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(eos(buf), " %s (%s)%s", align_gname(A_NEUTRAL),
                 align_str(A_NEUTRAL),
                 (u.ualign.type != A_CHAOTIC) ? " and" : "");
@@ -2199,7 +2199,7 @@ int final;
                 (u.ualign.type != A_CHAOTIC) ? "\82¨\82æ\82Ñ" : "");
 #endif
     if (u.ualign.type != A_CHAOTIC)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(eos(buf), " %s (%s)", align_gname(A_CHAOTIC),
                 align_str(A_CHAOTIC));
 #else
@@ -2618,7 +2618,7 @@ int mode, final, attrindx;
 */
         paren_pfx = final ? " (" : " (\8c»\8dÝ; ";
         if (acurrent != abase) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(eos(valubuf), "%sbase:%s", paren_pfx,
                     attrval(attrindx, abase, valstring));
 #else
@@ -2628,7 +2628,7 @@ int mode, final, attrindx;
             paren_pfx = ", ";
         }
         if (abase != apeak) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(eos(valubuf), "%speak:%s", paren_pfx,
                     attrval(attrindx, apeak, valstring));
 #else
@@ -2638,7 +2638,7 @@ int mode, final, attrindx;
             paren_pfx = ", ";
         }
         if (interesting_alimit) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(eos(valubuf), "%s%slimit:%s", paren_pfx,
                     /* more verbose if exceeding 'limit' due to magic bonus */
                     (acurrent > alimit) ? "innate " : "",
@@ -2711,7 +2711,7 @@ int final;
     /* not a trouble, but we want to display riding status before maybe
        reporting steed as trapped or hero stuck to cursed saddle */
     if (Riding) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "riding %s", steedname);
         you_are(buf, "");
 #else
@@ -2836,7 +2836,7 @@ int final;
     if (Blind) {
         /* from_what() (currently wizard-mode only) checks !haseyes()
            before u.uroleplay.blind, so we should too */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s blind",
                 !haseyes(youmonst.data) ? "innately"
                 : u.uroleplay.blind ? "permanently"
@@ -3129,7 +3129,7 @@ int final;
             (void) lcase(skill_level_name(wtype, sklvlbuf));
         /* "you have no/basic/expert/master/grand-master skill with <skill>"
            or "you are unskilled/skilled in <skill>" */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s %s %s", sklvlbuf,
                 hav ? "skill with" : "in", skill_name(wtype));
 #else
@@ -3146,13 +3146,13 @@ int final;
     /* report 'nudity' */
     if (!uarm && !uarmu && !uarmc && !uarms && !uarmg && !uarmf && !uarmh) {
         if (u.uroleplay.nudist)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             enl_msg(You_, "do", "did", " not wear any armor", "");
 #else
             enl_msg(You_, "\82¢", "\82©\82Á\82½", "\89½\82Ì\8aZ\82à\91\95\94õ\82µ\82È", "");
 #endif
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             you_are("not wearing any armor", "");
 #else
             enl_msg(You_, "\82¢", "\82©\82Á\82½", "\89½\82Ì\8aZ\82à\91\95\94õ\82µ\82Ä\82¢\82È", "");
@@ -3183,7 +3183,7 @@ int final;
     enlght_out(final ? "\8dÅ\8fI\91®\90«:" : "\8c»\8dÝ\82Ì\91®\90«:");
 
     if (u.uevent.uhand_of_elbereth) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         static const char *const hofe_titles[3] = { "the Hand of Elbereth",
                                                     "the Envoy of Balance",
                                                     "the Glory of Arioch" };
@@ -3205,7 +3205,7 @@ int final;
         you_have(buf, "");
 
     if (wizard) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, " %d", u.ualign.record);
         enl_msg("Your alignment ", "is", "was", buf, "");
 #else
@@ -3276,7 +3276,7 @@ int final;
 */
         you_have("\90Î\89»\82Ö\82Ì\91Ï\90«", from_what(STONE_RES));
     if (Halluc_resistance)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         enl_msg(You_, "resist", "resisted", " hallucinations",
                 from_what(HALLUC_RES));
 #else
@@ -3302,7 +3302,7 @@ int final;
 */
             enl_msg("\82 \82È\82½\82Í\93§\96¾\82È\82à\82Ì\82ð\8c©\82ç\82ê", "\82é", "\82½", "", from_what(SEE_INVIS));
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             enl_msg(You_, "will see", "would have seen",
                     " invisible when not blind", from_what(SEE_INVIS));
 #else
@@ -3321,7 +3321,7 @@ int final;
 */
         you_have("\8cx\89ú\94\\97Í", from_what(WARNING));
     if (Warn_of_mon && context.warntype.obj) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "aware of the presence of %s",
                 (context.warntype.obj & M2_ORC) ? "orcs"
                 : (context.warntype.obj & M2_ELF) ? "elves"
@@ -3532,7 +3532,7 @@ int final;
 
         BFlying = 0L;
         if (Flying) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             enl_msg(You_, "would fly", "would have flown",
                     /* wording quibble: for past tense, "hadn't been"
                        would sound better than "weren't" (and
@@ -3644,7 +3644,7 @@ int final;
     if ((armpro = magic_negation(&youmonst)) > 0) {
         /* magic cancellation factor, conferred by worn armor */
         static const char *const mc_types[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             "" /*ordinary*/, "warded", "guarded", "protected",
 #else
             "" /*ordinary*/, "\89q\82ç\82ê\82Ä", "\8cì\82ç\82ê\82Ä", "\8eç\82ç\82ê\82Ä",
@@ -3793,7 +3793,7 @@ int final;
     /*** Miscellany ***/
     if (Luck) {
         ltmp = abs((int) Luck);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s%slucky",
                 ltmp >= 10 ? "extremely " : ltmp >= 5 ? "very " : "",
                 Luck < 0 ? "un" : "");
@@ -3961,7 +3961,7 @@ int final;
             case 1:
                 break; /* just "are dead" */
             default:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(buf, " (%d%s time!)", u.umortality,
                         ordin(u.umortality));
 #else
@@ -4102,7 +4102,7 @@ minimal_enlightenment()
              "Deities", FALSE);
 */
              "\90_", FALSE);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(buf2, deity_fmtstr, align_gname(A_CHAOTIC),
             (u.ualignbase[A_ORIGINAL] == u.ualign.type
              && u.ualign.type == A_CHAOTIC)               ? " (s,c)"
@@ -4121,7 +4121,7 @@ minimal_enlightenment()
     Sprintf(buf, fmtstr, "\8d¬\93×", buf2);
     add_menu(tmpwin, NO_GLYPH, &any, 0, 0, ATR_NONE, buf, FALSE);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(buf2, deity_fmtstr, align_gname(A_NEUTRAL),
             (u.ualignbase[A_ORIGINAL] == u.ualign.type
              && u.ualign.type == A_NEUTRAL)               ? " (s,c)"
@@ -4140,7 +4140,7 @@ minimal_enlightenment()
     Sprintf(buf, fmtstr, "\92\86\97§", buf2);
     add_menu(tmpwin, NO_GLYPH, &any, 0, 0, ATR_NONE, buf, FALSE);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(buf2, deity_fmtstr, align_gname(A_LAWFUL),
             (u.ualignbase[A_ORIGINAL] == u.ualign.type
              && u.ualign.type == A_LAWFUL)                ? " (s,c)"
@@ -4249,7 +4249,7 @@ int msgflag;          /* for variant message phrasing */
             if (u.utrap && u.utraptype == TT_PIT) {
                 struct trap *t = t_at(u.ux, u.uy);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(bp, " in a %spit",
                         (t && t->ttyp == SPIKED_PIT) ? "spiked " : "");
 #else
@@ -4351,7 +4351,7 @@ int final;
 */
         you_have_never("\82 \82È\82½\82Í\91\95\94õ\82µ\82Ä\82¢\82é\95\90\8aí\82Å\8dU\8c\82\82µ");
     } else if (wizard) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "used a wielded weapon %ld time%s", u.uconduct.weaphit,
                 plur(u.uconduct.weaphit));
         you_have_X(buf);
@@ -4437,7 +4437,7 @@ int final;
 */
         you_have_never("\82 \82È\82½\82Í\8aè\82¢\8e\96\82ð\82µ");
     } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "used %ld wish%s", u.uconduct.wishes,
                 (u.uconduct.wishes > 1L) ? "es" : "");
 #else
@@ -4488,19 +4488,19 @@ int final;
 struct ext_func_tab extcmdlist[] = {
     { '#', "#", "perform an extended command",
             doextcmd, IFBURIED | GENERALCMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('?'), "?", "list all extended commands",
 #else
     { M('?'), "?", "\82±\82Ì\8ag\92£\83R\83}\83\93\83h\88ê\97\97\82ð\95\\8e¦\82·\82é",
 #endif
             doextlist, IFBURIED | AUTOCOMPLETE | GENERALCMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('a'), "adjust", "adjust inventory letters",
 #else
     { M('a'), "adjust", "\8e\9d\82¿\95¨\88ê\97\97\82Ì\92²\90®",
 #endif
             doorganize, IFBURIED | AUTOCOMPLETE },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('A'), "annotate", "name current level",
 #else
     { M('A'), "annotate", "\8c»\8dÝ\82Ì\8aK\82É\96¼\91O\82ð\82Â\82¯\82é",
@@ -4514,19 +4514,19 @@ struct ext_func_tab extcmdlist[] = {
             dotogglepickup, IFBURIED },
     { 'C', "call", "call (name) something", docallcmd, IFBURIED },
     { 'Z', "cast", "zap (cast) a spell", docast, IFBURIED },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('c'), "chat", "talk to someone", dotalk, IFBURIED | AUTOCOMPLETE },
 #else
     { M('c'), "chat", "\92N\82©\82Æ\98b\82·", dotalk, IFBURIED | AUTOCOMPLETE },
 #endif
     { 'c', "close", "close a door", doclose },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('C'), "conduct", "list voluntary challenges you have maintained",
 #else
     { M('C'), "conduct", "\82Ç\82¤\82¢\82¤\8ds\93®\82ð\82Æ\82Á\82½\82©\8c©\82é",
 #endif
             doconduct, IFBURIED | AUTOCOMPLETE },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('d'), "dip", "dip an object into something", dodip, AUTOCOMPLETE },
 #else
     { M('d'), "dip", "\89½\82©\82É\95¨\82ð\90Z\82·", dodip, AUTOCOMPLETE },
@@ -4536,20 +4536,20 @@ struct ext_func_tab extcmdlist[] = {
     { 'D', "droptype", "drop specific item types", doddrop },
     { 'e', "eat", "eat something", doeat },
     { 'E', "engrave", "engrave writing on the floor", doengrave },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('e'), "enhance", "advance or check weapon and spell skills",
 #else
     { M('e'), "enhance", "\95\90\8aí\8fn\97û\93x\82ð\8d\82\82ß\82é",
 #endif
             enhance_weapon_skill, IFBURIED | AUTOCOMPLETE },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "exploremode", "enter explore (discovery) mode",
 #else
     { '\0', "exploremode", "\92T\8c\9f(\94­\8c©)\83\82\81[\83h\82É\93ü\82é",
 #endif
             enter_explore_mode, IFBURIED },
     { 'f', "fire", "fire ammunition from quiver", dofire },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('f'), "force", "force a lock", doforce, AUTOCOMPLETE },
 #else
     { M('f'), "force", "\8c®\82ð\82±\82\82 \82¯\82é", doforce, AUTOCOMPLETE },
@@ -4564,13 +4564,13 @@ struct ext_func_tab extcmdlist[] = {
     { 'i', "inventory", "show your inventory", ddoinv, IFBURIED },
     { 'I', "inventtype", "inventory specific item types",
             dotypeinv, IFBURIED },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('i'), "invoke", "invoke an object's special powers",
 #else
     { M('i'), "invoke", "\95¨\82Ì\93Á\95Ê\82È\97Í\82ð\8eg\82¤",
 #endif
             doinvoke, IFBURIED | AUTOCOMPLETE },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('j'), "jump", "jump to another location", dojump, AUTOCOMPLETE },
 #else
     { M('j'), "jump", "\91¼\82Ì\88Ê\92u\82É\94ò\82Ñ\82¤\82Â\82é", dojump, AUTOCOMPLETE },
@@ -4580,45 +4580,45 @@ struct ext_func_tab extcmdlist[] = {
             dodiscovered, IFBURIED | GENERALCMD },
     { '`', "knownclass", "show discovered types for one class of objects",
             doclassdisco, IFBURIED | GENERALCMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "levelchange", "change experience level",
 #else
     { '\0', "levelchange", "\8co\8c±\83\8c\83x\83\8b\82ð\95Ï\82¦\82é",
 #endif
             wiz_level_change, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "lightsources", "show mobile light sources",
 #else
     { '\0', "lightsources", "\88Ú\93®\8cõ\8c¹\82ð\8c©\82é",
 #endif
             wiz_light_sources, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
     { ':', "look", "look at what is here", dolook, IFBURIED },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('l'), "loot", "loot a box on the floor", doloot, AUTOCOMPLETE },
 #else
     { M('l'), "loot", "\8f°\82Ì\8fã\82Ì\94 \82ð\8aJ\82¯\82é", doloot, AUTOCOMPLETE },
 #endif
 #ifdef DEBUG_MIGRATING_MONS
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "migratemons", "migrate N random monsters",
 #else
     { '\0', "migratemons", "\83\89\83\93\83_\83\80\82È\89ö\95¨\82ð\89½\91Ì\82©\88Ú\8fZ\82³\82¹\82é",
 #endif
             wiz_migrate_mons, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('m'), "monster", "use monster's special ability",
 #else
     { M('m'), "monster", "\89ö\95¨\82Ì\93Á\95Ê\94\\97Í\82ð\8eg\82¤",
 #endif
             domonability, IFBURIED | AUTOCOMPLETE },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { 'N', "name", "name a monster or an object",
 #else
     { 'N', "name", "\83A\83C\83e\83\80\82â\95¨\82É\96¼\91O\82ð\82Â\82¯\82é",
 #endif
             docallcmd, IFBURIED | AUTOCOMPLETE },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('o'), "offer", "offer a sacrifice to the gods",
 #else
     { M('o'), "offer", "\90_\82É\8b\9f\95¨\82ð\95ù\82°\82é",
@@ -4627,13 +4627,13 @@ struct ext_func_tab extcmdlist[] = {
     { 'o', "open", "open a door", doopen },
     { 'O', "options", "show option settings, possibly change them",
             doset, IFBURIED | GENERALCMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { C('o'), "overview", "show a summary of the explored dungeon",
 #else
     { C('o'), "overview", "\92T\8dõ\82µ\82½\96À\8b{\82Ì\8aT\97v\82ð\95\\8e¦\82·\82é",
 #endif
             dooverview, IFBURIED | AUTOCOMPLETE },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "panic", "test panic routine (fatal to game)",
 #else
     { '\0', "panic", "\83p\83j\83b\83N\83\8b\81[\83`\83\93\82ð\83e\83X\83g\82·\82é(\92v\96½\93I)",
@@ -4641,13 +4641,13 @@ struct ext_func_tab extcmdlist[] = {
             wiz_panic, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
     { 'p', "pay", "pay your shopping bill", dopay },
     { ',', "pickup", "pick up things at the current location", dopickup },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "polyself", "polymorph self",
 #else
     { '\0', "polyself", "\95Ï\89»\82·\82é",
 #endif
             wiz_polyself, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('p'), "pray", "pray to the gods for help",
 #else
     { M('p'), "pray", "\90_\82É\8bF\82é",
@@ -4657,7 +4657,7 @@ struct ext_func_tab extcmdlist[] = {
             doprev_message, IFBURIED | GENERALCMD },
     { 'P', "puton", "put on an accessory (ring, amulet, etc)", doputon },
     { 'q', "quaff", "quaff (drink) something", dodrink },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('q'), "quit", "exit without saving current game",
 #else
     { M('q'), "quit", "\83Z\81[\83u\82µ\82È\82¢\82Å\8fI\97¹",
@@ -4667,19 +4667,19 @@ struct ext_func_tab extcmdlist[] = {
     { 'r', "read", "read a scroll or spellbook", doread },
     { C('r'), "redraw", "redraw screen", doredraw, IFBURIED | GENERALCMD },
     { 'R', "remove", "remove an accessory (ring, amulet, etc)", doremring },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('R'), "ride", "mount or dismount a saddled steed",
 #else
     { M('R'), "ride", "\89ö\95¨\82É\8fæ\82é(\82Ü\82½\82Í\8d~\82è\82é)",
 #endif
             doride, AUTOCOMPLETE },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('r'), "rub", "rub a lamp or a stone", dorub, AUTOCOMPLETE },
 #else
     { M('r'), "rub", "\83\89\83\93\83v\82ð\82±\82·\82é", dorub, AUTOCOMPLETE },
 #endif
     { 'S', "save", "save the game and exit", dosave, IFBURIED | GENERALCMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { 's', "search", "search for traps and secret doors",
             dosearch, IFBURIED, "searching" },
 #else
@@ -4692,7 +4692,7 @@ struct ext_func_tab extcmdlist[] = {
     { ARMOR_SYM, "seearmor", "show the armor currently worn",
             doprarm, IFBURIED },
     { GOLD_SYM, "seegold", "count your gold", doprgold, IFBURIED },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "seenv", "show seen vectors",
 #else
     { '\0', "seenv", "\8e\8b\90ü\83x\83N\83g\83\8b\82ð\8c©\82é",
@@ -4713,12 +4713,12 @@ struct ext_func_tab extcmdlist[] = {
                        | CMD_NOT_AVAILABLE
 #endif /* SHELL */
     },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('s'), "sit", "sit down", dosit, AUTOCOMPLETE },
 #else
     { M('s'), "sit", "\8dÀ\82é", dosit, AUTOCOMPLETE },
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "stats", "show memory statistics",
 #else
     { '\0', "stats", "\83\81\83\82\83\8a\8fó\91Ô\82ð\8c©\82é",
@@ -4734,7 +4734,7 @@ struct ext_func_tab extcmdlist[] = {
     { 'T', "takeoff", "take off one piece of armor", dotakeoff },
     { 'A', "takeoffall", "remove all armor", doddoremarm },
     { C('t'), "teleport", "teleport around the level", dotelecmd, IFBURIED },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "terrain", "show map without obstructions",
 #else
     { '\0', "terrain", "\8e×\96\82\82³\82ê\82¸\82É\92n\90}\82ð\8c©\82é",
@@ -4744,56 +4744,56 @@ struct ext_func_tab extcmdlist[] = {
             "menu of commands you can do from here to adjacent spot",
             dotherecmdmenu },
     { 't', "throw", "throw something", dothrow },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "timeout", "look at timeout queue and hero's timed intrinsics",
 #else
     { '\0', "timeout", "\8e\9e\8aÔ\90Ø\82ê\83L\83\85\81[\82Æ\83v\83\8c\83C\83\84\81[\82Ì\8e\9e\8aÔ\8co\89ß\82ð\8c©\82é",
 #endif
             wiz_timeout_queue, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('T'), "tip", "empty a container", dotip, AUTOCOMPLETE },
 #else
     { M('T'), "tip", "\93ü\82ê\95¨\82ð\8bó\82É\82·\82é", dotip, AUTOCOMPLETE },
 #endif
     { '_', "travel", "travel to a specific location on the map", dotravel },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('t'), "turn", "turn undead away", doturn, IFBURIED | AUTOCOMPLETE },
 #else
     { M('t'), "turn", "\83A\83\93\83f\83b\83g\82ð\93y\82É\95Ô\82·", doturn, IFBURIED | AUTOCOMPLETE },
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { 'X', "twoweapon", "toggle two-weapon combat",
 #else
     { 'X', "twoweapon", "\97¼\8eè\8e\9d\82¿\82Ì\90Ø\82è\91Ö\82¦",
 #endif
             dotwoweapon, AUTOCOMPLETE },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('u'), "untrap", "untrap something", dountrap, AUTOCOMPLETE },
 #else
     { M('u'), "untrap", "ã©\82ð\82Í\82¸\82·", dountrap, AUTOCOMPLETE },
 #endif
     { '<', "up", "go up a staircase", doup },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "vanquished", "list vanquished monsters",
 #else
     { '\0', "vanquished", "\93|\82µ\82½\89ö\95¨\82Ì\88ê\97\97\82ð\8c©\82é",
 #endif
             dovanquished, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
     { M('v'), "version",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             "list compile time options for this version of NetHack",
 #else
             "\83R\83\93\83p\83C\83\8b\8e\9e\82Ì\83I\83v\83V\83\87\83\93\82ð\95\\8e¦\82·\82é",
 #endif
             doextversion, IFBURIED | AUTOCOMPLETE | GENERALCMD },
     { 'v', "versionshort", "show version", doversion, IFBURIED | GENERALCMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "vision", "show vision array",
 #else
     { '\0', "vision", "\8e\8b\8aE\94z\97ñ\82ð\8c©\82é",
 #endif
             wiz_show_vision, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '.', "wait", "rest one move while doing nothing",
             donull, IFBURIED, "waiting" },
 #else
@@ -4805,13 +4805,13 @@ struct ext_func_tab extcmdlist[] = {
     { '/', "whatis", "show what type of thing a symbol corresponds to",
             dowhatis, IFBURIED | GENERALCMD },
     { 'w', "wield", "wield (put in use) a weapon", dowield },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { M('w'), "wipe", "wipe off your face", dowipe, AUTOCOMPLETE },
 #else
     { M('w'), "wipe", "\8aç\82ð\90@\82¤", dowipe, AUTOCOMPLETE },
 #endif
 #ifdef DEBUG
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "wizbury", "bury objs under and around you",
 #else
     { '\0', "wizbury", "\95¨\82ð\82 \82È\82½\82Ì\8eü\82è\82É\96\84\82ß\82é",
@@ -4832,13 +4832,13 @@ struct ext_func_tab extcmdlist[] = {
             wiz_makemap, IFBURIED | WIZMODECMD },
     { C('f'), "wizmap", "map the level",
             wiz_map, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "wizrumorcheck", "verify rumor boundaries",
 #else
     { '\0', "wizrumorcheck", "\89\\82Ì\8b«\8aE\82ð\8c\9f\8fØ\82·\82é",
 #endif
             wiz_rumor_check, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "wizsmell", "smell monster",
 #else
     { '\0', "wizsmell", "\89ö\95¨\82Ì\93õ\82¢\82ð\9ak\82®",
@@ -4848,7 +4848,7 @@ struct ext_func_tab extcmdlist[] = {
             wiz_where, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
     { C('w'), "wizwish", "wish for something",
             wiz_wish, IFBURIED | AUTOCOMPLETE | WIZMODECMD },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { '\0', "wmode", "show wall modes",
 #else
     { '\0', "wmode", "\95Ç\83\82\81[\83h\82ð\8c©\82é",
@@ -6505,7 +6505,7 @@ const char *msg;
         }
     }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(buf, "Valid direction keys%s%s%s are:",
             prefixhandling ? " to " : "", prefixhandling ? dothat : "",
             NODIAG(u.umonnum) ? " in your current form" : "");
index 3311680..d94c0bc 100644 (file)
@@ -459,7 +459,7 @@ int xkill_flags, how;
             /* So, you didn't die */
             if (!e_survives_at(etmp, etmp->ex, etmp->ey)) {
                 if (enexto(&xy, etmp->ex, etmp->ey, etmp->edata)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("A %s force teleports you away...",
                           Hallucination ? "normal" : "strange");
 #else
@@ -595,7 +595,7 @@ struct entity *etmp;
 
     if (automiss(etmp) && e_survives_at(etmp, oldx, oldy)) {
         if (e_inview && (at_portcullis || IS_DRAWBRIDGE(crm->typ)))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("%s passes through %s!",
                       at_portcullis ? "portcullis" : "drawbridge",
                       e_nam(etmp));
index 8d79b61..12c3a66 100644 (file)
@@ -218,7 +218,7 @@ NEARDATA struct mvitals mvitals[NUMMONS];
 NEARDATA long domove_attempting = 0L;
 NEARDATA long domove_succeeded = 0L;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 NEARDATA struct c_color_names c_color_names = {
     "black",  "amber", "golden", "light blue", "red",   "green",
     "silver", "blue",  "purple", "white",      "orange"
@@ -233,7 +233,7 @@ NEARDATA struct c_color_names c_color_names = {
 struct menucoloring *menu_colorings = NULL;
 
 const char *c_obj_colors[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "black",          /* CLR_BLACK */
     "red",            /* CLR_RED */
     "green",          /* CLR_GREEN */
@@ -270,7 +270,7 @@ const char *c_obj_colors[] = {
 #endif
 };
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 struct c_common_strings c_common_strings = { "Nothing happens.",
                                              "That's enough tries!",
                                              "That is a silly thing to %s.",
@@ -296,7 +296,7 @@ struct c_common_strings c_common_strings = { "
 
 /* NOTE: the order of these words exactly corresponds to the
    order of oc_material values #define'd in objclass.h. */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 const char *materialnm[] = { "mysterious", "liquid",  "wax",        "organic",
                              "flesh",      "paper",   "cloth",      "leather",
                              "wooden",     "bone",    "dragonhide", "iron",
index 997daeb..0571755 100644 (file)
@@ -373,7 +373,7 @@ register struct obj *sobj;
 */
                    "\82 \82È\82½\82Í\8f«\97\88\82Ì\8co\8dÏ\8fó\8bµ\82ª\90S\94z\82É\82È\82Á\82½\81D");
             else if (steedgold)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(buf, "You feel interested in %s financial situation.",
                         s_suffix(x_monnam(u.usteed,
                                           u.usteed->mtame ? ARTICLE_YOUR
@@ -605,7 +605,7 @@ register struct obj *sobj;
         }
         if (sobj) {
             if (sobj->blessed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("%s %s to tingle and you smell %s.", body_part(NOSE),
                      u.uedibility ? "continues" : "starts", what);
 #else
@@ -1374,7 +1374,7 @@ struct obj **optr;
                 You("\8cu\8cõ\8aâ\82Ì\8fã\82ð\8bà\8b\9b\82ª\89j\82¢\82Å\82¢\82é\82Ì\82ð\8c©\82½\81D");
                 break;
             case 5:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_see(
                     "tiny snowflakes spinning around a miniature farmhouse.");
 #else
@@ -1536,7 +1536,7 @@ do_mapping()
     if (!level.flags.hero_memory || unconstrained) {
         flush_screen(1);                 /* flush temp screen */
         /* browse_map() instead of display_nhwindow(WIN_MAP, TRUE) */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         browse_map(TER_DETECT | TER_MAP | TER_TRP | TER_OBJ,
                    "anything of interest");
 #else
@@ -1771,7 +1771,7 @@ genericptr_t num;
 */
                 b_trapped("\94à", 0);
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Norep("You %s an explosion!",
                       cansee(zx, zy) ? "see" : (!Deaf ? "hear"
                                                       : "feel the shock of"));
@@ -1913,7 +1913,7 @@ boolean via_warning;
         if (mtmp->mundetected
             && (is_hider(mtmp->data) || mtmp->data->mlet == S_EEL)) {
             if (via_warning) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("warning senses cause you to take a second %s.",
                      Blind ? "to check nearby" : "look close by");
 #else
index f8009e3..57f5b98 100644 (file)
--- a/src/dig.c
+++ b/src/dig.c
@@ -108,7 +108,7 @@ register boolean rockit;
 */
         pline("\82°\82°\82ñ\81I\82 \82È\82½\82Ì\82Ü\82í\82è\82Ì\93V\88ä\82ª\95ö\82ê\82½\81I");
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("A mysterious force %s cave around you!",
               (levl[u.ux][u.uy].typ == CORR) ? "creates a" : "extends the");
 #else
@@ -311,7 +311,7 @@ dig(VOID_ARGS)
         }
         if (IS_ROCK(lev->typ) && !may_dig(dpx, dpy)
             && dig_typ(uwep, dpx, dpy) == DIGTYP_ROCK) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("This %s is too hard to %s.",
                   is_db_wall(dpx, dpy) ? "drawbridge" : "wall", verb);
 #else
@@ -406,7 +406,7 @@ dig(VOID_ARGS)
                 You("hit yourself in the %s.", body_part(FOOT));
 */
                 pline("%s\82É\93\96\82½\82Á\82½\81D", body_part(FOOT));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(kbuf, "chopping off %s own %s", uhis(),
                         body_part(FOOT));
 #else
@@ -415,7 +415,7 @@ dig(VOID_ARGS)
 #endif
                 losehp(Maybe_Half_Phys(dmg), kbuf, KILLED_BY);
             } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("destroy the bear trap with %s.",
                     yobjnam(uwep, (const char *) 0));
 #else
@@ -780,7 +780,7 @@ int ttyp;
         } else if (mtmp) {
             if (is_flyer(mtmp->data) || is_floater(mtmp->data)) {
                 if (canseemon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s over the pit.", Monnam(mtmp),
                           (is_flyer(mtmp->data)) ? "flies" : "floats");
 #else
@@ -1011,7 +1011,7 @@ coord *cc;
     } else if ((boulder_here = sobj_at(BOULDER, dig_x, dig_y)) != 0) {
         if (ttmp && is_pit(ttmp->ttyp)
             && rn2(2)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("boulder settles into the %spit.",
                       (dig_x != u.ux || dig_y != u.uy) ? "adjacent " : "");
 #else
@@ -1047,7 +1047,7 @@ coord *cc;
              * We can't dig a hole here since that will destroy
              * the drawbridge.  The following is a cop-out. --dlc
              */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("%s %shere is too hard to dig in.",
                       surface(dig_x, dig_y),
                       (dig_x != u.ux || dig_y != u.uy) ? "t" : "");
@@ -1087,7 +1087,7 @@ coord *cc;
         lev->flags = 0;
         if (typ != ROOM) {
             lev->typ = typ;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             liquid_flow(dig_x, dig_y, typ, ttmp,
                         "As you dig, the hole fills with %s!");
 #else
@@ -1432,7 +1432,7 @@ struct obj *obj;
                 }
             } else if (u.utrap && u.utraptype == TT_PIT
                        && (trap_with_u = t_at(u.ux, u.uy)) != 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("swing %s, but the rubble has no place to go.",
                     yobjnam(obj, (char *) 0));
 #else
@@ -1812,7 +1812,7 @@ zap_dig()
 
         if (!is_whirly(mtmp->data)) {
             if (is_animal(mtmp->data))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("pierce %s %s wall!", s_suffix(mon_nam(mtmp)),
                     mbodypart(mtmp, STOMACH));
 #else
@@ -1830,7 +1830,7 @@ zap_dig()
             if (u.dz < 0 || On_stairs(u.ux, u.uy)) {
                 int dmg;
                 if (On_stairs(u.ux, u.uy))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline_The("beam bounces off the %s and hits the %s.",
                               (u.ux == xdnladder || u.ux == xupladder)
                                   ? "ladder"
@@ -2150,7 +2150,7 @@ char *msg;
             supporting = "\92µ\82Ë\8b´";
 
         if (supporting) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(msg, "The %s%ssupporting structures remain intact.",
                     supporting ? s_suffix(supporting) : "",
                     supporting ? " " : "");
@@ -2405,7 +2405,7 @@ int x, y;
     newsym(x, y);
 
     if (costly && loss) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("owe %s %ld %s for burying merchandise.", mon_nam(shkp), loss,
             currency(loss));
 #else
@@ -2613,7 +2613,7 @@ escape_tomb()
             || (unsolid(youmonst.data)
                 && youmonst.data != &mons[PM_WATER_ELEMENTAL])
             || (tunnels(youmonst.data) && !needspick(youmonst.data))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s up through the %s.",
                 (tunnels(youmonst.data) && !needspick(youmonst.data))
                    ? "try to tunnel"
index 52d6ccf..085eb72 100644 (file)
--- a/src/do.c
+++ b/src/do.c
@@ -88,7 +88,7 @@ boolean pushing;
                 Strcpy(whobuf, "\82 \82È\82½");
                 if (u.usteed)
                     Strcpy(whobuf, y_monnam(u.usteed));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s %s into the %s.", upstart(whobuf),
                       vtense(whobuf, "push"), the(xname(otmp)), what);
 #else
@@ -106,7 +106,7 @@ boolean pushing;
         if (!fills_up || !pushing) { /* splashing occurs */
             if (!u.uinwater) {
                 if (pushing ? !Blind : cansee(rx, ry)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     There("is a large splash as %s %s the %s.",
                           the(xname(otmp)), fills_up ? "fills" : "falls into",
                           what);
@@ -201,7 +201,7 @@ const char *verb;
         if (((mtmp = m_at(x, y)) && mtmp->mtrapped)
             || (u.utrap && u.ux == x && u.uy == y)) {
             if (*verb && (cansee(x, y) || distu(x, y) == 0))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s boulder %s into the pit%s.",
                       Blind ? "A" : "The",
                       vtense((const char *) 0, verb),
@@ -229,7 +229,7 @@ const char *verb;
                         mtmp->mhp -= damage;
                         if (DEADMONSTER(mtmp)) {
                             if (canspotmon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                                 pline("%s is %s!", Monnam(mtmp),
                                       (nonliving(mtmp->data)
                                        || is_vampshifter(mtmp))
@@ -270,7 +270,7 @@ const char *verb;
 */
                 You_hear("\91«\8c³\82Å\89½\82©\82ª\8dÓ\82¯\82é\89¹\82ð\95·\82¢\82½\81D");
             } else if (!Blind && cansee(x, y)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline_The("boulder %s%s.",
                           (ttyp == TRAPDOOR && !tseen)
                               ? "triggers and " : "",
@@ -371,7 +371,7 @@ register struct obj *obj;
     }
 
     if (obj->blessed || obj->cursed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         There("is %s flash as %s %s the altar.",
               an(hcolor(obj->blessed ? NH_AMBER : NH_BLACK)), doname(obj),
               otense(obj, "hit"));
@@ -609,7 +609,7 @@ register struct obj *obj;
             if (otmp != uball && otmp != uchain
                 && !obj_resists(otmp, 1, 99)) {
                 if (!Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("Suddenly, %s %s from the sink!", doname(otmp),
                           otense(otmp, "vanish"));
 #else
@@ -676,7 +676,7 @@ register struct obj *obj;
             pline("\8ew\97Ö\82ª\94r\90\85\8cû\82ð\82·\82é\82è\82Æ\94ð\82¯\82é\82Ì\82ð\8c©\82½\81I");
             break;
         case RIN_SEE_INVISIBLE:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_see("some %s in the sink.",
                     Hallucination ? "oxygen molecules" : "air");
 #else
@@ -794,7 +794,7 @@ const char *word;
             if (!strcmp(word, "throw") && obj->quan > 1L)
                 obj->corpsenm = 1;
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("For some reason, you cannot %s%s the stone%s!", word,
                   obj->corpsenm ? " any of" : "", plur(obj->quan));
 #else
@@ -858,7 +858,7 @@ register struct obj *obj;
             /* doname can call s_suffix, reusing its buffer */
             Strcpy(monbuf, s_suffix(mon_nam(u.ustuck)));
             onam_p = is_unpaid(obj) ? yobjnam(obj, (char *) 0) : doname(obj);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("drop %s into %s %s.", onam_p, monbuf,
                 mbodypart(u.ustuck, STOMACH));
 #else
@@ -1136,7 +1136,7 @@ int retry;
         bypass_objlist(invent, FALSE);
     } else {
         /* should coordinate with perm invent, maybe not show worn items */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         n = query_objlist("What would you like to drop?", &invent,
                           (USE_INVLET | INVORDER_SORT), &pick_list, PICK_ANY,
                           all_categories ? allow_all : allow_category);
@@ -1255,7 +1255,7 @@ dodown()
 */
             You("%s\82Ì\92\86\82É\95\82\82¢\82Ä\82¢\82é\81D", surface(u.ux, u.uy));
         else if (Is_waterlevel(&u.uz))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are floating in %s.",
                 is_pool(u.ux, u.uy) ? "the water" : "a bubble of air");
 #else
@@ -1347,7 +1347,7 @@ dodown()
         if (youmonst.data->msize >= MZ_HUGE) {
             char qbuf[QBUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("don't fit %s easily.", down_or_thru);
             Sprintf(qbuf, "Try to squeeze %s?", down_or_thru);
 #else
@@ -1379,7 +1379,7 @@ dodown()
                 return 0;
             }
         }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%s %s the %s.", actn, down_or_thru,
             trap->ttyp == HOLE ? "hole" : "trap door");
 #else
@@ -1424,7 +1424,7 @@ doup()
         return 0;
     }
     if (u.ustuck) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("are %s, and cannot go up.",
             !u.uswallow ? "being held" : is_animal(u.ustuck->data)
                                              ? "swallowed"
@@ -1439,7 +1439,7 @@ doup()
     }
     if (near_capacity() > SLT_ENCUMBER) {
         /* No levitation check; inv_weight() already allows for it */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("load is too heavy to climb the %s.",
              levl[u.ux][u.uy].typ == STAIRS ? "stairs" : "ladder");
 #else
@@ -1880,7 +1880,7 @@ boolean at_stairs, falling, portal;
                 selftouch("\97\8e\82¿\82È\82ª\82ç\81C\82 \82È\82½\82Í");
             } else { /* ordinary descent */
                 if (flags.verbose)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("%s.", at_ladder ? "climb down the ladder"
                                          : "descend the stairs");
 #else
@@ -1990,7 +1990,7 @@ boolean at_stairs, falling, portal;
             "You feel like you've been here before.",
 */
             "\91O\82É\82±\82±\82É\97\88\82½\82±\82Æ\82ª\82 \82é\82æ\82¤\82È\8bC\82ª\82µ\82½\81D",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             "This place %s familiar...", 0 /* no message */
 #else
             "\82±\82Ì\8fê\8f\8a\82Í\89ù\82©\82µ\82¢\81D\81D\81D", 0 /* no message */
@@ -2005,7 +2005,7 @@ boolean at_stairs, falling, portal;
             "You are surrounded by twisty little passages, all alike.",
 */
             "\82 \82È\82½\82Í\82Ü\82ª\82è\82­\82Ë\82Á\82½\92Ê\98H\82É\82©\82±\82Ü\82ê\82Ä\82¢\82½\81D\81D\81D",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             "Gee, this %s like uncle Conan's place...", 0 /* no message */
 #else
             "\83Q\81[\81I\83R\83i\83\93\82¨\82\82³\82ñ\82Ì\8fê\8f\8a\82É\8e\97\82Ä\82¢\82é\81D\81D\81D", 0 /* no message */
@@ -2199,7 +2199,7 @@ struct obj *corpse;
     where = corpse->where;
     is_uwep = (corpse == uwep);
     chewed = (corpse->oeaten != 0);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Strcpy(cname, corpse_xname(corpse,
                                chewed ? "bite-covered" : (const char *) 0,
                                CXN_SINGULAR));
@@ -2239,7 +2239,7 @@ struct obj *corpse;
 
         case OBJ_FLOOR:
             if (cansee(mtmp->mx, mtmp->my))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s rises from the dead!",
                       chewed ? Adjmonnam(mtmp, "bite-covered")
                              : Monnam(mtmp));
@@ -2253,7 +2253,7 @@ struct obj *corpse;
         case OBJ_MINVENT: /* probably a nymph's */
             if (cansee(mtmp->mx, mtmp->my)) {
                 if (canseemon(mcarry))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("Startled, %s drops %s as it revives!",
                           mon_nam(mcarry), an(cname));
 #else
@@ -2261,7 +2261,7 @@ struct obj *corpse;
                           cname, mon_nam(mcarry), cname);
 #endif
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s suddenly appears!",
                           chewed ? Adjmonnam(mtmp, "bite-covered")
                                  : Monnam(mtmp));
@@ -2284,7 +2284,7 @@ struct obj *corpse;
                       yname(container));
             } else if (container_where == OBJ_INVENT && container) {
                 Strcpy(sackname, an(xname(container)));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s out of %s in your pack!",
                       Blind ? Something : Amonnam(mtmp),
                       locomotion(mtmp->data, "writhes"), sackname);
@@ -2339,13 +2339,13 @@ long timeout UNUSED;
 */
                 pline("%s\82Í\8fÁ\82¦\82½\81D", monname);
             else if (!notice_it && canseemon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s appears.", Monnam(mtmp)); /* not pre-rloc monname */
 #else
                 pline("%s\82ª\8c»\82ê\82½\81D", Monnam(mtmp)); /* not pre-rloc monname */
 #endif
             else if (notice_it && dist2(mtmp->mx, mtmp->my, x, y) > 2)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s teleports.", monname); /* saw it and still see it */
 #else
                 pline("%s\82Í\8fu\8aÔ\88Ú\93®\82µ\82½\81D", monname); /* saw it and still see it */
@@ -2475,7 +2475,7 @@ int how; /* 0: ordinary, 1: dismounting steed, 2: limbs turn to stone */
            before the final stages and that calls us (how==2) to cure
            wounded legs, but we want to suppress the feel better message */
         if (!u.usteed && how != 2) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             const char *legs = body_part(LEG);
 
             if ((EWounded_legs & BOTH_SIDES) == BOTH_SIDES)
index a1b6032..d93cbf8 100644 (file)
@@ -61,7 +61,7 @@ boolean FDECL((*gp_getvalidf), (int, int));
   [2] "use XXX to move the cursor to %s"
   */
 static const char *const gloc_descr[NUM_GLOCS][4] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { "any monsters", "monster", "next/previous monster", "monsters" },
     { "any items", "item", "next/previous object", "objects" },
     { "any doors", "door", "next/previous door or doorway", "doors or doorways" },
@@ -82,7 +82,7 @@ static const char *const gloc_descr[NUM_GLOCS][4] = {
 };
 
 static const char *const gloc_filtertxt[NUM_GFILTER] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "",
     " in view",
     " in this area"
@@ -102,7 +102,7 @@ int gloc;
 {
     char sbuf[BUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(sbuf, "Use '%s'/'%s' to %s%s%s.",
             k1, k2,
             iflags.getloc_usemenu ? "get a menu of "
@@ -126,7 +126,7 @@ getpos_help(force, goal)
 boolean force;
 const char *goal;
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     static const char *const fastmovemode[2] = { "8 units at a time",
                                                  "skipping same glyphs" };
 #else
@@ -137,7 +137,7 @@ const char *goal;
     boolean doing_what_is;
     winid tmpwin = create_nhwindow(NHW_MENU);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(sbuf,
             "Use '%c', '%c', '%c', '%c' to move the cursor to %s.", /* hjkl */
             Cmd.move_W, Cmd.move_S, Cmd.move_N, Cmd.move_E, goal);
@@ -147,7 +147,7 @@ const char *goal;
             Cmd.move_W, Cmd.move_S, Cmd.move_N, Cmd.move_E, goal);
 #endif
     putstr(tmpwin, 0, sbuf);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(sbuf,
             "Use 'H', 'J', 'K', 'L' to fast-move the cursor, %s.",
             fastmovemode[iflags.getloc_moveskip]);
@@ -161,7 +161,7 @@ const char *goal;
     putstr(tmpwin, 0, "Or enter a background symbol (ex. '<').");
 */
     putstr(tmpwin, 0, "\94w\8ci\82Ì\83V\83\93\83{\83\8b\82ð\93ü\97Í\82·\82é\82Æ\82»\82Ì\88Ê\92u\82É\88Ú\93®\82·\82é(\97á\81F'<')\81D");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(sbuf, "Use '%s' to move the cursor on yourself.",
            visctrl(Cmd.spkeys[NHKF_GETPOS_SELF]));
 #else
@@ -197,7 +197,7 @@ const char *goal;
                              visctrl(Cmd.spkeys[NHKF_GETPOS_INTERESTING_PREV]),
                              GLOC_INTERESTING);
     }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(sbuf, "Use '%s' to change fast-move mode to %s.",
             visctrl(Cmd.spkeys[NHKF_GETPOS_MOVESKIP]),
             fastmovemode[!iflags.getloc_moveskip]);
@@ -208,7 +208,7 @@ const char *goal;
 #endif
     putstr(tmpwin, 0, sbuf);
     if (!iflags.terrainmode || (iflags.terrainmode & TER_DETECT) == 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(sbuf, "Use '%s' to toggle menu listing for possible targets.",
                 visctrl(Cmd.spkeys[NHKF_GETPOS_MENU]));
 #else
@@ -216,7 +216,7 @@ const char *goal;
                 visctrl(Cmd.spkeys[NHKF_GETPOS_MENU]));
 #endif
         putstr(tmpwin, 0, sbuf);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(sbuf,
                 "Use '%s' to change the mode of limiting possible targets.",
                 visctrl(Cmd.spkeys[NHKF_GETPOS_LIMITVIEW]));
@@ -231,7 +231,7 @@ const char *goal;
         char kbuf[BUFSZ];
 
         if (getpos_getvalid) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(sbuf, "Use '%s' or '%s' to move to valid locations.",
                     visctrl(Cmd.spkeys[NHKF_GETPOS_VALID_NEXT]),
                     visctrl(Cmd.spkeys[NHKF_GETPOS_VALID_PREV]));
@@ -261,7 +261,7 @@ const char *goal;
 #endif
         putstr(tmpwin, 0, sbuf);
         if (iflags.cmdassist) { /* assisting the '/' command, I suppose... */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(sbuf,
                     (iflags.getpos_coords == GPCOORDS_NONE)
          ? "(Set 'whatis_coord' option to include coordinates with '%s' text.)"
@@ -279,7 +279,7 @@ const char *goal;
            getpos call, but only matter for dowhatis (and doquickwhatis) */
         doing_what_is = (goal == what_is_an_unknown_object);
         if (doing_what_is) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(kbuf, "'%s' or '%s' or '%s' or '%s'",
                     visctrl(Cmd.spkeys[NHKF_GETPOS_PICK]),
                     visctrl(Cmd.spkeys[NHKF_GETPOS_PICK_Q]),
@@ -612,7 +612,7 @@ boolean fulldir;
         Sprintf(buf, "%s", directionname(dst));
     } else {
         static const char *dirnames[4][2] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             { "n", "north" },
             { "s", "south" },
             { "w", "west" },
@@ -701,7 +701,7 @@ int cx, cy;
     if (do_screen_description(cc, TRUE, sym, tmpbuf, &firstmatch,
                               (struct permonst **) 0)) {
         (void) coord_desc(cx, cy, tmpbuf, iflags.getpos_coords);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         custompline(SUPPRESS_HISTORY,
                     "%s%s%s%s%s", firstmatch, *tmpbuf ? " " : "", tmpbuf,
                     (iflags.autodescribe
@@ -740,7 +740,7 @@ int gloc;
 
     if (gcount < 2) { /* gcount always includes the hero */
         free((genericptr_t) garr);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("cannot %s %s.",
             iflags.getloc_filter == GFILTER_VIEW ? "see" : "detect",
             gloc_descr[gloc][0]);
@@ -858,7 +858,7 @@ const char *goal;
 */
         goal = "\96Ú\93I\92n";
     if (flags.verbose) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("(For instructions type a '%s')",
               visctrl(Cmd.spkeys[NHKF_GETPOS_HELP]));
 #else
@@ -1005,7 +1005,7 @@ const char *goal;
             goto nxtc;
         } else if (c == Cmd.spkeys[NHKF_GETPOS_LIMITVIEW]) {
             static const char *const view_filters[NUM_GFILTER] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 "Not limiting targets",
                 "Limiting targets to those in sight",
                 "Limiting targets to those in same area"
@@ -1055,7 +1055,7 @@ const char *goal;
             goto nxtc;
         } else if (c == Cmd.spkeys[NHKF_GETPOS_MOVESKIP]) {
             iflags.getloc_moveskip = !iflags.getloc_moveskip;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%skipping over similar terrain when fastmoving the cursor.",
                   iflags.getloc_moveskip ? "S" : "Not s");
 #else
@@ -1168,7 +1168,7 @@ const char *goal;
 */
                         Strcpy(note, "\92\86\92f\82µ\82½");
                     else /* hjkl */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         Sprintf(note, "use '%c', '%c', '%c', '%c' or '%s'",
                                 Cmd.move_W, Cmd.move_S, Cmd.move_N, Cmd.move_E,
                                 visctrl(Cmd.spkeys[NHKF_GETPOS_PICK]));
@@ -1342,7 +1342,7 @@ char *monnambuf, *usrbuf;
         /* catch trying to name "the {priest,Angel} of Crom" as "Crom" */
         || ((p = strstri(monnambuf, " of ")) != 0
             && fuzzymatch(usrbuf, p + 4, " -_", TRUE))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s is already called %s.",
               upstart(strcpy(pronounbuf, mhe(mtmp))), monnambuf);
 #else
@@ -1481,7 +1481,7 @@ register struct obj *obj;
         return;
     }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(qbuf, "What do you want to name %s ",
             is_plural(obj) ? "these" : "this");
     (void) safe_qbuf(qbuf, qbuf, "?", obj, xname, simpleonames, "item");
@@ -1784,7 +1784,7 @@ struct obj *obj;
         Sprintf(qbuf, "%s\89t\91Ì:",
                 OBJ_DESCR(objects[obj->otyp]));
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         (void) safe_qbuf(qbuf, "Call ", ":", obj,
                          docall_xname, simpleonames, "thing");
 #else
@@ -1832,7 +1832,7 @@ namefloorobj()
     /* "dot for under/over you" only makes sense when the cursor hasn't
        been moved off the hero's '@' yet, but there's no way to adjust
        the help text once getpos() has started */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(buf, "object on map (or '.' for one %s you)",
             (u.uundetected && hides_under(youmonst.data)) ? "over" : "under");
 #else
@@ -1850,7 +1850,7 @@ namefloorobj()
     }
     if (!obj) {
         /* "under you" is safe here since there's no object to hide under */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("There doesn't seem to be any object %s.",
               (cc.x == u.ux && cc.y == u.uy) ? "under you" : "there");
 #else
@@ -2343,7 +2343,7 @@ char *outbuf;
        its own obfuscation) */
     if (mon->data == &mons[PM_HIGH_PRIEST] && !Hallucination
         && Is_astralevel(&u.uz) && distu(mon->mx, mon->my) > 2) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Strcpy(outbuf, article == ARTICLE_THE ? "the " : "");
         Strcat(outbuf, mon->female ? "high priestess" : "high priest");
 #else
@@ -2433,7 +2433,7 @@ roguename()
 }
 
 static NEARDATA const char *const hcolors[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "ultraviolet", "infrared", "bluish-orange", "reddish-green", "dark white",
     "light black", "sky blue-pink", "salty", "sweet", "sour", "bitter",
     "striped", "spiral", "swirly", "plaid", "checkered", "argyle", "paisley",
@@ -2476,7 +2476,7 @@ rndcolor()
 }
 
 static NEARDATA const char *const hliquids[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "yoghurt", "oobleck", "clotted blood", "diluted water", "purified water",
     "instant coffee", "tea", "herbal infusion", "liquid rainbow",
     "creamy foam", "mulled wine", "bouillon", "nectar", "grog", "flubber",
index f7d3fd1..caa4293 100644 (file)
@@ -14,7 +14,7 @@
 static NEARDATA const char see_yourself[] = "see yourself";
 #endif
 static NEARDATA const char unknown_type[] = "Unknown type of %s (%d)";
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 static NEARDATA const char c_armor[] = "armor", c_suit[] = "suit",
                            c_shirt[] = "shirt", c_cloak[] = "cloak",
                            c_gloves[] = "gloves", c_boots[] = "boots",
@@ -185,7 +185,7 @@ boolean on;
                 || Detect_monsters))) {
         makeknown(obj->otyp);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_feel("that monsters%s have difficulty pinpointing your location.",
                  on ? "" : " no longer");
 #else
@@ -225,7 +225,7 @@ Boots_on(VOID_ARGS)
         /* though not better than potion speed */
         if (!oldprop && !(HFast & TIMEOUT)) {
             makeknown(uarmf->otyp);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_feel("yourself speed up%s.",
                      (oldprop || HFast) ? " a bit more" : "");
 #else
@@ -347,7 +347,7 @@ Cloak_on(VOID_ARGS)
         /* Note: it's already being worn, so we have to cheat here. */
         if ((HInvis || EInvis) && !Blind) {
             newsym(u.ux, u.uy);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("can %s!", See_invisible ? "no longer see through yourself"
                                          : see_yourself);
 #else
@@ -363,7 +363,7 @@ Cloak_on(VOID_ARGS)
         if (!oldprop && !HInvis && !Blind) {
             makeknown(uarmc->otyp);
             newsym(u.ux, u.uy);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Suddenly you can%s yourself.",
                   See_invisible ? " see through" : "not see");
 #else
@@ -417,7 +417,7 @@ Cloak_off(VOID_ARGS)
     case MUMMY_WRAPPING:
         if (Invis && !Blind) {
             newsym(u.ux, u.uy);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("can %s.", See_invisible ? "see through yourself"
                                          : "no longer see yourself");
 #else
@@ -430,7 +430,7 @@ Cloak_off(VOID_ARGS)
         if (!oldprop && !HInvis && !Blind) {
             makeknown(CLOAK_OF_INVISIBILITY);
             newsym(u.ux, u.uy);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Suddenly you can %s.",
                   See_invisible ? "no longer see through yourself"
                                 : see_yourself);
@@ -494,7 +494,7 @@ Helmet_on(VOID_ARGS)
 */
                 pline("%s\82Í\88ê\8fu\90k\82¦\82½\81D", xname(uarmh));
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s for a moment.", Tobjnam(uarmh, "glow"),
                       hcolor(NH_BLACK));
 #else
@@ -505,13 +505,13 @@ Helmet_on(VOID_ARGS)
         }
         context.botl = 1; /* reveal new alignment or INT & WIS */
         if (Hallucination) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("My brain hurts!"); /* Monty Python's Flying Circus */
 #else
             pline("\82Ì\81[\82Ý\82»\83o\81[\83\93\81I"); /*\83\82\83\93\83e\83B\83p\83C\83\\83\93\82Æ\82Í\82¿\82å\82Á\82Æ\88á\82¤\82¯\82Ç*/
 #endif
         } else if (uarmh && uarmh->otyp == DUNCE_CAP) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_feel("%s.", /* track INT change; ignore WIS */
                      ACURR(A_INT)
                              <= (ABASE(A_INT) + ABON(A_INT) + ATEMP(A_INT))
@@ -622,7 +622,7 @@ boolean voluntary; /* taking gloves off on purpose? */
         return;
 
     if (touch_petrifies(&mons[obj->corpsenm]) && !Stone_resistance) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("now wield %s in your bare %s.",
             corpse_xname(obj, (const char *) 0, CXN_ARTICLE),
             makeplural(body_part(HAND)));
@@ -631,7 +631,7 @@ boolean voluntary; /* taking gloves off on purpose? */
             corpse_xname(obj, (const char *) 0, CXN_ARTICLE),
             body_part(HAND));
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(kbuf, "%s gloves while wielding %s",
                 voluntary ? "removing" : "losing", killer_xname(obj));
 #else
@@ -840,7 +840,7 @@ Amulet_on()
         /* Don't use same message as polymorph */
         if (orig_sex != poly_gender()) {
             makeknown(AMULET_OF_CHANGE);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are suddenly very %s!",
                 flags.female ? "feminine" : "masculine");
 #else
@@ -915,7 +915,7 @@ Amulet_off()
             setworn((struct obj *) 0, W_AMUL);
             if (!breathless(youmonst.data) && !amphibious(youmonst.data)
                 && !Swimming) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("suddenly inhale an unhealthy amount of %s!",
                     hliquid("water"));
 #else
@@ -1170,7 +1170,7 @@ boolean gone;
     case RIN_INVISIBILITY:
         if (!Invis && !BInvis && !Blind) {
             newsym(u.ux, u.uy);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Your("body seems to unfade%s.",
                  See_invisible ? " completely" : "..");
 #else
@@ -1509,7 +1509,7 @@ struct obj *stolenobj; /* no message if stolenobj is already being doffing */
        by unmul() since the on or off action isn't completing */
     afternmv = (int NDECL((*))) 0;
     if (putting_on || otmp != stolenobj) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "You stop %s %s.",
                 putting_on ? "putting on" : "taking off",
                 thesimpleoname(otmp));
@@ -1677,7 +1677,7 @@ dotakeoff()
     if (!Narmorpieces && !Naccessories) {
         /* assert( GRAY_DRAGON_SCALES > YELLOW_DRAGON_SCALE_MAIL ); */
         if (uskin)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("%s merged with your skin!",
                       uskin->otyp >= GRAY_DRAGON_SCALES
                           ? "dragon scales are"
@@ -1735,7 +1735,7 @@ register struct obj *otmp;
     }
     /* Curses, like chickens, come home to roost. */
     if ((otmp == uwep) ? welded(otmp) : (int) otmp->cursed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         boolean use_plural = (is_boots(otmp) || is_gloves(otmp)
                               || otmp->otyp == LENSES || otmp->quan > 1L);
 
@@ -1941,7 +1941,7 @@ boolean noisy;
         } else if (Upolyd && has_horns(youmonst.data) && !is_flimsy(otmp)) {
             /* (flimsy exception matches polyself handling) */
             if (noisy)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline_The("%s won't fit over your horn%s.",
                           helm_simple_name(otmp),
                           plur(num_horns(youmonst.data)));
@@ -1998,7 +1998,7 @@ boolean noisy;
             err++;
         } else if (Upolyd && slithy(youmonst.data)) {
             if (noisy)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("have no feet..."); /* not body_part(FOOT) */
 #else
                 You("\91«\82ª\82È\82¢\81D\81D\81D");  /* not body_part(FOOT) */
@@ -2008,7 +2008,7 @@ boolean noisy;
             /* break_armor() pushes boots off for centaurs,
                so don't let dowear() put them back on... */
             if (noisy)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("You have too many hooves to wear %s.",
                       c_boots); /* makeplural(body_part(FOOT)) yields
                                    "rear hooves" which sounds odd */
@@ -2028,7 +2028,7 @@ boolean noisy;
                     Your("%s\82Íã©\82É\82©\82©\82Á\82Ä\82¢\82é\81I", body_part(FOOT));
             } else if (u.utraptype == TT_INFLOOR || u.utraptype == TT_LAVA) {
                 if (noisy)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Your("%s are stuck in the %s!",
                          makeplural(body_part(FOOT)), surface(u.ux, u.uy));
 #else
@@ -2037,7 +2037,7 @@ boolean noisy;
 #endif
             } else { /*TT_BURIEDBALL*/
                 if (noisy)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Your("%s is attached to the buried ball!",
                          body_part(LEG));
 #else
@@ -2192,7 +2192,7 @@ struct obj *obj;
                 return 0;
             }
             if (uleft && uright) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 There("are no more %s%s to fill.",
                       humanoid(youmonst.data) ? "ring-" : "",
                       makeplural(body_part(FINGER)));
@@ -2209,7 +2209,7 @@ struct obj *obj;
                 mask = LEFT_RING;
             } else {
                 do {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Sprintf(qbuf, "Which %s%s, Right or Left?",
                             humanoid(youmonst.data) ? "ring-" : "",
                             body_part(FINGER));
@@ -2436,7 +2436,7 @@ doputon()
     if (uleft && uright && uamul && ublindf
         && uarm && uarmu && uarmc && uarmh && uarms && uarmg && uarmf) {
         /* 'P' message doesn't mention armor */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("%s%s are full, and you're already wearing an amulet and %s.",
              humanoid(youmonst.data) ? "ring-" : "",
              makeplural(body_part(FINGER)),
@@ -2513,7 +2513,7 @@ glibr()
     rightfall = (uright && !uright->cursed && (!welded(uwep)));
     if (!uarmg && (leftfall || rightfall) && !nolimbs(youmonst.data)) {
         /* changed so cursed rings don't fall off, GAN 10/30/86 */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("%s off your %s.",
              (leftfall && rightfall) ? "rings slip" : "ring slips",
              (leftfall && rightfall) ? makeplural(body_part(FINGER))
@@ -2549,7 +2549,7 @@ glibr()
         which = "left ";
 */
         which = "\8d¶";
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("%s %s%s from your %s%s.", otherwep, xfl ? "also " : "",
              otense(otmp, "slip"), which, hand);
 #else
@@ -2586,12 +2586,12 @@ glibr()
         if (bimanual(otmp))
             hand = makeplural(hand);
         else if (wastwoweap)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             which = "right "; /* preceding msg was about left */
 #else
             which = "\89E"; /* preceding msg was about left */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s%s %s%s from your %s%s.",
               !strncmp(thiswep, "corpse", 6) ? "The" : "Your",
               otherwep ? "other " : "", thiswep, xfl ? "also " : "",
@@ -2689,7 +2689,7 @@ register struct obj *otmp;
     /* special ring checks */
     if (otmp == uright || otmp == uleft) {
         if (nolimbs(youmonst.data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("ring is stuck.");
 #else
             pline("\8ew\97Ö\82Í\91Ì\82É\96\84\82Ü\82Á\82Ä\82µ\82Ü\82Á\82Ä\82¢\82é\81D");
@@ -2722,7 +2722,7 @@ register struct obj *otmp;
     /* special glove checks */
     if (otmp == uarmg) {
         if (welded(uwep)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are unable to take off your %s while wielding that %s.",
                 c_gloves, is_sword(uwep) ? c_sword : c_weapon);
 #else
@@ -2732,7 +2732,7 @@ register struct obj *otmp;
             uwep->bknown = TRUE;
             return 0;
         } else if (Glib) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_cant("take off the slippery %s with your slippery %s.",
                      c_gloves, makeplural(body_part(FINGER)));
 #else
@@ -2776,7 +2776,7 @@ register struct obj *otmp;
             Sprintf(buf, "%s\82ª\92E\82°\82È\82¢", c_suit);
             why = uarm;
         } else if (welded(uwep) && bimanual(uwep)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "release your %s",
                     is_sword(uwep) ? c_sword : (uwep->otyp == BATTLE_AXE)
                                                    ? c_axe
index 7edf972..960555c 100644 (file)
--- a/src/dog.c
+++ b/src/dog.c
@@ -189,25 +189,25 @@ makedog()
     if (!*petname && pettype == PM_LITTLE_DOG) {
         /* All of these names were for dogs. */
         if (Role_if(PM_CAVEMAN))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             petname = "Slasher"; /* The Warrior */
 #else
             petname = "\83X\83\89\83b\83V\83\83\81[";
 #endif
         if (Role_if(PM_SAMURAI))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             petname = "Hachi"; /* Shibuya Station */
 #else
             petname = "\83n\83`\8cö";
 #endif
         if (Role_if(PM_BARBARIAN))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             petname = "Idefix"; /* Obelix */
 #else
             petname = "\83C\83f\83t\83B\83N\83X";
 #endif
         if (Role_if(PM_RANGER))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             petname = "Sirius"; /* Orion's dog */
 #else
             petname = "\83V\83\8a\83E\83X";
@@ -640,7 +640,7 @@ boolean pets_only; /* true for ascension or final escape */
                 mdrop_special_objs(mtmp); /* drop Amulet */
             } else if (mtmp->meating || mtmp->mtrapped) {
                 if (canseemon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s is still %s.", Monnam(mtmp),
                           mtmp->meating ? "eating" : "trapped");
 #else
@@ -659,7 +659,7 @@ boolean pets_only; /* true for ascension or final escape */
             }
             if (stay_behind) {
                 if (mtmp->mleashed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s leash suddenly comes loose.",
                           humanoid(mtmp->data)
                               ? (mtmp->female ? "Her" : "His")
@@ -954,7 +954,7 @@ register struct obj *obj;
                 boolean big_corpse =
                     (obj->otyp == CORPSE && obj->corpsenm >= LOW_PM
                      && mons[obj->corpsenm].msize > mtmp->data->msize);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s catches %s%s", Monnam(mtmp), the(xname(obj)),
                       !big_corpse ? "." : ", or vice versa!");
 #else
@@ -1046,7 +1046,7 @@ boolean was_dead;
         if (!quietly && cansee(mtmp->mx, mtmp->my)) {
             if (haseyes(youmonst.data)) {
                 if (haseyes(mtmp->data))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s to look you in the %s.", Monnam(mtmp),
                           mtmp->mpeaceful ? "seems unable" : "refuses",
                           body_part(EYE));
@@ -1072,7 +1072,7 @@ boolean was_dead;
 
     if (!mtmp->mtame) {
         if (!quietly && canspotmon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s.", Monnam(mtmp),
                   mtmp->mpeaceful ? "is no longer tame" : "has become feral");
 #else
index 04d39af..e614b7c 100644 (file)
@@ -284,7 +284,7 @@ boolean devour;
 */
                 pline("%s\82Í\8c@\82Á\82Ä\82¢\82é\81D", noit_Monnam(mtmp));
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s %s.", noit_Monnam(mtmp),
                       devour ? "devours" : "eats", distant_name(obj, doname));
 #else
@@ -292,7 +292,7 @@ boolean devour;
                       distant_name(obj, doname), devour ? "\88ù\82Ý\8d\9e\82ñ\82Å" : "\90H\82×\82Ä");
 #endif
         } else if (seeobj)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("It %s %s.", devour ? "devours" : "eats",
                   distant_name(obj, doname));
 #else
@@ -338,7 +338,7 @@ boolean devour;
             /* edible item owned by shop has been thrown or kicked
                by hero and caught by tame or food-tameable monst */
             oprice = unpaid_cost(obj, TRUE);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("That %s will cost you %ld %s.", objnambuf, oprice,
                   currency(oprice));
 #else
@@ -427,7 +427,7 @@ struct edog *edog;
 */
                 pline("%s\82Í\8bQ\82¦\82Å\8e\80\82ñ\82¾\81D", Monnam(mtmp));
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_feel("%s for a moment.",
                          Hallucination ? "bummed" : "sad");
 #else
@@ -1271,7 +1271,7 @@ int after; /* this is extra fast monster movement */
                                ? vobj_at(nix, niy) : 0;
             const char *what = o ? distant_name(o, doname) : something;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s reluctantly over %s.", noit_Monnam(mtmp),
                   vtense((char *) 0, locomotion(mtmp->data, "step")), what);
 #else
@@ -1473,7 +1473,7 @@ struct monst *mtmp;
            (on the other hand, perhaps you're sensing a brief glimpse
            of its mind as it changes form) */
         newsym(mtmp->mx, mtmp->my);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%s %s %sappear%s where %s was!",
             cansee(mtmp->mx, mtmp->my) ? "see" : "sense that",
             (M_AP_TYPE(mtmp) == M_AP_FURNITURE)
index d6cf298..ba602f7 100644 (file)
@@ -191,7 +191,7 @@ xchar x, y;
             map_invisible(x, y);
         else
             newsym(x, y);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         There("is %s here.",
               canspotmon(mon) ? a_monnam(mon) : "something hidden");
 #else
@@ -382,7 +382,7 @@ register struct obj *gold;
                 robbed -= value;
                 if (robbed < 0L)
                     robbed = 0L;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline_The("amount %scovers %s recent losses.",
                           !robbed ? "" : "partially ", mhis(mtmp));
 #else
@@ -395,7 +395,7 @@ register struct obj *gold;
             } else {
                 if (mtmp->mpeaceful) {
                     ESHK(mtmp)->credit += value;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("have %ld %s in credit.", ESHK(mtmp)->credit,
                         currency(ESHK(mtmp)->credit));
 #else
@@ -426,7 +426,7 @@ register struct obj *gold;
                out of the vault.  If he did do that, player
                could try fighting, then weasle out of being
                killed by throwing his/her gold when losing. */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             verbalize(
                 umoney
                     ? "Drop the rest and follow me."
@@ -560,7 +560,7 @@ xchar x, y; /* coordinates where object was before the impact, not after */
             You("%ld%s\95ª\82Ì\91¹\8aQ\82ð\82Ð\82«\82¨\82±\82µ\82½\81I", loss, currency(loss));
             make_angry_shk(shkp, x, y);
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("owe %s %ld %s for objects destroyed.", mon_nam(shkp), loss,
                 currency(loss));
 #else
@@ -640,7 +640,7 @@ xchar x, y;
 
     if (!uarmf && kickedobj->otyp == CORPSE
         && touch_petrifies(&mons[kickedobj->corpsenm]) && !Stone_resistance) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("kick %s with your bare %s.",
             corpse_xname(kickedobj, (const char *) 0, CXN_PFX_THE),
             makeplural(body_part(FOOT)));
@@ -720,7 +720,7 @@ xchar x, y;
 */
                 pline("\82Ñ\82­\82Æ\82à\82µ\82È\82¢\81D");
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %sn't come loose.",
                       The(distant_name(kickedobj, xname)),
                       otense(kickedobj, "do"));
@@ -736,7 +736,7 @@ xchar x, y;
 */
             pline("\89½\82©\82ª\8aÉ\82ñ\82Å\82Æ\82ê\82½\81D");
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s loose.", The(distant_name(kickedobj, xname)),
                   otense(kickedobj, "come"));
 #else
@@ -818,7 +818,7 @@ xchar x, y;
             kickedobj = splitobj(kickedobj, 1L);
         } else {
             if (rn2(20)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 static NEARDATA const char *const flyingcoinmsg[] = {
                     "scatter the coins", "knock coins all over the place",
                     "send coins flying in all directions",
@@ -854,7 +854,7 @@ xchar x, y;
     }
 
     if (slide && !Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Whee!  %s %s across the %s.", Doname2(kickedobj),
               otense(kickedobj, "slide"), surface(x, y));
 #else
@@ -1048,7 +1048,7 @@ dokick()
 
         if (wl == BOTH_SIDES)
             bp = makeplural(bp);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("%s%s %s in no shape for kicking.",
              (wl == LEFT_SIDE) ? "left " : (wl == RIGHT_SIDE) ? "right " : "",
              bp, (wl == BOTH_SIDES) ? "are" : "is");
@@ -1267,7 +1267,7 @@ dokick()
         if (maploc->typ == SDOOR) {
             if (!Levitation && rn2(30) < avrg_attrib) {
                 cvt_sdoor_to_door(maploc); /* ->typ = DOOR */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Crash!  %s a secret door!",
                       /* don't "kick open" when it's locked
                          unless it also happens to be trapped */
@@ -1419,7 +1419,7 @@ dokick()
             (void) mksobj_at(ROCK, x, y, TRUE, FALSE);
             del_engr_at(x, y);
             if (Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Crack!  %s broke!", Something);
 #else
                 pline("\83S\83c\83\93\81I\89½\82©\82ª\89ó\82ê\82½\81I");
@@ -1441,7 +1441,7 @@ dokick()
             /* nothing, fruit or trouble? 75:23.5:1.5% */
             if (rn2(3)) {
                 if (!rn2(6) && !(mvitals[PM_KILLER_BEE].mvflags & G_GONE))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You_hear("a low buzzing."); /* a warning */
 #else
                     You_hear("\82Ô\81[\82ñ\82Æ\82¢\82¤\89¹\82ð\95·\82¢\82½\81D"); /* a warning */
@@ -1471,7 +1471,7 @@ dokick()
                      * may not refer to the correct object */
                     treefruit = mksobj(frtype, TRUE, FALSE);
                     treefruit->quan = nfruit - nfall;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%ld %s got caught in the branches.",
                           nfruit - nfall, xname(treefruit));
 #else
@@ -1565,7 +1565,7 @@ dokick()
                 exercise(A_DEX, TRUE);
                 return 1;
             } else if (!rn2(3)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Flupp!  %s.",
                       (Blind ? "You hear a sloshing sound"
                              : "Muddy waste pops up from the drain"));
@@ -1884,7 +1884,7 @@ xchar dlev;          /* if !0 send to dlev near player */
             pline("\8bß\82­\82É\82 \82Á\82½%s\82ª%s\97\8e\82¿\82½\81D", what, gate_str);
 #endif
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s adjacent %s %s.",
                   dct == 1L ? "One of the" : "Some of the",
                   dct == 1L ? "objects falls" : what, gate_str);
@@ -1926,7 +1926,7 @@ xchar dlev;          /* if !0 send to dlev near player */
         }
         if (ESHK(shkp)->debit > debit) {
             long amt = (ESHK(shkp)->debit - debit);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("owe %s %ld %s for goods lost.", Monnam(shkp), amt,
                 currency(amt));
 #else
@@ -2275,7 +2275,7 @@ xchar x, y;
 
     if (((ttmp = t_at(x, y)) != 0 && ttmp->tseen)
         && is_hole(ttmp->ttyp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         gate_str = (ttmp->ttyp == TRAPDOOR) ? "through the trap door"
                                             : "through the hole";
 #else
index 79f9ce0..daf9844 100644 (file)
@@ -103,7 +103,7 @@ int shotlimit;
     u_wipe_engr(2);
     if (!uarmg && obj->otyp == CORPSE && touch_petrifies(&mons[obj->corpsenm])
         && !Stone_resistance) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("throw %s with your bare %s.",
             corpse_xname(obj, (const char *) 0, CXN_PFX_THE),
             /* throwing with one hand, but pluralize since the
@@ -231,7 +231,7 @@ int shotlimit;
        attempted to specify a count */
     if (multishot > 1 || shotlimit > 0) {
         /* "You shoot N arrows." or "You throw N daggers." */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%s %d %s.", m_shot.s ? "shoot" : "throw",
             multishot, /* (might be 1 if player gave shotlimit) */
             (multishot == 1) ? singular(obj, xname) : xname(obj));
@@ -282,7 +282,7 @@ int *shotlimit_p; /* (see dothrow()) */
         You("\89½\82©\82ð\93\8a\82°\82é\82Ì\82Í\95¨\97\9d\93I\82É\96³\97\9d\82¾\81D");
         return FALSE;
     } else if (nohands(youmonst.data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_cant("throw or shoot without hands."); /* not body_part(HAND) */
 #else
         You("\8eè\82ª\82È\82¢\81D"); /* not body_part(HAND) */
@@ -460,7 +460,7 @@ boolean verbose;
 {
     if (m_shot.i < m_shot.n) {
         if (verbose && !context.mon_moving) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("stop %s after the %d%s %s.",
                 m_shot.s ? "firing" : "throwing", m_shot.i, ordin(m_shot.i),
                 m_shot.s ? "shot" : "toss");
@@ -488,7 +488,7 @@ boolean verbosely; /* usually True; False if caller has given drop message */
     if (IS_ALTAR(levl[u.ux][u.uy].typ))
         doaltarobj(obj);
     else if (verbosely)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s the %s.", Doname2(obj), otense(obj, "hit"),
               surface(u.ux, u.uy));
 #else
@@ -696,7 +696,7 @@ int x, y;
 */
             You("\93S\82Ì\96_\82É\82Ô\82¿\82 \82½\82Á\82½\81D\82¢\82Ä\82Á\81I");
             dmg = rnd(2 + *range);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             losehp(Maybe_Half_Phys(dmg), "crashing into iron bars",
                    KILLED_BY);
 #else
@@ -726,7 +726,7 @@ int x, y;
 */
             You("\89½\82©\82É\82Ô\82¿\82 \82½\82Á\82½\81I");
             dmg = rnd(2 + *range);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             losehp(Maybe_Half_Phys(dmg), "touching the edge of the universe",
                    KILLED_BY);
 #else
@@ -742,7 +742,7 @@ int x, y;
 
             /* Move at a diagonal. */
             if (bigmonst(youmonst.data) || too_much) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("%sget forcefully wedged into a crevice.",
                     too_much ? "and all your belongings " : "");
 #else
@@ -750,7 +750,7 @@ int x, y;
                     too_much ? "\82Æ\91S\95\94\82Ì\89×\95¨" : "");
 #endif
                 dmg = rnd(2 + *range);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 losehp(Maybe_Half_Phys(dmg), "wedging into a narrow crevice",
                        KILLED_BY);
 #else
@@ -791,7 +791,7 @@ int x, y;
 #endif
         }
         if (!glyph_is_monster(glyph) && !glyph_is_invisible(glyph))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("find %s by bumping into %s.", mnam, pronoun);
 #else
             You("\82Ô\82¿\82 \82½\82Á\82½\82±\82Æ\82Å%s\82ð\8c©\82Â\82¯\82½\81D", mnam);
@@ -895,7 +895,7 @@ int x, y;
             return TRUE;
         } else {
             if (ttmp->tseen)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("pass right over %s.",
                     an(defsyms[trap_to_defsym(ttmp->ttyp)].explanation));
 #else
@@ -963,7 +963,7 @@ boolean verbose;
         nomul(0);
         return;
     } else if (u.utrap) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("are anchored by the %s.",
             u.utraptype == TT_WEB
                 ? "web"
@@ -1238,7 +1238,7 @@ boolean hitsroof;
                         && polymon(PM_STONE_GOLEM))) {
  petrify:
             killer.format = KILLED_BY;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Strcpy(killer.name, "elementary physics"); /* "what goes up..." */
 #else
             Strcpy(killer.name, "\8f\89\93\99\95¨\97\9d\82É\82æ\82è"); /* "what goes up..." */
@@ -1255,7 +1255,7 @@ boolean hitsroof;
         }
         hitfloor(obj, TRUE);
         thrownobj = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         losehp(Maybe_Half_Phys(dmg), "falling object", KILLED_BY_AN);
 #else
         losehp(Maybe_Half_Phys(dmg), "\97\8e\89º\95¨\82Å", KILLED_BY_AN);
@@ -1372,7 +1372,7 @@ boolean twoweap; /* used to restore twoweapon mode if wielded weapon returns */
             && ((Role_if(PM_VALKYRIE) && obj->oartifact == ART_MJOLLNIR)
                 || tethered_weapon)
             && !impaired) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s the %s and returns to your hand!", Tobjnam(obj, "hit"),
                   ceiling(u.ux, u.uy));
 #else
@@ -1880,7 +1880,7 @@ register struct obj *obj; /* thrownobj or kickedobj or uwep */
                 boolean next2u = monnear(mon, u.ux, u.uy);
 
                 finish_quest(obj); /* acknowledge quest completion */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s %s back to you.", Monnam(mon),
                       (next2u ? "hands" : "tosses"), the(xname(obj)));
 #else
@@ -2054,7 +2054,7 @@ register struct obj *obj; /* thrownobj or kickedobj or uwep */
                 }
             }
         }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s into %s %s.", Tobjnam(obj, "vanish"),
               s_suffix(mon_nam(mon)),
               is_animal(u.ustuck->data) ? "entrails" : "currents");
@@ -2239,7 +2239,7 @@ xchar x, y;
         && (mtmp = makemon(&mons[rn2(3) ? PM_HOMUNCULUS : PM_IMP], x, y,
                            NO_MM_FLAGS)) != 0) {
         if (canspotmon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s is released!", Hallucination
                                          ? An(rndmonnam(NULL))
                                          : "The picture-painting demon");
@@ -2285,7 +2285,7 @@ boolean from_invent;
 */
                         You("\96ò\82Á\82Û\82¢\93õ\82¢\82ª\82µ\82½\81D\81D\81D");
                     } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         const char *eyes = body_part(EYE);
 
                         if (eyecount(youmonst.data) != 1)
@@ -2459,7 +2459,7 @@ struct obj *obj;
     }
     freeinv(obj);
     if (u.uswallow) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline(is_animal(u.ustuck->data) ? "%s in the %s's entrails."
                                         : "%s into %s.",
               "The money disappears", mon_nam(u.ustuck));
@@ -2475,7 +2475,7 @@ struct obj *obj;
     if (u.dz) {
         if (u.dz < 0 && !Is_airlevel(&u.uz) && !Underwater
             && !Is_waterlevel(&u.uz)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("gold hits the %s, then falls back on top of your %s.",
                       ceiling(u.ux, u.uy), body_part(HEAD));
 #else
index 79971a2..858fd8a 100644 (file)
@@ -31,7 +31,7 @@ nhsym l_syms[SYM_MAX] = DUMMY;   /* loaded symbols          */
 nhsym r_syms[SYM_MAX] = DUMMY;   /* rogue symbols           */
 
 nhsym warnsyms[WARNCOUNT] = DUMMY; /* the current warning display symbols */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 const char invisexplain[] = "remembered, unseen, creature",
            altinvisexplain[] = "unseen creature"; /* for clairvoyance */
 #else
@@ -398,7 +398,7 @@ const struct symdef def_warnsyms[WARNCOUNT] = {
  *  Default screen symbols with explanations and colors.
  */
 const struct symdef defsyms[MAXPCHARS] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 /* 0*/ { ' ', "dark part of a room", C(NO_COLOR) },  /* stone */
        { '|', "wall", C(CLR_GRAY) },                 /* vwall */
        { '-', "wall", C(CLR_GRAY) },                 /* hwall */
@@ -421,7 +421,7 @@ const struct symdef defsyms[MAXPCHARS] = {
        { '-', "\95Ç", C(CLR_GRAY) },                   /* tuwall */
        { '-', "\95Ç", C(CLR_GRAY) },                   /* tdwall */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 /*10*/ { '|', "wall", C(CLR_GRAY) },                 /* tlwall */
        { '|', "wall", C(CLR_GRAY) },                 /* trwall */
        { '.', "doorway", C(CLR_GRAY) },              /* ndoor */
@@ -444,7 +444,7 @@ const struct symdef defsyms[MAXPCHARS] = {
        { '#', "\96Ø", C(CLR_GREEN) },                  /* tree */
        { '.', "\95\94\89®\82Ì\8f°", C(CLR_GRAY) },             /* room */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 /*20*/ { '.', "dark part of a room", C(CLR_BLACK) }, /* dark room */
        { '#', "corridor", C(CLR_GRAY) },             /* dark corr */
        { '#', "lit corridor", C(CLR_GRAY) },   /* lit corr (see mapglyph.c) */
@@ -467,7 +467,7 @@ const struct symdef defsyms[MAXPCHARS] = {
        { '|', "\95æ", C(CLR_WHITE) },                  /* grave */
        { '\\', "\89Ø\82â\82©\82È\8bÊ\8dÀ", C(HI_GOLD) },         /* throne */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 /*30*/ { '#', "sink", C(CLR_GRAY) },                 /* sink */
        { '{', "fountain", C(CLR_BRIGHT_BLUE) },      /* fountain */
        { '}', "water", C(CLR_BLUE) },                /* pool */
@@ -490,7 +490,7 @@ const struct symdef defsyms[MAXPCHARS] = {
        { '#', "\8fã\82Á\82Ä\82¢\82é\92µ\82Ë\8b´", C(CLR_BROWN) },    /* hcdbridge */
        { ' ', "\8bó\8bC\82Ì\82½\82Ü\82Á\82½\8fê\8f\8a", C(CLR_CYAN) },   /* open air */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 /*40*/ { '#', "cloud", C(CLR_GRAY) },                /* [part of] a cloud */
        { '}', "water", C(CLR_BLUE) },                /* under water */
        { '^', "arrow trap", C(HI_METAL) },           /* trap */
@@ -513,7 +513,7 @@ const struct symdef defsyms[MAXPCHARS] = {
        { '^', "\8b\90\8aâ\82Ìã©", C(CLR_GRAY) },             /* trap */
        { '^', "\90\87\96°\83K\83X\82Ìã©", C(HI_ZAP) },           /* trap */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 /*50*/ { '^', "rust trap", C(CLR_BLUE) },            /* trap */
        { '^', "fire trap", C(CLR_ORANGE) },          /* trap */
        { '^', "pit", C(CLR_BLACK) },                 /* trap */
@@ -536,7 +536,7 @@ const struct symdef defsyms[MAXPCHARS] = {
        { '^', "\96\82\96@\82Ì\93ü\8cû", C(CLR_BRIGHT_MAGENTA) }, /* trap */
        { '"', "\82­\82à\82Ì\91\83", C(CLR_GRAY) },             /* web */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 /*60*/ { '^', "statue trap", C(CLR_GRAY) },            /* trap */
        { '^', "magic trap", C(HI_ZAP) },               /* trap */
        { '^', "anti-magic field", C(HI_ZAP) },         /* trap */
@@ -570,7 +570,7 @@ const struct symdef defsyms[MAXPCHARS] = {
        { '#', "", C(HI_ZAP) },
        { '@', "", C(HI_ZAP) },
        { '*', "", C(HI_ZAP) },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
        { '#', "poison cloud", C(CLR_BRIGHT_GREEN) },   /* part of a cloud */
        { '?', "valid position", C(CLR_BRIGHT_GREEN) }, /*  target position */
 #else
index 264d962..db9c6f3 100644 (file)
@@ -1853,7 +1853,7 @@ struct lchoice *lchoices_p;
     for (br = branches; br; br = br->next) {
         if (br->end1.dnum == dnum && lower_bound < br->end1.dlevel
             && br->end1.dlevel <= upper_bound) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "%c %s to %s: %d",
                     bymenu ? chr_u_on_lvl(&br->end1) : ' ',
                     br_string(br->type),
@@ -1907,7 +1907,7 @@ xchar *rdgn;
         descr = unplaced ? "\92n\89º" : "\83\8c\83x\83\8b";
         nlev = dptr->num_dunlevs;
         if (nlev > 1)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "%s: %s %d to %d", dptr->dname, makeplural(descr),
                     dptr->depth_start, dptr->depth_start + nlev - 1);
 #else
@@ -1925,7 +1925,7 @@ xchar *rdgn;
 */
                 Strcat(buf, ", \89º\82©\82ç\82Ì\93ü\82è\8cû");
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(eos(buf), ", entrance on %d",
                         dptr->depth_start + dptr->entry_lev - 1);
 #else
@@ -2003,7 +2003,7 @@ xchar *rdgn;
                 putstr(win, 0, "\95\82\93®\95ª\8aò");
                 first = FALSE;
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "   %s to %s", br_string(br->type),
                     dungeons[br->end2.dnum].dname);
 #else
@@ -2017,7 +2017,7 @@ xchar *rdgn;
     /* I hate searching for the invocation pos while debugging. -dean */
     if (Invocation_lev(&u.uz)) {
         putstr(win, 0, "");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "Invocation position @ (%d,%d), hero @ (%d,%d)",
                 inv_pos.x, inv_pos.y, u.ux, u.uy);
 #else
@@ -2043,7 +2043,7 @@ xchar *rdgn;
                     trap->tx, trap->ty, u.ux, u.uy);
 
         /* only report "no portal found" when actually expecting a portal */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         else if (Is_earthlevel(&u.uz) || Is_waterlevel(&u.uz)
                  || Is_firelevel(&u.uz) || Is_airlevel(&u.uz)
                  || Is_qstart(&u.uz) || at_dgn_entrance("The Quest")
@@ -2138,7 +2138,7 @@ donamelevel()
     if (mptr->custom) {
         char tmpbuf[BUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(tmpbuf, "Replace annotation \"%.30s%s\" with?", mptr->custom,
                 (strlen(mptr->custom) > 30) ? "..." : "");
 #else
@@ -2938,7 +2938,7 @@ STATIC_OVL const char *
 shop_string(rtype)
 int rtype;
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     const char *str = "shop"; /* catchall */
 #else
     const char *str = "\93X"; /* catchall */
@@ -3055,7 +3055,7 @@ char *outbuf;
 #endif
 #define COMMA (i++ > 0 ? ", " : PREFIX)
 /* "iterate" once; safe to use as ``if (cond) ADDTOBUF(); else whatever;'' */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 #define ADDNTOBUF(nam, var)                                                  \
     do {                                                                     \
         if (var)                                                             \
@@ -3142,7 +3142,7 @@ boolean printdun;
     if (mptr->custom)
         Sprintf(eos(buf), " \"%s\"", mptr->custom);
     if (on_level(&u.uz, &mptr->lev))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(eos(buf), " <- You %s here.",
                 (!final || (final == 1 && how == ASCENDED)) ? "are"
                   : (final == 1 && how == ESCAPED) ? "left from"
@@ -3236,7 +3236,7 @@ boolean printdun;
 */
         Sprintf(buf, "%s\83f\83\8b\83t\83@\83C\82Ì\90_\93a\81D", PREFIX);
     } else if (In_sokoban(&mptr->lev)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s%s.", PREFIX,
                 mptr->flags.sokosolved ? "Solved" : "Unsolved");
 #else
@@ -3254,7 +3254,7 @@ boolean printdun;
 */
         Sprintf(buf, "%s\92P\8f\83\82È\95\94\89®\81D", PREFIX);
     } else if (on_level(&mptr->lev, &qstart_level)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%sHome%s.", PREFIX,
                 mptr->flags.unreachable ? " (no way back...)" : "");
 #else
@@ -3308,7 +3308,7 @@ boolean printdun;
 
     /* print out branches */
     if (mptr->br) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s%s to %s", PREFIX, br_string2(mptr->br),
                 dungeons[mptr->br->end2.dnum].dname);
 #else
index 3f576c1..650e05c 100644 (file)
--- a/src/eat.c
+++ b/src/eat.c
@@ -77,7 +77,7 @@ STATIC_OVL NEARDATA const char allobj[] = {
 STATIC_OVL boolean force_save_hs = FALSE;
 
 /* see hunger states in hack.h - texts used on bottom line */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 const char *hu_stat[] = { "Satiated", "        ", "Hungry  ", "Weak    ",
                           "Fainting", "Fainted ", "Starved " };
 #else
@@ -140,7 +140,7 @@ static const struct {
     int nut;                              /* nutrition */
     Bitfield(fodder, 1);                  /* stocked by health food shops */
     Bitfield(greasy, 1);                  /* causes slippery fingers */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 } tintxts[] = { { "rotten", -50, 0, 0 },  /* ROTTEN_TIN = 0 */
                 { "homemade", 50, 1, 0 }, /* HOMEMADE_TIN = 1 */
                 { "soup made from", 20, 1, 0 },
@@ -566,7 +566,7 @@ int *dmg_p; /* for dishing out extra damage in lieu of Int loss */
 
     if (noncorporeal(pd)) {
         if (visflag)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s brain is unharmed.",
                   (mdef == &youmonst) ? "Your" : s_suffix(Monnam(mdef)));
 #else
@@ -640,7 +640,7 @@ int *dmg_p; /* for dishing out extra damage in lieu of Int loss */
             pline("Ingesting that is fatal.");
 */
             pline("\8eæ\82è\8d\9e\82ñ\82¾\82ç\82·\82®\82É\8e\80\82ñ\82Å\82µ\82Ü\82Á\82½\81D");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(killer.name, "unwisely ate the brain of %s", pd->mname);
             killer.format = NO_KILLER_PREFIX;
 #else
@@ -732,7 +732,7 @@ int *dmg_p; /* for dishing out extra damage in lieu of Int loss */
             *dmg_p += xtra_dmg;
             give_nutrit = TRUE;
             if (*dmg_p >= mdef->mhp && visflag && canspotmon(mdef))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s last thought fades away...",
                       s_suffix(Monnam(mdef)));
 #else
@@ -844,7 +844,7 @@ register int pm;
         pline("Eating that is instantly fatal.");
 */
         pline("\90H\82×\82½\82ç\82·\82®\82É\8e\80\82ñ\82Å\82µ\82Ü\82Á\82½\81D");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(killer.name, "unwisely ate the body of %s", mons[pm].mname);
         killer.format = NO_KILLER_PREFIX;
 #else
@@ -886,7 +886,7 @@ fix_petrification()
     char buf[BUFSZ];
 
     if (Hallucination)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "What a pity--you just ruined a future piece of %sart!",
                 ACURR(A_CHA) > 15 ? "fine " : "");
 #else
@@ -1089,7 +1089,7 @@ register struct permonst *ptr;
     case TELEPORT_CONTROL:
         debugpline0("Trying to give teleport control");
         if (!(HTeleport_control & FROMOUTSIDE)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_feel(Hallucination ? "centered in your personal space."
                                    : "in control of yourself.");
 #else
@@ -1102,7 +1102,7 @@ register struct permonst *ptr;
     case TELEPAT:
         debugpline0("Trying to give telepathy");
         if (!(HTelepat & FROMOUTSIDE)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_feel(Hallucination ? "in touch with the cosmos."
                                    : "a strange mental acuity.");
 #else
@@ -1212,7 +1212,7 @@ int pm;
             char buf[BUFSZ];
 
             u.uconduct.polyselfs++; /* you're changing form */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_cant("resist the temptation to mimic %s.",
                      Hallucination ? "an orange" : "a pile of gold");
 #else
@@ -1279,7 +1279,7 @@ int pm;
     case PM_DOPPELGANGER:
     case PM_SANDESTIN: /* moot--they don't leave corpses */
         if (Unchanging) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_feel("momentarily different."); /* same as poly trap */
 #else
             You_feel("\88ê\8fu\88á\82Á\82½\8a´\82\82ª\82µ\82½\81D"); /* same as poly trap */
@@ -1674,7 +1674,7 @@ const char *mesg;
 
     } else { /* spinach... */
         if (tin->cursed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("It contains some decaying%s%s substance.",
                   Blind ? "" : " ", Blind ? "" : hcolor(NH_GREEN));
 #else
@@ -1708,7 +1708,7 @@ const char *mesg;
          */
         u.uconduct.food++; /* don't need vegetarian checks for spinach */
         if (!tin->cursed)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("This makes you feel like %s!",
                   /* "Swee'pea" is a character from the Popeye cartoons */
                   Hallucination ? "Swee'pea"
@@ -1818,7 +1818,7 @@ struct obj *otmp;
     } else if (uwep) {
         switch (uwep->otyp) {
         case TIN_OPENER:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             mesg = "You easily open the tin."; /* iff tmp==0 */
 #else
             mesg = "\82 \82È\82½\82Í\8aÈ\92P\82É\8aÊ\82ð\8aJ\82¯\82½\81D"; /* iff tmp==0 */
@@ -2055,7 +2055,8 @@ struct obj *otmp;
 #if 0 /*JP:T*/
         losehp(rnd(15), !glob ? "acidic corpse" : "acidic glob",
                KILLED_BY_AN); /* acid damage */
-#else /* \93ú\96{\8cê\82Å\82Í\8bæ\95Ê\82µ\82È\82¢ */
+#else
+        /* \93ú\96{\8cê\82Å\82Í\8bæ\95Ê\82µ\82È\82¢ */
         losehp(rnd(15), "\8e_\82Ì\8e\80\91Ì\82Å", KILLED_BY_AN);
 #endif
     } else if (poisonous(&mons[mnum]) && rn2(5)) {
@@ -2066,7 +2067,7 @@ struct obj *otmp;
         pline("\83E\83Q\83F\81[\81C\97L\93Å\82¾\82Á\82½\82É\82¿\82ª\82¢\82È\82¢\81I");  
         if (!Poison_resistance) {
             losestr(rnd(4));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             losehp(rnd(15), !glob ? "poisonous corpse" : "poisonous glob",
                    KILLED_BY_AN);
 #else
@@ -2312,7 +2313,7 @@ struct obj *otmp;
     default:
         if (otmp->otyp == SLIME_MOLD && !otmp->cursed
             && otmp->spe == context.current_fruit) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("My, that was a %s %s!",
                   Hallucination ? "primo" : "yummy",
                   singular(otmp, xname));
@@ -2354,7 +2355,7 @@ struct obj *otmp;
             }
 #endif
         } else if (otmp->otyp == EGG && stale_egg(otmp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Ugh.  Rotten egg."); /* perhaps others like it */
 #else
             pline("\83E\83Q\83F\81[\95\85\82Á\82½\97\91\82¾\81D");
@@ -2365,7 +2366,7 @@ struct obj *otmp;
             make_vomiting((Vomiting & TIMEOUT) + (long) d(10, 4), TRUE);
         } else {
         give_feedback:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("This %s is %s", singular(otmp, xname),
                   otmp->cursed
                      ? (Hallucination ? "grody!" : "terrible!")
@@ -2486,7 +2487,7 @@ struct obj *otmp;
                 if (!oldprop && !EInvis && !BInvis && !See_invisible
                     && !Blind) {
                     newsym(u.ux, u.uy);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Your("body takes on a %s transparency...",
                          Hallucination ? "normal" : "strange");
 #else
@@ -2558,7 +2559,7 @@ struct obj *otmp;
             accessory_has_effect(otmp);
             makeknown(typ);
             change_sex();
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are suddenly very %s!",
                 flags.female ? "feminine" : "masculine");
 #else
@@ -2666,7 +2667,7 @@ eatspecial()
     /* KMH -- idea by "Tommy the Terrorist" */
     if (otmp->otyp == TRIDENT && !otmp->cursed) {
         /* sugarless chewing gum which used to be heavily advertised on TV */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline(Hallucination ? "Four out of five dentists agree."
                             : "That was pure chewing satisfaction!");
 #else
@@ -2704,7 +2705,7 @@ eatspecial()
 /* NOTE: the order of these words exactly corresponds to the
    order of oc_material values #define'd in objclass.h. */
 static const char *foodwords[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "meal",    "liquid",  "wax",       "food", "meat",     "paper",
     "cloth",   "leather", "wood",      "bone", "scale",    "metal",
     "metal",   "metal",   "silver",    "gold", "platinum", "mithril",
@@ -3160,7 +3161,7 @@ doeat()
 */
             You("%s\82ð\93f\82«\8fo\82µ\82½\81D", xname(otmp));
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("spit %s out onto the %s.", the(xname(otmp)),
                 surface(u.ux, u.uy));
 #else
@@ -3416,7 +3417,7 @@ struct obj *obj;
         if (obj->cursed && obj->bknown) {
             char qbuf[QBUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             if (ynq(safe_qbuf(qbuf, "Really wield ", "?",
                               obj, doname, thesimpleoname, "that")) != 'y')
 #else
@@ -3901,7 +3902,7 @@ int corpsecheck; /* 0, no check, 1, corpses, 2, tinnable corpses */
 
         if (youmonst.data != &mons[PM_RUST_MONSTER]
             && (gold = g_at(u.ux, u.uy)) != 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             if (gold->quan == 1L)
                 Sprintf(qbuf, "There is 1 gold piece here; eat it?");
             else
index 25f25dc..5334a01 100644 (file)
--- a/src/end.c
+++ b/src/end.c
@@ -482,7 +482,7 @@ int how;
                set up fake mptr for type_is_pname/the_unique_pm */
             mptr = &mons[mtmp->mappearance];
             fakenm = mptr->mname;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (alt && strstri(realnm, "vampire")
                    && !strcmp(fakenm, "vampire bat")) {
             /* special case: use "vampire in bat form" in preference
@@ -510,7 +510,7 @@ int how;
         Strcpy(shape, fakenm);
 #endif
         /* omit "called" to avoid excessive verbosity */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(eos(buf),
                 alt ? "%s in %s form"
                     : mimicker ? "%s disguised as %s"
@@ -689,7 +689,7 @@ VA_DECL(const char *, str)
         raw_print("\nError save file being written.\n");
 #else /* !NOTIFY_NETHACK_BUGS */
     if (!wizard) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         const char *maybe_rebuild = !program_state.something_worth_saving
                                      ? "."
                                      : "\nand it may be possible to rebuild.";
@@ -706,7 +706,7 @@ VA_DECL(const char *, str)
             raw_printf("To report this error, contact %s%s",
                        sysopt.fmtd_wizard_list, maybe_rebuild);
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             raw_printf("Report error to \"%s\"%s", WIZARD_NAME,
                        maybe_rebuild);
 #else
@@ -895,7 +895,7 @@ boolean taken;
 
     if (invent && !done_stopprint) {
         if (taken)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(qbuf, "Do you want to see what you had when you %s?",
                     (how == QUIT) ? "quit" : "died");
 #else
@@ -921,7 +921,7 @@ boolean taken;
 
     if (!done_stopprint) {
         ask = should_query_disclose_option('a', &defquery);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         c = ask ? yn_function("Do you want to see your attributes?", ynqchars,
                               defquery)
                 : defquery;
@@ -950,7 +950,7 @@ boolean taken;
 
     if (!done_stopprint) {
         ask = should_query_disclose_option('c', &defquery);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         c = ask ? yn_function("Do you want to see your conduct?", ynqchars,
                               defquery)
                 : defquery;
@@ -967,7 +967,7 @@ boolean taken;
 
     if (!done_stopprint) {
         ask = should_query_disclose_option('o', &defquery);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         c = ask ? yn_function("Do you want to see the dungeon overview?",
                               ynqchars, defquery)
                 : defquery;
@@ -1149,7 +1149,7 @@ winid endwin;
                 discover_object(otmp->otyp, TRUE, FALSE);
                 otmp->known = otmp->dknown = otmp->bknown = otmp->rknown = 1;
                 /* assumes artifacts don't have quan > 1 */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(pbuf, "%s%s (worth %ld %s and %ld points)",
                         the_unique_obj(otmp) ? "The " : "",
                         otmp->oartifact ? artifact_name(xname(otmp), &dummy)
@@ -1284,7 +1284,7 @@ int how;
         }
     }
     /* explore and wizard modes offer player the option to keep playing */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     if (!survive && (wizard || discover) && how <= GENOCIDED
         && !paranoid_query(ParanoidDie, "Die?")) {
 #else
@@ -1529,7 +1529,7 @@ int how;
         /* give this feedback even if bones aren't going to be created,
            so that its presence or absence doesn't tip off the player to
            new bones or their lack; it might be a lie if makemon fails */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("%s as %s...",
              (u.ugrave_arise != PM_GREEN_SLIME)
                  ? "body rises from the dead"
@@ -1612,7 +1612,7 @@ int how;
         /* don't bother counting to see whether it should be plural */
     }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(pbuf, "%s %s the %s...", Goodbye(), plname,
             (how != ASCENDED)
                 ? (const char *) ((flags.female && urole.name.f)
@@ -1695,7 +1695,7 @@ int how;
 */
             Strcat(pbuf, "\82Í");
         }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(eos(pbuf), "%s with %ld point%s,",
                 how == ASCENDED ? "went to your reward"
                                  : "escaped from the dungeon",
@@ -1733,7 +1733,7 @@ int how;
                     if (has_oname(otmp))
                         free_oname(otmp);
                     otmp->quan = count;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Sprintf(pbuf, "%8ld %s (worth %ld %s),", count,
                             xname(otmp), count * (long) objects[typ].oc_cost,
                             currency(2L));
@@ -1744,7 +1744,7 @@ int how;
 #endif
                     obfree(otmp, (struct obj *) 0);
                 } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Sprintf(pbuf, "%8ld worthless piece%s of colored glass,",
                             count, plur(count));
 #else
@@ -1761,7 +1761,7 @@ int how;
         if (u.uz.dnum == 0 && u.uz.dlevel <= 0) {
             /* level teleported out of the dungeon; `how' is DIED,
                due to falling or to "arriving at heaven prematurely" */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(pbuf, "You %s beyond the confines of the dungeon",
                     (u.uz.dlevel < 0) ? "passed away" : ends[how]);
 #else
@@ -1782,7 +1782,7 @@ int how;
 */
             Sprintf(pbuf, "\82 \82È\82½\82Í%s", where);
             if (!In_endgame(&u.uz) && !Is_knox(&u.uz))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(eos(pbuf), " on dungeon level %d",
                         In_quest(&u.uz) ? dunlev(&u.uz) : depth(&u.uz));
 #else
@@ -2195,7 +2195,7 @@ boolean ask;
                     Sprintf(buf, "%s", mons[i].mname);
 #endif
                     if (nkilled > 1) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         switch (nkilled) {
                         case 2:
                             Sprintf(eos(buf), " (twice)");
@@ -2341,7 +2341,7 @@ boolean ask;
             done_stopprint++;
         if (c == 'y') {
             klwin = create_nhwindow(NHW_MENU);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "%s%s species:",
                     (ngenocided) ? "Genocided" : "Extinct",
                     (nextinct && ngenocided) ? " or extinct" : "");
index 0148d93..0150126 100644 (file)
@@ -193,7 +193,7 @@ cant_reach_floor(x, y, up, check_pit)
 int x, y;
 boolean up, check_pit;
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You("can't reach the %s.",
         up ? ceiling(x, y)
            : (check_pit && can_reach_floor(FALSE))
@@ -225,7 +225,7 @@ register int x, y;
 */
         return "\8bó\92\86";
     else if (is_pool(x, y))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         return (Underwater && !Is_waterlevel(&u.uz))
             ? "bottom" : hliquid("water");
 #else
@@ -415,7 +415,7 @@ int x, y;
         case DUST:
             if (!Blind) {
                 sensed = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s is written here in the %s.", Something,
                       is_ice(x, y) ? "frost" : "dust");
 #else
@@ -438,7 +438,7 @@ int x, y;
         case BURN:
             if (!Blind || can_reach_floor(TRUE)) {
                 sensed = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Some text has been %s into the %s here.",
                       is_ice(x, y) ? "melted" : "burned", surface(x, y));
 #else
@@ -777,7 +777,7 @@ doengrave()
     case FOOD_CLASS:
     case SCROLL_CLASS:
     case SPBOOK_CLASS:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s would get %s.", Yname2(otmp),
               is_ice(u.ux, u.uy) ? "all frosty" : "too dirty");
 #else
@@ -939,7 +939,7 @@ doengrave()
                         pline("\82±\82ê\82Í\8c\8a\8c@\82è\82Ì\8fñ\82¾\81I");
                     doknown = TRUE;
                 }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Strcpy(post_engr_text,
                        (Blind && !Deaf)
                           ? "You hear drilling!"
@@ -979,7 +979,7 @@ doengrave()
                         pline("\82±\82ê\82Í\89\8a\82Ì\8fñ\82¾\81I");
                     doknown = TRUE;
                 }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Strcpy(post_engr_text, Blind ? "You feel the wand heat up."
                                              : "Flames fly from the wand.");
 #else
@@ -1005,7 +1005,7 @@ doengrave()
                     Strcpy(post_engr_text, "\89Î\89Ô\82ª\8fñ\82©\82ç\94ò\82Ñ\8eU\82Á\82½\81D");
                     doblind = TRUE;
                 } else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Strcpy(post_engr_text, !Deaf
                                 ? "You hear crackling!"
                                 : "Your hair stands up!");
@@ -1084,7 +1084,7 @@ doengrave()
 */
                         You("\83\81\83b\83Z\81[\83W\82ð\90@\82«\82Æ\82Á\82½\81D");
                     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s %s.", Yobjnam2(otmp, "get"),
                               is_ice(u.ux, u.uy) ? "frosty" : "dusty");
 #else
@@ -1098,7 +1098,7 @@ doengrave()
 */
                     pline("\82±\82Ì\95\8e\9a\82Í%s\82Å\82Í\90@\82«\82Æ\82ê\82È\82¢\81D", xname(otmp));
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s.", Yobjnam2(otmp, "get"),
                       is_ice(u.ux, u.uy) ? "frosty" : "dusty");
 #else
@@ -1166,7 +1166,7 @@ doengrave()
         ptext = FALSE;
     }
     if (zapwand && (otmp->spe < 0)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %sturns to dust.", The(xname(otmp)),
               Blind ? "" : "glows violently, then ");
 #else
@@ -1174,7 +1174,7 @@ doengrave()
               Blind ? "" : "\8c\83\82µ\82­\8bP\82«\81C");
 #endif
         if (!IS_GRAVE(levl[u.ux][u.uy].typ))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You(
     "are not going to get anywhere trying to write in the %s with your dust.",
                 is_ice(u.ux, u.uy) ? "frost" : "dust");
@@ -1223,7 +1223,7 @@ doengrave()
                 || oep->engr_type == ENGR_BLOOD
                 || oep->engr_type == MARK) {
                 if (!Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("wipe out the message that was %s here.",
                         (oep->engr_type == DUST)
                             ? "written in the dust"
@@ -1245,7 +1245,7 @@ doengrave()
                      */
                     eow = TRUE;
             } else if (type == DUST || type == MARK || type == ENGR_BLOOD) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("cannot wipe out the message that is %s the %s here.",
                     oep->engr_type == BURN
                         ? (is_ice(u.ux, u.uy) ? "melted into" : "burned into")
@@ -1304,7 +1304,7 @@ doengrave()
         everb = (oep && !eow ? "\8d\8f\82Ý\89Á\82¦\82é" : "\8d\8f\82Þ");
         break;
     case BURN:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         everb = (oep && !eow
                      ? (is_ice(u.ux, u.uy) ? "add to the text melted into"
                                            : "add to the text burned into")
@@ -1337,7 +1337,7 @@ doengrave()
 */
         You("%s\82Å%s\82É%s\81D", doname(otmp), eloc, jpast(everb));
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%s the %s with your %s.", everb, eloc, body_part(FINGERTIP));
 #else
         You("%s\82Å%s\82É%s\81D", body_part(FINGER), eloc, jpast(everb));
@@ -1361,7 +1361,7 @@ doengrave()
     if (len == 0 || index(ebuf, '\033')) {
         if (zapwand) {
             if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s, then %s.", Tobjnam(otmp, "glow"),
                       otense(otmp, "fade"));
 #else
index 43fa028..69e844a 100644 (file)
@@ -313,7 +313,7 @@ boolean incr; /* true iff via incremental experience growth */
             u.uexp = newuexp(u.ulevel);
         }
         ++u.ulevel;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Welcome %sto experience level %d.",
               u.ulevelmax < u.ulevel ? "" : "back ",
               u.ulevel);
index 2a50a70..03a9750 100644 (file)
@@ -147,7 +147,7 @@ int expltype;
             adtyp = AD_MAGM;
             break;
         case 1:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             str = (olet == BURNING_OIL) ? "burning oil"
                      : (olet == SCROLL_CLASS) ? "tower of flame" : "fireball";
 #else
@@ -165,7 +165,7 @@ int expltype;
             adtyp = AD_COLD;
             break;
         case 4:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             str = (olet == WAND_CLASS) ? "death field"
                                        : "disintegration field";
 #else
@@ -570,7 +570,7 @@ int expltype;
                          * would be "you killed <mdef>" so give our own.
                          */
                         if (cansee(mtmp->mx, mtmp->my) || canspotmon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                             pline("%s is %s!", Monnam(mtmp),
                                   xkflg ? "burned completely"
                                         : nonliving(mtmp->data) ? "destroyed"
@@ -662,7 +662,7 @@ int expltype;
                     Strcat(killer.name, "\82Å");
 #endif
                 } else if (type >= 0 && olet != SCROLL_CLASS) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     killer.format = NO_KILLER_PREFIX;
                     Sprintf(killer.name, "caught %sself in %s own %s", uhim(),
                             uhis(), str);
@@ -704,7 +704,7 @@ int expltype;
     }
 
     if (shopdamage) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pay_for_damage((adtyp == AD_FIRE) ? "burn away"
                           : (adtyp == AD_COLD) ? "shatter"
                              : (adtyp == AD_DISN) ? "disintegrate"
index 461cb91..ac55a33 100644 (file)
@@ -569,7 +569,7 @@ char errbuf[];
        settle for `lock' instead of `fq_lock' because the latter
        might end up being too big for nethack's BUFSZ */
     if (fd < 0 && errbuf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(errbuf, "Cannot open file \"%s\" for level %d (errno %d).",
                 lock, lev, errno);
 #else
index 5884525..f734405 100644 (file)
@@ -49,7 +49,7 @@ dowatersnakes()
 
     if (!(mvitals[PM_WATER_MOCCASIN].mvflags & G_GONE)) {
         if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("An endless stream of %s pours forth!",
                   Hallucination ? makeplural(rndmonnam(NULL)) : "snakes");
 #else
@@ -96,7 +96,7 @@ dowaterdemon()
             /* Give those on low levels a (slightly) better chance of survival
              */
             if (rnd(100) > (80 + level_difficulty())) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Grateful for %s release, %s grants you a wish!",
                       mhis(mtmp), mhe(mtmp));
 #else
@@ -484,7 +484,7 @@ drinkfountain()
             dogushforth(TRUE);
             break;
         default:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("This tepid %s is tasteless.",
                   hliquid("water"));
 #else
@@ -516,7 +516,7 @@ register struct obj *obj;
         && !exist_artifact(LONG_SWORD, artiname(ART_EXCALIBUR))) {
         if (u.ualign.type != A_LAWFUL) {
             /* Ha!  Trying to cheat her. */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("A freezing mist rises from the %s and envelopes the sword.",
                   hliquid("water"));
 #else
@@ -750,7 +750,7 @@ drinksink()
         else {
             mtmp = makemon(&mons[PM_SEWER_RAT], u.ux, u.uy, NO_MM_FLAGS);
             if (mtmp)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Eek!  There's %s in the sink!",
                       (Blind || !canspotmon(mtmp)) ? "something squirmy"
                                                    : a_monnam(mtmp));
@@ -770,7 +770,7 @@ drinksink()
             }
         } while (!otmp);
         otmp->cursed = otmp->blessed = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Some %s liquid flows from the faucet.",
               Blind ? "odd" : hcolor(OBJ_DESCR(objects[otmp->otyp])));
 #else
@@ -867,7 +867,7 @@ drinksink()
         }
         /*FALLTHRU*/
     default:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("take a sip of %s %s.",
             rn2(3) ? (rn2(2) ? "cold" : "warm") : "hot",
             hliquid("water"));
index 968557a..d630eba 100644 (file)
@@ -185,7 +185,7 @@ moverock()
                     map_invisible(rx, ry);
                 }
                 if (flags.verbose)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("Perhaps that's why %s cannot move it.",
                           u.usteed ? y_monnam(u.usteed) : "you");
 #else
@@ -205,7 +205,7 @@ moverock()
                         obj_extract_self(otmp);
                         place_object(otmp, rx, ry);
                         newsym(sx, sy);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("KAABLAMM!!!  %s %s land mine.",
                               Tobjnam(otmp, "trigger"),
                               ttmp->madeby_u ? "your" : "a");
@@ -248,7 +248,7 @@ moverock()
                         pline("\83h\83T\83b\81I\82 \82È\82½\82Í\82à\82¤%s\82ð\8a´\82\82ç\82ê\82È\82¢\81D",
                               the(xname(otmp)));
                     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s%s and %s a %s in the %s!",
                               Tobjnam(otmp, (ttmp->ttyp == TRAPDOOR)
                                                 ? "trigger"
@@ -336,7 +336,7 @@ moverock()
  dopush:
                 if (!u.usteed) {
                     if (moves > lastmovetime + 2 || moves < lastmovetime)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("With %s effort you move %s.",
                               throws_rocks(youmonst.data) ? "little"
                                                           : "great",
@@ -348,7 +348,7 @@ moverock()
 #endif
                     exercise(A_STR, TRUE);
                 } else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s moves %s.", upstart(y_monnam(u.usteed)),
                           the(xname(otmp)));
 #else
@@ -371,7 +371,7 @@ moverock()
         } else {
  nopushmsg:
             if (u.usteed)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s tries to move %s, but cannot.",
                       upstart(y_monnam(u.usteed)), the(xname(otmp)));
 #else
@@ -398,7 +398,7 @@ moverock()
                     willpickup = (canpickup && autopick_testobj(otmp, TRUE));
 
                 if (u.usteed && P_SKILL(P_RIDING) < P_BASIC) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("aren't skilled enough to %s %s from %s.",
                         willpickup ? "pick up" : "push aside",
                         the(xname(otmp)), y_monnam(u.usteed));
@@ -413,7 +413,7 @@ moverock()
                      * canpickup:   you could easily pick it up
                      * otherwise:   you easily push it aside
                      */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("However, you %seasily %s.",
                           (willpickup || !canpickup) ? "" : "could ",
                           (willpickup || canpickup) ? "pick it up"
@@ -470,7 +470,7 @@ xchar x, y;
         && ((IS_ROCK(lev->typ) && !may_dig(x, y))
             /* may_dig() checks W_NONDIGGABLE but doesn't handle iron bars */
             || (lev->typ == IRONBARS && (lev->wall_info & W_NONDIGGABLE)))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("hurt your teeth on the %s.",
             (lev->typ == IRONBARS)
                 ? "bars"
@@ -498,7 +498,7 @@ xchar x, y;
         /* solid rock takes more work & time to dig through */
         context.digging.effort =
             (IS_ROCK(lev->typ) && !IS_TREE(lev->typ) ? 30 : 60) + u.udaminc;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("start chewing %s %s.",
             (boulder || IS_TREE(lev->typ) || lev->typ == IRONBARS)
                 ? "on a"
@@ -531,7 +531,7 @@ xchar x, y;
         return 1;
     } else if ((context.digging.effort += (30 + u.udaminc)) <= 100) {
         if (flags.verbose)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s chewing on the %s.",
                 context.digging.chew ? "continue" : "begin",
                 boulder
@@ -567,7 +567,7 @@ xchar x, y;
 
     if (boulder) {
         delobj(boulder);         /* boulder goes bye-bye */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("eat the boulder."); /* yum */
 #else
         You("\8aâ\82ð\90H\82×\82½\81D"); /* yum */
@@ -1572,7 +1572,7 @@ struct trap *desttrap; /* nonnull if another trap at <x,y> */
         if (--u.utrap) {
             if (flags.verbose) {
                 if (anchored) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     predicament = "chained to the";
                     culprit = "buried ball";
 #else
@@ -1580,7 +1580,7 @@ struct trap *desttrap; /* nonnull if another trap at <x,y> */
                     culprit = "\96\84\82Ü\82Á\82Ä\82¢\82é\8b\85";
 #endif
                 } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     predicament = "stuck in the";
                     culprit = surface(u.ux, u.uy);
 #else
@@ -1590,7 +1590,7 @@ struct trap *desttrap; /* nonnull if another trap at <x,y> */
                 }
                 if (u.usteed) {
                     if (anchored)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         Norep("You and %s are %s %s.", steedname, predicament,
                               culprit);
 #else
@@ -1598,7 +1598,7 @@ struct trap *desttrap; /* nonnull if another trap at <x,y> */
                               predicament);
 #endif
                     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         Norep("%s is %s %s.", upstart(steedname), predicament,
                               culprit);
 #else
@@ -1645,7 +1645,7 @@ boolean
 u_rooted()
 {
     if (!youmonst.data->mmove) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("are rooted %s.",
             Levitation || Is_airlevel(&u.uz) || Is_waterlevel(&u.uz)
                 ? "in place"
@@ -1822,7 +1822,7 @@ domove_core()
                         You("%s\82Ì\8eè\91O\82Å\8e~\82Ü\82Á\82½\81D",
                             an(defsyms[trap_to_defsym(tt)].explanation));
                     } else if (is_pool_or_lava(x,y) && levl[x][y].seenv) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You("stop at the edge of the %s.",
                             hliquid(is_pool(x,y) ? "water" : "lava"));
 #else
@@ -2024,7 +2024,7 @@ domove_core()
                because you don't see remembered terrain while underwater;
                although the hero can attack an adjacent monster this way,
                assume he can't reach out far enough to distinguish terrain */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, (Is_waterlevel(&u.uz) && levl[x][y].typ == AIR)
                              ? "an air bubble"
                              : "nothing");
@@ -2038,7 +2038,7 @@ domove_core()
                unlike searching, this won't reveal what that terrain is
                (except for solid rock, where the glyph would otherwise
                yield ludicrous "dark part of a room") */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Strcpy(buf, (levl[x][y].typ == STONE) ? "solid rock"
                          : glyph_is_cmap(glyph)
                             ? the(defsyms[glyph_to_cmap(glyph)].explanation)
@@ -2057,7 +2057,7 @@ domove_core()
 */
             Strcpy(buf, "\89½\82à\82È\82¢\8bó\92\86");
         }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%s%s %s.",
             !(boulder || solid) ? "" : !explo ? "harmlessly " : "futilely ",
             explo ? "explode at" : "attack", buf);
@@ -2199,7 +2199,7 @@ domove_core()
             newsym(x, y);
             newsym(u.ux0, u.uy0);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s %s.", mtmp->mtame ? "swap places with" : "frighten",
                 pnambuf);
 #else
@@ -2396,7 +2396,7 @@ invocation_message()
         You("%s\8aï\96­\82È\90U\93®\82ð\8a´\82\82½\81D", buf);
         u.uevent.uvibrated = 1;
         if (otmp && otmp->spe == 7 && otmp->lamplit)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s!", The(xname(otmp)),
                   Blind ? "throbs palpably" : "glows with a strange light");
 #else
@@ -2474,13 +2474,13 @@ boolean newspot;             /* true if called by spoteffects */
 */
                 You("\82Ð\82å\82¢\82Æ\8bó\8bC\82Ì\96A\82É\93ü\82Á\82½\81D");
             else if (is_lava(u.ux, u.uy))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("leave the %s...", hliquid("water")); /* oops! */
 #else
                 You("%s\90\85\82©\82ç\94²\82¯\82¾\82µ\82½\81D\81D\81D", hliquid("\90\85"));  /* oops! */
 #endif
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("are on solid %s again.",
                     is_ice(u.ux, u.uy) ? "ice" : "land");
 #else
@@ -2644,7 +2644,7 @@ boolean pick;
     /* Warning alerts you to ice danger */
     if (Warning && is_ice(u.ux, u.uy)) {
         static const char *const icewarnings[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             "The ice seems very soft and slushy.",
             "You feel the ice shift beneath you!",
             "The ice, is gonna BREAK!", /* The Dead Zone */
@@ -2665,7 +2665,7 @@ boolean pick;
         mtmp->mundetected = mtmp->msleeping = 0;
         switch (mtmp->data->mlet) {
         case S_PIERCER:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s suddenly drops from the %s!", Amonnam(mtmp),
                   ceiling(u.ux, u.uy));
 #else
@@ -2691,7 +2691,7 @@ boolean pick;
             } else {
                 int dmg;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("are hit by %s!",
                     x_monnam(mtmp, ARTICLE_A, "falling", 0, TRUE));
 #else
@@ -2706,7 +2706,7 @@ boolean pick;
             break;
         default: /* monster surprises you. */
             if (mtmp->mtame)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s jumps near you from the %s.", Amonnam(mtmp),
                       ceiling(u.ux, u.uy));
 #else
@@ -2925,7 +2925,7 @@ register boolean newlev;
             pline("\83f\83r\83b\83g\95ó\94 \93®\95¨\89\80\82É\82æ\82¤\82±\82»\81I");
             break;
         case SWAMP:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("It %s rather %s down here.", Blind ? "feels" : "looks",
                   Blind ? "humid" : "muddy");
 #else
@@ -2948,7 +2948,7 @@ register boolean newlev;
             break;
         case MORGUE:
             if (midnight()) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 const char *run = locomotion(youmonst.data, "Run");
                 pline("%s away!  %s away!", run, run);
 #else
@@ -3002,7 +3002,7 @@ register boolean newlev;
 */
                     verbalize("\82¨\82Ü\82¦\82Í\83f\83\8b\83t\83@\83C\82Ì\90_\91õ\8f\8a\82É\82¢\82é\81D");
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     verbalize("%s, %s, welcome to Delphi!",
                               Hello((struct monst *) 0), plname);
 #else
@@ -3086,7 +3086,7 @@ pickup_checks()
 */
                 pline("\82µ\82©\82µ\81C\82»\82ê\82Í\82Ê\82é\82Ê\82é\82µ\82Ä\95s\89õ\82¾\82Á\82½\82Ì\82Å\8eÌ\82Ä\82Ä\82µ\82Ü\82Á\82½\81D");
             } else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("don't %s anything in here to pick up.",
                     Blind ? "feel" : "see");
 #else
@@ -3332,7 +3332,7 @@ lookaround()
                      * into a pool and seeing if the game allowed it
                      */
                     if (iflags.mention_walls)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You("stop at the edge of the %s.",
                             hliquid(is_pool(x,y) ? "water" : "lava"));
 #else
@@ -3519,7 +3519,7 @@ maybe_wail()
         const char *who;
         int i, powercnt;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         who = (Role_if(PM_WIZARD) || Role_if(PM_VALKYRIE)) ? urole.name.m
                                                            : "Elf";
 #else
index d67f8b9..6a76fb1 100644 (file)
@@ -1250,7 +1250,7 @@ register int type;
  * http://concord.wikia.com/wiki/List_of_Fictional_Currencies
  */
 static const char *const currencies[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "Altarian Dollar",       /* The Hitchhiker's Guide to the Galaxy */
     "Ankh-Morpork Dollar",   /* Discworld */
     "auric",                 /* The Domination of Draka */
@@ -1303,7 +1303,7 @@ long amount;
 {
     const char *res;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     res = Hallucination ? currencies[rn2(SIZE(currencies))] : "zorkmid";
     if (amount != 1L)
         res = makeplural(res);
@@ -2100,7 +2100,7 @@ unsigned *resultflags;
     ilets[iletct] = '\0';
 
     for (;;) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(qbuf, "What kinds of thing do you want to %s? [%s]",
                 word, ilets);
 #else
@@ -2332,7 +2332,7 @@ int FDECL((*fn), (OBJ_P)), FDECL((*ckfn), (OBJ_P));
                     Sprintf(qpfx, "%s: ", word), *qpfx = highc(*qpfx);
                 first = FALSE;
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             (void) safe_qbuf(qbuf, qpfx, "?", otmp,
                              ininv ? safeq_xprname : doname,
                              ininv ? safeq_shortxprname : ansimpleoname,
@@ -2637,7 +2637,7 @@ long quan;       /* if non-0, print this quantity, not obj->quan */
      */
     if (cost != 0 || let == '*') {
         /* if dot is true, we're doing Iu, otherwise Ix */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(li,
                 iflags.menu_tab_sep ? "%c - %s\t%6ld %s"
                                     : "%c - %-45s %6ld %s",
@@ -2905,7 +2905,7 @@ long *out_cnt;
     }
     if (iflags.force_invmenu && lets && want_reply) {
         any = zeroany;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         add_menu(win, NO_GLYPH, &any, 0, 0, iflags.menu_headings,
                  "Special", MENU_UNSELECTED);
 #else
@@ -2913,7 +2913,7 @@ long *out_cnt;
                  "\93Á\8eê", MENU_UNSELECTED);
 #endif
         any.a_char = '*';
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         add_menu(win, NO_GLYPH, &any, '*', 0, ATR_NONE,
                  "(list everything)", MENU_UNSELECTED);
 #else
@@ -3266,7 +3266,7 @@ dounpaid()
     }
 
     putstr(win, 0, "");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     putstr(win, 0,
            xprname((struct obj *) 0, "Total:", '*', FALSE, totcost, 0L));
 #else
@@ -3426,7 +3426,7 @@ dotypeinv()
         if (billx)
             (void) doinvbill(1);
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("No used-up objects%s.",
                   unpaid_count ? " on your shopping bill" : "");
 #else
@@ -3563,7 +3563,7 @@ char *buf;
     else if (IS_SINK(ltyp))
         cmap = S_sink; /* "sink" */
     else if (IS_ALTAR(ltyp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(altbuf, "%saltar to %s (%s)",
                 ((lev->altarmask & AM_SHRINE)
                  && (Is_astralevel(&u.uz) || Is_sanctum(&u.uz)))
@@ -3771,7 +3771,7 @@ boolean picked_some;
 */
             There("\82±\82±\82É\82Í%s\88ê\82Â\82à\82Ì\82ª\82 \82é\81D", picked_some ? "\82à\82¤" : "");
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             There("are %s%s objects here.",
                   (obj_cnt < 5)
                       ? "a few"
@@ -3833,7 +3833,7 @@ boolean picked_some;
             putstr(tmpwin, 0, fbuf);
             putstr(tmpwin, 0, "");
         }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s that %s here:",
                 picked_some ? "Other things" : "Things",
                 Blind ? "you feel" : "are");
@@ -3903,7 +3903,7 @@ boolean force_touch;
         Strcpy(kbuf, corpse_xname(otmp, (const char *) 0, CXN_PFX_THE));
 
         if (poly_when_stoned(youmonst.data))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("touched %s with your bare %s.", kbuf,
                 makeplural(body_part(HAND)));
 #else
@@ -4265,7 +4265,7 @@ long numused;
  * This must match the object class order.
  */
 STATIC_VAR NEARDATA const char *names[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     0, "Illegal objects", "Weapons", "Armor", "Rings", "Amulets", "Tools",
     "Comestibles", "Potions", "Scrolls", "Spellbooks", "Wands", "Coins",
     "Gems/Stones", "Boulders/Statues", "Iron balls", "Chains", "Venoms"
@@ -4539,7 +4539,7 @@ doorganize() /* inventory organizer by Del Lamb */
                 pline1(Never_mind);
             return 0;
         } else if (let == GOLD_SYM && obj->oclass != COIN_CLASS) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Only gold coins may be moved into the '%c' slot.",
                   GOLD_SYM);
 #else
@@ -4556,7 +4556,7 @@ doorganize() /* inventory organizer by Del Lamb */
             break; /* got one */
         if (trycnt == 5)
             goto noadjust;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Select an inventory slot letter."); /* else try again */
 #else
         pline("\8e\9d\82¿\95¨\82Ì\95\8e\9a\82ð\91I\82ñ\82Å\82­\82¾\82³\82¢\81D");
@@ -4751,7 +4751,7 @@ char *title;
         have_inv = (mon->minvent != 0), have_any = (have_inv || incl_hero),
         pickings = (dflags & MINV_PICKMASK);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(tmp, "%s %s:", s_suffix(noit_Monnam(mon)),
             do_all ? "possessions" : "armament");
 #else
@@ -4804,7 +4804,7 @@ register struct obj *obj;
     int n;
     menu_item *selected = 0;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     (void) safe_qbuf(qbuf, "Contents of ", ":", obj, doname, ansimpleoname,
                      "that");
 #else
index c21732f..01e07ec 100644 (file)
@@ -687,19 +687,19 @@ struct obj *obj;
 {
     switch (arti_light_radius(obj)) {
     case 3:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         return "brilliantly"; /* blessed */
 #else
         return "\83L\83\89\83L\83\89\82Æ"; /* blessed */
 #endif
     case 2:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         return "brightly"; /* uncursed */
 #else
         return "\96¾\82é\82­"; /* uncursed */
 #endif
     case 1:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         return "dimly"; /* cursed */
 #else
         return "\94\96\88Ã\82­"; /* cursed */
index 8e692cb..aef02f3 100644 (file)
@@ -54,7 +54,7 @@ lock_action()
 {
     /* "unlocking"+2 == "locking" */
     static const char *actions[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "unlocking the door",   /* [0] */
         "unlocking the chest",  /* [1] */
         "unlocking the box",    /* [2] */
@@ -173,7 +173,7 @@ picklock(VOID_ARGS)
                 what = (xlock.box->otyp == CHEST) ? "\95ó\94 " : "\94 ";
                 alreadyunlocked = !xlock.box->olocked;
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("succeed in disarming the trap.  The %s is still %slocked.",
                 what, alreadyunlocked ? "un" : "");
 #else
@@ -303,7 +303,7 @@ forcelock(VOID_ARGS)
             /* for a +0 weapon, probability that it survives an unsuccessful
              * attempt to force the lock is (.992)^50 = .67
              */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%sour %s broke!", (uwep->quan > 1L) ? "One of y" : "Y",
                   xname(uwep));
 #else
@@ -439,7 +439,7 @@ struct obj *pick;
         You("%s\82ð\82Â\82©\82Þ\82±\82Æ\82ª\82Å\82«\82È\82¢\81I\8eè\82ª\82È\82¢\82ñ\82¾\82à\82Ì\81I", xname(pick));
         return PICKLOCK_DID_NOTHING;
     } else if (u.uswallow) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_cant("%sunlock %s.", (picktyp == CREDIT_CARD) ? "" : "lock or ",
                  mon_nam(u.ustuck));
 #else
@@ -472,7 +472,7 @@ struct obj *pick;
         int count;
 
         if (u.dz < 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             There("isn't any sort of lock up %s.",
                   Levitation ? "here" : "there");
 #else
@@ -535,7 +535,7 @@ struct obj *pick;
                 Sprintf(qsfx, " here; %s %s?", verb, it ? "it" : "its lock");
 */
                 Sprintf(qsfx, "\82ª\82 \82é\81D%s\81H", verb);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 (void) safe_qbuf(qbuf, "There is ", qsfx, otmp, doname,
                                  ansimpleoname, "a box");
 #else
@@ -558,7 +558,7 @@ struct obj *pick;
                     return PICKLOCK_LEARNED_SOMETHING;
                 } else if (picktyp == CREDIT_CARD && !otmp->olocked) {
                     /* credit cards are only good for unlocking */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You_cant("do that with %s.",
                              an(simple_typename(picktyp)));
 #else
@@ -617,7 +617,7 @@ struct obj *pick;
 */
                 verbalize("\82¢\82Â\82à\83j\83R\83j\83R\8c»\8bà\95¥\82¢\81D");
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("I don't think %s would appreciate that.",
                       mon_nam(mtmp));
 #else
@@ -673,7 +673,7 @@ struct obj *pick;
                 return PICKLOCK_LEARNED_SOMETHING;
             }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(qbuf, "%s it?",
                     (door->doormask & D_LOCKED) ? "Unlock" : "Lock");
 #else
@@ -732,7 +732,7 @@ doforce()
                   || objects[uwep->otyp].oc_skill == P_FLAIL
                   || objects[uwep->otyp].oc_skill > P_LANCE)
                : uwep->oclass != ROCK_CLASS)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_cant("force anything %s weapon.",
                  !uwep ? "when not wielding a"
                        : (uwep->oclass != WEAPON_CLASS && !is_weptool(uwep))
@@ -775,7 +775,7 @@ doforce()
                    since we're about to set lknown, there's no need to
                    remember and then reset its current value */
                 otmp->lknown = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 There("is %s here, but its lock is already %s.",
                       doname(otmp), otmp->obroken ? "broken" : "unlocked");
 #else
@@ -786,7 +786,7 @@ doforce()
                 otmp->lknown = 1;
                 continue;
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             (void) safe_qbuf(qbuf, "There is ", " here; force its lock?",
                              otmp, doname, ansimpleoname, "a box");
 #else
@@ -922,7 +922,7 @@ int x, y;
 */
             pline_The("\92µ\82Ë\8b´\82Í\82à\82¤\8aJ\82¢\82Ä\82¢\82é\81D");
         else if (container_at(cc.x, cc.y, TRUE))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s like something lootable over there.",
                   Blind ? "Feels" : "Seems");
 #else
@@ -1022,7 +1022,7 @@ boolean quietly;
         if (!quietly) {
             if ((mtmp->mx != x) || (mtmp->my != y)) {
                 /* worm tail */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s%s blocks the way!",
                       !canspotmon(mtmp) ? Something : s_suffix(Monnam(mtmp)),
                       !canspotmon(mtmp) ? "" : " tail");
@@ -1032,7 +1032,7 @@ boolean quietly;
                       !canspotmon(mtmp) ? "" : "\82Ì\90K\94ö");
 #endif
             } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s blocks the way!",
                       !canspotmon(mtmp) ? "Some creature" : Monnam(mtmp));
 #else
@@ -1328,7 +1328,7 @@ int x, y;
         /* & trap doors, but is it ever OK for anything else? */
         if (t_at(x, y)) {
             /* maketrap() clears doormask, so it should be NODOOR */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s springs up in the doorway, but %s.", dustcloud,
                   quickly_dissipates);
 #else
@@ -1459,7 +1459,7 @@ struct obj *otmp;
     long save_Blinded;
 
     if (otmp->oclass == POTION_CLASS) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%s %s shatter!", Blind ? "hear" : "see", an(bottlename()));
 #else
         if (Blind)
index 6a0d2cb..a4e023b 100644 (file)
@@ -276,7 +276,7 @@ coord *startp; /* starting position (read only) */
 }
 
 /* Let the mail daemon have a larger vocabulary. */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 static NEARDATA const char *mail_text[] = { "Gangway!", "Look out!",
                                             "Pardon me!" };
 #else
@@ -439,7 +439,7 @@ struct mail_info *info;
 */
             verbalize("\82Ù\82ç\82æ\81I");
         display_nhwindow(WIN_MESSAGE, FALSE);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         obj = hold_another_object(obj, "Oops!", (const char *) 0,
                                   (const char *) 0);
 #else
@@ -610,7 +610,7 @@ boolean adminmsg;
     struct flock fl = { 0 };
 #endif
     const char *msgfrom = adminmsg
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         ? "The voice of %s booms through the caverns:"
         : "This message is from '%s'.";
 #else
@@ -643,7 +643,7 @@ boolean adminmsg;
             fl.l_type = F_UNLCK;
             fcntl (fileno(mb), F_UNLCK, &fl);
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("There is a%s message on this scroll.",
                   seen_one_already ? "nother" : "");
 #else
index 02cfc38..766e5ed 100644 (file)
@@ -269,7 +269,7 @@ boolean foundyou;
        penalizing mspec_used. */
     if (!foundyou && thinks_it_foundyou
         && !is_undirected_spell(mattk->adtyp, spellnum)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s casts a spell at %s!",
               canseemon(mtmp) ? Monnam(mtmp) : "Something",
               levl[mtmp->mux][mtmp->muy].typ == WATER ? "empty water"
@@ -511,19 +511,19 @@ int spellnum;
                only a single monster is seen */
             if (Invisible && !perceives(mtmp->data)
                 && (mtmp->mux != u.ux || mtmp->muy != u.uy))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s around a spot near you!", mappear);
 #else
                 pline("\89ö\95¨\82ª\82 \82È\82½\82Ì\82·\82®\82»\82Î\82É\8c»\82ê\82½\81I");
 #endif
             else if (Displaced && (mtmp->mux != u.ux || mtmp->muy != u.uy))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s around your displaced image!", mappear);
 #else
                 pline("\89ö\95¨\82ª\82 \82È\82½\82Ì\8c\89e\82Ì\82·\82®\82»\82Î\82É\8c»\82ê\82½\81I");
 #endif
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s from nowhere!", mappear);
 #else
                 pline("\89ö\95¨\82ª\82Ç\82±\82©\82ç\82Æ\82à\82È\82­\8c»\82ê\82½\81I");
@@ -587,7 +587,7 @@ int spellnum;
     case MGC_DISAPPEAR: /* makes self invisible */
         if (!mtmp->minvis && !mtmp->invis_blkd) {
             if (canseemon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s suddenly %s!", Monnam(mtmp),
                       !See_invisible ? "disappears" : "becomes transparent");
 #else
@@ -794,7 +794,7 @@ int spellnum;
                 /* unseen caster summoned seen critter(s) */
                 arg = (newseen == oldseen + 1) ? an(what) : makeplural(what);
                 if (!Deaf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You_hear("someone summoning something, and %s %s.", arg,
                              vtense(arg, "appear"));
 #else
@@ -848,7 +848,7 @@ int spellnum;
     case CLC_BLIND_YOU:
         /* note: resists_blnd() doesn't apply here */
         if (!Blinded) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             int num_eyes = eyecount(youmonst.data);
             pline("Scales cover your %s!", (num_eyes == 1)
                                                ? body_part(EYE)
@@ -1084,7 +1084,7 @@ register struct attack *mattk;
         nomul(0);
         if (mattk->adtyp && (mattk->adtyp < 11)) { /* no cf unsigned >0 */
             if (canseemon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s zaps you with a %s!", Monnam(mtmp),
                       flash_types[ad_to_typ(mattk->adtyp)]);
 #else
index a13b3f7..e81ef48 100644 (file)
@@ -86,7 +86,7 @@ register struct attack *mattk;
     if (!Deaf && (farq != far_noise || moves - noisetime > 10)) {
         far_noise = farq;
         noisetime = moves;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_hear("%s%s.",
                  (mattk->aatyp == AT_EXPL) ? "an explosion" : "some noises",
                  farq ? " in the distance" : "");
@@ -299,7 +299,7 @@ boolean quietly;
     place_monster(magr, tx, ty); /* put down at target spot */
     place_monster(mdef, fx, fy);
     if (vis && !quietly)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s moves %s out of %s way!", Monnam(magr), mon_nam(mdef),
               is_rider(pa) ? "the" : mhis(magr));
 #else
@@ -474,7 +474,7 @@ register struct monst *magr, *mdef;
                             char buf[BUFSZ];
 
                             Strcpy(buf, Monnam(mdef));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                             pline("%s divides as %s hits it!", buf,
                                   mon_nam(magr));
 #else
@@ -604,7 +604,7 @@ struct attack *mattk;
         if (M_AP_TYPE(magr))
             seemimic(magr);
         if ((compat = could_seduce(magr, mdef, mattk)) && !magr->mcan) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "%s %s", Monnam(magr),
                     mdef->mcansee ? "smiles at" : "talks to");
             pline("%s %s %s.", buf, mon_nam(mdef),
@@ -689,7 +689,7 @@ struct attack *mattk;
         if (mdef->data->mlet == S_MIMIC
             && M_AP_TYPE(mdef) != M_AP_NOTHING)
             seemimic(mdef);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s gazes at", Monnam(magr));
         pline("%s %s...", buf,
               canspotmon(mdef) ? mon_nam(mdef) : "something");
@@ -718,7 +718,7 @@ struct attack *mattk;
         if (mdef->mcansee) {
             if (mon_reflects(magr, (char *) 0)) {
                 if (canseemon(magr))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     (void) mon_reflects(magr,
                                       "The gaze is reflected away by %s %s.");
 #else
@@ -729,7 +729,7 @@ struct attack *mattk;
             }
             if (mdef->minvis && !perceives(magr->data)) {
                 if (canseemon(magr)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline(
                       "%s doesn't seem to notice that %s gaze was reflected.",
                           Monnam(magr), mhis(magr));
@@ -805,7 +805,7 @@ register struct attack *mattk;
         /* [this two-part formatting dates back to when only one x_monnam
            result could be included in an expression because the next one
            would overwrite first's result -- that's no longer the case] */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s swallows", Monnam(magr));
         pline("%s %s.", buf, mon_nam(mdef));
 #else
@@ -821,7 +821,7 @@ register struct attack *mattk;
         if (vis) {
             /* 'it' -- previous form is no longer available and
                using that would be excessively verbose */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s expels %s.", Monnam(magr),
                   canspotmon(mdef) ? "it" : something);
 #else
@@ -1057,7 +1057,7 @@ register struct attack *mattk;
         if (magr->mcan)
             break;
         if (canseemon(mdef))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s for a moment.", Monnam(mdef),
                   makeplural(stagger(pd, "stagger")));
 #else
@@ -1203,7 +1203,7 @@ register struct attack *mattk;
         }
         if (resists_acid(mdef)) {
             if (vis && canseemon(mdef))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s is covered in %s, but it seems harmless.",
                       Monnam(mdef), hliquid("acid"));
 #else
@@ -1430,7 +1430,7 @@ register struct attack *mattk;
                 were_change(mdef);
             if (pd == &mons[PM_CLAY_GOLEM]) {
                 if (vis && canseemon(mdef)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("Some writing vanishes from %s head!",
                           s_suffix(mon_nam(mdef)));
 #else
@@ -1632,7 +1632,7 @@ register struct attack *mattk;
         if ((mdef->misc_worn_check & W_ARMH) && rn2(8)) {
             if (vis && canspotmon(magr) && canseemon(mdef)) {
                 Strcpy(buf, s_suffix(Monnam(mdef)));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s helmet blocks %s attack to %s head.", buf,
                       s_suffix(mon_nam(magr)), mhis(mdef));
 #else
@@ -1910,7 +1910,7 @@ int mdead;
                         return (mdead | mhit);
                     Strcpy(buf, Monnam(magr));
                     if (canseemon(magr))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s is frozen by %s gaze!", buf,
                               s_suffix(mon_nam(mdef)));
 #else
@@ -1958,7 +1958,7 @@ int mdead;
             if (!magr->mstun) {
                 magr->mstun = 1;
                 if (canseemon(magr))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s...", Monnam(magr),
                           makeplural(stagger(magr->data, "stagger")));
 #else
index cfd858d..b4cb7cb 100644 (file)
@@ -131,7 +131,7 @@ struct attack *mattk;
 */
         pline("%s\82Í\97F\8dD\93I\82È\82Ó\82è\82ð\82µ\82Ä\82¢\82é\81D",Monnam(mtmp));
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %smisses!", Monnam(mtmp),
               (nearmiss && flags.verbose) ? "just " : "");
 #else
@@ -176,7 +176,7 @@ struct attack *mattk;
 */
         return (!mwep || !mwep->opoisoned) ? "\8dU\8c\82" : "\95\90\8aí";
     } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         return (mattk->aatyp == AT_TUCH) ? "contact"
                   : (mattk->aatyp == AT_GAZE) ? "gaze"
                        : (mattk->aatyp == AT_BITE) ? "bite" : "sting";
@@ -264,7 +264,7 @@ struct attack *mattk;
                 pline("%s\82Ì\8dU\8c\82\82Í\82 \82È\82½\82Ì\98e\95 \82ð\82©\82·\82ß\82½\81D", Monst_name);
                 break;
             case 2:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s strikes at %s!", Monst_name,
                       (levl[mtmp->mux][mtmp->muy].typ == WATER)
                         ? "empty water"
@@ -287,7 +287,7 @@ struct attack *mattk;
     } else if (Displaced) {
         /* give 'displaced' message even if hero is Blind */
         if (compat)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s smiles %s at your %sdisplaced image...", Monst_name,
                   (compat == 2) ? "engagingly" : "seductively",
                   Invis ? "invisible " : "");
@@ -297,7 +297,7 @@ struct attack *mattk;
                   (compat == 2) ? "\96£\97Í\93I\82É" : "\97U\98f\93I\82É");
 #endif
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s strikes at your %sdisplaced image and misses you!",
                   /* Note:  if you're both invisible and displaced, only
                    * monsters which see invisible will attack your displaced
@@ -603,7 +603,7 @@ register struct monst *mtmp;
 
             obj = which_armor(mtmp, WORN_HELMET);
             if (obj && is_metallic(obj)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("blow glances off %s %s.", s_suffix(mon_nam(mtmp)),
                      helm_simple_name(obj));
 #else
@@ -658,7 +658,7 @@ register struct monst *mtmp;
                     if (youmonst.data->mlet == S_EEL
                         || u.umonnum == PM_TRAPPER)
                         pline(
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                              "Wait, %s!  There's a hidden %s named %s there!",
                               m_monnam(mtmp), youmonst.data->mname, plname);
 #else
@@ -667,7 +667,7 @@ register struct monst *mtmp;
 #endif
                     else
                         pline(
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                           "Wait, %s!  There's a %s named %s hiding under %s!",
                               m_monnam(mtmp), youmonst.data->mname, plname,
                               doname(level.objects[u.ux][u.uy]));
@@ -699,7 +699,7 @@ register struct monst *mtmp;
 */
             pline("\89½\8eÒ\82©\82ª\82 \82È\82½\82Ì\8fã\82É\82Ì\82µ\82©\82©\82Á\82½\81D");
         else /* see note about m_monnam() above */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Wait, %s!  That's a %s named %s!", m_monnam(mtmp),
                   youmonst.data->mname, plname);
 #else
@@ -719,7 +719,7 @@ register struct monst *mtmp;
         if (!canspotmon(mtmp))
             map_invisible(mtmp->mx, mtmp->my);
         if (!youseeit)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s!", Something, (likes_gold(mtmp->data)
                                         && youmonst.mappearance == GOLD_PIECE)
                                            ? "tries to pick you up"
@@ -731,7 +731,7 @@ register struct monst *mtmp;
                                            : "\96³\8e\8b\82µ\82½");
 #endif
         else /* see note about m_monnam() above */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Wait, %s!  That %s is really %s named %s!", m_monnam(mtmp),
                   mimic_obj_name(&youmonst), an(mons[u.umonnum].mname),
                   plname);
@@ -743,7 +743,7 @@ register struct monst *mtmp;
         if (multi < 0) { /* this should always be the case */
             char buf[BUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "You appear to be %s again.",
                     Upolyd ? (const char *) an(youmonst.data->mname)
                            : (const char *) "yourself");
@@ -965,7 +965,7 @@ register struct monst *mtmp;
 */
                         pline("%s\82Í\93Ë\90i\82µ\81C\96ß\82Á\82½\81I", Monnam(mtmp));
                     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You_hear("a %s nearby.",
                                  is_whirly(mtmp->data) ? "rushing noise"
                                                        : "splat");
@@ -1090,7 +1090,7 @@ struct attack *mattk;
        protection might fail (33% chance) when the armor is cursed */
     if (obj && (obj->greased || obj->otyp == OILSKIN_CLOAK)
         && (!obj->cursed || rn2(3))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s your %s %s!", Monnam(mtmp),
               (mattk->adtyp == AD_WRAP) ? "slips off of"
                                         : "grabs you, but cannot hold onto",
@@ -1254,7 +1254,7 @@ register struct attack *mattk;
                 }
             } else if (u.ustuck == mtmp) {
                 exercise(A_STR, FALSE);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("are being %s.", (mtmp->data == &mons[PM_ROPE_GOLEM])
                                          ? "choked"
                                          : "crushed");
@@ -1274,7 +1274,7 @@ register struct attack *mattk;
                 if (otmp->otyp == CORPSE
                     && touch_petrifies(&mons[otmp->corpsenm])) {
                     dmg = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s hits you with the %s corpse.", Monnam(mtmp),
                           mons[otmp->corpsenm].mname);
 #else
@@ -1454,7 +1454,7 @@ register struct attack *mattk;
  dopois:
         hitmsg(mtmp, mattk);
         if (uncancelled && !rn2(8)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "%s %s", s_suffix(Monnam(mtmp)),
                     mpoisons_subj(mtmp, mattk));
 #else
@@ -1584,7 +1584,7 @@ register struct attack *mattk;
                           Monst_name, sidestr, leg);
 #endif
                 } else if (!rn2(5)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s pricks through your %s boot!", Monst_name,
                           sidestr);
 #else
@@ -1592,7 +1592,7 @@ register struct attack *mattk;
                           sidestr);
 #endif
                 } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s scratches your %s boot!", Monst_name,
                           sidestr);
 #else
@@ -1698,7 +1698,7 @@ register struct attack *mattk;
             } else {
                 dmg = 0;
                 if (flags.verbose)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s brushes against your %s.", Monnam(mtmp),
                           body_part(LEG));
 #else
@@ -1797,7 +1797,7 @@ register struct attack *mattk;
                 (void) rloc(mtmp, TRUE);
             if (is_animal(mtmp->data) && *buf) {
                 if (canseemon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s tries to %s away with %s.", Monnam(mtmp),
                           locomotion(mtmp->data, "run"), buf);
 #else
@@ -2314,7 +2314,7 @@ struct attack *mattk;
              * like horses for now :-)
              */
             Strcpy(buf, mon_nam(u.usteed));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s lunges forward and plucks you off %s!", Monnam(mtmp),
                   buf);
 #else
@@ -2343,7 +2343,7 @@ struct attack *mattk;
 
         i = number_leashed();
         if (i > 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             const char *s = (i > 1) ? "leashes" : "leash";
 
             pline_The("%s %s loose.", s, vtense(s, "snap"));
@@ -2415,7 +2415,7 @@ struct attack *mattk;
             if (Half_physical_damage)
                 tmp *= 2; /* sorry */
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s%s digests you!", Monnam(mtmp),
                   (u.uswldtim == 2) ? " thoroughly"
                                     : (u.uswldtim == 1) ? " utterly" : "");
@@ -2430,7 +2430,7 @@ struct attack *mattk;
     case AD_PHYS:
         physical_damage = TRUE;
         if (mtmp->data == &mons[PM_FOG_CLOUD]) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are laden with moisture and %s",
                 flaming(youmonst.data)
                     ? "are smoldering out!"
@@ -2748,7 +2748,7 @@ struct monst *mtmp;
 struct attack *mattk;
 {
     static const char *const reactions[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "confused",              /* [0] */
         "stunned",               /* [1] */
         "puzzled",   "dazzled",  /* [2,3] */
@@ -2783,7 +2783,7 @@ struct attack *mattk;
         if (cancelled || !mtmp->mcansee) {
             if (!canseemon(mtmp))
                 break; /* silently */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s.", Monnam(mtmp),
                   (mtmp->data == &mons[PM_MEDUSA] && mtmp->mcan)
                       ? "doesn't look all that ugly"
@@ -2818,7 +2818,7 @@ struct attack *mattk;
                 break;
             if (!m_canseeu(mtmp)) { /* probably you're invisible */
                 if (useeit)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline(
                       "%s doesn't seem to notice that %s gaze was reflected.",
                           Monnam(mtmp), mhis(mtmp));
@@ -3010,7 +3010,7 @@ struct attack *mattk;
             react = rn2(SIZE(reactions));
         /* cancelled/hallucinatory feedback; monster might look "confused",
            "stunned",&c but we don't actually set corresponding attribute */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s looks %s%s.", Monnam(mtmp),
               !rn2(3) ? "" : already ? "quite "
                                      : (!rn2(2) ? "a bit " : "somewhat "),
@@ -3106,7 +3106,7 @@ struct monst *mon;
     char qbuf[QBUFSZ], Who[QBUFSZ];
 
     if (mon->mcan || mon->mspec_used) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s acts as though %s has got a %sheadache.", Monnam(mon),
               mhe(mon), mon->mcan ? "severe " : "");
 #else
@@ -3530,7 +3530,7 @@ struct monst *mon;
 */
             verbalize("\82±\82ê\82Í\82¨\82²\82è%s\81I", fem ? "\82æ" : "\82³");
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s takes %ld %s for services rendered!", noit_Monnam(mon),
                   cost, currency(cost));
 #else
@@ -3588,7 +3588,7 @@ const char *str;
                 flags.female ? "\82È\82ñ\82ÄãY\97í\82È%s\82È\82ñ\82¾" : "\8a\95\82ð\8eæ\82Á\82½\82ç\82È\82©\82È\82©\83C\83J\83X\82\82á\82È\82¢",
                 body_part(HAIR));
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         verbalize("Take off your %s; %s.", str,
                   (obj == uarm)
                      ? "let's get a little closer"
@@ -3660,7 +3660,7 @@ struct attack *mattk;
     switch (oldu_mattk->adtyp) {
     case AD_ACID:
         if (!rn2(2)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s is splashed by %s%s!", Monnam(mtmp),
                   /* temporary? hack for sequencing issue:  "your acid"
                      looks strange coming immediately after player has
@@ -3806,7 +3806,7 @@ struct attack *mattk;
         case AD_STUN: /* Yellow mold */
             if (!mtmp->mstun) {
                 mtmp->mstun = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s.", Monnam(mtmp),
                       makeplural(stagger(mtmp->data, "stagger")));
 #else
@@ -3819,7 +3819,7 @@ struct attack *mattk;
         case AD_FIRE: /* Red mold */
             if (resists_fire(mtmp)) {
                 shieldeff(mtmp->mx, mtmp->my);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s is mildly warm.", Monnam(mtmp));
 #else
                 pline("%s\82Í\92g\82©\82­\82È\82Á\82½\81D", Monnam(mtmp));
@@ -3828,7 +3828,7 @@ struct attack *mattk;
                 tmp = 0;
                 break;
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s is suddenly very hot!", Monnam(mtmp));
 #else
             pline("%s\82Í\93Ë\91R\94M\82­\82È\82Á\82½\81I", Monnam(mtmp));
@@ -3837,7 +3837,7 @@ struct attack *mattk;
         case AD_ELEC:
             if (resists_elec(mtmp)) {
                 shieldeff(mtmp->mx, mtmp->my);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s is slightly tingled.", Monnam(mtmp));
 #else
                 pline("%s\82Í\82¿\82å\82Á\82Æ\83s\83\8a\83s\83\8a\82µ\82½\81D", Monnam(mtmp));
@@ -3846,7 +3846,7 @@ struct attack *mattk;
                 tmp = 0;
                 break;
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s is jolted with your electricity!", Monnam(mtmp));
 #else
             pline("%s\82Í\93d\8bC\83V\83\87\83b\83N\82ð\82¤\82¯\82½\81I", Monnam(mtmp));
index a1885de..5a0c5ad 100644 (file)
@@ -277,7 +277,7 @@ register struct monst *mtmp;
         newsym(mtmp->mx, mtmp->my);
     }
     if (youmonst.data->mlet == S_DEMON) { /* Won't blackmail their own. */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s says, \"Good hunting, %s.\"", Amonnam(mtmp),
               flags.female ? "Sister" : "Brother");
 #else
@@ -304,7 +304,7 @@ register struct monst *mtmp;
         if (mon_has_amulet(mtmp))
             demand = cash + (long) rn1(1000, 40);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s demands %ld %s for safe passage.", Amonnam(mtmp), demand,
               currency(demand));
 #else
index 6aaf29e..ad8f95f 100644 (file)
@@ -1886,7 +1886,7 @@ xchar x, y;
         return;
 
     if (!(u.uz.dnum == oracle_level.dnum      /* in main dungeon */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
           && !at_dgn_entrance("The Quest")    /* but not Quest's entry */
 #else
           && !at_dgn_entrance("\83N\83G\83X\83g")     /* but not Quest's entry */
index 933cdd1..b6c782a 100644 (file)
@@ -684,7 +684,7 @@ register struct obj *otmp;
 
 /* alteration types; must match COST_xxx macros in hack.h */
 static const char *const alteration_verbs[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "cancel", "drain", "uncharge", "unbless", "uncurse", "disenchant",
     "degrade", "dilute", "erase", "burn", "neutralize", "destroy", "splatter",
     "bite", "open", "break the lock on", "rust", "rot", "tarnish"
@@ -1260,7 +1260,7 @@ int old_range;
             *buf = '\0';
             if (iflags.last_msg == PLNMSG_OBJ_GLOWS)
                 /* we just saw "The <obj> glows <color>." from dipping */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Strcpy(buf, (obj->quan == 1L) ? "It" : "They");
 #else
                 Strcpy(buf, "\82»\82ê");
@@ -1273,7 +1273,7 @@ int old_range;
                    when changing intensity, using "less brightly" is
                    straightforward for dimming, but we need "brighter"
                    rather than "more brightly" for brightening; ugh */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s %s%s.", buf, otense(obj, "shine"),
                       (abs(delta) > 1) ? "much " : "",
                       (delta > 0) ? "brighter" : "less brightly");
@@ -2233,7 +2233,7 @@ boolean tipping; /* caller emptying entire contents; affects shop handling */
            being included in its formatted name during next message */
         iflags.suppress_price++;
         if (!tipping) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             obj = hold_another_object(obj,
                                       u.uswallow
                                         ? "Oops!  %s out of your reach!"
@@ -2265,7 +2265,7 @@ boolean tipping; /* caller emptying entire contents; affects shop handling */
                 if (IS_ALTAR(levl[u.ux][u.uy].typ))
                     doaltarobj(obj); /* does its own drop message */
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s to the %s.", Doname2(obj),
                           otense(obj, "drop"), surface(u.ux, u.uy));
 #else
@@ -2891,7 +2891,7 @@ struct obj *otmp2;
              * they'll be out of our view (minvent or container)
              * so don't actually show anything */
         } else if (onfloor || inpack) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("The %s coalesce%s.", makeplural(obj_typename(otmp->otyp)),
                   inpack ? " inside your pack" : "");
 #else
index 1ad38f0..eb598f7 100644 (file)
--- a/src/mon.c
+++ b/src/mon.c
@@ -339,7 +339,7 @@ unsigned corpseflags;
     case PM_BLACK_UNICORN:
         if (mtmp->mrevived && rn2(2)) {
             if (canseemon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s recently regrown horn crumbles to dust.",
                       s_suffix(Monnam(mtmp)));
 #else
@@ -925,7 +925,7 @@ register struct monst *mtmp;
             && touch_artifact(otmp, mtmp)) {
             if (mtmp->data == &mons[PM_RUST_MONSTER] && otmp->oerodeproof) {
                 if (canseemon(mtmp) && flags.verbose) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s eats %s!", Monnam(mtmp),
                           distant_name(otmp, doname));
 #else
@@ -937,7 +937,7 @@ register struct monst *mtmp;
                 otmp->oerodeproof = 0;
                 mtmp->mstun = 1;
                 if (canseemon(mtmp) && flags.verbose) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s spits %s out in disgust!", Monnam(mtmp),
                           distant_name(otmp, doname));
 #else
@@ -947,7 +947,7 @@ register struct monst *mtmp;
                 }
             } else {
                 if (cansee(mtmp->mx, mtmp->my) && flags.verbose)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s eats %s!", Monnam(mtmp),
                           distant_name(otmp, doname));
 #else
@@ -1072,7 +1072,7 @@ struct monst *mtmp;
             /* engulf */
             ++ecount;
             if (ecount == 1)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(buf, "%s engulfs %s.", Monnam(mtmp),
                         distant_name(otmp, doname));
 #else
@@ -1093,7 +1093,7 @@ struct monst *mtmp;
             ++count;
             if (cansee(mtmp->mx, mtmp->my)) {
                 if (flags.verbose)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s eats %s!", Monnam(mtmp),
                           distant_name(otmp, doname));
 #else
@@ -1161,7 +1161,7 @@ struct monst *mtmp;
         if (cansee(mtmp->mx, mtmp->my) && flags.verbose && buf[0])
             pline1(buf);
         else if (flags.verbose)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_hear("%s slurping sound%s.",
                      (ecount == 1) ? "a" : "several", plur(ecount));
 #else
@@ -1188,7 +1188,7 @@ register struct monst *mtmp;
         add_to_minv(mtmp, gold);
         if (cansee(mtmp->mx, mtmp->my)) {
             if (flags.verbose && !mtmp->isgd)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s picks up some %s.", Monnam(mtmp),
                       mat_idx == GOLD ? "gold" : "money");
 #else
@@ -1235,7 +1235,7 @@ register const char *str;
                 otmp3 = splitobj(otmp, carryamt);
             }
             if (cansee(mtmp->mx, mtmp->my) && flags.verbose)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s picks up %s.", Monnam(mtmp),
                       (distu(mtmp->mx, mtmp->my) <= 5)
                           ? doname(otmp3)
@@ -2204,7 +2204,7 @@ boolean was_swallowed; /* digestion */
                     There("is an explosion in your %s!", body_part(STOMACH));
 */
                     pline("%s\82Ì\92\86\82Å\94\9a\94­\82ª\8bN\82«\82½\81I", body_part(STOMACH));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Sprintf(killer.name, "%s explosion",
                             s_suffix(mdat->mname));
 #else
@@ -2384,7 +2384,7 @@ struct monst *mdef;
     mondead(mdef);
     if (wasinside) {
         if (is_animal(mdef->data))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s through an opening in the new %s.",
                 locomotion(youmonst.data, "jump"), xname(otmp));
 #else
@@ -2588,7 +2588,7 @@ int xkill_flags; /* 1: suppress message, 2: suppress corpse, 4: pacifist */
                 /* oc_big is also oc_bimanual and oc_bulky */
                 && (otmp->owt > 30 || objects[otyp].oc_big)) {
                 delobj(otmp);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             } else if (!flooreffects(otmp, x, y, nomsg ? "" : "fall")) {
 #else
             } else if (!flooreffects(otmp, x, y, nomsg ? "" : "\97\8e\82¿\82é")) {
@@ -2648,7 +2648,7 @@ cleanup:
     /* adjust alignment points */
     if (mtmp->m_id == quest_status.leader_m_id) { /* REAL BAD! */
         adjalign(-(u.ualign.record + (int) ALIGNLIM / 2));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("That was %sa bad idea...",
               u.uevent.qcompleted ? "probably " : "");
 #else
@@ -2742,7 +2742,7 @@ struct monst *mtmp;
                                && closed_door(mtmp->mx, mtmp->my));
 
             /* construct a format string before transformation */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "The lapidifying %s %s %s",
                     x_monnam(mtmp, ARTICLE_NONE, (char *) 0,
                              (SUPPRESS_SADDLE | SUPPRESS_HALLUCINATION
@@ -2789,7 +2789,7 @@ struct monst *mtmp;
             else
                 mtmp->cham = mndx;
             if (canspotmon(mtmp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s rises from the %s with renewed agility!",
                       Amonnam(mtmp), surface(mtmp->mx, mtmp->my));
 #else
@@ -2840,7 +2840,7 @@ struct monst *mtmp;
     if (!in_mklev && (mtmp->mstrategy & STRAT_APPEARMSG)) {
         mtmp->mstrategy &= ~STRAT_APPEARMSG; /* one chance only */
         if (!couldspot && canspotmon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s suddenly %s!", Amonnam(mtmp),
                   !Blind ? "appears" : "arrives");
 #else
@@ -3044,7 +3044,7 @@ boolean via_attack;
         if (got_mad && !Hallucination) {
             const char *who = q_guardian->mname;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             if (got_mad > 1)
                 who = makeplural(who);
             pline_The("%s %s to be angry too...",
@@ -3863,7 +3863,7 @@ boolean msg;      /* "The oldmon turns into a newmon!" */
                     char msgtrail[BUFSZ];
 
                     if (is_vampshifter(mtmp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         Sprintf(msgtrail, " which was a shapeshifted %s",
                                 noname_monnam(mtmp, ARTICLE_NONE));
 #else
@@ -3880,7 +3880,7 @@ boolean msg;      /* "The oldmon turns into a newmon!" */
                     }
 
                     /* Do this even if msg is FALSE */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("%s %s%s!",
                         (amorphous(olddata) || is_whirly(olddata))
                             ? "emerge from" : "break out of",
@@ -3922,12 +3922,12 @@ boolean msg;      /* "The oldmon turns into a newmon!" */
     if (msg) {
         Strcpy(newname, noname_monnam(mtmp, ARTICLE_A));
         /* oldname was capitalized above; newname will be lower case */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         if (!strcmpi(newname, "it")) { /* can't see or sense it now */
 #else
         if (!strcmpi(newname, "\89½\8eÒ\82©")) { /* can't see or sense it now */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             if (!!strcmpi(oldname, "it")) /* could see or sense it before */
 #else
             if (!!strcmpi(oldname, "\89½\8eÒ\82©")) /* could see or sense it before */
@@ -3935,7 +3935,7 @@ boolean msg;      /* "The oldmon turns into a newmon!" */
                 pline("%s disappears!", oldname);
             (void) usmellmon(mdat);
         } else { /* can see or sense it now */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             if (!strcmpi(oldname, "it")) /* couldn't see or sense it before */
 #else
             if (!strcmpi(oldname, "\89½\8eÒ\82©")) /* couldn't see or sense it before */
@@ -3958,7 +3958,7 @@ boolean msg;      /* "The oldmon turns into a newmon!" */
     possibly_unwield(mtmp, polyspot); /* might lose use of weapon */
     mon_break_armor(mtmp, polyspot);
     if (!(mtmp->misc_worn_check & W_ARMG))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         mselftouch(mtmp, "No longer petrify-resistant, ",
                    !context.mon_moving);
 #else
@@ -4204,7 +4204,7 @@ boolean silent;
     if (ct) {
         if (!silent) { /* do we want pline msgs? */
             if (slct)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline_The("guard%s wake%s up!", slct > 1 ? "s" : "",
                           slct == 1 ? "s" : "");
 #else
@@ -4212,14 +4212,14 @@ boolean silent;
 #endif
             if (nct || sct) {
                 if (nct)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline_The("guard%s get%s angry!", nct == 1 ? "" : "s",
                               nct == 1 ? "s" : "");
 #else
                     pline("\94Ô\95º\82Í\93{\82Á\82½\81I");
 #endif
                 else if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You_see("%sangry guard%s approaching!",
                             sct == 1 ? "an " : "", sct > 1 ? "s" : "");
 #else
@@ -4263,7 +4263,7 @@ short otyp;
         break;
     case M_AP_OBJECT:
         if (otyp == SPE_HEALING || otyp == SPE_EXTRA_HEALING) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s seems a more vivid %s than before.",
                   The(simple_typename(ap)),
                   c_obj_colors[objects[ap].oc_color]);
@@ -4396,7 +4396,7 @@ struct permonst *mdat;
                 msg_given = TRUE;
                 break;
             case S_UNICORN:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("detect a%s odor reminiscent of a stable.",
                     (mndx == PM_PONY) ? "n" : " strong");
 #else
index 852f9f4..2decb1e 100644 (file)
@@ -266,7 +266,7 @@ struct obj *obj; /* aatyp == AT_WEAP, AT_SPIT */
     if (check_visor) {
         o = (mdef == &youmonst) ? invent : mdef->minvent;
         for (; o; o = o->nobj)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             if ((o->owornmask & W_ARMH)
                 && (s = OBJ_DESCR(objects[o->otyp])) != (char *) 0
                 && !strcmp(s, "visored helmet"))
index 557fd56..84bfee3 100644 (file)
@@ -74,7 +74,7 @@ const char *shout;
             /* Sidenote on "A watchman angrily waves her arms!"
              * Female being called watchman is correct (career name).
              */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s angrily %s %s %s!",
                 Amonnam(mon),
                 nolimbs(mon->data) ? "shakes" : "waves",
@@ -508,7 +508,7 @@ register struct monst *mtmp;
     if (nearby && mdat->msound == MS_BRIBE && mtmp->mpeaceful && !mtmp->mtame
         && !u.uswallow) {
         if (mtmp->mux != u.ux || mtmp->muy != u.uy) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s whispers at thin air.",
                   cansee(mtmp->mux, mtmp->muy) ? Monnam(mtmp) : "It");
 #else
@@ -569,7 +569,7 @@ register struct monst *mtmp;
 
             if (m_sen || (Blind_telepat && rn2(2)) || !rn2(10)) {
                 int dmg;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("It locks on to your %s!",
                       m_sen ? "telepathy" : Blind_telepat ? "latent telepathy"
                                                           : "mind");
@@ -1399,7 +1399,7 @@ register int after;
                 if ((here->doormask & (D_LOCKED | D_CLOSED)) != 0
                     && amorphous(ptr)) {
                     if (flags.verbose && canseemon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s %s under the door.", Monnam(mtmp),
                               (ptr == &mons[PM_FOG_CLOUD]
                                || ptr->mlet == S_LIGHT) ? "flows" : "oozes");
@@ -1829,7 +1829,7 @@ boolean domsg;
     }
 
     if (reslt && domsg) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("You %s %s where %s was.",
               !canseemon(mon) ? "now detect" : "observe",
               noname_monnam(mon, ARTICLE_A), oldmtype);
index fd6235d..ca9eb6d 100644 (file)
@@ -26,7 +26,7 @@ STATIC_DCL boolean FDECL(m_lined_up, (struct monst *, struct monst *));
  * Keep consistent with breath weapons in zap.c, and AD_* in monattk.h.
  */
 STATIC_OVL NEARDATA const char *breathwep[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "fragments", "fire", "frost", "sleep gas", "a disintegration blast",
     "lightning", "poison gas", "acid", "strange breath #8",
     "strange breath #9"
@@ -322,7 +322,7 @@ struct obj *otmp, *mwep;
         if (!strcmp(trgbuf, "it"))
             Strcpy(trgbuf, humanoid(mtmp->data) ? "someone" : something);
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s %s%s%s!", Monnam(mtmp),
               m_shot.s ? "shoots" : "throws", onm,
               mtarg ? " at " : "", trgbuf);
@@ -613,7 +613,7 @@ struct obj *obj;         /* missile (or stack providing it) */
 */
                 pline("%s\82Í\82Í\82¸\82µ\82½\81I", Monnam(mon));
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s as %s throws it!", Tobjnam(singleobj, "slip"),
                       mon_nam(mon));
 #else
@@ -660,7 +660,7 @@ struct obj *obj;         /* missile (or stack providing it) */
                     You("catch the %s.", xname(singleobj));
 */
                     You("%s\82ð\82Â\82©\82Ü\82¦\82½\81D", xname(singleobj));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("are not interested in %s junk.",
                         s_suffix(mon_nam(mon)));
 #else
@@ -676,7 +676,7 @@ struct obj *obj;         /* missile (or stack providing it) */
 */
                      "\82±\82ê\82ª\97~\82µ\82©\82Á\82½\82ñ\82¾\82Æ\8ev\82¢\82È\82ª\82ç%s\82Ì\91¡\82è\95¨\82ð\8eó\82¯\82Æ\82Á\82½\81D",
                         s_suffix(mon_nam(mon)));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     (void) hold_another_object(singleobj,
                                                "You catch, but drop, %s.",
                                                xname(singleobj),
@@ -754,7 +754,7 @@ struct obj *obj;         /* missile (or stack providing it) */
 */
                         pline("\83E\83F\81[\81D\83N\83\8a\81[\83\80\82ð\82©\82Ô\82Á\82½\81D");
                     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("There's %s sticky all over your %s.",
                               something, body_part(FACE));
 #else
@@ -1056,7 +1056,7 @@ struct monst *mtmp;
 
         if (canseemon(mtmp)) {
             onm = xname(otmp);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s thrusts %s.", Monnam(mtmp),
                   obj_is_pname(otmp) ? the(onm) : an(onm));
 #else
@@ -1106,7 +1106,7 @@ struct attack *mattk;
 
     if (mtmp->mcan) {
         if (!Deaf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("A dry rattle comes from %s throat.",
                   s_suffix(mon_nam(mtmp)));
 #else
@@ -1175,7 +1175,7 @@ struct attack *mattk;
         if (!mtmp->mspec_used && rn2(3)) {
             if ((typ >= AD_MAGM) && (typ <= AD_ACID)) {
                 if (canseemon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s breathes %s!", Monnam(mtmp),
                           breathwep[typ - 1]);
 #else
index 09b13b5..5d2afca 100644 (file)
@@ -100,7 +100,7 @@ struct obj *obj;
                         pline1(empty);
                 } else {
                     if (vis) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline(
                             "As %s opens the bottle, an enormous %s emerges!",
                               mon_nam(mon),
@@ -192,7 +192,7 @@ struct obj *obj;
             int range = couldsee(mon->mx, mon->my) /* 9 or 5 */
                            ? (BOLT_LIM + 1) : (BOLT_LIM - 3);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_hear("a zap and an explosion %s.",
                      (distu(mon->mx, mon->my) <= range * range)
                         ? "nearby" : "in the distance");
@@ -224,7 +224,7 @@ boolean self;
         int range = couldsee(mtmp->mx, mtmp->my) /* 9 or 5 */
                        ? (BOLT_LIM + 1) : (BOLT_LIM - 3);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_hear("a %s zap.", (distu(mtmp->mx, mtmp->my) <= range * range)
                                  ? "nearby" : "distant");
 #else
@@ -233,7 +233,7 @@ boolean self;
                                  ? "\8bß" : "\89\93");
 #endif
     } else if (self) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s zaps %sself with %s!", Monnam(mtmp), mhim(mtmp),
               doname(otmp));
 #else
@@ -282,7 +282,7 @@ struct obj *otmp;
 */
         pline("%s\82Í%s\82ð\93Ç\82ñ\82¾\81I", Monnam(mtmp), onambuf);
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_hear("%s reading %s.",
                  x_monnam(mtmp, ARTICLE_A, (char *) 0,
                           (SUPPRESS_IT | SUPPRESS_INVISIBLE | SUPPRESS_SADDLE),
@@ -853,14 +853,14 @@ struct monst *mtmp;
             return 2;
         seetrap(ttmp);
         if (vis) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s has made a hole in the %s.", Monnam(mtmp),
                   surface(mtmp->mx, mtmp->my));
 #else
             pline("%s\82Í%s\82É\8c\8a\82ð\8aJ\82¯\82½\81D", Monnam(mtmp),
                   surface(mtmp->mx, mtmp->my));
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s through...", Monnam(mtmp),
                   is_flyer(mtmp->data) ? "dives" : "falls");
 #else
@@ -868,7 +868,7 @@ struct monst *mtmp;
                   is_flyer(mtmp->data) ? "\94ò\82Ñ\82±\82ñ\82¾" : "\97\8e\82¿\82½");
 #endif
         } else if (!Deaf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_hear("%s crash through the %s.", something,
                      surface(mtmp->mx, mtmp->my));
 #else
@@ -948,7 +948,7 @@ struct monst *mtmp;
             struct trap *t = t_at(trapx, trapy);
 
             Mnam = Monnam(mtmp);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s into a %s!", Mnam,
                   vtense(Mnam, locomotion(mtmp->data, "jump")),
                   (t->ttyp == TRAPDOOR) ? "trap door" : "hole");
@@ -982,7 +982,7 @@ struct monst *mtmp;
         if (Inhell && mon_has_amulet(mtmp) && !rn2(4)
             && (dunlev(&u.uz) < dunlevs_in_dungeon(&u.uz) - 3)) {
             if (vismon)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline(
     "As %s climbs the stairs, a mysterious force momentarily surrounds %s...",
                       mon_nam(mtmp), mhim(mtmp));
@@ -1059,7 +1059,7 @@ struct monst *mtmp;
             return 2;
         }
         if (vismon)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s escapes %sstairs!", Monnam(mtmp),
                   sstairs.up ? "up" : "down");
 #else
@@ -1080,7 +1080,8 @@ struct monst *mtmp;
 #if 0 /*JP:T*/
             pline("%s %s onto a teleport trap!", Mnam,
                   vtense(Mnam, locomotion(mtmp->data, "jump")));
-#else /* \93ú\96{\8cê\82Å\82Í\91S\82Ä\81u\94ò\82Ñ\8d\9e\82ñ\82¾\81v */
+#else
+            /* \93ú\96{\8cê\82Å\82Í\91S\82Ä\81u\94ò\82Ñ\8d\9e\82ñ\82¾\81v */
             pline("%s\82Í\8fu\8aÔ\88Ú\93®\82Ìã©\82É\94ò\82Ñ\8d\9e\82ñ\82¾\81I", Mnam);
 #endif
             seetrap(t_at(trapx, trapy));
@@ -1644,7 +1645,7 @@ struct monst *mtmp;
         mreadmsg(mtmp, otmp);
         /* Identify the scroll */
         if (canspotmon(mtmp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("%s rumbles %s %s!", ceiling(mtmp->mx, mtmp->my),
                       otmp->blessed ? "around" : "above", mon_nam(mtmp));
 #else
@@ -2013,7 +2014,7 @@ struct monst *mtmp;
                 if (on_level(&tolevel, &u.uz))
                     goto skipmsg;
                 if (vismon) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s rises up, through the %s!", Monnam(mtmp),
                           ceiling(mtmp->mx, mtmp->my));
 #else
@@ -2174,7 +2175,7 @@ struct monst *mtmp;
                 hand = makeplural(hand);
 
             if (vismon)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s flicks a bullwhip towards your %s!", Monnam(mtmp),
                       hand);
 #else
@@ -2188,7 +2189,7 @@ struct monst *mtmp;
                 pline("%s\82Í%s\82É\82Í\82©\82ç\82Ý\82Â\82©\82È\82©\82Á\82½\81D", The_whip, the_weapon);
                 return 1;
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s wraps around %s you're wielding!", The_whip,
                   the_weapon);
 #else
@@ -2196,7 +2197,7 @@ struct monst *mtmp;
                   the_weapon);
 #endif
             if (welded(obj)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s welded to your %s%c",
                       !is_plural(obj) ? "It is" : "They are", hand,
                       !obj->bknown ? '!' : '.');
@@ -2209,7 +2210,7 @@ struct monst *mtmp;
                 where_to = 0;
             }
             if (!where_to) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline_The("whip slips free."); /* not `The_whip' */
 #else
                 pline("\95Ú\82Í\82Ù\82Ç\82¯\82½\81D");  /* not `The_whip' */
@@ -2225,7 +2226,7 @@ struct monst *mtmp;
             freeinv(obj);
             switch (where_to) {
             case 1: /* onto floor beneath mon */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s yanks %s from your %s!", Monnam(mtmp), the_weapon,
                       hand);
 #else
@@ -2235,7 +2236,7 @@ struct monst *mtmp;
                 place_object(obj, mtmp->mx, mtmp->my);
                 break;
             case 2: /* onto floor beneath you */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s yanks %s to the %s!", Monnam(mtmp), the_weapon,
                       surface(u.ux, u.uy));
 #else
@@ -2583,7 +2584,7 @@ boolean stoning; /* True: stop petrification, False: cure stun && confusion */
         long save_quan = obj->quan;
 
         obj->quan = 1L;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s %s.", Monnam(mon),
               (obj->oclass == POTION_CLASS)
                   ? "quaffs"
@@ -2600,7 +2601,7 @@ boolean stoning; /* True: stop petrification, False: cure stun && confusion */
 #endif
         obj->quan = save_quan;
     } else if (!Deaf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_hear("%s.",
                  (obj->oclass == POTION_CLASS) ? "drinking" : "chewing");
 #else
@@ -2804,7 +2805,7 @@ boolean by_you; /* true: if mon kills itself, hero gets credit/blame */
     boolean vis = canseemon(mon), res = TRUE;
 
     if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s starts turning %s.", Monnam(mon),
               green_mon(mon) ? "into ooze" : hcolor(NH_GREEN));
 #else
@@ -2819,7 +2820,7 @@ boolean by_you; /* true: if mon kills itself, hero gets credit/blame */
 
         if (mon->mx == trap->tx && mon->my == trap->ty) {
             if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s triggers %s fire trap!", Mnam,
                       trap->tseen ? "the" : "a");
 #else
@@ -2833,7 +2834,7 @@ boolean by_you; /* true: if mon kills itself, hero gets credit/blame */
                 worm_move(mon);
             newsym(mon->mx, mon->my);
             if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s %s %s fire trap!", Mnam,
                       vtense(Mnam, locomotion(mon->data, "move")),
                       is_floater(mon->data) ? "over" : "onto",
@@ -2897,7 +2898,7 @@ boolean by_you; /* true: if mon kills itself, hero gets credit/blame */
                    for pacifist conduct); xkilled()'s message would say
                    "You killed/destroyed <mon>" so give our own message */
                 if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s is %s by the fire!", Monnam(mon),
                           nonliving(mon->data) ? "destroyed" : "killed");
 #else
index dc21bc7..f011121 100644 (file)
@@ -140,7 +140,7 @@ int distance;
 */
                     You("%s\82ª\89¹\8ay\82É\8d\87\82í\82¹\82Ä\97h\82ê\82Ä\82¢\82é\82Ì\82É\8bC\95t\82¢\82½\81D", a_monnam(mtmp));
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s freezes, then sways with the music%s.",
                           Monnam(mtmp),
                           was_peaceful ? "" : ", and now seems quieter");
@@ -512,7 +512,7 @@ int force;
                             if (keepfooting)
                                 exercise(A_DEX, TRUE);
                             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                                 selftouch(
                                     (Upolyd && (slithy(youmonst.data)
                                                 || nolimbs(youmonst.data)))
@@ -752,7 +752,7 @@ struct obj *instr;
         break;
     case WOODEN_HARP: /* May calm Nymph */
         do_spec &= (rn2(ACURR(A_DEX)) + u.ulevel > 25);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s.", Yname2(instr),
               do_spec ? "produces a lilting melody" : "twangs");
 #else
@@ -963,7 +963,7 @@ struct obj *instr;
                         }
                     if (tumblers)
                         if (gears)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                             You_hear("%d tumbler%s click and %d gear%s turn.",
                                      tumblers, plur(tumblers), gears,
                                      plur(gears));
@@ -972,7 +972,7 @@ struct obj *instr;
                                 tumblers, gears);
 #endif
                         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                             You_hear("%d tumbler%s click.", tumblers,
                                      plur(tumblers));
 #else
index 217571b..cce7e56 100644 (file)
@@ -58,7 +58,7 @@ struct Jitem {
              && typ != SAPPHIRE && typ != BLACK_OPAL && typ != EMERALD \
              && typ != OPAL)))
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 STATIC_OVL struct Jitem Japanese_items[] = { { SHORT_SWORD, "wakizashi" },
                                              { BROADSWORD, "ninja-to" },
                                              { FLAIL, "nunchaku" },
@@ -1076,7 +1076,7 @@ struct obj *obj;
         bareobj.spe = obj->spe;
 
     bufp = distant_name(&bareobj, xname); /* xname(&bareobj) */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     if (!strncmp(bufp, "uncursed ", 9))
         bufp += 9; /* Role_if(PM_PRIEST) */
 #else
@@ -1210,7 +1210,7 @@ char *prefix;
         Strcat(prefix, is_corrodeable(obj) ? "\95\85\90H\82µ\82½" : "\95\85\82Á\82½");
     }
     if (rknown && obj->oerodeproof)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Strcat(prefix, iscrys
                           ? "fixed "
                           : is_rustprone(obj)
@@ -1298,7 +1298,7 @@ unsigned doname_flags;
      * combining both into one function taking a parameter.
      */
     /* must check opoisoned--someone can have a weirdly-named fruit */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     if (!strncmp(bp, "poisoned ", 9) && obj->opoisoned) {
         bp += 9;
         ispoisoned = TRUE;
@@ -1508,7 +1508,7 @@ unsigned doname_flags;
                 impossible("leashed monster not on this level");
                 obj->leashmon = 0;
             } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(eos(bp), " (attached to %s)",
                         noit_mon_nam(mlsh));
 #else
@@ -1622,7 +1622,7 @@ unsigned doname_flags;
 #endif
             if (omndx >= LOW_PM
                 && (known || (mvitals[omndx].mvflags & MV_KNOWS_EGG))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Strcat(prefix, mons[omndx].mname);
                 Strcat(prefix, " ");
 #else
@@ -1748,7 +1748,7 @@ unsigned doname_flags;
     } else if (is_unpaid(obj)) { /* in inventory or in container in invent */
         long quotedprice = unpaid_cost(obj, TRUE);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(eos(bp), " (%s, %ld %s)",
                 obj->unpaid ? "unpaid" : "contents",
                 quotedprice, currency(quotedprice));
@@ -3594,21 +3594,21 @@ struct obj *no_wish;
             while (*bp == ' ')
                 bp++;
             l = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "blessed ", l = 8)
                    || !strncmpi(bp, "holy ", l = 5)) {
 #else
         } else if (!strncmpi(bp, "\8fj\95\9f\82³\82ê\82½", l = 10)) {
 #endif
             blessed = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "moist ", l = 6)
                    || !strncmpi(bp, "wet ", l = 4)) {
 #else
         } else if (!strncmpi(bp, "\8e¼\82Á\82½", l = 6)
                    || !strncmpi(bp, "\94G\82ê\82½", l = 6)) {
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             if (!strncmpi(bp, "wet ", 4))
 #else
             if (!strncmpi(bp, "\94G\82ê\82½", 6))
@@ -3616,20 +3616,20 @@ struct obj *no_wish;
                 wetness = rn2(3) + 3;
             else
                 wetness = rnd(2);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "cursed ", l = 7)
                    || !strncmpi(bp, "unholy ", l = 7)) {
 #else
         } else if (!strncmpi(bp, "\8eô\82í\82ê\82½", l = 8)) {
 #endif
             iscursed = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "uncursed ", l = 9)) {
 #else
         } else if (!strncmpi(bp, "\8eô\82í\82ê\82Ä\82¢\82È\82¢", l = 14)) {
 #endif
             uncursed = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "rustproof ", l = 10)
                    || !strncmpi(bp, "erodeproof ", l = 11)
                    || !strncmpi(bp, "corrodeproof ", l = 13)
@@ -3643,7 +3643,7 @@ struct obj *no_wish;
                    || !strncmpi(bp, "\94R\82¦\82È\82¢", l = 8)) {
 #endif
             erodeproof = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "lit ", l = 4)
                    || !strncmpi(bp, "burning ", l = 8)) {
 #else
@@ -3651,7 +3651,7 @@ struct obj *no_wish;
                    || !strncmpi(bp, "\94R\82¦\82Ä\82¢\82é", l = 10)) {
 #endif
             islit = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "unlit ", l = 6)
                    || !strncmpi(bp, "extinguished ", l = 13)) {
 #else
@@ -3659,7 +3659,7 @@ struct obj *no_wish;
 #endif
             islit = 0;
             /* "unlabeled" and "blank" are synonymous */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "unlabeled ", l = 10)
                    || !strncmpi(bp, "unlabelled ", l = 11)
                    || !strncmpi(bp, "blank ", l = 6)) {
@@ -3668,7 +3668,7 @@ struct obj *no_wish;
                    || !strncmpi(bp, "\90^\82Á\94\92\82È", l = 8)) {
 #endif
             unlabeled = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "poisoned ", l = 9)) {
 #else
         } else if (!strncmpi(bp, "\93Å\82Ì\93h\82ç\82ê\82½", l = 12)) {
@@ -3682,45 +3682,45 @@ struct obj *no_wish;
         } else if (!strncmpi(bp, "untrapped ", l = 10)) {
             trapped = 2; /* not trapped */
         /* locked, unlocked, broken: box/chest lock states */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "locked ", l = 7)) {
 #else
         } else if (!strncmpi(bp, "\8c®\82Ì\8a|\82©\82Á\82½", l = 12)) {
 #endif
             locked = 1, unlocked = broken = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "unlocked ", l = 9)) {
 #else
         } else if (!strncmpi(bp, "\8c®\82Ì\8a|\82©\82Á\82Ä\82¢\82È\82¢", l = 18)) {
 #endif
             unlocked = 1, locked = broken = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "broken ", l = 7)) {
 #else
         } else if (!strncmpi(bp, "\8c®\82Ì\89ó\82ê\82½", l = 10)) {
 #endif
             broken = 1, locked = unlocked = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "greased ", l = 8)) {
 #else
         } else if (!strncmpi(bp, "\96û\82Ì\93h\82ç\82ê\82½", l = 12)
                    || !strncmpi(bp, "\8e\89\82Ì\93h\82ç\82ê\82½", l = 12)) {
 #endif
             isgreased = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "very ", l = 5)) {
 #else
         } else if (!strncmpi(bp, "\82Æ\82Ä\82à", l = 6)) {
 #endif
             /* very rusted very heavy iron ball */
             very = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "thoroughly ", l = 11)) {
 #else
         } else if (!strncmpi(bp, "\82©\82È\82è", l = 6)) {
 #endif
             very = 2;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "rusty ", l = 6)
                    || !strncmpi(bp, "rusted ", l = 7)
                    || !strncmpi(bp, "burnt ", l = 6)
@@ -3731,7 +3731,7 @@ struct obj *no_wish;
 #endif
             eroded = 1 + very;
             very = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "corroded ", l = 9)
                    || !strncmpi(bp, "rotted ", l = 7)) {
 #else
@@ -3740,32 +3740,32 @@ struct obj *no_wish;
 #endif
             eroded2 = 1 + very;
             very = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "partly eaten ", l = 13)
                    || !strncmpi(bp, "partially eaten ", l = 16)) {
 #else
         } else if (!strncmpi(bp, "\90H\82×\82©\82¯\82Ì", l = 10)) {
 #endif
             halfeaten = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "historic ", l = 9)) {
 #else
         } else if (!strncmpi(bp, "\97ð\8ej\93I\82È", l = 8)) {
 #endif
             ishistoric = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "diluted ", l = 8)) {
 #else
         } else if (!strncmpi(bp, "\94\96\82Ü\82Á\82½", l = 8)) {
 #endif
             isdiluted = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "empty ", l = 6)) {
 #else
         } else if (!strncmpi(bp, "\8bó\82Á\82Û\82Ì", l = 8)) {
 #endif
             contents = EMPTY;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "small ", l = 6)) { /* glob sizes */
 #else
         } else if (!strncmpi(bp, "\8f¬\82³\82¢", l = 6)) { /* glob sizes */
@@ -3778,7 +3778,7 @@ struct obj *no_wish;
             if (strncmpi(bp + l, "glob", 4) && !strstri(bp + l, " glob"))
                 break;
             gsize = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "medium ", l = 7)) {
 #else
         } else if (!strncmpi(bp, "\92\86\82­\82ç\82¢\82Ì", l = 10)) {
@@ -3787,7 +3787,7 @@ struct obj *no_wish;
                there'd be no way to ask for the intermediate size
                ("glob" without size prefix yields smallest one) */
             gsize = 2;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (!strncmpi(bp, "large ", l = 6)) {
 #else
         } else if (!strncmpi(bp, "\91å\82«\82¢", l = 6)) {
@@ -4940,7 +4940,7 @@ struct obj *suit;
 
     if (suit) {
         if (Is_dragon_mail(suit))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             return "dragon mail"; /* <color> dragon scale mail */
 #else
             return "\97Ø\8aZ"; /* <color> dragon scale mail */
@@ -4952,7 +4952,7 @@ struct obj *suit;
             return "\97Ø";
         suitnm = OBJ_NAME(objects[suit->otyp]);
         esuitp = eos((char *) suitnm);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         if (strlen(suitnm) > 5 && !strcmp(esuitp - 5, " mail"))
             return "mail"; /* most suits fall into this category */
 #else
index fb9b40e..dd457ae 100644 (file)
@@ -329,7 +329,7 @@ static struct Comp_Opt {
 */
     { "font_map", "\83}\83b\83v\83E\83B\83\93\83h\83E\82É\8eg\97p\82·\82é\83t\83H\83\93\83g", 40,
       DISP_IN_GAME },                                              /*WC*/
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { "font_menu", "the font to use in menus", 40, DISP_IN_GAME }, /*WC*/
 #else
     { "font_menu", "\83\81\83j\83\85\81[\82É\8eg\97p\82·\82é\83t\83H\83\93\83g", 40, DISP_IN_GAME }, /*WC*/
@@ -339,7 +339,7 @@ static struct Comp_Opt {
 */
     { "font_message", "\83\81\83b\83Z\81[\83W\83E\83B\83\93\83h\83E\82É\8eg\97p\82·\82é\83t\83H\83\93\83g", 40,
       DISP_IN_GAME },                                                  /*WC*/
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { "font_size_map", "the size of the map font", 20, DISP_IN_GAME }, /*WC*/
 #else
     { "font_size_map", "\83}\83b\83v\83t\83H\83\93\83g\82Ì\83T\83C\83Y", 20, DISP_IN_GAME }, /*WC*/
@@ -387,7 +387,7 @@ static struct Comp_Opt {
 */
     { "horsename", "\96`\8c¯\82ð\8b\9f\82É\82·\82é(\8dÅ\8f\89\82Ì)\94n\82Ì\96¼\91O (\97á ghoulname:\83V\83\8b\83o\81[)",
       PL_PSIZ, DISP_IN_GAME },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { "map_mode", "map display mode under Windows", 20, DISP_IN_GAME }, /*WC*/
 #else
     { "map_mode", "\83E\83B\83\93\83h\83E\95\\8e¦\8e\9e\82Ì\83}\83b\83v\82Ì\95\\8e¦\83\82\81[\83h", 20, DISP_IN_GAME }, /*WC*/
@@ -1381,7 +1381,7 @@ bad_negation(optname, with_parameter)
 const char *optname;
 boolean with_parameter;
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     pline_The("%s option may not %sbe negated.", optname,
               with_parameter ? "both have a value and " : "");
 #else
@@ -1508,7 +1508,7 @@ const char *optn;
     if (!initial) {
         Sprintf(buf, "%lu.%lu.%lu", FEATURE_NOTICE_VER_MAJ,
                 FEATURE_NOTICE_VER_MIN, FEATURE_NOTICE_VER_PATCH);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline(
           "Feature change alerts disabled for NetHack %s features and prior.",
               buf);
@@ -1598,7 +1598,7 @@ int iscompound; /* 0 == boolean option, 1 == compound */
      * For now just return.
      */
 #else /* !MAC */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     config_error_add("%s option specified multiple times: %s",
                      iscompound ? "compound" : "boolean", opts);
 #else
@@ -2986,7 +2986,7 @@ boolean tinitial, tfrom_file;
                     forig = fruit_from_name(pl_fruit, FALSE, (int *) 0);
 
                 if (!forig && fnum >= 100) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     config_error_add(
                              "Doing that so many times isn't very fruitful.");
 #else
@@ -4889,7 +4889,7 @@ doset() /* changing options via menu by Per Liboriussen */
     indexoffset = boolcount;
     any = zeroany;
     add_menu(tmpwin, NO_GLYPH, &any, 0, 0, ATR_NONE, "", MENU_UNSELECTED);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     add_menu(tmpwin, NO_GLYPH, &any, 0, 0, iflags.menu_headings,
              "Compounds (selecting will prompt for new value):",
              MENU_UNSELECTED);
@@ -5032,22 +5032,22 @@ int numtotal;
         char letr;
         const char *desc;
     } action_titles[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         { 'a', "add new %s" },         /* [0] */
 #else
         { 'a', "\90V\82µ\82¢%s\82ð\92Ç\89Á" },     /* [0] */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         { 'l', "list %s" },            /* [1] */
 #else
         { 'l', "%s\82ð\88ê\97\97\95\\8e¦" },       /* [1] */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         { 'r', "remove existing %s" }, /* [2] */
 #else
         { 'r', "\8aù\82É\82 \82é%s\82ð\8dí\8f\9c" },   /* [2] */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         { 'x', "exit this menu" },     /* [3] */
 #else
         { 'x', "\82±\82Ì\83\81\83j\83\85\81[\82ð\95Â\82\82é" }, /* [3] */
@@ -5481,7 +5481,7 @@ boolean setinitial, setfromfile;
         any.a_int = ALIGN_RIGHT;
         add_menu(tmpwin, NO_GLYPH, &any, 'r', 0, ATR_NONE, "right",
                  MENU_UNSELECTED);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(abuf, "Select %s window placement relative to the map:",
                 msg ? "message" : "status");
 #else
@@ -5626,7 +5626,7 @@ boolean setinitial, setfromfile;
                          MENU_UNSELECTED);
                 tmp = tmp->next;
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(mtbuf, "%s message types",
                     (opt_idx == 1) ? "List of" : "Remove which");
 #else
@@ -5717,7 +5717,7 @@ boolean setinitial, setfromfile;
                          MENU_UNSELECTED);
                 tmp = tmp->next;
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(mcbuf, "%s menu colors",
                     (opt_idx == 1) ? "List of" : "Remove which");
 #else
@@ -5886,7 +5886,7 @@ boolean setinitial, setfromfile;
                              buf, MENU_UNSELECTED);
                 }
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "Select %ssymbol set:",
                     rogueflag ? "rogue level " : "");
 #else
@@ -5992,7 +5992,7 @@ get_compopt_value(optname, buf)
 const char *optname;
 char *buf;
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     static const char none[] = "(none)", randomrole[] = "random",
                       to_be_done[] = "(to be done)",
                       defopt[] = "default", defbrief[] = "def";
@@ -6193,7 +6193,7 @@ char *buf;
             "4=on, phone layout, MSDOS compatible",
 */
             "4=\97L\8cø\81C\93d\98b\8e®\82Ì\94z\92u\81CMSDOS \8cÝ\8a·",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             "-1=off, y & z swapped", /*[5]*/
 #else
             "-1=\96³\8cø\81Cy\82Æz\82ð\93ü\82ê\91Ö\82¦", /*[5]*/
@@ -6235,7 +6235,7 @@ char *buf;
         else
             Strcpy(buf, defopt);
     } else if (!strcmp(optname, "pettype")) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s", (preferred_pet == 'c') ? "cat"
                            : (preferred_pet == 'd') ? "dog"
                              : (preferred_pet == 'h') ? "horse"
@@ -6300,7 +6300,7 @@ char *buf;
                 break;
             }
     } else if (!strcmp(optname, "player_selection")) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s", iflags.wc_player_selection ? "prompts" : "dialog");
 #else
         Sprintf(buf, "%s\93ü\97Í", iflags.wc_player_selection ? "\83v\83\8d\83\93\83v\83g" : "\83_\83C\83A\83\8d\83O");
@@ -6423,7 +6423,7 @@ dotogglepickup()
     flags.pickup = !flags.pickup;
     if (flags.pickup) {
         oc_to_str(flags.pickup_types, ocl);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "ON, for %s objects%s", ocl[0] ? ocl : "all",
                 (iflags.autopickup_exceptions[AP_LEAVE]
                  || iflags.autopickup_exceptions[AP_GRAB])
index c603e87..9e0f35a 100644 (file)
@@ -72,7 +72,7 @@ const char *new_str;
     space_left = BUFSZ - strlen(buf) - 1;
     if (space_left < 1)
         return 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     (void) strncat(buf, " or ", space_left);
     (void) strncat(buf, new_str, space_left - 4);
 #else
@@ -96,7 +96,7 @@ char *outbuf;
         Sprintf(race, "%s ", urace.adj);
 */
         Sprintf(race, "%s", urace.adj);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(outbuf, "%s%s%s called %s",
             /* being blinded may hide invisibility from self */
             (Invis && (senseself() || !Blind)) ? "invisible " : "", race,
@@ -168,7 +168,7 @@ char *outbuf;
 #endif
     } else if (M_AP_TYPE(mon) == M_AP_MONSTER) {
         if (altmon)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(outbuf, ", masquerading as %s",
                     an(mons[mon->mappearance].mname));
 #else
@@ -190,7 +190,7 @@ char *outbuf;
                 goto objfrommap;
             Strcat(outbuf, something);
         } else if (is_hider(mon->data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(eos(outbuf), " on the %s",
                     (is_flyer(mon->data) || mon->data->mlet == S_PIERCER)
                        ? "ceiling"
@@ -203,7 +203,7 @@ char *outbuf;
 #endif
         } else {
             if (mon->data->mlet == S_EEL && is_pool(x, y))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Strcat(outbuf, " in murky water");
 #else
                 Strcat(outbuf, "\82É\82²\82Á\82½\90\85\82Ì\92\86");
@@ -332,7 +332,7 @@ int x, y, glyph;
 */
         Strcat(buf, "\81C\90\85\92\86\82É\82 \82é");
     else if (is_lava(x, y))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Strcat(buf, " in molten lava"); /* [can this ever happen?] */
 #else
         Strcat(buf, "\81C\97n\8aâ\82Ì\92\86\82É\82 \82é");        /* [can this ever happen?] */
@@ -352,7 +352,7 @@ int x, y;
     name = (mtmp->data == &mons[PM_COYOTE] && accurate)
               ? coyotename(mtmp, monnambuf)
               : distant_monnam(mtmp, ARTICLE_NONE, monnambuf);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     Sprintf(buf, "%s%s%s",
             (mtmp->mx != x || mtmp->my != y)
                 ? ((mtmp->isshk && accurate) ? "tail of " : "tail of a ")
@@ -377,7 +377,7 @@ int x, y;
 #endif
     if (u.ustuck == mtmp) {
         if (u.uswallow || iflags.save_uswallow) /* monster detection */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Strcat(buf, is_animal(mtmp->data)
                           ? ", swallowing you" : ", engulfing you");
 #else
@@ -485,7 +485,7 @@ int x, y;
                     unsigned long mW = (context.warntype.obj
                                         | context.warntype.polyd),
                                   m2 = mtmp->data->mflags2;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     const char *whom = ((mW & M2_HUMAN & m2) ? "human"
                                         : (mW & M2_ELF & m2) ? "elf"
                                           : (mW & M2_ORC & m2) ? "orc"
@@ -561,7 +561,7 @@ char *buf, *monbuf;
                 how |= 4;
 
             if (how)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(eos(buf), " [seen: %s%s%s%s%s]",
                         (how & 1) ? "infravision" : "",
                         /* add comma if telep and infrav */
@@ -610,13 +610,13 @@ char *buf, *monbuf;
          * chests so that they can have their own glyphs and tiles.
          */
         if (trapped_chest_at(tnum, x, y))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Strcpy(buf, "trapped chest"); /* might actually be a large box */
 #else
             Strcpy(buf, "ã©\82Ì\8ed\8a|\82¯\82ç\82ê\82½\94 "); /* might actually be a large box */
 #endif
         else if (trapped_door_at(tnum, x, y))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Strcpy(buf, "trapped door"); /* not "trap door"... */
 #else
             Strcpy(buf, "ã©\82Ì\8ed\8a|\82¯\82ç\82ê\82½\94à"); /* not "trap door"... */
@@ -944,7 +944,7 @@ char *supplemental_name;
                     char *entrytext = pass ? alt : dbase_str;
                     char question[QBUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Strcpy(question, "More info about \"");
                     /* +2 => length of "\"?" */
                     copynchars(eos(question), entrytext,
@@ -1174,7 +1174,7 @@ struct permonst **for_supplement;
                 i = 0; /* undo loop increment */
             x_str = defsyms[i].explanation;
             if (submerged && !strcmp(x_str, defsyms[0].explanation))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 x_str = "land"; /* replace "dark part of a room" */
 #else
                 x_str = "\92n\96Ê"; /* replace "dark part of a room" */
@@ -1201,7 +1201,7 @@ struct permonst **for_supplement;
                     Sprintf(out_str, "%sã©", prefix);
                     hit_trap = TRUE;
                 } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Sprintf(out_str, "%s%s", prefix,
                             article == 2 ? the(x_str)
                             : article == 1 ? an(x_str) : x_str);
@@ -1218,7 +1218,7 @@ struct permonst **for_supplement;
                        && (i != S_vibrating_square || Inhell
                            || (looked && glyph_is_trap(glyph)
                                && glyph_to_trap(glyph) == VIBRATING_SQUARE))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 found += append_str(out_str, (article == 2) ? the(x_str)
                                              : (article == 1) ? an(x_str)
                                                : x_str);
@@ -1671,7 +1671,7 @@ boolean do_mons; /* True => monsters, False => objects */
     if (count)
         display_nhwindow(win, TRUE);
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("No %s are currently shown %s.",
               do_mons ? "monsters" : "objects",
               nearby ? "nearby" : "on the map");
@@ -1841,7 +1841,7 @@ doidtrap()
                     break;
             }
             tt = what_trap(tt, rn2_on_display_rng);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("That is %s%s%s.",
                   an(defsyms[trap_to_defsym(tt)].explanation),
                   !trap->madeby_u
@@ -2197,7 +2197,7 @@ dowhatdoes()
             whatdoes_help();
         pline("%s", reslt);
     } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("No such command '%s', char code %d (0%03o or 0x%02x).",
               visctrl(q), (uchar) q, (uchar) q, (uchar) q);
 #else
index fd1731e..03a81e5 100644 (file)
@@ -632,7 +632,7 @@ int what; /* should be a long */
             for (i = 0; i < n; i++)
                 pick_list[i].count = count;
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             n = query_objlist("Pick up what?", objchain_p,
                               (traverse_how | FEEL_COCKATRICE),
                               &pick_list, PICK_ANY, all_but_uchain);
@@ -687,7 +687,7 @@ int what; /* should be a long */
             There("are %s objects here.", (ct <= 10) ? "several" : "many");
 */
             pline("\82±\82±\82É\82Í%s\82à\82Ì\82ª\82 \82é\81D", (ct <= 10) ? "\82¢\82­\82Â\82©" : "\91ò\8eR\82Ì");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             if (!query_classes(oclasses, &selective, &all_of_a_type,
                                "pick up", *objchain_p,
                                (traverse_how & BY_NEXTHERE) ? TRUE : FALSE,
@@ -702,7 +702,7 @@ int what; /* should be a long */
                     goto pickupdone;
                 if (selective)
                     traverse_how |= INVORDER_SORT;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 n = query_objlist("Pick up what?", objchain_p, traverse_how,
                                   &pick_list, PICK_ANY,
                                   (via_menu == -2) ? allow_all
@@ -730,7 +730,7 @@ int what; /* should be a long */
             if (!all_of_a_type) {
                 char qbuf[BUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 (void) safe_qbuf(qbuf, "Pick up ", "?", obj, doname,
                                  ansimpleoname, something);
 #else
@@ -1010,7 +1010,7 @@ boolean FDECL((*allow), (OBJ_P)); /* allow function */
 
         any = zeroany;
         if (sorted && n > 1) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "%s Creatures",
                     is_animal(u.ustuck->data) ? "Swallowed" : "Engulfed");
 #else
@@ -1265,7 +1265,7 @@ int how;               /* type of query */
         invlet = 'X';
         any = zeroany;
         any.a_int = 'X';
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         add_menu(win, NO_GLYPH, &any, invlet, 0, ATR_NONE,
                  "Items of unknown Bless/Curse status", MENU_UNSELECTED);
 #else
@@ -1468,7 +1468,7 @@ int *wt_before, *wt_after;
     /* we can carry qq of them */
     if (qq > 0) {
         if (qq < count)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("can only %s %s of the %s %s.", verb,
                 (qq == 1L) ? "one" : "some", obj_nambuf, where);
 #else
@@ -1480,7 +1480,7 @@ int *wt_before, *wt_after;
     }
 
     if (!container)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Strcpy(where, "here"); /* slightly shorter form */
 #else
         Strcpy(where, "\82±\82±\82É\82Í");  /* slightly shorter form */
@@ -1525,7 +1525,7 @@ boolean telekinesis;
     int result, old_wt, new_wt, prev_encumbr, next_encumbr;
 
     if (obj->otyp == BOULDER && Sokoban) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("cannot get your %s around this %s.", body_part(HAND),
             xname(obj));
 #else
@@ -1544,7 +1544,7 @@ boolean telekinesis;
             return 1; /* lift regardless of current situation */
         /* if we reach here, we're out of slots and already have at least
            one of these, so treat this one more like a normal item */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("are carrying too much stuff to pick up %s %s.",
             (obj->quan == 1L) ? "another" : "more", simpleonames(obj));
 #else
@@ -1671,7 +1671,7 @@ boolean telekinesis; /* not picking it up directly by hand */
         else if (!obj->spe && !obj->cursed)
             obj->spe = 1;
         else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("scroll%s %s to dust as you %s %s up.", plur(obj->quan),
                       otense(obj, "turn"), telekinesis ? "raise" : "pick",
                       (obj->quan == 1L) ? "it" : "them");
@@ -1782,7 +1782,7 @@ encumber_msg()
             You("\89×\95¨\82Ì\92Þ\8d\87\82ð\82Æ\82è\92¼\82µ\82½\82ª\81C\93®\82«\82É\82­\82¢\81D");
             break;
         case 3:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s under your heavy load.  Movement is very hard.",
                 stagger(youmonst.data, "stagger"));
 #else
@@ -1790,7 +1790,7 @@ encumber_msg()
 #endif
             break;
         default:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s move a handspan with this load!",
                 newcap == 4 ? "can barely" : "can't even");
 #else
@@ -1820,7 +1820,7 @@ encumber_msg()
             You("\89×\95¨\82Ì\92Þ\8d\87\82ð\82Æ\82è\92¼\82µ\82½\81D\82¾\82ª\82Ü\82¾\93®\82­\82Ì\82Í\82«\82Â\82¢\81D");
             break;
         case 3:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s under your load.  Movement is still very hard.",
                 stagger(youmonst.data, "stagger"));
 #else
@@ -2002,7 +2002,7 @@ doloot()
         return 0;
     }
     if (nohands(youmonst.data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("have no hands!"); /* not `body_part(HAND)' */
 #else
         pline("\82 \82È\82½\82É\82Í\8eè\82ª\82È\82¢\81I");
@@ -2091,7 +2091,7 @@ doloot()
                 nobj = cobj->nexthere;
 
                 if (Is_container(cobj)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     c = ynq(safe_qbuf(qbuf, "There is ", " here, loot it?",
                                       cobj, doname, ansimpleoname,
                                       "a container"));
@@ -2143,7 +2143,7 @@ doloot()
         } else
             underfoot = FALSE;
         if (u.dz < 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s to loot on the %s.", dont_find_anything,
                 ceiling(cc.x, cc.y));
 #else
@@ -2169,7 +2169,7 @@ doloot()
         if (!underfoot) {
             if (container_at(cc.x, cc.y, FALSE)) {
                 if (mtmp) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You_cant("loot anything %sthere with %s in the way.",
                              prev_inquiry ? "else " : "", mon_nam(mtmp));
 #else
@@ -2178,14 +2178,14 @@ doloot()
 #endif
                     return timepassed;
                 } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("have to be at a container to loot it.");
 #else
                     You("\82Í\94 \82ð\8aJ\82¯\82é\82½\82ß\82É\82Í\93¯\82\88Ê\92u\82É\82¢\82È\82¯\82ê\82Î\82È\82ç\82È\82¢\81D");
 #endif
                 }
             } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("%s %sthere to loot.", dont_find_anything,
                     (prev_inquiry || prev_loot) ? "else " : "");
 #else
@@ -2196,7 +2196,7 @@ doloot()
             }
         }
     } else if (c != 'y' && c != 'n') {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%s %s to loot.", dont_find_anything,
             underfoot ? "here" : "there");
 #else
@@ -2321,7 +2321,7 @@ boolean *prev_loot;
 
         if (passed_info)
             *passed_info = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(qbuf, "Do you want to remove the saddle from %s?",
                 x_monnam(mtmp, ARTICLE_THE, (char *) 0,
                          SUPPRESS_SADDLE, FALSE));
@@ -2332,7 +2332,7 @@ boolean *prev_loot;
 #endif
         if ((c = yn_function(qbuf, ynqchars, 'n')) == 'y') {
             if (nolimbs(youmonst.data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_cant("do that without limbs."); /* not body_part(HAND) */
 #else
                 You_cant("\8eè\82ª\82È\82¢\82Æ\82Å\82«\82È\82¢\81D");
@@ -2452,7 +2452,7 @@ register struct obj *obj;
         pline("\82»\82ê\82Í\8b»\96¡\82ð\82»\82»\82ç\82ê\82é\83g\83|\83\8d\83W\81[\82Ì\96â\91è\82¾\81D");
         return 0;
     } else if (obj->owornmask & (W_ARMOR | W_ACCESSORY)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Norep("You cannot %s %s you are wearing.",
               Icebox ? "refrigerate" : "stash", something);
 #else
@@ -2718,7 +2718,7 @@ struct obj *item;
 */
         pline("%s\82Í\8fÁ\82¦\8b\8e\82Á\82½\81I", Doname2(item));
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%s %s disappear!", Blind ? "notice" : "see", doname(item));
 #else
         You("%s\82ª\8c©\82¦\82È\82­\82È\82é\82Ì%s\81D", doname(item), Blind ? "\82É\8bC\82Ã\82¢\82½" : "\82ð\8c©\82½");
@@ -2767,7 +2767,7 @@ boolean makecat, givemsg;
             set_malign(livecat);
             if (givemsg) {
                 if (!canspotmon(livecat))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("think %s brushed your %s.", something,
                         body_part(FOOT));
 #else
@@ -2775,7 +2775,7 @@ boolean makecat, givemsg;
                         body_part(FOOT));
 #endif
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s inside the box is still alive!",
                           Monnam(livecat));
 #else
@@ -2831,7 +2831,7 @@ explain_container_prompt(more_containers)
 boolean more_containers;
 {
     static const char *const explaintext[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "Container actions:",
         "",
         " : -- Look: examine contents",
@@ -2878,7 +2878,7 @@ boolean
 u_handsy()
 {
     if (nohands(youmonst.data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("have no hands!"); /* not `body_part(HAND)' */
 #else
         pline("\82 \82È\82½\82É\82Í\8eè\82ª\82È\82¢\81I");  /* not `body_part(HAND)' */
@@ -3014,7 +3014,7 @@ boolean more_containers; /* True iff #loot multiple and this isn't last one */
     for (;;) { /* repeats iff '?' or ":' gets chosen */
         outmaybe = (outokay || !current_container->cknown);
         if (!outmaybe)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             (void) safe_qbuf(qbuf, (char *) 0, " is empty.  Do what with it?",
                              current_container, Yname2, Ysimple_name2,
                              "This");
@@ -3024,7 +3024,7 @@ boolean more_containers; /* True iff #loot multiple and this isn't last one */
                              "\82±\82ê");
 #endif
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             (void) safe_qbuf(qbuf, "Do what with ", "?", current_container,
                              yname, ysimple_name, "it");
 #else
@@ -3101,7 +3101,7 @@ boolean more_containers; /* True iff #loot multiple and this isn't last one */
 
     if ((loot_in || stash_one)
         && (!invent || (invent == current_container && !invent->nobj))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("don't have anything%s to %s.", invent ? " else" : "",
             stash_one ? "stash" : "put in");
 #else
@@ -3371,7 +3371,7 @@ boolean outokay, inokay, alreadyused, more_containers;
     }
     if (inokay) {
         any.a_int = 5; /* 'r' */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%sput in, then take out",
                 outokay ? "both reversed; " : "");
 #else
@@ -3392,7 +3392,7 @@ boolean outokay, inokay, alreadyused, more_containers;
     add_menu(win, NO_GLYPH, &any, 0, 0, ATR_NONE, "", MENU_UNSELECTED);
     if (more_containers) {
         any.a_int = 7; /* 'n' */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         add_menu(win, NO_GLYPH, &any, menuselector[any.a_int], 0, ATR_NONE,
                  "loot next container", MENU_SELECTED);
 #else
@@ -3444,7 +3444,7 @@ dotip()
 
     /* check floor container(s) first; at most one will be accessed */
     if ((boxes = container_at(cc.x, cc.y, TRUE)) > 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "You can't tip %s while carrying so much.",
                 !flags.verbose ? "a container" : (boxes > 1) ? "one" : "it");
 #else
@@ -3480,7 +3480,7 @@ dotip()
                     /* use 'i' for inventory unless there are so many
                        containers that it's already being used */
                     i = (i <= 'i' - 'a' && !flags.lootabc) ? 'i' : 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     add_menu(win, NO_GLYPH, &any, i, 0, ATR_NONE,
                              "tip something being carried", MENU_SELECTED);
 #else
@@ -3518,7 +3518,7 @@ dotip()
                     nobj = cobj->nexthere;
                     if (!Is_container(cobj))
                         continue;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     c = ynq(safe_qbuf(qbuf, "There is ", " here, tip it?",
                                       cobj,
                                       doname, ansimpleoname, "container"));
@@ -3590,13 +3590,13 @@ dotip()
 */
             Strcpy(buf, "\82»\82µ\82Ä\8f\99\81X\82É\8eU\82Á\82Ä\82¢\82Á\82½\81D");
         else if (is_lava(u.ux, u.uy))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, " and immediately %s away",
                     vtense(spillage, "burn"));
 #else
             Strcpy(buf, "\82»\82µ\82Ä\82·\82®\82É\94R\82¦\82Â\82«\82½\81D");
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Some %s %s onto the %s%s.", spillage,
               vtense(spillage, "spill"), surface(u.ux, u.uy), buf);
 #else
@@ -3690,7 +3690,7 @@ struct obj *box; /* or bag */
 
         if (box->spe < old_spe) {
             if (bag)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline((seen == 0) ? "Nothing seems to happen."
                                   : (seen == 1) ? "A monster appears."
                                                 : "Monsters appear!");
index 7908dbc..8d587b4 100644 (file)
@@ -149,7 +149,7 @@ boolean on;
             && can_be_strangled(&youmonst)) {
             Strangled = 6L;
             context.botl = TRUE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Your("%s %s your %s!", simpleonames(uamul),
                  Strangled ? "still constricts" : "begins constricting",
                  body_part(NECK)); /* "throat" */
@@ -568,7 +568,7 @@ int psflags;
 #endif
                     /* tricky phrasing; dragon scale mail
                        is singular, dragon scales are plural */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Your("%s reverts to scales as you merge with them.",
                          dsmail);
 #else
@@ -992,7 +992,7 @@ int mntmp;
         && (amorphous(youmonst.data) || is_whirly(youmonst.data)
             || unsolid(youmonst.data) || (youmonst.data->msize <= MZ_SMALL
                                           && u.utraptype == TT_BEARTRAP))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("are no longer stuck in the %s.",
             u.utraptype == TT_WEB ? "web" : "bear trap");
 #else
@@ -1109,7 +1109,7 @@ break_armor()
     if (has_horns(youmonst.data)) {
         if ((otmp = uarmh) != 0) {
             if (is_flimsy(otmp) && !donning(otmp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 char hornbuf[BUFSZ];
 
                 /* Future possibilities: This could damage/destroy helmet */
@@ -1122,7 +1122,7 @@ break_armor()
             } else {
                 if (donning(otmp))
                     cancel_don();
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("%s falls to the %s!", helm_simple_name(otmp),
                      surface(u.ux, u.uy));
 #else
@@ -1158,7 +1158,7 @@ break_armor()
         if ((otmp = uarmh) != 0) {
             if (donning(otmp))
                 cancel_don();
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Your("%s falls to the %s!", helm_simple_name(otmp),
                  surface(u.ux, u.uy));
 #else
@@ -1180,7 +1180,7 @@ break_armor()
 */
                 Your("\8cC\82Í\92E\82°\97\8e\82¿\82½\81I");
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("boots %s off your feet!",
                      verysmall(youmonst.data) ? "slide" : "are pushed");
 #else
@@ -1324,7 +1324,7 @@ rehumanize()
     vision_full_recalc = 1;
     (void) encumber_msg();
     if (was_flying && !Flying && u.usteed)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("and %s return gently to the %s.",
             mon_nam(u.usteed), surface(u.ux, u.uy));
 #else
@@ -1407,7 +1407,7 @@ doremove()
 {
     if (!Punished) {
         if (u.utrap && u.utraptype == TT_BURIEDBALL) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("ball and chain are buried firmly in the %s.",
                       surface(u.ux, u.uy));
 #else
@@ -1538,7 +1538,7 @@ dospinweb()
             return 1;
         case HOLE:
         case TRAPDOOR:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("web over the %s.",
                 (ttmp->ttyp == TRAPDOOR) ? "trap door" : "hole");
 #else
@@ -1692,7 +1692,7 @@ dogaze()
                 You("%s\82©\82ç\96Ú\82ð\82»\82ç\82µ\82Ä\82µ\82Ü\82Á\82½\81D", y_monnam(mtmp));
             } else {
                 if (flags.confirm && mtmp->mpeaceful && !Confusion) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Sprintf(qbuf, "Really %s %s?",
                             (adtyp == AD_CONF) ? "confuse" : "attack",
                             mon_nam(mtmp));
@@ -1759,7 +1759,7 @@ dogaze()
 
                 if (mtmp->data == &mons[PM_FLOATING_EYE] && !mtmp->mcan) {
                     if (!Free_action) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You("are frozen by %s gaze!",
                             s_suffix(mon_nam(mtmp)));
 #else
@@ -1777,7 +1777,7 @@ dogaze()
                         nomovemsg = 0;
                         return 1;
                     } else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You("stiffen momentarily under %s gaze.",
                             s_suffix(mon_nam(mtmp)));
 #else
@@ -1967,7 +1967,7 @@ domindblast()
             continue;
         u_sen = telepathic(mtmp->data) && !mtmp->mcansee;
         if (u_sen || (telepathic(mtmp->data) && rn2(2)) || !rn2(10)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("lock in on %s %s.", s_suffix(mon_nam(mtmp)),
                 u_sen ? "telepathy"
                       : telepathic(mtmp->data) ? "latent telepathy" : "mind");
@@ -2248,7 +2248,7 @@ int part;
         return "trunk";
 #endif
     if (mptr == &mons[PM_SHARK] && part == HAIR)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         return "skin"; /* sharks don't have scales */
 #else
         return "\93ª"; /* sharks don't have scales */
@@ -2457,7 +2457,7 @@ udeadinside()
        seems silly when you're polymorphed into something undead;
        monkilled() distinguishes between living (killed) and non (destroyed)
        for monster death message; we refine the nonliving aspect a bit */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     return !nonliving(youmonst.data)
              ? "dead"          /* living, including demons */
              : !weirdnonliving(youmonst.data)
index 0bff2ff..eeb6ad0 100644 (file)
@@ -97,7 +97,7 @@ boolean talk;
 
     if (!xtime && old) {
         if (talk)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_feel("%s now.",
                      Hallucination ? "less wobbly" : "a bit steadier");
 #else
@@ -424,7 +424,7 @@ long mask; /* nonzero if resistance status should change by mask */
     if (Unaware)
         talk = FALSE;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     message = (!xtime) ? "Everything %s SO boring now."
                        : "Oh wow!  Everything %s so cosmic!";
 #else
@@ -454,7 +454,7 @@ long mask; /* nonzero if resistance status should change by mask */
             if (!haseyes(youmonst.data)) {
                 strange_feeling((struct obj *) 0, (char *) 0);
             } else if (Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 const char *eyes = body_part(EYE);
 
                 if (eyecount(youmonst.data) != 1)
@@ -522,7 +522,7 @@ boolean talk;
 void
 self_invis_message()
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     pline("%s %s.",
           Hallucination ? "Far out, man!  You"
                         : "Gee!  All of a sudden, you",
@@ -555,7 +555,7 @@ ghost_from_bottle()
         pline("\95r\82ð\8aJ\82¯\82é\82Æ\81C\89½\82©\82ª\8fo\82Ä\82«\82½\81D");
         return;
     }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     pline("As you open the bottle, an enormous %s emerges!",
           Hallucination ? rndmonnam(NULL) : (const char *) "ghost");
 #else
@@ -688,7 +688,7 @@ register struct obj *otmp;
 
     if (nothing) {
         unkn++;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("have a %s feeling for a moment, then it passes.",
             Hallucination ? "normal" : "peculiar");
 #else
@@ -725,7 +725,7 @@ register struct obj *otmp;
             break;
         } else {
             /* unlike unicorn horn, overrides Fixed_abil */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Wow!  This makes you feel %s!",
                   (otmp->blessed)
                       ? (unfixable_trouble_count(FALSE) ? "better" : "great")
@@ -851,7 +851,7 @@ register struct obj *otmp;
         break;
     case POT_BOOZE:
         unkn++;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Ooph!  This tastes like %s%s!",
               otmp->odiluted ? "watered down " : "",
               Hallucination ? "dandelion wine" : "liquid fire");
@@ -941,7 +941,7 @@ register struct obj *otmp;
 
         unkn++;
         if (otmp->cursed)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Yecch!  This tastes %s.",
                   Hallucination ? "overripe" : "rotten");
 #else
@@ -949,7 +949,7 @@ register struct obj *otmp;
                   Hallucination ? "\8fn\82µ\82·\82¬\82½" : "\95\85\82Á\82½");
 #endif
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline(
                 Hallucination
                     ? "This tastes like 10%% real %s%s all-natural beverage."
@@ -1007,7 +1007,7 @@ register struct obj *otmp;
 */
                 You("\82»\82Ì\8fê\82Å\93®\82¯\82È\82­\82È\82Á\82½\81I");
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("%s are frozen to the %s!", makeplural(body_part(FOOT)),
                      surface(u.ux, u.uy));
 #else
@@ -1111,7 +1111,7 @@ register struct obj *otmp;
                 char contaminant[BUFSZ];
                 int typ = rn2(A_MAX);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(contaminant, "%s%s",
                         (Poison_resistance) ? "mildly " : "",
                         (otmp->fromsink) ? "contaminated tap water"
@@ -1451,7 +1451,7 @@ register struct obj *otmp;
         } else {
             int dmg;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("This burns%s!",
                   otmp->blessed ? " a little" : otmp->cursed ? " a lot"
                                                              : " like acid");
@@ -1542,7 +1542,7 @@ struct obj *obj;
 const char *txt;
 {
     if (flags.beginner || !txt)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("have a %s feeling for a moment, then it passes.",
             Hallucination ? "normal" : "strange");
 #else
@@ -1562,7 +1562,7 @@ const char *txt;
     useup(obj);
 }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 const char *bottlenames[] = { "bottle", "phial", "flagon", "carafe",
                               "flask",  "jar",   "vial" };
 #else
@@ -1634,13 +1634,13 @@ const char *objphrase; /* "Your widget glows" or "Steed's saddle glows" */
             glowcolor = hcolor(glowcolor);
             /*JP:3.6.0\8e\9e\93_\82Å\82Í\93®\8e\8c\82Í"glow"\82¾\82¯\82È\82Ì\82Å\8c\88\82ß\8c\82\82¿*/
             if (altfmt)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s with %s aura.", objphrase, an(glowcolor));
 #else
                 pline("%s\82Í%s\83I\81[\83\89\82É\82Â\82Â\82Ü\82ê\82½\81D", objphrase, glowcolor);
 #endif
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s.", objphrase, glowcolor);
 #else
                 pline("%s\82Í%s\8bP\82¢\82½\81D", objphrase, jconj_adj(glowcolor));
@@ -1719,7 +1719,7 @@ int how;
             char buf[BUFSZ];
 
             if (hit_saddle && saddle) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(buf, "%s saddle",
                         s_suffix(x_monnam(mon, ARTICLE_THE, (char *) 0,
                                           (SUPPRESS_IT | SUPPRESS_SADDLE),
@@ -1731,7 +1731,7 @@ int how;
                                           FALSE));
 #endif
             } else if (has_head(mon->data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(buf, "%s %s", s_suffix(mnam),
                         (notonhead ? "body" : "head"));
 #else
@@ -1741,7 +1741,7 @@ int how;
             } else {
                 Strcpy(buf, mnam);
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("%s crashes on %s and breaks into shards.", botlnam,
                       buf);
 #else
@@ -1862,7 +1862,7 @@ int how;
                 /* most common case */
                 || resists_poison(mon)) {
                 if (canseemon(mon))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s looks unharmed.", Monnam(mon));
 #else
                     pline("%s\82Í\82È\82ñ\82Æ\82à\82È\82¢\82æ\82¤\82¾\81D", Monnam(mon));
@@ -1932,7 +1932,7 @@ int how;
             if (is_undead(mon->data) || is_demon(mon->data)
                 || is_were(mon->data) || is_vampshifter(mon)) {
                 if (obj->blessed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s in pain!", Monnam(mon),
                           is_silent(mon->data) ? "writhes" : "shrieks");
 #else
@@ -1982,7 +1982,7 @@ int how;
             break;
         case POT_ACID:
             if (!resists_acid(mon) && !resist(mon, POTION_CLASS, 0, NOTELL)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s in pain!", Monnam(mon),
                       is_silent(mon->data) ? "writhes" : "shrieks");
 #else
@@ -2069,7 +2069,7 @@ register struct obj *obj;
 */
                 pline("\83E\83Q\83F\81I\96ò\82Í\82à\82Ì\82·\82²\82¢\93õ\82¢\82ª\82·\82é\81I");
             else if (haseyes(youmonst.data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 const char *eyes = body_part(EYE);
 
                 if (eyecount(youmonst.data) != 1)
@@ -2157,7 +2157,7 @@ register struct obj *obj;
     case POT_INVISIBILITY:
         if (!Blind && !Invis) {
             kn++;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("For an instant you %s!",
                   See_invisible ? "could see right through yourself"
                                 : "couldn't see yourself");
@@ -2636,7 +2636,7 @@ dodip()
            been made in order to get the merge result for both cases;
            as a consequence, mixing while Fumbling drops the mixture */
         freeinv(obj);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         (void) hold_another_object(obj, "You drop %s!", doname(obj),
                                    (const char *) 0);
 #else
@@ -2648,7 +2648,7 @@ dodip()
 
     if (potion->otyp == POT_ACID && obj->otyp == CORPSE
         && obj->corpsenm == PM_LICHEN && !Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s %s around the edges.", The(cxname(obj)),
               otense(obj, "turn"),
               potion->odiluted ? hcolor(NH_ORANGE) : hcolor(NH_RED));
@@ -2725,14 +2725,14 @@ dodip()
         } else if ((!is_rustprone(obj) && !is_corrodeable(obj))
                    || is_ammo(obj) || (!obj->oeroded && !obj->oeroded2)) {
             /* uses up potion, doesn't set obj->greased */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s with an oily sheen.", Yname2(obj),
                   otense(obj, "gleam"));
 #else
                 pline("%s\82Í\96û\82Ì\8cõ\91ò\82Å\82«\82ç\82è\82Æ\8cõ\82Á\82½\81D", Yname2(obj));
 #endif
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s less %s.", Yname2(obj), otense(obj, "are"),
                   (obj->oeroded && obj->oeroded2)
                       ? "corroded and rusty"
@@ -3014,7 +3014,7 @@ struct monst *mon,  /* monster being split */
 
     reason[0] = '\0';
     if (mtmp)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(reason, " from %s heat",
                 (mtmp == &youmonst) ? the_your[1]
                                     : (const char *) s_suffix(mon_nam(mtmp)));
index 19c94f9..db1bf07 100644 (file)
@@ -438,7 +438,7 @@ int trouble;
         break;
     case TROUBLE_COLLAPSING:
         /* override Fixed_abil; uncurse that if feasible */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_feel("%sstronger.",
                  (AMAX(A_STR) - ABASE(A_STR) > 6) ? "much " : "");
 #else
@@ -787,7 +787,7 @@ fry_by_god(resp_god, via_disintegration)
 aligntyp resp_god;
 boolean via_disintegration;
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You("%s!", !via_disintegration ? "fry to a crisp"
                                    : "disintegrate into a pile of dust");
 #else
@@ -828,7 +828,7 @@ aligntyp resp_god;
     switch (rn2(maxanger)) {
     case 0:
     case 1:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_feel("that %s is %s.", align_gname(resp_god),
                  Hallucination ? "bummed" : "displeased");
 #else
@@ -839,7 +839,7 @@ aligntyp resp_god;
     case 2:
     case 3:
         godvoice(resp_god, (char *) 0);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("\"Thou %s, %s.\"",
               (ugod_is_angry() && resp_god == u.ualign.type)
                   ? "hast strayed from the path"
@@ -878,7 +878,7 @@ aligntyp resp_god;
     case 7:
     case 8:
         godvoice(resp_god, (char *) 0);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         verbalize("Thou durst %s me?",
                   (on_altar() && (a_align(u.ux, u.uy) != resp_god))
                       ? "scorn"
@@ -889,7 +889,7 @@ aligntyp resp_god;
                   ? "\82ð\82³\82°\82·\82Ý\82µ\82©\81H"
                   : "\82É\8bF\82è\82ð\8b\81\82ß\82µ\82©\81H");
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("\"Then die, %s!\"",
               youmonst.data->mlet == S_HUMAN ? "mortal" : "creature");
 #else
@@ -917,7 +917,7 @@ const char *str;
         str = Something;
     if (u.uswallow) {
         /* barrier between you and the floor */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s into %s %s.", str, vtense(str, "drop"),
               s_suffix(mon_nam(u.ustuck)), mbodypart(u.ustuck, STOMACH));
 #else
@@ -925,7 +925,7 @@ const char *str;
               mon_nam(u.ustuck), mbodypart(u.ustuck, STOMACH));
 #endif
     } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s %s your %s!", str,
               Blind ? "lands" : vtense(str, "appear"),
               Levitation ? "beneath" : "at", makeplural(body_part(FOOT)));
@@ -979,7 +979,7 @@ gcrownu()
         in_hand = (uwep && uwep->oartifact == ART_STORMBRINGER);
         already_exists =
             exist_artifact(RUNESWORD, artiname(ART_STORMBRINGER));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         verbalize("Thou art chosen to %s for My Glory!",
                   already_exists && !in_hand ? "take lives" : "steal souls");
 #else
@@ -1134,7 +1134,7 @@ aligntyp g_align;
     int trouble = in_trouble(); /* what's your worst difficulty? */
     int pat_on_head = 0, kick_on_butt;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You_feel("that %s is %s.", align_gname(g_align),
              (u.ualign.record >= DEVOUT)
                  ? Hallucination ? "pleased as punch" : "well-pleased"
@@ -1238,7 +1238,7 @@ aligntyp g_align;
 
                 *repair_buf = '\0';
                 if (uwep->oeroded || uwep->oeroded2)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Sprintf(repair_buf, " and %s now as good as new",
                             otense(uwep, "are"));
 #else
@@ -1247,7 +1247,7 @@ aligntyp g_align;
 
                 if (uwep->cursed) {
                     if (!Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s %s%s.", Yobjnam2(uwep, "softly glow"),
                               hcolor(NH_AMBER), repair_buf);
 #else
@@ -1256,7 +1256,7 @@ aligntyp g_align;
 #endif
                         iflags.last_msg = PLNMSG_OBJ_GLOWS;
                     } else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You_feel("the power of %s over %s.", u_gname(),
                                  yname(uwep));
 #else
@@ -1268,7 +1268,7 @@ aligntyp g_align;
                     *repair_buf = '\0';
                 } else if (!uwep->blessed) {
                     if (!Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s with %s aura%s.",
                               Yobjnam2(uwep, "softly glow"),
                               an(hcolor(NH_LIGHT_BLUE)), repair_buf);
@@ -1279,7 +1279,7 @@ aligntyp g_align;
 #endif
                         iflags.last_msg = PLNMSG_OBJ_GLOWS;
                     } else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You_feel("the blessing of %s over %s.", u_gname(),
                                  yname(uwep));
 #else
@@ -1298,7 +1298,7 @@ aligntyp g_align;
                     /* only give this message if we didn't just bless
                        or uncurse (which has already given a message) */
                     if (*repair_buf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s as good as new!",
                               Yobjnam2(uwep, Blind ? "feel" : "look"));
 #else
@@ -1317,7 +1317,7 @@ aligntyp g_align;
             if (!u.uevent.uopened_dbridge && !u.uevent.gehennom_entered) {
                 if (u.uevent.uheard_tune < 1) {
                     godvoice(g_align, (char *) 0);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     verbalize("Hark, %s!", youmonst.data->mlet == S_HUMAN
                                                ? "mortal"
                                                : "creature");
@@ -1404,7 +1404,7 @@ aligntyp g_align;
                     && (otmp != uarmh /* [see worst_cursed_item()] */
                         || uarmh->otyp != HELM_OF_OPPOSITE_ALIGNMENT)) {
                     if (!Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s %s.", Yobjnam2(otmp, "softly glow"),
                               hcolor(NH_AMBER));
 #else
@@ -1549,7 +1549,7 @@ boolean bless_water;
             other = TRUE;
     }
     if (!Blind && changed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s potion%s on the altar glow%s %s for a moment.",
               ((other && changed > 1L) ? "Some of the"
                                        : (other ? "One of the" : "The")),
@@ -1644,7 +1644,7 @@ register struct obj *otmp;
 */
         Your("\8c£\8fã\95¨\82Í\8fÁ\82¦\82½\81I");
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("sacrifice is consumed in a %s!",
              u.ualign.type == A_LAWFUL ? "flash of light" : "burst of flame");
 #else
@@ -1848,7 +1848,7 @@ dosacrifice()
             if (unicalign == altaralign) {
                 /* When same as altar, always a very bad action.
                  */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Such an action is an insult to %s!",
                       (unicalign == A_CHAOTIC) ? "chaos"
                          : unicalign ? "law" : "balance");
@@ -1900,7 +1900,7 @@ dosacrifice()
                    fall through to the "ashamed" feedback) */
                 gods_upset(A_NONE);
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_feel("%s.",
                          Hallucination
                             ? "homesick"
@@ -1938,7 +1938,7 @@ dosacrifice()
                 if (u.ualign.record > -99)
                     u.ualign.record = -99;
                 /*[apparently shrug/snarl can be sensed without being seen]*/
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s shrugs and retains dominion over %s,", Moloch,
                       u_gname());
 #else
@@ -1951,7 +1951,7 @@ dosacrifice()
                 pline("\82»\82µ\82Ä\96³\8e\9c\94ß\82É\82 \82È\82½\82Ì\96½\82ð\92D\82Á\82½\81D");
 /*JP
 */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(killer.name, "%s indifference", s_suffix(Moloch));
 #else
                 Sprintf(killer.name, "\97â\92W\82È%s", Moloch);
@@ -1971,7 +1971,7 @@ dosacrifice()
                 /* And the opposing team picks you up and
                    carries you off on their shoulders */
                 adjalign(-99);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s accepts your gift, and gains dominion over %s...",
                       a_gname(), u_gname());
 #else
@@ -2006,7 +2006,7 @@ dosacrifice()
           "In return for thy service, I grant thee the gift of Immortality!");
 */
           "\93ð\82Ì\88Ì\8bÆ\82É\91Î\82µ\81C\95s\8e\80\82Ì\91Ì\82ð\8eö\82¯\82æ\82¤\82¼\81I");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("ascend to the status of Demigod%s...",
                     flags.female ? "dess" : "");
 #else
@@ -2026,7 +2026,7 @@ dosacrifice()
 */
         You("\8bß\82­\82É\97\8b\82ª\97\8e\82¿\82½\89¹\82ð\95·\82¢\82½\81D");
         if (!otmp->known) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("realize you have made a %s.",
                 Hallucination ? "boo-boo" : "mistake");
 #else
@@ -2039,7 +2039,7 @@ dosacrifice()
         } else {
             /* don't you dare try to fool the gods */
             if (Deaf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Oh, no."); /* didn't hear thunderclap */
 #else
                 pline("\82È\82ñ\82Ä\82±\82Á\82½\81D"); /* didn't hear thunderclap */
@@ -2126,7 +2126,7 @@ dosacrifice()
                 return 1;
             } else {
                 consume_offering(otmp);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("sense a conflict between %s and %s.", u_gname(),
                     a_gname());
 #else
@@ -2148,7 +2148,7 @@ dosacrifice()
                         levl[u.ux][u.uy].altarmask
                         | (Align2amask(u.ualign.type));
                     if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline_The("altar glows %s.",
                                   hcolor((u.ualign.type == A_LAWFUL)
                                             ? NH_WHITE
@@ -2196,7 +2196,7 @@ dosacrifice()
                 u.ugangr = 0;
             if (u.ugangr != saved_anger) {
                 if (u.ugangr) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s seems %s.", u_gname(),
                           Hallucination ? "groovy" : "slightly mollified");
 #else
@@ -2207,7 +2207,7 @@ dosacrifice()
                     if ((int) u.uluck < 0)
                         change_luck(1);
                 } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s seems %s.", u_gname(),
                           Hallucination ? "cosmic (not a new fact)"
                                         : "mollified");
@@ -2318,7 +2318,7 @@ dosacrifice()
                 u.uluck = 0;
             if (u.uluck != saved_luck) {
                 if (Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("think %s brushed your %s.", something,
                         body_part(FOOT));
 #else
@@ -2326,7 +2326,7 @@ dosacrifice()
                           body_part(FOOT));
 #endif
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You(Hallucination
                     ? "see crabgrass at your %s.  A funny thing in a dungeon."
                             : "glimpse a four-leaf clover at your %s.",
@@ -2354,7 +2354,7 @@ boolean praying; /* false means no messages should be given */
 
     if (is_demon(youmonst.data) && (p_aligntyp != A_CHAOTIC)) {
         if (praying)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("very idea of praying to a %s god is repugnant to you.",
                       p_aligntyp ? "lawful" : "neutral");
 #else
@@ -2463,7 +2463,7 @@ prayer_done() /* M. Stephenson (1.0.3b) */
 
     u.uinvulnerable = FALSE;
     if (p_type == -1) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         godvoice(alignment,
                  (alignment == A_LAWFUL)
                     ? "Vile creature, thou durst call upon me?"
@@ -2708,7 +2708,7 @@ aligntyp alignment;
 }
 
 static const char *hallu_gods[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "the Flying Spaghetti Monster", /* Church of the FSM */
     "Eris",                         /* Discordianism */
     "the Martians",                 /* every science fiction ever */
@@ -2787,7 +2787,7 @@ aligntyp alignment;
     }
     if (!gnam) {
         impossible("No random god name?");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         gnam = "your Friend the Computer"; /* Paranoia */
 #else
         gnam = "\90e\88¤\82È\82é\83R\83\93\83s\83\85\81[\83^"; /* Paranoia */
index 0f4c219..ab5f717 100644 (file)
@@ -131,7 +131,7 @@ pick_move:
 #if 0 /* dead code; maybe someday someone will track down why... */
         if (ib) {
             if (cansee(mtmp->mx, mtmp->my))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s picks up %s.", Monnam(mtmp),
                       distant_name(ib, doname));
 #else
@@ -469,7 +469,7 @@ int roomno;
                Moloch so suppress the "of Moloch" for him here too */
             if (sanctum && !Hallucination)
                 priest->ispriest = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s intones:",
                   canseemon(priest) ? Monnam(priest) : "A nearby voice");
 #else
@@ -505,7 +505,7 @@ int roomno;
                 msg1 = "\82¨\82Ü\82¦\82Í\82±\82Ì\90_\90¹\82È\8fê\8f\8a\82ð\89\98\82µ\82Ä\82¢\82é\81I";
             }
         } else if (moves >= epri_p->enter_time) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "Pilgrim, you enter a %s place!",
                     !shrined ? "desecrated" : "sacred");
 #else
@@ -680,7 +680,7 @@ register struct monst *priest;
         };
 
         if (!priest->mcanmove || priest->msleeping) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s breaks out of %s reverie!", Monnam(priest),
                   mhis(priest));
 #else
@@ -710,7 +710,7 @@ register struct monst *priest;
             long pmoney = money_cnt(priest->minvent);
             if (pmoney > 0L) {
                 /* Note: two bits is actually 25 cents.  Hmm. */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s gives you %s for an ale.", Monnam(priest),
                       (pmoney == 1L) ? "one bit" : "two bits");
 #else
@@ -946,7 +946,7 @@ struct monst *priest;
               a_gname_at(ax, ay));
         break;
     case 1:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s voice booms:  \"How darest thou harm my servant!\"",
               s_suffix(a_gname_at(ax, ay)));
 #else
@@ -1194,7 +1194,7 @@ struct monst *mtmp;
         } else {
             ++nsegs; /* include head in the segment count */
             segndx = wseg_at(mtmp, bhitpos.x, bhitpos.y);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(eos(info), ", %d%s of %d segments",
                     segndx, ordin(segndx), nsegs);
 #else
@@ -1288,7 +1288,7 @@ struct monst *mtmp;
 */
         Strcat(info, ", \95s\89Â\8e\8b");
     if (mtmp == u.ustuck)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Strcat(info, sticks(youmonst.data) ? ", held by you"
                       : !u.uswallow ? ", holding you"
                          : attacktype_fordmg(u.ustuck->data, AT_ENGL, AD_DGST)
@@ -1367,7 +1367,7 @@ ustatusline()
 */
         Strcat(info, ", \8eñ\82ð\8di\82ß\82ç\82ê\82Ä\82¢\82é");
     if (Vomiting)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Strcat(info, ", nauseated"); /* !"nauseous" */
 #else
         Strcat(info, ", \93f\82«\8bC\82ª\82·\82é");
index d84411c..7c2ccd3 100644 (file)
@@ -156,7 +156,7 @@ boolean talk;
 
     if (wizard && talk) {
         if (u.ualign.type != original_alignment) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are currently %s instead of %s.", align_str(u.ualign.type),
                 align_str(original_alignment));
 #else
@@ -169,7 +169,7 @@ boolean talk;
 */
             You("\93]\8cü\82µ\82Ä\82¢\82é\81D");
         } else if (u.ualign.record < MIN_QUEST_ALIGN) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are currently %d and require %d.", u.ualign.record,
                 MIN_QUEST_ALIGN);
 #else
index 3633ca7..d325e91 100644 (file)
@@ -85,7 +85,7 @@ char *buf;
 {
     static const char *shirt_msgs[] = {
         /* Scott Bigham */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "I explored the Dungeons of Doom and all I got was this lousy T-shirt!",
         "Is that Mjollnir in your pocket or are you just happy to see me?",
       "It's not the size of your sword, it's how #enhance'd you are with it.",
@@ -121,7 +121,7 @@ char *buf;
         "\82g\82\85\82\8c\81|\82k\82n\82n\82n\81C\82m\82\95\82\92\82\93\82\85\81I",                     /* Animaniacs */
 #endif
         "=^.^=",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "100% goblin hair - do not wash",
         "Aberzombie and Fitch",
         "cK -- Cockatrice touches the Kop",
@@ -158,7 +158,7 @@ char *buf;
         "\8e\84\82Í\83S\83\80\82Ì\96Ø\82É\92µ\82Ë\95Ô\82Á\82½",         /* Monkey Island */
         "\97ª\92D\93\87\97°\89©\8aC\8aÝ\83N\83\89\83u", /* Monkey Island */
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "If you can read this, I can hit you with my polearm",
         "I'm confused!",
         "I scored with the princess",
@@ -191,7 +191,7 @@ char *buf;
         "The Hellhound Gang",
         "The Werewolves",
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "They Might Be Storm Giants",
         "Weapons don't kill people, I kill people",
         "White Zombie",
@@ -353,7 +353,7 @@ doread()
         return 1;
     } else if (scroll->otyp == CREDIT_CARD) {
         static const char *card_msgs[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             "Leprechaun Gold Tru$t - Shamrock Card",
             "Magic Memory Vault Charge Card",
             "Larn National Bank",                /* Larn */
@@ -539,7 +539,7 @@ doread()
            maintained illiterate conduct so far, and this mail
            scroll didn't come from bones, ask for confirmation */
         if (!u.uconduct.literate) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             if (!scroll->spe && yn(
              "Reading mail will violate \"illiterate\" conduct.  Read anyway?"
                                    ) != 'y')
@@ -573,7 +573,7 @@ doread()
                        || (scroll->otyp == SCR_REMOVE_CURSE
                            && scroll->cursed));
         if (Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline(nodisappear
                       ? "You %s the formula on the scroll."
                       : "As you %s the formula on it, the scroll disappears.",
@@ -585,7 +585,7 @@ doread()
                   silently ? "\94O\82¶" : "\8f¥\82¦");
 #endif
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline(nodisappear ? "You read the scroll."
                               : "As you read the scroll, it disappears.");
 #else
@@ -599,7 +599,7 @@ doread()
 */
                 pline("\82Æ\82Ä\82à\82Ö\82ë\82Ö\82ë\82È\82Ì\82Å\81C\82­\82µ\82á\82­\82µ\82á\82É\82µ\82Ä\82µ\82Ü\82Á\82½\81D\81D\81D");
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Being confused, you %s the magic words...",
                       silently ? "misunderstand" : "mispronounce");
 #else
@@ -655,7 +655,7 @@ p_glow2(otmp, color)
 register struct obj *otmp;
 register const char *color;
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     pline("%s%s%s for a moment.", Yobjnam2(otmp, Blind ? "vibrate" : "glow"),
           Blind ? "" : " ", Blind ? "" : hcolor(color));
 #else
@@ -765,7 +765,7 @@ int curse_bless;
 
         /* destruction depends on current state, not adjustment */
         if (obj->spe > rn2(7) || obj->spe <= -5) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s momentarily, then %s!", Yobjnam2(obj, "pulsate"),
                   otense(obj, "explode"));
 #else
@@ -782,7 +782,7 @@ int curse_bless;
         } else {
             long mask = is_on ? (obj == uleft ? LEFT_RING : RIGHT_RING) : 0L;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s spins %sclockwise for a moment.", Yname2(obj),
                   s < 0 ? "counter" : "");
 #else
@@ -873,7 +873,7 @@ int curse_bless;
                 stripspe(obj);
                 if (obj->lamplit) {
                     if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s out!", Tobjnam(obj, "go"));
 #else
                         pline("%s\82Í\8fÁ\82¦\82½\81I", xname(obj));
@@ -1291,7 +1291,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
 
         otmp = some_armor(&youmonst);
         if (!otmp) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             strange_feeling(sobj, !Blind
                                       ? "Your skin glows then fades."
                                       : "Your skin feels warm for a moment.");
@@ -1317,7 +1317,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
                 Your("%s\82Í\88ê\8fu\92g\82©\82­\82È\82Á\82½\81D", xname(otmp));
             } else {
                 otmp->rknown = TRUE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s covered by a %s %s %s!", Yobjnam2(otmp, "are"),
                       scursed ? "mottled" : "shimmering",
                       hcolor(scursed ? NH_BLACK : NH_GOLDEN),
@@ -1333,7 +1333,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
             }
             if (new_erodeproof && (otmp->oeroded || otmp->oeroded2)) {
                 otmp->oeroded = otmp->oeroded2 = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s as good as new!",
                       Yobjnam2(otmp, Blind ? "feel" : "look"));
 #else
@@ -1366,7 +1366,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
         s = scursed ? -otmp->spe : otmp->spe;
         if (s > (special_armor ? 5 : 3) && rn2(s)) {
             otmp->in_use = TRUE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s violently %s%s%s for a while, then %s.", Yname2(otmp),
                   otense(otmp, Blind ? "vibrate" : "glow"),
                   (!Blind && !same_color) ? " " : "",
@@ -1409,7 +1409,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
                 alter_cost(otmp, 0L); /* shop bill */
             break;
         }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s%s%s%s for a %s.", Yname2(otmp),
               s == 0 ? "violently " : "",
               otense(otmp, Blind ? "vibrate" : "glow"),
@@ -1446,7 +1446,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
 
         if ((otmp->spe > (special_armor ? 5 : 3))
             && (special_armor || !rn2(7)))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s.", Yobjnam2(otmp, "suddenly vibrate"),
                   Blind ? "again" : "unexpectedly");
 #else
@@ -1515,7 +1515,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
             make_confused(HConfusion + rnd(100), FALSE);
         } else if (confused) {
             if (!sblessed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("%s begin to %s%s.", makeplural(body_part(HAND)),
                      Blind ? "tingle" : "glow ",
                      Blind ? "" : hcolor(NH_PURPLE));
@@ -1526,7 +1526,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
 #endif
                 make_confused(HConfusion + rnd(100), FALSE);
             } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("A %s%s surrounds your %s.",
                       Blind ? "" : hcolor(NH_RED),
                       Blind ? "faint buzz" : " glow", body_part(HEAD));
@@ -1540,7 +1540,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
             }
         } else {
             if (!sblessed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("%s%s %s%s.", makeplural(body_part(HAND)),
                      Blind ? "" : " begin to glow",
                      Blind ? (const char *) "tingle" : hcolor(NH_RED),
@@ -1554,7 +1554,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
                 u.umconf++;
             } else {
                 if (Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Your("%s tingle %s sharply.", makeplural(body_part(HAND)),
                          u.umconf ? "even more" : "very");
 #else
@@ -1562,7 +1562,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
                          u.umconf ? "\8f­\82µ" : "\82Æ\82Ä\82à");
 #endif
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Your("%s glow a%s brilliant %s.",
                          makeplural(body_part(HAND)),
                          u.umconf ? "n even more" : "", hcolor(NH_RED));
@@ -1598,7 +1598,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
             }
         }
         if (otyp == SCR_SCARE_MONSTER || !ct)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_hear("%s %s.", (confused || scursed) ? "sad wailing"
                                                      : "maniacal laughter",
                      !ct ? "in the distance" : "close by");
@@ -1626,7 +1626,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
     case SPE_REMOVE_CURSE: {
         register struct obj *obj;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_feel(!Hallucination
                      ? (!confused ? "like someone is helping you."
                                   : "like you need some help.")
@@ -1742,7 +1742,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
                 pline("\95\90\8aí\82ª\88ê\8fu\92g\82©\82­\82È\82Á\82½\82æ\82¤\82È\8bC\82ª\82µ\82½\81D");
             } else {
                 uwep->rknown = TRUE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s covered by a %s %s %s!", Yobjnam2(uwep, "are"),
                       scursed ? "mottled" : "shimmering",
                       hcolor(scursed ? NH_PURPLE : NH_GOLDEN),
@@ -1756,7 +1756,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
             }
             if (new_erodeproof && (uwep->oeroded || uwep->oeroded2)) {
                 uwep->oeroded = uwep->oeroded2 = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s as good as new!",
                       Yobjnam2(uwep, Blind ? "feel" : "look"));
 #else
@@ -1807,7 +1807,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
                 }
         }
         if (!results) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Nothing interesting %s.",
                   !candidates ? "happens" : "seems to happen");
 #else
@@ -1815,7 +1815,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
                   !candidates ? "" : "\82æ\82¤\82¾");
 #endif
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("neighborhood %s %sfriendlier.",
                       vis_results ? "is" : "seems",
                       (results < 0) ? "un" : "");
@@ -1985,7 +1985,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
         /*FALLTHRU*/
     case SPE_MAGIC_MAPPING:
         if (level.flags.nommap) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Your("%s spins as %s blocks the spell!", body_part(HEAD),
                  something);
 #else
@@ -2132,7 +2132,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
 */
                 You_hear("\83S\83\8d\83S\83\8d\82Æ\82¢\82¤\89¹\82ð\95·\82¢\82½\81D");
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline_The("%s rumbles %s you!", ceiling(u.ux, u.uy),
                           sblessed ? "around" : "above");
 #else
@@ -2186,7 +2186,7 @@ struct obj *sobj; /* scroll, or fake spellbook object for scroll-like spell */
 */
             You("\88«\8fL\89_\82Ì\8aª\95¨\82ð\94­\8c©\82µ\82½\81I");
         known = TRUE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Where do you want to center the %scloud?",
               already_known ? "stinking " : "");
 #else
@@ -2309,7 +2309,7 @@ boolean confused, byu;
             if (mtmp->minvis && !canspotmon(mtmp))
                 map_invisible(mtmp->mx, mtmp->my);
         } else if (u.uswallow && mtmp == u.ustuck)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_hear("something hit %s %s over your %s!",
                      s_suffix(mon_nam(mtmp)), mbodypart(mtmp, STOMACH),
                      body_part(HEAD));
@@ -2337,7 +2337,7 @@ boolean confused, byu;
                     mdmg = 2;
             } else {
                 if (canspotmon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s's %s does not protect %s.", Monnam(mtmp),
                           xname(helmet), mhim(mtmp));
 #else
@@ -2424,7 +2424,7 @@ int chg; /* recharging */
     /* inflict damage and destroy the wand */
     dmg = d(n, k);
     obj->in_use = TRUE; /* in case losehp() is fatal (or --More--^C) */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     pline("%s %s explodes!", Yname2(obj), expl);
 #else
     pline("%s\82Í%s\94\9a\94­\82µ\82½\81I", xname(obj), expl);
@@ -2513,7 +2513,7 @@ struct obj *obj;
             if (Blind)
                 ; /* no feedback */
             else if (is_animal(u.ustuck->data))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s is lit.", s_suffix(Monnam(u.ustuck)),
                       mbodypart(u.ustuck, STOMACH));
 #else
@@ -2619,7 +2619,7 @@ do_class_genocide()
             (void) mungspaces(buf);
         } while (!*buf);
         /* choosing "none" preserves genocideless conduct */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         if (*buf == '\033' || !strcmpi(buf, "none")
             || !strcmpi(buf, "nothing"))
 #else
@@ -2915,7 +2915,7 @@ int how;
     if (how & REALLY) {
         /* setting no-corpse affects wishing and random tin generation */
         mvitals[mndx].mvflags |= (G_GENOD | G_NOCORPSE);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Wiped out %s%s.", which,
               (*which != 'a') ? buf : makeplural(buf));
 #else
@@ -2988,7 +2988,7 @@ int how;
             /* accumulated 'cnt' doesn't take groups into account;
                assume bringing in new mon(s) didn't remove any old ones */
             cnt = monster_census(FALSE) - census;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Sent in %s%s.", (cnt > 1) ? "some " : "",
                   (cnt > 1) ? makeplural(buf) : an(buf));
 #else
@@ -3142,7 +3142,7 @@ struct _create_particular_data *d;
     }
     bufp = mungspaces(bufp); /* after potential memset(' ') */
     /* allow the initial disposition to be specified */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     if (!strncmpi(bufp, "tame ", 5)) {
         bufp += 5;
 #else
@@ -3150,7 +3150,7 @@ struct _create_particular_data *d;
         bufp += 14;
 #endif
         d->maketame = TRUE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     } else if (!strncmpi(bufp, "peaceful ", 9)) {
         bufp += 9;
 #else
@@ -3158,7 +3158,7 @@ struct _create_particular_data *d;
         bufp += 8;
 #endif
         d->makepeaceful = TRUE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     } else if (!strncmpi(bufp, "hostile ", 8)) {
         bufp += 8;
 #else
@@ -3214,7 +3214,7 @@ struct _create_particular_data *d;
             /* wizard mode can override handling of special monsters */
             char buf[BUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "Creating %s instead; force %s?",
                     mons[d->which].mname, mons[firstchoice].mname);
 #else
index dd1b292..2de7e9f 100644 (file)
@@ -971,7 +971,7 @@ genericptr_t p2;
             make_blinded(1L, FALSE);
         }
         if (!Poison_resistance) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s is burning your %s!", Something,
                   makeplural(body_part(LUNG)));
 #else
index ee84254..a6c405f 100644 (file)
@@ -629,7 +629,7 @@ unsigned int *stuckid, *steedid;
 #endif
     if (u.uhp <= 0 && (!Upolyd || u.mh <= 0)) {
         u.ux = u.uy = 0; /* affects pline() [hence You()] */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("were not healthy enough to survive restoration.");
 #else
         You("\8dÄ\8aJ\82Å\82«\82é\82Ù\82Ç\8c\92\8dN\82Å\82Í\82È\82©\82Á\82½\81D");
@@ -866,7 +866,7 @@ register int fd;
         clear_nhwindow(WIN_MAP);
 #endif
     clear_nhwindow(WIN_MESSAGE);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You("return to level %d in %s%s.", depth(&u.uz),
         dungeons[u.uz.dnum].dname,
         flags.debug ? " while in debug mode"
@@ -1390,7 +1390,7 @@ winid bannerwin; /* if not WIN_ERR, clear window and show copyright in menu */
             add_menu(tmpwin, NO_GLYPH, &any, 0, 0, ATR_NONE, "",
                      MENU_UNSELECTED);
         }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         add_menu(tmpwin, NO_GLYPH, &any, 0, 0, ATR_NONE,
                  "Select one of your saved games", MENU_UNSELECTED);
 #else
@@ -1404,7 +1404,7 @@ winid bannerwin; /* if not WIN_ERR, clear window and show copyright in menu */
         }
         clet = (k <= 'n' - 'a') ? 'n' : 0; /* new game */
         any.a_int = -1;                    /* not >= 0 */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         add_menu(tmpwin, NO_GLYPH, &any, clet, 0, ATR_NONE,
                  "Start a new character", MENU_UNSELECTED);
 #else
@@ -1413,7 +1413,7 @@ winid bannerwin; /* if not WIN_ERR, clear window and show copyright in menu */
 #endif
         clet = (k + 1 <= 'q' - 'a') ? 'q' : 0; /* quit */
         any.a_int = -2;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         add_menu(tmpwin, NO_GLYPH, &any, clet, 0, ATR_NONE,
                  "Never mind (quit)", MENU_SELECTED);
 #else
index faf4152..7e7790a 100644 (file)
@@ -30,7 +30,7 @@
  * God names use a leading underscore to flag goddesses.
  */
 const struct Role roles[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Archeologist", 0 },
       { { "Digger", 0 },
         { "Field Worker", 0 },
@@ -56,7 +56,7 @@ const struct Role roles[] = {
       "\83P\83c\83A\83\8b\83J\83g\83\8b", "\83J\83}\83L\83V\83g\83\8a", "\83t\83w\83g\83g\83\8b", /* Central American */
 #endif
       "Arc",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "the College of Archeology",
       "the Tomb of the Toltec Kings",
 #else
@@ -91,7 +91,7 @@ const struct Role roles[] = {
       A_INT,
       SPE_MAGIC_MAPPING,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Barbarian", 0 },
       { { "Plunderer", "Plunderess" },
         { "Pillager", 0 },
@@ -117,7 +117,7 @@ const struct Role roles[] = {
       "\83~\83g\83\89", "\83N\83\8d\83\80", "\83Z\83g", /* Hyborian */
 #endif
       "Bar",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "the Camp of the Duali Tribe",
       "the Duali Oasis",
 #else
@@ -152,7 +152,7 @@ const struct Role roles[] = {
       A_INT,
       SPE_HASTE_SELF,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Caveman", "Cavewoman" },
       { { "Troglodyte", 0 },
         { "Aborigine", 0 },
@@ -178,7 +178,7 @@ const struct Role roles[] = {
       "\83A\83k", "_\83C\83V\83\85\83^\83\8b", "\83A\83\93\83V\83\83\83\8b", /* Babylonian */
 #endif
       "Cav",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "the Caves of the Ancestors",
       "the Dragon's Lair",
 #else
@@ -213,7 +213,7 @@ const struct Role roles[] = {
       A_INT,
       SPE_DIG,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Healer", 0 },
       { { "Rhizotomist", 0 },
         { "Empiric", 0 },
@@ -239,7 +239,7 @@ const struct Role roles[] = {
       "_\83A\83e\83i", "\83w\83\8b\83\81\83X", "\83|\83Z\83C\83h\83\93", /* Greek */
 #endif
       "Hea",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "the Temple of Epidaurus",
       "the Temple of Coeus",
 #else
@@ -273,7 +273,7 @@ const struct Role roles[] = {
       A_WIS,
       SPE_CURE_SICKNESS,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Knight", 0 },
       { { "Gallant", 0 },
         { "Esquire", 0 },
@@ -299,7 +299,7 @@ const struct Role roles[] = {
       "\83\8b\81[\83t", "_\83u\83\8a\83W\83b\83g", "\83}\83i\83\93\83i\83\93\81E\83}\83N\83\8a\81[\83\8b", /* Celtic */
 #endif
       "Kni",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "Camelot Castle",
       "the Isle of Glass",
 #else
@@ -333,7 +333,7 @@ const struct Role roles[] = {
       A_WIS,
       SPE_TURN_UNDEAD,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Monk", 0 },
       { { "Candidate", 0 },
         { "Novice", 0 },
@@ -359,7 +359,7 @@ const struct Role roles[] = {
       "\8eR\97\8b\90¸", "\90Ô\8f¼\8eq", "\89©\92é", /* Chinese */
 #endif
       "Mon",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "the Monastery of Chan-Sune",
       "the Monastery of the Earth-Lord",
 #else
@@ -394,7 +394,7 @@ const struct Role roles[] = {
       A_WIS,
       SPE_RESTORE_ABILITY,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Priest", "Priestess" },
       { { "Aspirant", 0 },
         { "Acolyte", 0 },
@@ -420,7 +420,7 @@ const struct Role roles[] = {
       0, 0, 0, /* deities from a randomly chosen other role will be used */
 #endif
       "Pri",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "the Great Temple",
       "the Temple of Nalzok",
 #else
@@ -457,7 +457,7 @@ const struct Role roles[] = {
       -4 },
     /* Note:  Rogue precedes Ranger so that use of `-R' on the command line
        retains its traditional meaning. */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Rogue", 0 },
       { { "Footpad", 0 },
         { "Cutpurse", 0 },
@@ -483,7 +483,7 @@ const struct Role roles[] = {
       "\83C\83Z\83b\83N", "\83\82\83O", "\83R\83X", /* Nehwon */
 #endif
       "Rog",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "the Thieves' Guild Hall",
       "the Assassins' Guild Hall",
 #else
@@ -517,7 +517,7 @@ const struct Role roles[] = {
       A_INT,
       SPE_DETECT_TREASURE,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Ranger", 0 },
       {
 #if 0 /* OBSOLETE */
@@ -557,7 +557,7 @@ const struct Role roles[] = {
       "\83}\81[\83L\83\85\83\8a\81[", "_\83r\81[\83i\83X", "\83}\81[\83Y", /* Roman/planets */
 #endif
       "Ran",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "Orion's camp",
       "the cave of the wumpus",
 #else
@@ -592,7 +592,7 @@ const struct Role roles[] = {
       A_INT,
       SPE_INVISIBILITY,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Samurai", 0 },
       { { "Hatamoto", 0 },       /* Banner Knight */
         { "Ronin", 0 },          /* no allegiance */
@@ -618,7 +618,7 @@ const struct Role roles[] = {
       "_\93V\8fÆ\91å\90_", "\97\8b\90_", "\90{\8d²\94V\92j", /* Japanese */
 #endif
       "Sam",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "the Castle of the Taro Clan",
       "the Shogun's Castle",
 #else
@@ -652,7 +652,7 @@ const struct Role roles[] = {
       A_INT,
       SPE_CLAIRVOYANCE,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Tourist", 0 },
       { { "Rambler", 0 },
         { "Sightseer", 0 },
@@ -678,7 +678,7 @@ const struct Role roles[] = {
       "\96Ó\96Ú\82Ì\83C\83I", "_\81\83\8f\97\90_\81\84", "\83I\83t\83\89\81[", /* Discworld */
 #endif
       "Tou",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "Ankh-Morpork",
       "the Thieves' Guild Hall",
 #else
@@ -712,7 +712,7 @@ const struct Role roles[] = {
       A_INT,
       SPE_CHARM_MONSTER,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Valkyrie", 0 },
       { { "Stripling", 0 },
         { "Skirmisher", 0 },
@@ -738,7 +738,7 @@ const struct Role roles[] = {
       "\83`\83\85\81[\83\8b", "\83I\81[\83f\83B\83\93", "\83\8d\83L", /* Norse */
 #endif
       "Val",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "the Shrine of Destiny",
       "the cave of Surtur",
 #else
@@ -772,7 +772,7 @@ const struct Role roles[] = {
       A_WIS,
       SPE_CONE_OF_COLD,
       -4 },
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { { "Wizard", 0 },
       { { "Evoker", 0 },
         { "Conjurer", 0 },
@@ -798,7 +798,7 @@ const struct Role roles[] = {
       "\83v\83^\83n", "\83g\81[\83g", "\83A\83\93\83t\83\8b", /* Egyptian */
 #endif
       "Wiz",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
       "the Lonely Tower",
       "the Tower of Darkness",
 #else
@@ -868,7 +868,7 @@ struct Role urole = {
 /* Table of all races */
 const struct Race races[] = {
     {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "human",
         "human",
         "humanity",
@@ -878,7 +878,7 @@ const struct Race races[] = {
         "\90l\8aÔ",
 #endif
         "Hum",
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         { "man", "woman" },
 #else
         { "\92j", "\8f\97" },
@@ -900,7 +900,7 @@ const struct Race races[] = {
         { 1, 0, 2, 0, 2, 0 }  /* Energy */
     },
     {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "elf",
         "elven",
         "elvenkind",
@@ -927,7 +927,7 @@ const struct Race races[] = {
         { 2, 0, 3, 0, 3, 0 }  /* Energy */
     },
     {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "dwarf",
         "dwarven",
         "dwarvenkind",
@@ -954,7 +954,7 @@ const struct Race races[] = {
         { 0, 0, 0, 0, 0, 0 }  /* Energy */
     },
     {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "gnome",
         "gnomish",
         "gnomehood",
@@ -981,7 +981,7 @@ const struct Race races[] = {
         { 2, 0, 2, 0, 2, 0 }  /* Energy */
     },
     {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "orc",
         "orcish",
         "orcdom",
@@ -1042,7 +1042,7 @@ struct Race urace = {
   \8aY\93\96\95\94\82à\97v\8fC\90³\81B
 */
 const struct Gender genders[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { "male", "he", "him", "his", "Mal", ROLE_MALE },
     { "female", "she", "her", "her", "Fem", ROLE_FEMALE },
     { "neuter", "it", "it", "its", "Ntr", ROLE_NEUTER }
@@ -1055,7 +1055,7 @@ const struct Gender genders[] = {
 
 /* Table of all alignments */
 const struct Align aligns[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     { "law", "lawful", "Law", ROLE_LAWFUL, A_LAWFUL },
     { "balance", "neutral", "Neu", ROLE_NEUTRAL, A_NEUTRAL },
     { "chaos", "chaotic", "Cha", ROLE_CHAOTIC, A_CHAOTIC },
index 659370a..59f93d8 100644 (file)
@@ -372,7 +372,7 @@ int mechanism;
     switch (mechanism) {
     case BY_ORACLE:
         /* Oracle delivers the rumor */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("True to her word, the Oracle %ssays: ",
               (!rn2(4) ? "offhandedly "
                        : (!rn2(3) ? "casually "
index 9b53710..172efe5 100644 (file)
--- a/src/shk.c
+++ b/src/shk.c
@@ -470,7 +470,7 @@ boolean newlev;
                       plname);
 #endif
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s that you need to pay before leaving%s",
                   Shknam(shkp),
                   NOTANGRY(shkp) ? "points out" : "makes it clear",
@@ -523,7 +523,7 @@ struct monst *shkp;
     rouse_shk(shkp, TRUE);
     total = (addupbill(shkp) + eshkp->debit);
     if (eshkp->credit >= total) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("credit of %ld %s is used to cover your shopping bill.",
 #else
         Your("\97a\82¯\8bà\82©\82ç%ld%s\82ª\8a¨\92è\82Ì\8ex\95¥\82¢\82É\8eg\82í\82ê\82½\81D",
@@ -579,7 +579,7 @@ deserted_shop(enterstring)
     if (Blind && !(Blind_telepat || Detect_monsters))
         ++n; /* force feedback to be less specific */
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     pline("This shop %s %s.", (m < n) ? "seems to be" : "is",
           !n ? "deserted" : "untended");
 #else
@@ -830,14 +830,14 @@ struct obj *obj;
            don't repeat this N times when they're taken out */
         if (moves != pickmovetime) {
             if (!Deaf && !muteshk(shkp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 verbalize("You sneaky %s!  Get out of here with that pick!",
                       cad(FALSE));
 #else
                 verbalize("\82Ð\82«\82å\82¤\8eÒ\82ß\81I\82Â\82é\82Í\82µ\82ð\8e\9d\82Á\82Ä\8aO\82É\8fo\82ë\81I");
 #endif
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s your pick!",
                       Shknam(shkp),
                       haseyes(shkp->data) ? "glares at"
@@ -934,7 +934,7 @@ shopper_financial_report()
                 continue;
             eshkp = ESHK(shkp);
             if ((amt = eshkp->credit) != 0)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("have %ld %s credit at %s %s.", amt, currency(amt),
                     s_suffix(shkname(shkp)),
                     shtypes[eshkp->shoptype - SHOPBASE].name);
@@ -1663,7 +1663,7 @@ dopay()
 */
             pline("\82µ\82©\82µ\81C%s\93X\82Í\8dÅ\8bß\93\90\82Ý\82É\82 \82Á\82½\82Ì\82Å\81C",
                   noit_mhis(shkp));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("you %scompensate %s for %s losses.",
                   (umoney < ltmp) ? "partially " : "", shkname(shkp),
                   noit_mhis(shkp));
@@ -1808,7 +1808,7 @@ dopay()
 
         umoney = money_cnt(invent);
         if (!umoney && !eshkp->credit) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%shave no money or credit%s.",
                 stashed_gold ? "seem to " : "", paid ? " left" : "");
 #else
@@ -1818,7 +1818,7 @@ dopay()
             return 0;
         }
         if ((umoney + eshkp->credit) < cheapest_item(shkp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("don't have enough money to buy%s the item%s you picked.",
                 eshkp->billct > 1 ? " any of" : "", plur(eshkp->billct));
 #else
@@ -1945,7 +1945,7 @@ boolean itemize;
         return PAY_BUY;
     }
     if (itemize && umoney + ESHK(shkp)->credit == 0L) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%shave no money or credit left.",
             stashed_gold ? "seem to " : "");
 #else
@@ -1993,7 +1993,7 @@ boolean itemize;
         } else if (quan < bp->bquan && !consumed) { /* partly used goods */
             obj->quan = bp->bquan - save_quan;      /* used up amount */
             if (!Deaf && !muteshk(shkp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 verbalize("%s for the other %s before buying %s.",
                       ANGRY(shkp) ? "Pay" : "Please pay",
                       simpleonames(obj), /* short name suffices */
@@ -2004,7 +2004,7 @@ boolean itemize;
                       ANGRY(shkp) ? "\95¥\82¦\81I" : "\95¥\82Á\82Ä\82­\82¾\82³\82¢\81D");
 #endif
             } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s%s your bill for the other %s first.",
                       Shknam(shkp),
                       ANGRY(shkp) ? "angrily " : "",
@@ -2021,7 +2021,7 @@ boolean itemize;
         }
     }
     if (buy == PAY_BUY && umoney + ESHK(shkp)->credit < ltmp) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("don't%s have gold%s enough to pay for %s.",
             stashed_gold ? " seem to" : "",
             (ESHK(shkp)->credit > 0L) ? " or credit" : "",
@@ -2044,7 +2044,7 @@ boolean itemize;
     }
 
     pay(ltmp, shkp);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     shk_names_obj(shkp, obj,
                   consumed ? "paid for %s at a cost of %ld gold piece%s.%s"
                            : "bought %s for %ld gold piece%s.%s",
@@ -3127,7 +3127,7 @@ boolean ininv, dummy, silent;
             return;
         }
         if (!ininv) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s will cost you %ld %s%s.", The(xname(obj)), ltmp,
                   currency(ltmp), (obj->quan > 1L) ? " each" : "");
 #else
@@ -3155,7 +3155,7 @@ boolean ininv, dummy, silent;
             }
 #endif
             obj->quan = 1L; /* fool xname() into giving singular */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %ld %s %s %s%s.\"", buf, ltmp, currency(ltmp),
                   (save_quan > 1L) ? "per"
                                    : (contentscount && !obj->unpaid)
@@ -3174,7 +3174,7 @@ boolean ininv, dummy, silent;
         }
     } else if (!silent) {
         if (ltmp)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("list price of %s%s%s is %ld %s%s.",
                       (contentscount && !obj->unpaid) ? the_contents_of : "",
                       the(xname(obj)),
@@ -3221,7 +3221,7 @@ char *buf;
         Strcat(buf, (flags.female) ? " hiril" : " hir");
     else
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Strcat(buf, !is_human(youmonst.data) ? " creature"
                                              : (flags.female) ? " lady"
                                                               : " sir");
@@ -3447,7 +3447,7 @@ boolean peaceful, silent;
 
             if (credit_use) {
                 if (ESHK(shkp)->credit) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("have %ld %s credit remaining.", ESHK(shkp)->credit,
                         currency(ESHK(shkp)->credit));
 #else
@@ -3493,7 +3493,7 @@ boolean peaceful, silent;
 
         if (!silent) {
             if (canseemon(shkp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Norep("%s booms: \"%s, you are a thief!\"",
                       Shknam(shkp), plname);
 #else
@@ -3659,7 +3659,7 @@ xchar x, y;
                 Your("\8eØ\8bà\82Í\8ex\95¥\82í\82ê\82½\81D");
             }
             if (eshkp->credit == delta)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("have established %ld %s credit.", delta,
                     currency(delta));
 #else
@@ -3667,7 +3667,7 @@ xchar x, y;
                       currency(delta));
 #endif
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%ld %s added to your credit; total is now %ld %s.",
                       delta, currency(delta), eshkp->credit,
                       currency(eshkp->credit));
@@ -3723,7 +3723,7 @@ xchar x, y;
             pline("%s cannot pay you at present.", Shknam(shkp));
 */
             pline("%s\82Í\8d¡\82Ì\82Æ\82±\82ë\82Í\8ex\95¥\82¦\82È\82¢\81D", Shknam(shkp));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(qbuf, "Will you accept %ld %s in credit for ", tmpcr,
                     currency(tmpcr));
             c = ynaq(safe_qbuf(qbuf, qbuf, "?", obj, doname, thesimpleoname,
@@ -3742,7 +3742,7 @@ xchar x, y;
             c = 'n';
 
         if (c == 'y') {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             shk_names_obj(
                 shkp, obj,
                 (sell_how != SELL_NORMAL)
@@ -3864,7 +3864,7 @@ xchar x, y;
                 obj->no_charge = 1;
             subfrombill(obj, shkp);
             pay(-offer, shkp);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             shk_names_obj(shkp, obj,
                           (sell_how != SELL_NORMAL)
                            ? ((!ltmp && cltmp && only_partially_your_contents)
@@ -3958,7 +3958,7 @@ int mode; /* 0: deliver count 1: paged */
         if (totused)
             putstr(datawin, 0, "");
         totused += eshkp->debit;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         buf_p = xprname((struct obj *) 0, "usage charges and/or other fees",
                         GOLD_SYM, FALSE, eshkp->debit, 0L);
 #else
@@ -4324,7 +4324,7 @@ boolean catchup; /* restoring a level */
            message for the only repair, but perhaps the shop repair
            incantation means that shk's untrap attempt will never fail */
         if (canseemon(shkp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s whispers %s.", Shknam(shkp),
                   shk_closeby ? "an incantation" : "something");
 #else
@@ -4664,7 +4664,7 @@ register int fall;
         if (lang == 2) {
             if (!Deaf && !muteshk(shkp)) {
                 if (u.utraptype == TT_PIT)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     verbalize(
                         "Be careful, %s, or you might fall through the floor.",
                         flags.female ? "madam" : "sir");
@@ -4674,7 +4674,7 @@ register int fall;
                         flags.female ? "\82¨\8fì\82³\82ñ" : "\82¨\8bq\82³\82ñ");
 #endif
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     verbalize("%s, do not damage the floor here!",
                         flags.female ? "Madam" : "Sir");
 #else
@@ -5012,7 +5012,7 @@ boolean cant_mollify;
 */
                 verbalize("\82³\82 \81C\95¥\82¤\82ñ\82¾\81I");
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s lunges %s %s toward your %s!",
                       Shknam(shkp), noit_mhis(shkp),
                       mbodypart(shkp, HAND), body_part(NECK));
@@ -5103,7 +5103,7 @@ register struct obj *first_obj;
             Strcpy(price, "\96³\97¿");
             contentsonly = FALSE;
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(price, "%ld %s%s", cost, currency(cost),
                     (otmp->quan) > 1L ? " each" : "");
 #else
@@ -5111,7 +5111,7 @@ register struct obj *first_obj;
                     otmp->quan > 1L ? "\82»\82ê\82¼\82ê" : "", cost, currency(cost));
 #endif
         }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%s%s, %s", contentsonly ? the_contents_of : "",
                 doname(otmp), price);
 #else
@@ -5133,7 +5133,7 @@ register struct obj *first_obj;
         } else {
             /* print cost in slightly different format, so can't reuse buf;
                cost and contentsonly are already set up */
-#if 0 /*JP*/
+#if 0 /*JP;T*/
             Sprintf(buf, "%s%s", contentsonly ? the_contents_of : "",
                     doname(first_obj));
 #else
@@ -5275,7 +5275,7 @@ struct monst *shkp;
            not actually a shk, which could happen if someone
            wishes for a shopkeeper statue and then animates it.
            (Note: shkname() would be "" in a case like this.) */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s asks whether you've seen any untended shops recently.",
 #else
         pline("%s\82Í\8dÅ\8bß\82Ç\82±\82©\82É\93X\88õ\82Ì\82¢\82È\82¢\93X\82Í\82È\82¢\82©\82Æ\82½\82¸\82Ë\82½\81D",
@@ -5321,7 +5321,7 @@ struct monst *shkp;
                           Hello(shkp));
 #endif
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s taps you on the %s.",
                       Shknam(shkp), body_part(ARM));
 #else
@@ -5344,7 +5344,7 @@ struct monst *shkp;
               (!Deaf && !muteshk(shkp)) ? "\8c¾\82Á\82½" : "\8e¦\82µ\82½");
 #endif
     } else if (eshk->debit) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s that you owe %s %ld %s.",
               Shknam(shkp),
               (!Deaf && !muteshk(shkp)) ? "reminds you" : "indicates",
@@ -5372,7 +5372,7 @@ struct monst *shkp;
               (!Deaf && !muteshk(shkp)) ? "\8bð\92s\82ð\82±\82Ú\82µ\82½" : "\8c\9c\94O\82ð\8e¦\82µ\82½");
 #endif
     } else if ((shkmoney = money_cnt(shkp->minvent)) < 50L) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s that business is bad.",
               Shknam(shkp),
               (!Deaf && !muteshk(shkp)) ? "complains" : "indicates");
@@ -5419,7 +5419,7 @@ boolean silent;
         }
     }
     if (cnt && !silent)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline_The("Kop%s (disappointed) vanish%s into thin air.",
                   plur(cnt), (cnt == 1) ? "es" : "");
 #else
@@ -5650,7 +5650,7 @@ register xchar x, y;
         && ESHK(shkp)->shd.y == y
         && shkp->mcanmove && !shkp->msleeping
         && (ESHK(shkp)->debit || ESHK(shkp)->billct || ESHK(shkp)->robbed)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s%s blocks your way!", Shknam(shkp),
               Invis ? " senses your motion and" : "");
 #else
index 05cad6d..f6917b1 100644 (file)
@@ -499,7 +499,7 @@ boolean mkspecl;
     int atype;
 
     /* 3.6 tribute */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     if (mkspecl && (!strcmp(shp->name, "rare books")
                     || !strcmp(shp->name, "second-hand bookstore"))) {
 #else
index e32ec67..646a0ba 100644 (file)
--- a/src/sit.c
+++ b/src/sit.c
@@ -104,7 +104,7 @@ dosit()
 
         obj = level.objects[u.ux][u.uy];
         if (youmonst.data->mlet == S_DRAGON && obj->oclass == COIN_CLASS) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("coil up around your %shoard.",
                 (obj->quan + money_cnt(invent) < u.ulevel * 1000) ? "meager "
                                                                   : "");
@@ -286,7 +286,7 @@ dosit()
                 (void) adjattrib(rn2(A_MAX), 1, FALSE);
                 break;
             case 3:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("A%s electric shock shoots through your body!",
                       (Shock_resistance) ? "n" : " massive");
 #else
@@ -341,7 +341,7 @@ dosit()
                 pline("A voice echoes:");
 */
                 pline("\90º\82ª\8b¿\82¢\82½:");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 verbalize("Thy audience hath been summoned, %s!",
                           flags.female ? "Dame" : "Sire");
 #else
@@ -358,7 +358,7 @@ dosit()
                 pline("A voice echoes:");
 */
                 pline("\90º\82ª\8b¿\82¢\82½:");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 verbalize("By thine Imperious order, %s...",
                           flags.female ? "Dame" : "Sire");
 #else
@@ -472,7 +472,7 @@ dosit()
         struct obj *uegg;
 
         if (!flags.female) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s can't lay eggs!",
                   Hallucination
                       ? "You may think you are a platypus, but a male still"
@@ -515,7 +515,7 @@ dosit()
         /* this sets hatch timers if appropriate */
         set_corpsenm(uegg, egg_type_from_parent(u.umonnum, FALSE));
         uegg->known = uegg->dknown = 1;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%s an egg.", eggs_in_water(youmonst.data) ? "spawn" : "lay");
 #else
         You("\97\91\82ð\8eY\82ñ\82¾\81D");
@@ -607,7 +607,7 @@ rndcurse()
         else
             curse(otmp);
         if (!Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s.", Yobjnam2(otmp, "glow"),
                   hcolor(otmp->cursed ? NH_BLACK : (const char *) "brown"));
 #else
@@ -689,7 +689,7 @@ attrcurse()
     case 7:
         if (HSee_invisible & INTRINSIC) {
             HSee_invisible &= ~INTRINSIC;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s!", Hallucination ? "tawt you taw a puttie tat"
                                      : "thought you saw something");
 #else
index 2178005..72d488f 100644 (file)
@@ -42,7 +42,7 @@ dosounds()
     hallu = Hallucination ? 1 : 0;
 
     if (level.flags.nfountains && !rn2(400)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         static const char *const fountain_msg[4] = {
             "bubbling water.", "water falling on coins.",
             "the splashing of a naiad.", "a soda fountain!",
@@ -55,7 +55,7 @@ dosounds()
         You_hear1(fountain_msg[rn2(3) + hallu]);
     }
     if (level.flags.nsinks && !rn2(300)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         static const char *const sink_msg[3] = {
             "a slow drip.", "a gurgling noise.", "dishes being washed!",
 #else
@@ -68,7 +68,7 @@ dosounds()
         You_hear1(sink_msg[rn2(2) + hallu]);
     }
     if (level.flags.has_court && !rn2(200)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         static const char *const throne_msg[4] = {
             "the tones of courtly conversation.",
             "a sceptre pounded in judgment.",
@@ -99,7 +99,7 @@ dosounds()
         }
     }
     if (level.flags.has_swamp && !rn2(200)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         static const char *const swamp_msg[3] = {
             "hear mosquitoes!", "smell marsh gas!", /* so it's a smell...*/
             "hear Donald Duck!",
@@ -139,7 +139,7 @@ dosounds()
 #endif /* AZTEC_C_WORKAROUND */
                 {
                     if (gold_in_vault)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You_hear(!hallu
                                      ? "someone counting money."
                                      : "the quarterback calling the play.");
@@ -192,7 +192,7 @@ dosounds()
                     You_hear("\8b»\95±\82µ\82½\97Y\83o\83`\82Ì\89¹\82ð\95·\82¢\82½\81D");
                     break;
                 case 2:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You_hear("bees in your %sbonnet!",
                              uarmh ? "" : "(nonexistent) ");
 #else
@@ -223,7 +223,7 @@ dosounds()
                     You("\95s\8e©\91R\82È\82­\82ç\82¢\90Ã\82©\82È\82Ì\82É\8bC\82Ã\82¢\82½\81D");
                     break;
                 case 1:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline_The("%s on the back of your %s %s up.", hair,
                               body_part(NECK), vtense(hair, "stand"));
 #else
@@ -232,7 +232,7 @@ dosounds()
 #endif
                     break;
                 case 2:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline_The("%s on your %s %s to stand up.", hair,
                               body_part(HEAD), vtense(hair, "seem"));
 #else
@@ -247,7 +247,7 @@ dosounds()
     }
     if (level.flags.has_barracks && !rn2(200)) {
         static const char *const barracks_msg[4] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             "blades being honed.", "loud snoring.", "dice being thrown.",
             "General MacArthur!",
 #else
@@ -277,7 +277,7 @@ dosounds()
     }
     if (level.flags.has_zoo && !rn2(200)) {
         static const char *const zoo_msg[3] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             "a sound reminiscent of an elephant stepping on a peanut.",
             "a sound reminiscent of a seal barking.", "Doctor Dolittle!",
 #else
@@ -305,7 +305,7 @@ dosounds()
         if (tended_shop(sroom)
             && !index(u.ushops, (int) (ROOM_INDEX(sroom) + ROOMOFFSET))) {
             static const char *const shop_msg[3] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 "someone cursing shoplifters.",
                 "the chime of a cash register.", "Neiman and Marcus arguing!",
 #else
@@ -340,7 +340,7 @@ dosounds()
                care if telepathy or extended detection reveals that the
                priest is not currently standing on the altar; he's mobile). */
             static const char *const temple_msg[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 "*someone praising %s.", "*someone beseeching %s.",
                 "#an animal carcass being offered in sacrifice.",
                 "*a strident plea for donations.",
@@ -385,7 +385,7 @@ dosounds()
         /* and don't produce silly effects when she's clearly visible */
         if (mtmp && (hallu || !canseemon(mtmp))) {
             static const char *const ora_msg[5] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 "a strange wind.",     /* Jupiter at Dodona */
                 "convulsive ravings.", /* Apollo at Delphi */
                 "snoring snakes.",     /* AEsculapius at Epidaurus */
@@ -406,7 +406,7 @@ dosounds()
 }
 
 static const char *const h_sounds[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "beep",   "boing",   "sing",   "belche", "creak",   "cough",
     "rattle", "ululate", "pop",    "jingle", "sniffle", "tinkle",
     "eep",    "clatter", "hum",    "sizzle", "twitter", "wheeze",
@@ -791,7 +791,7 @@ register struct monst *mtmp;
 
         if (mtmp->mtame) {
             if (kindred) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(verbuf, "Good %s to you Master%s",
                         isnight ? "evening" : "day",
                         isnight ? "!" : ".  Why do we not rest?");
@@ -802,7 +802,7 @@ register struct monst *mtmp;
 #endif
                 verbl_msg = verbuf;
             } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(verbuf, "%s%s",
                         nightchild ? "Child of the night, " : "",
                         midnight()
@@ -823,7 +823,7 @@ register struct monst *mtmp;
             }
         } else if (mtmp->mpeaceful) {
             if (kindred && isnight) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(verbuf, "Good feeding %s!",
                         flags.female ? "sister" : "brother");
 #else
@@ -890,7 +890,7 @@ register struct monst *mtmp;
     } break;
     case MS_WERE:
         if (flags.moonphase == FULL_MOON && (night() ^ !rn2(13))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s throws back %s head and lets out a blood curdling %s!",
                   Monnam(mtmp), mhis(mtmp),
                   ptr == &mons[PM_HUMAN_WERERAT] ? "shriek" : "howl");
@@ -1130,7 +1130,7 @@ register struct monst *mtmp;
         if (!mtmp->mpeaceful) {
             switch (rn2(4)) {
             case 0:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s boasts about %s gem collection.", Monnam(mtmp),
                       mhis(mtmp));
 #else
@@ -1307,14 +1307,14 @@ register struct monst *mtmp;
     } break;
     case MS_ARREST:
         if (mtmp->mpeaceful)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             verbalize("Just the facts, %s.", flags.female ? "Ma'am" : "Sir");
 #else
             verbalize("\8e\96\8eÀ\82¾\82¯\82ª\92m\82è\82½\82¢\82ñ\82Å\82·\82æ\81C%s\81D", flags.female ? "\89\9c\82³\82ñ" : "\92U\93ß");
 #endif
         else {
             static const char *const arrest_msg[3] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 "Anything you say can be used against you.",
                 "You're under arrest!", "Stop in the name of the Law!",
 #else
@@ -1400,7 +1400,7 @@ register struct monst *mtmp;
         static const char
             *const soldier_foe_msg[3] =
                 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                   "Resistance is useless!", "You're dog meat!", "Surrender!",
 #else
                     "\92ï\8dR\82µ\82Ä\82à\96³\91Ê\82¾\81I",
@@ -1409,7 +1409,7 @@ register struct monst *mtmp;
 #endif
                 },
                    *const soldier_pax_msg[3] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                        "What lousy pay we're getting here!",
                        "The food's not fit for Orcs!",
                        "My feet hurt, I've been on them all day!",
@@ -1612,7 +1612,7 @@ dochat()
         && (otmp = vobj_at(tx, ty)) != 0 && otmp->otyp == STATUE) {
         /* Talking to a statue */
         if (!Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline_The("%s seems not to notice you.",
                       /* if hallucinating, you can't tell it's a statue */
                       Hallucination ? rndmonnam((char *) 0) : "statue");
index adc4daa..c2ed9cb 100644 (file)
@@ -166,7 +166,7 @@ struct obj *bp;
 */
         pline("\82±\82Ì\96{\82Í\90Ú\90G\8c^\82Ì\93Å\82Å\95¢\82í\82ê\82Ä\82¢\82é\81I");
         if (uarmg) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             erode_obj(uarmg, "gloves", ERODE_CORRODE, EF_GREASE | EF_VERBOSE);
 #else
             erode_obj(uarmg, "\8f¬\8eè", ERODE_CORRODE, EF_GREASE | EF_VERBOSE);
@@ -177,7 +177,7 @@ struct obj *bp;
         was_in_use = bp->in_use;
         bp->in_use = FALSE;
         losestr(Poison_resistance ? rn1(2, 1) : rn1(4, 3));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         losehp(rnd(Poison_resistance ? 6 : 10), "contact-poisoned spellbook",
                KILLED_BY_AN);
 #else
@@ -238,7 +238,7 @@ struct obj *spellbook;
         useup(spellbook);
         gone = TRUE;
     } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("find yourself reading the %s line over and over again.",
             spellbook == context.spbook.book ? "next" : "first");
 #else
@@ -489,7 +489,7 @@ learn(VOID_ARGS)
             You("\82·\82Å\82É%s\82ð\8fn\92m\82µ\82Ä\82¢\82é\81D", splname);
             costly = FALSE;
         } else { /* spellknow(i) <= KEEN/10 */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Your("knowledge of %s is %s.", splname,
                  spellknow(i) ? "keener" : "restored");
 #else
@@ -584,7 +584,7 @@ register struct obj *spellbook;
         /* handle the sequence: start reading, get interrupted, have
            context.spbook.book become erased somehow, resume reading it */
         && booktype != SPE_BLANK_PAPER) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("continue your efforts to %s.",
             (booktype == SPE_NOVEL) ? "read the novel" : "memorize the spell");
 #else
@@ -661,7 +661,7 @@ register struct obj *spellbook;
                 if (Role_if(PM_WIZARD) && read_ability < 20 && !confused) {
                     char qbuf[QBUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Sprintf(qbuf,
                     "This spellbook is %sdifficult to comprehend.  Continue?",
                             (read_ability < 12 ? "very " : ""));
@@ -720,7 +720,7 @@ register struct obj *spellbook;
         }
         spellbook->in_use = FALSE;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("begin to %s the runes.",
             spellbook->otyp == SPE_BOOK_OF_THE_DEAD ? "recite" : "memorize");
 #else
@@ -1043,7 +1043,7 @@ cast_protection()
                                             : "air");
 */
                                             : "\8bó\8bC");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline_The("%s around you begins to shimmer with %s haze.",
                           atmosphere, an(hgolden));
 #else
@@ -1996,7 +1996,7 @@ int *spell_no;
      * given string and are of the form "a - ".
      */
     if (!iflags.menu_tab_sep) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "%-20s     Level %-12s Fail Retention", "    Name",
                 "Category");
 #else
index 846ad3f..ff4044e 100644 (file)
@@ -447,7 +447,7 @@ gotobj:
                     unmul((char *) 0);
                 slowly = (armordelay >= 1 || multi < 0);
                 if (flags.female)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s charms you.  You gladly %s your %s.",
                           !seen ? "She" : Monnam(mtmp),
                           curssv ? "let her take"
@@ -465,7 +465,7 @@ gotobj:
                                                          : "\82Í\82¸\82µ\8en\82ß");
 #endif
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s seduces you and %s off your %s.",
                           !seen ? "She" : Adjmonnam(mtmp, "beautiful"),
                           curssv
@@ -691,7 +691,7 @@ int ochance, achance; /* percent chance for ordinary item, artifact */
             if (!strcmp(MonName, "It"))
                 MonName = "Something";
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s pulls %s away from you and absorbs %s!", MonName,
                   yname(obj), (obj->quan > 1L) ? "them" : "it");
 #else
@@ -703,7 +703,7 @@ int ochance, achance; /* percent chance for ordinary item, artifact */
 
             if (bimanual(obj))
                 hand_s = makeplural(hand_s);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s pulled from your %s!", upstart(yname(obj)),
                   otense(obj, "are"), hand_s);
 #else
@@ -818,7 +818,7 @@ boolean is_pet; /* If true, pet should keep wielded/worn items */
     /* vault guard's gold goes away rather than be dropped... */
     if (mtmp->isgd && (otmp = findgold(mtmp->minvent)) != 0) {
         if (canspotmon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s gold %s.", s_suffix(Monnam(mtmp)),
                   canseemon(mtmp) ? "vanishes" : "seems to vanish");
 #else
index 38de9b8..ab1afcd 100644 (file)
@@ -252,7 +252,7 @@ boolean force;      /* Quietly force this animal */
 
     /* Is the player in the right form? */
     if (Hallucination && !force) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Maybe you should find a designated driver.");
 #else
         pline("\82¨\82»\82ç\82­\82 \82È\82½\82Í\8ew\92è\83h\83\89\83C\83o\81[\82ð\92T\82·\82×\82«\82¾\82ë\82¤\81D");
@@ -371,7 +371,7 @@ boolean force;      /* Quietly force this animal */
     if (mtmp->mtrapped) {
         struct trap *t = t_at(mtmp->mx, mtmp->my);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_cant("mount %s while %s's trapped in %s.", mon_nam(mtmp),
                  mhe(mtmp), an(defsyms[trap_to_defsym(t->ttyp)].explanation));
 #else
@@ -384,7 +384,7 @@ boolean force;      /* Quietly force this animal */
     if (!force && !Role_if(PM_KNIGHT) && !(--mtmp->mtame)) {
         /* no longer tame */
         newsym(mtmp->mx, mtmp->my);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s resists%s!", Monnam(mtmp),
               mtmp->mleashed ? " and its leash comes off" : "");
 #else
@@ -422,7 +422,7 @@ boolean force;      /* Quietly force this animal */
         return (FALSE);
     }
     if (!force && uarm && is_metallic(uarm) && greatest_erosion(uarm)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("%s armor is too stiff to be able to mount %s.",
              uarm->oeroded ? "rusty" : "corroded", mon_nam(mtmp));
 #else
@@ -537,19 +537,19 @@ kick_steed()
                 u.usteed->mcanmove = 1;
             }
             if (u.usteed->msleeping || !u.usteed->mcanmove)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s stirs.", He);
 #else
                 pline("%s\82Í\90g\82\82ë\82¬\82µ\82½\81D", He);
 #endif
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s rouses %sself!", He, mhim(u.usteed));
 #else
                 pline("%s\82Í\95±\8bN\82µ\82½\81I", He);
 #endif
         } else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s does not respond.", He);
 #else
             pline("%s\82Í\94½\89\9e\82µ\82È\82¢\81D", He);
@@ -692,7 +692,7 @@ int reason; /* Player was thrown off etc. */
     case DISMOUNT_BYCHOICE:
     default:
         if (otmp && otmp->cursed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("can't.  The saddle %s cursed.",
                 otmp->bknown ? "is" : "seems to be");
 #else
@@ -800,7 +800,7 @@ int reason; /* Player was thrown off etc. */
                         adjalign(-1);
                     }
                 } else if (is_lava(u.ux, u.uy)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s is pulled into the %s!", Monnam(mtmp),
                           hliquid("lava"));
 #else
index 5a56c4d..c8e14ee 100644 (file)
@@ -683,7 +683,7 @@ boolean break_the_rules; /* True: wizard mode ^T */
             }
         }
         if (trap)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s onto the teleportation trap.",
                 locomotion(youmonst.data, "jump"));
 #else
@@ -707,7 +707,7 @@ boolean break_the_rules; /* True: wizard mode ^T */
             /* casting isn't inhibited by being Stunned (...it ought to be) */
             castit = (sp_no < MAXSPELL && !Confusion);
             if (!castit && !break_the_rules) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("%s.",
                     !Teleportation ? ((sp_no < MAXSPELL)
                                         ? "can't cast that spell"
@@ -760,7 +760,7 @@ boolean break_the_rules; /* True: wizard mode ^T */
             cantdoit = "\82¾\82¯\82Ì\83G\83l\83\8b\83M\81[\82ª\82È\82¢";
         }
         if (cantdoit) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s %s.", cantdoit,
                 castit ? "for a teleport spell" : "to teleport");
 #else
@@ -915,7 +915,7 @@ level_tele()
 */
             if (ynq("\82Ç\82±\82Æ\82à\92m\82ê\82Ê\8fê\8f\8a\82É\8ds\82«\82Ü\82·\81D\82æ\82ë\82µ\82¢\82Å\82·\82©\81H") != 'y')
                 return;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s in agony as your body begins to warp...",
                 is_silent(youmonst.data) ? "writhe" : "scream");
 #else
@@ -943,7 +943,7 @@ level_tele()
             pline("An energized cloud of dust begins to coalesce.");
 */
             pline("\83G\83l\83\8b\83M\81[\82ð\82à\82Á\82½\82Ù\82±\82è\82Ì\89Q\82ª\8c\8b\8d\87\82µ\82Í\82\82ß\82½\81D");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Your("body rematerializes%s.",
                  invent ? ", and you gather up all your possessions" : "");
 #else
@@ -1443,7 +1443,7 @@ struct monst *mon;
 {
     if (level.flags.noteleport) {
         if (canseemon(mon))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("A mysterious force prevents %s from teleporting!",
                   mon_nam(mon));
 #else
@@ -1515,7 +1515,7 @@ int in_sight;
                 assign_level(&tolevel, &valley_level);
             } else if (Is_botlevel(&u.uz)) {
                 if (in_sight && trap->tseen)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s avoids the %s.", Monnam(mtmp),
                           (tt == HOLE) ? "hole" : "trap");
 #else
index 877714b..5054506 100644 (file)
@@ -104,7 +104,7 @@ const struct propname {
 
 /* He is being petrified - dialogue by inmet!tower */
 static NEARDATA const char *const stoned_texts[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "You are slowing down.",            /* 5 */
     "Your limbs are stiffening.",       /* 4 */
     "Your limbs have turned to stone.", /* 3 */
@@ -128,7 +128,7 @@ stoned_dialogue()
         char buf[BUFSZ];
 
         Strcpy(buf, stoned_texts[SIZE(stoned_texts) - i]);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         if (nolimbs(youmonst.data) && strstri(buf, "limbs"))
             (void) strsubst(buf, "limbs", "extremities");
 #else
@@ -286,7 +286,7 @@ static NEARDATA const char *const choke_texts[] = {
 };
 
 static NEARDATA const char *const choke_texts2[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "Your %s is becoming constricted.",
     "Your blood is having trouble reaching your brain.",
     "The pressure on your %s increases.",
@@ -364,7 +364,7 @@ levitation_dialogue()
 }
 
 static NEARDATA const char *const slime_texts[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "You are turning a little %s.",   /* 5 */
     "Your limbs are getting oozy.",   /* 4 */
     "Your skin begins to peel away.", /* 3 */
@@ -395,7 +395,7 @@ slime_dialogue()
         char buf[BUFSZ];
 
         Strcpy(buf, slime_texts[SIZE(slime_texts) - i - 1L]);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         if (nolimbs(youmonst.data) && strstri(buf, "limbs"))
             (void) strsubst(buf, "limbs", "extremities");
 #else
@@ -525,7 +525,7 @@ struct kinfo *kptr;
    move between things which are closely packed--like the substance of
    solid rock! */
 static NEARDATA const char *const phaze_texts[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "You start to feel bloated.",
     "You are feeling rather flabby.",
 #else
@@ -606,7 +606,7 @@ nh_timeout()
             u.uspellprot--;
             find_ac();
             if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Norep("The %s haze around you %s.", hcolor(NH_GOLDEN),
                       u.uspellprot ? "becomes less dense" : "disappears");
 #else
@@ -683,7 +683,7 @@ nh_timeout()
                 break;
             case FAST:
                 if (!Very_fast)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You_feel("yourself slowing down%s.",
                              Fast ? " a bit" : "");
 #else
@@ -720,7 +720,7 @@ nh_timeout()
             case INVIS:
                 newsym(u.ux, u.uy);
                 if (!Invis && !BInvis && !Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You(!See_invisible
                             ? "are no longer invisible."
                             : "can no longer see through yourself.");
@@ -787,7 +787,7 @@ nh_timeout()
                 if (!Warn_of_mon) {
                     context.warntype.speciesidx = NON_PM;
                     if (context.warntype.species) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You("are no longer warned about %s.",
                             makeplural(context.warntype.species->mname));
 #else
@@ -806,7 +806,7 @@ nh_timeout()
 */
                         You_feel("\82Ü\82½\95Â\82\8d\9e\82ß\82ç\82ê\82½\82æ\82¤\82¾\81D");
                     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("You're back to your %s self again.",
                               !Upolyd ? "normal" : "unusual");
 #else
@@ -817,7 +817,7 @@ nh_timeout()
                 break;
             case STRANGLED:
                 killer.format = KILLED_BY;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Strcpy(killer.name,
                        (u.uburied) ? "suffocation" : "strangulation");
 #else
@@ -1026,7 +1026,7 @@ long timeout;
         if (cansee_hatchspot) {
             /* [bug?  m_monnam() yields accurate monster type
                regardless of hallucination] */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(monnambuf, "%s%s", siblings ? "some " : "",
                     siblings ? makeplural(m_monnam(mon)) : an(m_monnam(mon)));
 #else
@@ -1044,7 +1044,7 @@ long timeout;
         case OBJ_INVENT:
             knows_egg = TRUE; /* true even if you are blind */
             if (!cansee_hatchspot)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_feel("%s %s from your pack!", something,
                          locomotion(mon->data, "drop"));
 #else
@@ -1052,7 +1052,7 @@ long timeout;
                       jpast(locomotion(mon->data, "\97\8e\82¿\82é")));
 #endif
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_see("%s %s out of your pack!", monnambuf,
                         locomotion(mon->data, "drop"));
 #else
@@ -1060,7 +1060,7 @@ long timeout;
                     jpast(locomotion(mon->data, "\97\8e\82¿\82é")));
 #endif
             if (yours) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s cries sound like \"%s%s\"",
                       siblings ? "Their" : "Its",
                       flags.female ? "mommy" : "daddy", egg->spe ? "." : "?");
@@ -1069,7 +1069,7 @@ long timeout;
                       flags.female ? "\83}\83}" : "\83p\83p", egg->spe ? "" : "\81H");
 #endif
             } else if (mon->data->mlet == S_DRAGON && !Deaf) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 verbalize("Gleep!"); /* Mything eggs :-) */
 #else
                 verbalize("\83u\83H\81[\81I"); /* Mything eggs :-) */
@@ -1203,7 +1203,7 @@ slip_or_trip()
           name; if not, look for rocks to trip over; trip over
           anonymous "something" if there aren't any rocks.
         */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         what = (iflags.last_msg == PLNMSG_ONE_ITEM_HERE)
                 ? ((otmp->quan == 1L) ? "it"
                       : Hallucination ? "they" : "them")
@@ -1224,7 +1224,7 @@ slip_or_trip()
         if (Hallucination) {
             what = strcpy(buf, what);
             buf[0] = highc(buf[0]);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Egads!  %s bite%s your %s!", what,
                   (!otmp || otmp->quan == 1L) ? "s" : "", body_part(FOOT));
 #else
@@ -1238,7 +1238,7 @@ slip_or_trip()
         }
         if (!uarmf && otmp->otyp == CORPSE
             && touch_petrifies(&mons[otmp->corpsenm]) && !Stone_resistance) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(killer.name, "tripping over %s corpse",
                     an(mons[otmp->corpsenm].mname));
 #else
@@ -1248,7 +1248,7 @@ slip_or_trip()
             instapetrify(killer.name);
         }
     } else if (rn2(3) && is_ice(u.ux, u.uy)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s%s on the ice.",
               u.usteed ? upstart(x_monnam(u.usteed,
                                           (has_mname(u.usteed)) ? ARTICLE_NONE
@@ -1268,7 +1268,7 @@ slip_or_trip()
         if (on_foot) {
             switch (rn2(4)) {
             case 1:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("trip over your own %s.",
                     Hallucination ? "elbow" : makeplural(body_part(FOOT)));
 #else
@@ -1277,7 +1277,7 @@ slip_or_trip()
 #endif
                 break;
             case 2:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("slip %s.",
                     Hallucination ? "on a banana peel" : "and nearly fall");
 #else
@@ -1301,7 +1301,7 @@ slip_or_trip()
         } else {
             switch (rn2(4)) {
             case 1:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("%s slip out of the stirrups.",
                      makeplural(body_part(FOOT)));
 #else
@@ -1587,7 +1587,7 @@ long timeout;
                 switch (obj->where) {
                 case OBJ_INVENT:
                 case OBJ_MINVENT:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s%scandle%s getting short.", whose,
                           menorah ? "candelabrum's " : "",
                           many ? "s are" : " is");
@@ -1597,7 +1597,7 @@ long timeout;
 #endif
                     break;
                 case OBJ_FLOOR:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You_see("%scandle%s getting short.",
                             menorah ? "a candelabrum's " : many ? "some "
                                                                 : "a ",
@@ -1615,7 +1615,7 @@ long timeout;
                 switch (obj->where) {
                 case OBJ_INVENT:
                 case OBJ_MINVENT:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s%scandle%s flame%s flicker%s low!", whose,
                           menorah ? "candelabrum's " : "", many ? "s'" : "'s",
                           many ? "s" : "", many ? "" : "s");
@@ -1625,7 +1625,7 @@ long timeout;
 #endif
                     break;
                 case OBJ_FLOOR:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You_see("%scandle%s flame%s flicker low!",
                             menorah ? "a candelabrum's " : many ? "some "
                                                                 : "a ",
@@ -1655,7 +1655,7 @@ long timeout;
 #endif
                         break;
                     case OBJ_FLOOR:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You_see("a candelabrum's flame%s die.",
                                 many ? "s" : "");
 #else
@@ -1670,7 +1670,7 @@ long timeout;
                            useupall() -> freeinv() handles it */
                         /*FALLTHRU*/
                     case OBJ_MINVENT:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s %s consumed!", Yname2(obj),
                               many ? "are" : "is");
 #else
@@ -1682,7 +1682,7 @@ long timeout;
                           You see some wax candles consumed!
                           You see a wax candle consumed!
                          */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You_see("%s%s consumed!", many ? "some " : "",
                                 many ? xname(obj) : an(xname(obj)));
 #else
@@ -1693,7 +1693,7 @@ long timeout;
                     }
 
                     /* post message */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline(Hallucination
                               ? (many ? "They shriek!" : "It shrieks!")
                               : Blind ? "" : (many ? "Their flames die."
index 35df3a4..79f643e 100644 (file)
@@ -632,7 +632,7 @@ time_t when;
                 char pbuf[BUFSZ];
 
                 topten_print("");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(pbuf,
              "Since you were in %s mode, the score list will not be checked.",
                         wizard ? "wizard" : "discover");
@@ -749,7 +749,7 @@ time_t when;
                 } else {
                     char pbuf[BUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Sprintf(pbuf,
                             "You reached the %d%s place on the top %d list.",
                             rank0, ordin(rank0), sysopt.entrymax);
index 1d1387e..dc6ddc3 100644 (file)
@@ -53,7 +53,7 @@ STATIC_VAR const char *const A_Your[2] = { "A", "Your" };
 STATIC_VAR const char tower_of_flame[] = "tower of flame";
 STATIC_VAR const char *const A_gush_of_water_hits = "A gush of water hits";
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
 STATIC_VAR const char *const blindgas[6] = { "humid",   "odorless",
                                              "pungent", "chilling",
                                              "acrid",   "biting" };
@@ -104,7 +104,7 @@ struct monst *victim;
             item = hitting_u ? uarmh : which_armor(victim, W_ARMH);
             if (item) {
                 mat_idx = objects[item->otyp].oc_material;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(buf, "%s %s", materialnm[mat_idx],
                         helm_simple_name(item));
 #else
@@ -252,7 +252,7 @@ int ef_flags;
         return ER_NOTHING;
     } else if (!vulnerable || (otmp->oerodeproof && otmp->rknown)) {
         if (flags.verbose && print && (uvictim || vismon))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s %s not affected by %s.",
                   uvictim ? "Your" : s_suffix(Monnam(victim)),
                   ostr, vtense(ostr, "are"), bythe[type]);
@@ -265,7 +265,7 @@ int ef_flags;
     } else if (otmp->oerodeproof || (otmp->blessed && !rnl(4))) {
         if (flags.verbose && (print || otmp->oerodeproof)
             && (uvictim || vismon || visobj))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Somehow, %s %s %s not affected by the %s.",
                   uvictim ? "your"
                           : !vismon ? "the" /* visobj */
@@ -302,7 +302,7 @@ int ef_flags;
 #endif
 
         if (uvictim || vismon || visobj)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s %s%s!",
                   uvictim ? "Your"
                           : !vismon ? "The" /* visobj */
@@ -330,7 +330,7 @@ int ef_flags;
         return ER_DAMAGED;
     } else if (ef_flags & EF_DESTROY) {
         if (uvictim || vismon || visobj)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s %s away!",
                   uvictim ? "Your"
                           : !vismon ? "The" /* visobj */
@@ -353,7 +353,7 @@ int ef_flags;
     } else {
         if (flags.verbose && print) {
             if (uvictim)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Your("%s %s completely %s.",
                      ostr, vtense(ostr, Blind ? "feel" : "look"), msg[type]);
 #else
@@ -361,7 +361,7 @@ int ef_flags;
                      ostr, msg[type], Blind ? "\82æ\82¤\82¾" : "");
 #endif
             else if (vismon || visobj)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s %s completely %s.",
                       !vismon ? "The" : s_suffix(Monnam(victim)),
                       ostr, vtense(ostr, "look"), msg[type]);
@@ -397,7 +397,7 @@ struct monst *victim;
 */
             Your("%s\82Í%s", ostr, txt);
         else if (vismon)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s's %s %s %s", Monnam(victim),
                   ostr, vtense(ostr, "are"), txt);
 #else
@@ -653,7 +653,7 @@ boolean td; /* td == TRUE : trap door or hole */
         dtmp.dnum = u.uz.dnum;
         dtmp.dlevel = newlevel;
         if (dist > 1)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("fall down a %s%sshaft!", dist > 3 ? "very " : "",
                 dist > 2 ? "deep " : "");
 #else
@@ -792,7 +792,7 @@ int *fail_reason;
         set_malign(mon);
     }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     comes_to_life = !canspotmon(mon)
                         ? "disappears"
                         : golem_xform
@@ -812,7 +812,7 @@ int *fail_reason;
     if ((x == u.ux && y == u.uy) || cause == ANIMATE_SPELL) {
         /* "the|your|Manlobbi's statue [of a wombat]" */
         shkp = shop_keeper(*in_rooms(mon->mx, mon->my, SHOPBASE));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(statuename, "%s%s", shk_your(tmpbuf, statue),
                 (cause == ANIMATE_SPELL
                  /* avoid "of a shopkeeper" if it's Manlobbi himself
@@ -847,7 +847,7 @@ int *fail_reason;
             Strcpy(statuename, "a statue");
 */
             Strcpy(statuename, "\92¤\91\9c");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Instead of shattering, %s suddenly %s!", statuename,
               comes_to_life);
 #else
@@ -1003,7 +1003,7 @@ struct trap *trap;
         if (flaming(mptr) || acidic(mptr)) {
             if (domsg) {
                 if (isyou)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("%s %s spider web!",
                         (flaming(mptr)) ? "burn" : "dissolve",
                         a_your[trap->madeby_u]);
@@ -1013,7 +1013,7 @@ struct trap *trap;
                         (flaming(mptr)) ? "\8fÄ\82¢\82½" : "\82±\82È\82²\82È\82É\82µ\82½");
 #endif
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s %s spider web!", Monnam(mtmp),
                           (flaming(mptr)) ? "burns" : "dissolves",
                           a_your[trap->madeby_u]);
@@ -1034,7 +1034,7 @@ struct trap *trap;
 */
                 You("%s\82­\82à\82Ì\91\83\82ð\82·\82é\82è\82Æ\92Ê\82è\94²\82¯\82½\81D", web_you[trap->madeby_u]);
             } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s flows through %s spider web.", Monnam(mtmp),
                       a_your[trap->madeby_u]);
 #else
@@ -1126,7 +1126,7 @@ unsigned trflags;
          * reason why the player cannot escape the trap with a dexterity
          * check, clinging to the ceiling, etc.
          */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Air currents pull you down into %s %s!",
               a_your[trap->madeby_u],
               defsyms[trap_to_defsym(ttype)].explanation);
@@ -1138,7 +1138,7 @@ unsigned trflags;
     } else if (already_seen && !forcetrap) {
         if ((Levitation || (Flying && !plunged))
             && (is_pit(ttype) || ttype == HOLE || ttype == BEAR_TRAP)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s over %s %s.", Levitation ? "float" : "fly",
                 a_your[trap->madeby_u],
                 defsyms[trap_to_defsym(ttype)].explanation);
@@ -1155,7 +1155,7 @@ unsigned trflags;
             && !conj_pit && !adj_pit
             && (!rn2(5) || (is_pit(ttype)
                             && is_clinger(youmonst.data)))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("escape %s %s.", (ttype == ARROW_TRAP && !trap->madeby_u)
                                      ? "an"
                                      : a_your[trap->madeby_u],
@@ -1235,7 +1235,7 @@ unsigned trflags;
         oldumort = u.umortality;
         if (u.usteed && !rn2(2) && steedintrap(trap, otmp)) {
             ; /* nothing */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         } else if (thitu(7, dmgval(otmp, &youmonst), &otmp, "little dart")) {
 #else
         } else if (thitu(7, dmgval(otmp, &youmonst), &otmp, "\93\8a\82°\96î")) {
@@ -1281,7 +1281,7 @@ unsigned trflags;
             otmp = t_missile(ROCK, trap);
             place_object(otmp, u.ux, u.uy);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("A trap door in %s opens and %s falls on your %s!",
                   the(ceiling(u.ux, u.uy)), an(xname(otmp)), body_part(HEAD));
 #else
@@ -1355,7 +1355,7 @@ unsigned trflags;
         feeltrap(trap);
         if (amorphous(youmonst.data) || is_whirly(youmonst.data)
             || unsolid(youmonst.data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s bear trap closes harmlessly through you.",
                   A_Your[trap->madeby_u]);
 #else
@@ -1365,7 +1365,7 @@ unsigned trflags;
             break;
         }
         if (!u.usteed && youmonst.data->msize <= MZ_SMALL) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s bear trap closes harmlessly over you.",
                   A_Your[trap->madeby_u]);
 #else
@@ -1376,7 +1376,7 @@ unsigned trflags;
         }
         set_utrap((unsigned) rn1(4, 4), TT_BEARTRAP);
         if (u.usteed) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s bear trap closes on %s %s!", A_Your[trap->madeby_u],
                   s_suffix(mon_nam(u.usteed)), mbodypart(u.usteed, FOOT));
 #else
@@ -1386,7 +1386,7 @@ unsigned trflags;
             if (thitm(0, u.usteed, (struct obj *) 0, dmg, FALSE))
                 reset_utrap(TRUE); /* steed died, hero not trapped */
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s bear trap closes on your %s!", A_Your[trap->madeby_u],
                   body_part(FOOT));
 #else
@@ -1520,7 +1520,7 @@ unsigned trflags;
         feeltrap(trap);
         if (!Sokoban && is_clinger(youmonst.data) && !plunged) {
             if (trap->tseen) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_see("%s %spit below you.", a_your[trap->madeby_u],
                         ttype == SPIKED_PIT ? "spiked " : "");
 #else
@@ -1528,7 +1528,7 @@ unsigned trflags;
                       ttype == SPIKED_PIT ? "\83g\83Q\82¾\82ç\82¯\82Ì" : "");
 #endif
             } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s pit %sopens up under you!", A_Your[trap->madeby_u],
                       ttype == SPIKED_PIT ? "full of spikes " : "");
 #else
@@ -1555,7 +1555,7 @@ unsigned trflags;
                             x_monnam(u.usteed, steed_article, (char *) 0,
                                      SUPPRESS_SADDLE, FALSE));
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     Sprintf(verbbuf, "lead %s",
                             x_monnam(u.usteed, steed_article, "poor",
                                      SUPPRESS_SADDLE, FALSE));
@@ -1578,7 +1578,7 @@ unsigned trflags;
                     !rn2(5) ? "\97\8e\82µ\8c\8a\82Ì" : "");
 #endif
             } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Strcpy(verbbuf,
                        !plunged ? "fall" : (Flying ? "dive" : "plunge"));
 #else
@@ -1741,7 +1741,7 @@ unsigned trflags;
             break;
         if (webmaker(youmonst.data)) {
             if (webmsgok)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline(trap->madeby_u ? "You take a walk on your web."
                                      : "There is a spider web here.");
 #else
@@ -1901,7 +1901,7 @@ unsigned trflags;
             if (Passes_walls)
                 dmgval2 = (dmgval2 + 3) / 4;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_feel((dmgval2 >= hp) ? "unbearably torpid!"
                                      : (dmgval2 >= hp / 4) ? "very lethargic."
                                                            : "sluggish.");
@@ -1993,7 +1993,7 @@ unsigned trflags;
 #endif
             if (already_seen && rn2(3))
                 break;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("KAABLAMM!!!  %s %s%s off!",
                   forcebungle ? "Your inept attempt sets"
                               : "The air currents set",
@@ -2016,7 +2016,7 @@ unsigned trflags;
             if (recursive_mine)
                 break;
             feeltrap(trap);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("KAABLAMM!!!  You triggered %s land mine!",
                   a_your[trap->madeby_u]);
 #else
@@ -2092,7 +2092,7 @@ boolean noprefix;
 {
     static char tnbuf[12];
     const char *tn,
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         *tnnames[12] = { "C note",  "D flat", "D note",  "E flat",
                          "E note",  "F note", "F sharp", "G note",
                          "G sharp", "A note", "B flat",  "B note" };
@@ -2344,7 +2344,7 @@ int style;
     switch (style) {
     case ROLL | LAUNCH_UNSEEN:
         if (otyp == BOULDER) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_hear(Hallucination ? "someone bowling."
                                    : "rumbling in the distance.");
 #else
@@ -2436,7 +2436,7 @@ int style;
                 switch (t->ttyp) {
                 case LANDMINE:
                     if (rn2(10) > 2) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline(
                             "KAABLAMM!!!%s",
                             cansee(bhitpos.x, bhitpos.y)
@@ -2860,7 +2860,7 @@ register struct monst *mtmp;
             /* stepped on a squeaky board */
             if (in_sight) {
                 if (!Deaf) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("A board beneath %s squeaks %s loudly.",
                           mon_nam(mtmp), trapnote(trap, 0));
 #else
@@ -2880,7 +2880,7 @@ register struct monst *mtmp;
                 int range = couldsee(mtmp->mx, mtmp->my) /* 9 or 5 */
                                ? (BOLT_LIM + 1) : (BOLT_LIM - 3);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_hear("a %s squeak %s.", trapnote(trap, 1),
                          (distu(mtmp->mx, mtmp->my) <= range * range)
                             ? "nearby" : "in the distance");
@@ -2899,7 +2899,7 @@ register struct monst *mtmp;
                 && !is_whirly(mptr) && !unsolid(mptr)) {
                 mtmp->mtrapped = 1;
                 if (in_sight) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s is caught in %s bear trap!", Monnam(mtmp),
                           a_your[trap->madeby_u]);
 #else
@@ -2917,7 +2917,7 @@ register struct monst *mtmp;
                 }
             } else if (force_mintrap) {
                 if (in_sight) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s evades %s bear trap!", Monnam(mtmp),
                           a_your[trap->madeby_u]);
 #else
@@ -2950,7 +2950,7 @@ register struct monst *mtmp;
             switch (rn2(5)) {
             case 0:
                 if (in_sight)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s on the %s!", A_gush_of_water_hits,
                           mon_nam(mtmp), mbodypart(mtmp, HEAD));
 #else
@@ -2962,7 +2962,7 @@ register struct monst *mtmp;
                 break;
             case 1:
                 if (in_sight)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s's left %s!", A_gush_of_water_hits,
                           mon_nam(mtmp), mbodypart(mtmp, ARM));
 #else
@@ -2987,7 +2987,7 @@ register struct monst *mtmp;
                 break;
             case 2:
                 if (in_sight)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s's right %s!", A_gush_of_water_hits,
                           mon_nam(mtmp), mbodypart(mtmp, ARM));
 #else
@@ -3041,7 +3041,7 @@ register struct monst *mtmp;
         case FIRE_TRAP:
         mfiretrap:
             if (in_sight)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("A %s erupts from the %s under %s!", tower_of_flame,
                       surface(mtmp->mx, mtmp->my), mon_nam(mtmp));
 #else
@@ -3049,7 +3049,7 @@ register struct monst *mtmp;
                       mon_nam(mtmp), surface(mtmp->mx,mtmp->my));
 #endif
             else if (see_it) /* evidently `mtmp' is invisible */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_see("a %s erupt from the %s!", tower_of_flame,
                         surface(mtmp->mx, mtmp->my));
 #else
@@ -3137,7 +3137,7 @@ register struct monst *mtmp;
                 }
                 if (!inescapable)
                     break;               /* avoids trap */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 fallverb = "is dragged"; /* sokoban pit */
 #else
                 fallverb = "\82¸\82è\97\8e\82¿\82½"; /* sokoban pit */
@@ -3146,7 +3146,7 @@ register struct monst *mtmp;
             if (!passes_walls(mptr))
                 mtmp->mtrapped = 1;
             if (in_sight) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s into %s pit!", Monnam(mtmp), fallverb,
                       a_your[trap->madeby_u]);
 #else
@@ -3251,7 +3251,7 @@ register struct monst *mtmp;
                     || (mtmp->wormno && count_wsegs(mtmp) > 5)) {
                     tear_web = TRUE;
                 } else if (in_sight) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s is caught in %s spider web.", Monnam(mtmp),
                           a_your[trap->madeby_u]);
 #else
@@ -3281,7 +3281,7 @@ register struct monst *mtmp;
             }
             if (tear_web) {
                 if (in_sight)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s tears through %s spider web!", Monnam(mtmp),
                           a_your[trap->madeby_u]);
 #else
@@ -3292,7 +3292,7 @@ register struct monst *mtmp;
                 newsym(mtmp->mx, mtmp->my);
             } else if (force_mintrap && !mtmp->mtrapped) {
                 if (in_sight) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s avoids %s spider web!", Monnam(mtmp),
                           a_your[trap->madeby_u]);
 #else
@@ -3375,7 +3375,7 @@ register struct monst *mtmp;
                     break;
                 if (in_sight) {
                     newsym(mtmp->mx, mtmp->my);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline_The("air currents set %s off!",
                               already_seen ? "a land mine" : "it");
 #else
@@ -3384,7 +3384,7 @@ register struct monst *mtmp;
                 }
             } else if (in_sight) {
                 newsym(mtmp->mx, mtmp->my);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s%s triggers %s land mine!",
                       !Deaf ? "KAABLAMM!!!  " : "", Monnam(mtmp),
                       a_your[trap->madeby_u]);
@@ -3439,7 +3439,7 @@ register struct monst *mtmp;
 
                 newsym(mtmp->mx, mtmp->my);
                 if (in_sight)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("Click!  %s triggers %s.", Monnam(mtmp),
                           trap->tseen ? "a rolling boulder trap" : something);
 #else
@@ -3606,7 +3606,7 @@ boolean byplayer;
     if (mwep && mwep->otyp == CORPSE && touch_petrifies(&mons[mwep->corpsenm])
         && !resists_ston(mon)) {
         if (cansee(mon->mx, mon->my)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s%s touches %s.", arg ? arg : "",
                   arg ? mon_nam(mon) : Monnam(mon),
                   corpse_xname(mwep, (const char *) 0, CXN_PFX_THE));
@@ -3654,7 +3654,7 @@ float_up()
             (void) buried_ball(&cc);
             /* being chained to the floor blocks levitation from floating
                above that floor but not from enhancing carrying capacity */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("feel lighter, but your %s is still chained to the %s.",
                 body_part(LEG),
                 IS_ROOM(levl[cc.x][cc.y].typ) ? "floor" : "ground");
@@ -3686,7 +3686,7 @@ float_up()
     } else if (u.uinwater) {
         spoteffects(TRUE);
     } else if (u.uswallow) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You(is_animal(u.ustuck->data) ? "float away from the %s."
                                       : "spiral up into %s.",
             is_animal(u.ustuck->data) ? surface(u.ux, u.uy)
@@ -3778,7 +3778,7 @@ long hmask, emask; /* might cancel timeout */
 
         float_vs_flight();
         if (trapped && u.utrap) /* u.utrap => paranoia */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are no longer trying to float up from the %s.",
                 (u.utraptype == TT_BEARTRAP) ? "trap's jaws"
                   : (u.utraptype == TT_WEB) ? "web"
@@ -3812,7 +3812,7 @@ long hmask, emask; /* might cancel timeout */
         }
     }
     if (u.uswallow) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("float down, but you are still %s.",
             is_animal(u.ustuck->data) ? "swallowed" : "engulfed");
 #else
@@ -3919,7 +3919,7 @@ long hmask, emask; /* might cancel timeout */
 */
                     You("\82æ\82è\82µ\82Á\82©\82è\82Æ\88Æ\82É\94[\82Ü\82Á\82½\81D");
                 } else if (Hallucination) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("Bummer!  You've %s.",
                           is_pool(u.ux, u.uy)
                              ? "splashed down"
@@ -4069,7 +4069,7 @@ struct obj *box; /* null for floor trap */
             losehp(rnd(3), "\95¦\93«\82µ\82½\90\85\82Å", KILLED_BY);
         return;
     }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     pline("A %s %s from %s!", tower_of_flame, box ? "bursts" : "erupts",
           the(box ? xname(box) : surface(u.ux, u.uy)));
 #else
@@ -4113,7 +4113,7 @@ struct obj *box; /* null for floor trap */
 */
         You("\8f\9d\82Â\82©\82È\82¢\81D");
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         losehp(num, tower_of_flame, KILLED_BY_AN); /* fire damage */
 #else
         losehp(num, "\89Î\92\8c\82Å", KILLED_BY_AN); /* fire damage */
@@ -4201,7 +4201,7 @@ domagictrap()
             pline("\90k\82¦\82ª\82 \82È\82½\82Ì%s\82ð\91\96\82Á\82½\81I", body_part(SPINE));
             break;
         case 14:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_hear(Hallucination ? "the moon howling at you."
                                    : "distant howling.");
 #else
@@ -4211,20 +4211,21 @@ domagictrap()
             break;
         case 15:
             if (on_level(&u.uz, &qstart_level))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You_feel(
                     "%slike the prodigal son.",
                     (flags.female || (Upolyd && is_neuter(youmonst.data)))
                         ? "oddly "
                         : "");
-#else /*JP \90¹\8f\91\82Ì\83\8b\83J\93`\82æ\82è */
+#else
+                /*JP \90¹\8f\91\82Ì\83\8b\83J\93`\82æ\82è */
                 You("%s\95ú\93 \91§\8eq\82Ì\82æ\82¤\82É\82È\82Á\82½\82æ\82¤\82È\8bC\82ª\82µ\82½\81D",
                     (flags.female || (Upolyd && is_neuter(youmonst.data)))
                     ? "\88Ù\8fí\82É"
                     : "");
 #endif
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("suddenly yearn for %s.",
                     Hallucination
                         ? "Cleveland"
@@ -4373,7 +4374,7 @@ xchar x, y;
         }
         dindx = (obj->oclass == SCROLL_CLASS) ? 3 : 4;
         if (in_sight)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s.", Yname2(obj),
                   destroy_strings[dindx][(obj->quan > 1L)]);
 #else
@@ -4386,7 +4387,7 @@ xchar x, y;
     } else if (obj->oclass == POTION_CLASS) {
         dindx = (obj->otyp != POT_OIL) ? 1 : 2;
         if (in_sight)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s.", Yname2(obj),
                   destroy_strings[dindx][(obj->quan > 1L)]);
 #else
@@ -4461,7 +4462,7 @@ xchar x, y;
                when former contents of a burned container get here via
                flooreffects() */
             if (obj == thrownobj || obj == kickedobj)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s up!", is_plural(obj) ? "They" : "It",
                       otense(obj, "burn"));
 #else
@@ -4512,7 +4513,7 @@ struct obj *obj;
 */
                     pline("%s\82Ì\95\8e\9a\82Í\94\96\82ê\82½\81D", xname(obj));
                 else if (vismon)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s.", s_suffix(Monnam(victim)),
                           aobjnam(obj, "fade"));
 #else
@@ -4669,7 +4670,7 @@ boolean force;
              * variant.
              */
             bufp = simpleonames(obj);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s %s!", /* "A potion explodes!" */
                   !exploded ? (one ? "A" : "Some")
                             : (one ? "Another" : "More"),
@@ -4850,7 +4851,7 @@ drown()
         return FALSE;
 
     if ((i = number_leashed()) > 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline_The("leash%s slip%s loose.", (i > 1) ? "es" : "",
                   (i > 1) ? "" : "s");
 #else
@@ -4891,7 +4892,7 @@ drown()
     }
     if ((Teleportation || can_teleport(youmonst.data)) && !Unaware
         && (Teleport_control || rn2(3) < Luck + 2)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("attempt a teleport spell."); /* utcsri!carroll */
 #else
         You("\8fu\8aÔ\88Ú\93®\82Ì\8eô\95\82ð\8f¥\82¦\82Ä\82Ý\82½\81D");
@@ -5000,7 +5001,7 @@ crawl:
     }
     if (u.uinwater) {
         u.uinwater = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("find yourself back %s.",
             Is_waterlevel(&u.uz) ? "in an air bubble" : "on land");
 #else
@@ -5213,7 +5214,7 @@ boolean force_failure;
         if ((invent && (inv_weight() + weight_cap() > 600))
             || bigmonst(youmonst.data)) {
             /* don't allow untrap if they can't get thru to it */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are unable to reach the %s!",
                 defsyms[trap_to_defsym(ttype)].explanation);
 #else
@@ -5228,7 +5229,7 @@ boolean force_failure;
         if (u.usteed && P_SKILL(P_RIDING) < P_BASIC)
             rider_cant_reach();
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("are unable to reach the %s!",
                 defsyms[trap_to_defsym(ttype)].explanation);
 #else
@@ -5281,7 +5282,7 @@ boolean force_failure;
                 move_into_trap(ttmp);
             }
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s is difficult to %s.",
                   ttmp->madeby_u ? "Your" : under_u ? "This" : "That",
                   defsyms[trap_to_defsym(ttype)].explanation,
@@ -5341,7 +5342,7 @@ struct trap *ttmp;
        There's no need for a cockatrice test, only the trap is touched */
     if ((mtmp = m_at(ttmp->tx, ttmp->ty)) != 0) {
         mtmp->mtrapped = 0;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("remove %s %s from %s.", the_your[ttmp->madeby_u],
             (ttmp->ttyp == BEAR_TRAP) ? "bear trap" : "webbing",
             mon_nam(mtmp));
@@ -5417,7 +5418,7 @@ struct trap *ttmp;
         useup(obj); /* oil */
         makeknown(POT_OIL);
     }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You("repair the squeaky board."); /* no madeby_u */
 #else
     You("\82«\82µ\82Þ\94Â\82ð\8fC\97\9d\82µ\82½\81D"); /* no madeby_u */
@@ -5459,7 +5460,7 @@ boolean stuff;
     int wc = weight_cap();
 
     if (((wt * 2) / wc) >= HVY_ENCUMBER) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s is %s for you to lift.", Monnam(mtmp),
               stuff ? "carrying too much" : "too heavy");
 #else
@@ -5513,7 +5514,7 @@ struct trap *ttmp;
 
     /* Will our hero succeed? */
     if ((uprob = untrap_prob(ttmp)) && !mtmp->msleeping && mtmp->mcanmove) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("try to reach out your %s, but %s backs away skeptically.",
             makeplural(body_part(ARM)), mon_nam(mtmp));
 #else
@@ -5525,7 +5526,7 @@ struct trap *ttmp;
 
     /* is it a cockatrice?... */
     if (touch_petrifies(mtmp->data) && !uarmg && !Stone_resistance) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("grab the trapped %s using your bare %s.", mtmp->data->mname,
             makeplural(body_part(HAND)));
 #else
@@ -5538,7 +5539,7 @@ struct trap *ttmp;
         } else {
             char kbuf[BUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(kbuf, "trying to help %s out of a pit",
                     an(mtmp->data->mname));
 #else
@@ -5565,7 +5566,7 @@ struct trap *ttmp;
         return 1;
     }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You("reach out your %s and grab %s.", makeplural(body_part(ARM)),
         mon_nam(mtmp));
 #else
@@ -5681,7 +5682,7 @@ boolean force;
 #endif
         /* note: boxcnt and useplural will always be 0 for !here case */
         if (ttmp || boxcnt)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             There("%s %s %s but you can't reach %s%s.",
                   useplural ? "are" : "is", the_trap, here ? "here" : "there",
                   useplural ? "them" : "it",
@@ -5791,7 +5792,7 @@ boolean force;
         if (boxcnt) {
             for (otmp = level.objects[x][y]; otmp; otmp = otmp->nexthere)
                 if (Is_box(otmp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     (void) safe_qbuf(qbuf, "There is ",
                                      " here.  Check it for traps?", otmp,
                                      doname, ansimpleoname, "a box");
@@ -5860,7 +5861,7 @@ boolean force;
                     }
                 }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You(trap_skipped ? "find no other traps here."
                              : "know of no traps here.");
 #else
@@ -6058,7 +6059,7 @@ boolean *noticed; /* set to true iff hero notices the effect; */
         mon->mtrapped = 0;
         if (canspotmon(mon)) {
             *noticed = TRUE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s is released from %s%s.", Monnam(mon), which,
                   trapdescr);
 #else
@@ -6301,7 +6302,7 @@ boolean disarm;
             exercise(A_STR, FALSE);
             if (costly && loss) {
                 if (insider)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("owe %ld %s for objects destroyed.", loss,
                         currency(loss));
 #else
@@ -6309,7 +6310,7 @@ boolean disarm;
                         currency(loss));
 #endif
                 else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("caused %ld %s worth of damage!", loss,
                         currency(loss));
 #else
@@ -6406,7 +6407,7 @@ boolean disarm;
         case 2:
         case 1:
         case 0:
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("A cloud of %s gas billows from %s.",
                   Blind ? blindgas[rn2(SIZE(blindgas))] : rndcolor(),
                   the(xname(obj)));
@@ -6422,7 +6423,7 @@ boolean disarm;
 */
                     pline("\82È\82ñ\82Ä\91f\93G\82È\82ñ\82¾\81I");
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("%s%s...", stagger(youmonst.data, "stagger"),
                         Halluc_resistance ? ""
                                           : Blind ? " and get dizzy"
@@ -6718,7 +6719,7 @@ unconscious()
     if (multi >= 0)
         return FALSE;
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     return (boolean) (u.usleep
                       || (nomovemsg
                           && (!strncmp(nomovemsg, "You awake", 9)
@@ -6822,7 +6823,7 @@ lava_effects()
             /* above, we set in_use for objects which are to be destroyed */
             if (obj->otyp == SPE_BOOK_OF_THE_DEAD && !Blind) {
                 if (usurvive)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s glows a strange %s, but remains intact.",
                           The(xname(obj)), hcolor("dark red"));
 #else
index 0b7a51d..ededecc 100644 (file)
@@ -197,7 +197,7 @@ struct obj *wep; /* uwep for attack(), null for kick_monster() */
             struct obj *obj;
 
             if (!Blind && Hallucination)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("A %s %s appeared!",
                       mtmp->mtame ? "tame" : "wild", l_monnam(mtmp));
 #else
@@ -210,7 +210,7 @@ struct obj *wep; /* uwep for attack(), null for kick_monster() */
 */
                 pline("\91Ò\82Ä\81I\89ö\95¨\82ª\89B\82ê\82Ä\82¢\82é\81I");
             else if ((obj = level.objects[mtmp->mx][mtmp->my]) != 0)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Wait!  There's %s hiding under %s!",
                       an(l_monnam(mtmp)), doname(obj));
 #else
@@ -462,7 +462,7 @@ register struct monst *mtmp;
 */
                 You("%s\82Å\89ö\95¨\82ð\82È\82®\82è\82Â\82¯\82½\81D", yname(uwep));
             else if (!cantwield(youmonst.data))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("begin %s monsters with your %s %s.",
                     ing_suffix(Role_if(PM_MONK) ? "strike" : "bash"),
                     uarmg ? "gloved" : "bare", /* Del Lamb */
@@ -815,7 +815,7 @@ int dieroll;
                     && rnl(4) == 4 - 1) {
                     boolean more_than_1 = (obj->quan > 1L);
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("As you hit %s, %s%s breaks into splinters.",
                           mon_nam(mon), more_than_1 ? "one of " : "",
                           yname(obj));
@@ -876,7 +876,7 @@ int dieroll;
                      */
                     setmnotwielded(mon, monwep);
                     mon->weapon_check = NEED_WEAPON;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s from the force of your blow!",
                           Yobjnam2(monwep, "shatter"));
 #else
@@ -986,7 +986,7 @@ int dieroll;
                     if (touch_petrifies(&mons[obj->corpsenm])) {
                         tmp = 1;
                         hittxt = TRUE;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You("hit %s with %s.", mon_nam(mon),
                             corpse_xname(obj, (const char *) 0,
                                          obj->dknown ? CXN_PFX_THE
@@ -1040,7 +1040,7 @@ int dieroll;
 
                     if (touch_petrifies(&mons[obj->corpsenm])) {
                         /*learn_egg_type(obj->corpsenm);*/
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("Splat!  You hit %s with %s %s egg%s!",
                               mon_nam(mon),
                               obj->known ? "the" : cnt > 1L ? "some" : "a",
@@ -1062,7 +1062,7 @@ int dieroll;
                             break;
                         return (boolean) (!DEADMONSTER(mon));
                     } else { /* ordinary egg(s) */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         const char *eggp = (obj->corpsenm != NON_PM
                                             && obj->known)
                                            ? the(mons[obj->corpsenm].mname)
@@ -1079,7 +1079,7 @@ int dieroll;
                                 mon_nam(mon), eggp, *eggp ? "\82Ì" : "");
 #endif
                         if (touch_petrifies(mdat) && !stale_egg(obj)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                             pline_The("egg%s %s alive any more...", plur(cnt),
                                       (cnt == 1L) ? "isn't" : "aren't");
 #else
@@ -1122,7 +1122,7 @@ int dieroll;
                                              : AT_WEAP),
                                  obj)) {
                         if (Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                             pline(obj->otyp == CREAM_PIE ? "Splat!"
                                                          : "Splash!");
 #else
@@ -1130,7 +1130,7 @@ int dieroll;
                                                          : "\83s\83`\83\83\83b\81I");
 #endif
                         } else if (obj->otyp == BLINDING_VENOM) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                             pline_The("venom blinds %s%s!", mon_nam(mon),
                                       mon->mcansee ? "" : " further");
 #else
@@ -1153,7 +1153,7 @@ int dieroll;
                                 whom = strcat(s_suffix(whom),
                                               mbodypart(mon, FACE));
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                             pline("%s %s over %s!", what,
                                   vtense(what, "splash"), whom);
 #else
@@ -1346,7 +1346,7 @@ int dieroll;
         if (rnd(100) < P_SKILL(P_BARE_HANDED_COMBAT) && !bigmonst(mdat)
             && !thick_skinned(mdat)) {
             if (canspotmon(mon))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s from your powerful strike!", Monnam(mon),
                       makeplural(stagger(mon->data, "stagger")));
 #else
@@ -1397,7 +1397,7 @@ int dieroll;
             char withwhat[BUFSZ];
 
             withwhat[0] = '\0';
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             if (u.twoweap && flags.verbose)
                 Sprintf(withwhat, " with %s", yname(obj));
             pline("%s divides as you hit it%s!", Monnam(mon), withwhat);
@@ -1566,7 +1566,7 @@ int dieroll;
         }
     }
     if (unpoisonmsg)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("%s %s no longer poisoned.", saved_oname,
              vtense(saved_oname, "are"));
 #else
@@ -1624,7 +1624,7 @@ struct attack *mattk;
        protection might fail (33% chance) when the armor is cursed */
     if (obj && (obj->greased || obj->otyp == OILSKIN_CLOAK)
         && (!obj->cursed || rn2(3))) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("%s %s %s %s!",
             mattk->adtyp == AD_WRAP ? "slip off of"
                                     : "grab, but cannot hold onto",
@@ -1781,7 +1781,7 @@ struct attack *mattk;
             You("%s\82ð\82¤\82Á\82Æ\82è\82³\82¹\82½\81D\94Þ\8f\97\82Í\82æ\82ë\82±\82ñ\82Å\8e\9d\82¿\95¨\82ð\82³\82µ\82¾\82µ\82½\81D",
                 mon_nam(mdef));
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("seduce %s and %s starts to take off %s clothes.",
                 mon_nam(mdef), mhe(mdef), mhis(mdef));
 #else
@@ -1806,7 +1806,7 @@ struct attack *mattk;
             mdef->misc_worn_check |= I_SPECIAL;
 
             if (otmp == stealoid) /* special message for final item */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s finishes taking off %s suit.", Monnam(mdef),
                       mhis(mdef));
 #else
@@ -1814,7 +1814,7 @@ struct attack *mattk;
 #endif
         }
         /* give the object to the character */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         otmp = hold_another_object(otmp, "You snatched but dropped %s.",
                                    doname(otmp), "You steal: ");
 #else
@@ -1864,7 +1864,7 @@ int specialdmg; /* blessed and/or silver bonus against various things */
     switch (mattk->adtyp) {
     case AD_STUN:
         if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s for a moment.", Monnam(mdef),
                   makeplural(stagger(pd, "stagger")));
 #else
@@ -1933,7 +1933,7 @@ int specialdmg; /* blessed and/or silver bonus against various things */
 */
                 pline("%s\82Í\8a®\91S\82É\94R\82¦\90s\82«\82½\81I", Monnam(mdef));
             else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 You("smell burning%s.",
                     (pd == &mons[PM_PAPER_GOLEM]) ? " paper"
                       : (pd == &mons[PM_STRAW_GOLEM]) ? " straw" : "");
@@ -2089,7 +2089,7 @@ int specialdmg; /* blessed and/or silver bonus against various things */
         if (night() && !rn2(10) && !mdef->mcan) {
             if (pd == &mons[PM_CLAY_GOLEM]) {
                 if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("Some writing vanishes from %s head!",
                           s_suffix(mon_nam(mdef)));
 #else
@@ -2211,7 +2211,7 @@ int specialdmg; /* blessed and/or silver bonus against various things */
             break;
 
         if ((helmet = which_armor(mdef, W_ARMH)) != 0 && rn2(8)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s blocks your attack to %s head.",
                   s_suffix(Monnam(mdef)), helm_simple_name(helmet),
                   mhis(mdef));
@@ -2258,7 +2258,7 @@ int specialdmg; /* blessed and/or silver bonus against various things */
             } else {
                 tmp = 0;
                 if (flags.verbose)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("brush against %s %s.", s_suffix(mon_nam(mdef)),
                         mbodypart(mdef, LEG));
 #else
@@ -2737,7 +2737,7 @@ register struct attack *mattk;
                 if (DEADMONSTER(mdef)) /* not lifesaved */
                     return 2;
             }
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You("%s %s!", is_animal(youmonst.data) ? "regurgitate" : "expel",
                 mon_nam(mdef));
 #else
@@ -2745,7 +2745,7 @@ register struct attack *mattk;
                 is_animal(youmonst.data) ? "\93f\82«\96ß" : "\94r\8fo");
 #endif
             if (Slow_digestion || is_animal(youmonst.data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Obviously, you didn't like %s taste.",
                       s_suffix(mon_nam(mdef)));
 #else
@@ -2919,7 +2919,7 @@ register struct monst *mon;
 
                 if (!u.uswallow
                     && (compat = could_seduce(&youmonst, mon, mattk)) != 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("%s %s %s.",
                         (mon->mcansee && haseyes(mon->data)) ? "smile at"
                                                              : "talk to",
@@ -3097,7 +3097,7 @@ register struct monst *mon;
                    for normal hug, or blessed gloves or silver ring(s) for
                    choking hug; deals damage but never grabs hold */
                 if (specialdmg) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("%s %s%s", verb, mon_nam(mon), exclam(specialdmg));
 #else
                     You("%s\82ð\82Â\82©\82ñ\82¾%s", mon_nam(mon), exclam(specialdmg));
@@ -3118,7 +3118,7 @@ register struct monst *mon;
             }
             /* hug attack against ordinary foe */
             if (mon == u.ustuck) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s is being %s%s.", Monnam(mon),
                       byhand ? "throttled" : "crushed",
                       /* extra feedback for non-breather being choked */
@@ -3405,7 +3405,7 @@ boolean wep_was_destroyed;
                     break;
                 }
                 if (mon->mcansee) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     if (ureflects("%s gaze is reflected by your %s.",
                                   s_suffix(Monnam(mon)))) {
 #else
@@ -3414,7 +3414,7 @@ boolean wep_was_destroyed;
 #endif
                         ;
                     } else if (Free_action) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         You("momentarily stiffen under %s gaze!",
                             s_suffix(mon_nam(mon)));
 #else
@@ -3422,7 +3422,7 @@ boolean wep_was_destroyed;
                             mon_nam(mon));
 #endif
                     } else if (Hallucination && rn2(4)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s looks %s%s.", Monnam(mon),
                               !rn2(2) ? "" : "rather ",
                               !rn2(2) ? "numb" : "stupified");
@@ -3443,7 +3443,7 @@ boolean wep_was_destroyed;
                         nomovemsg = 0;
                     }
                 } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s cannot defend itself.",
                           Adjmonnam(mon, "blind"));
 #else
@@ -3753,7 +3753,7 @@ light_hits_gremlin(mon, dmg)
 struct monst *mon;
 int dmg;
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     pline("%s %s!", Monnam(mon),
           (dmg > mon->mhp / 2) ? "wails in agony" : "cries out in pain");
 #else
index 86c3cba..1eeb679 100644 (file)
@@ -412,7 +412,7 @@ invault()
         reset_faint(); /* if fainted - wake up */
         gsensed = !canspotmon(guard);
         if (!gsensed)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("Suddenly one of the Vault's %s enters!",
                   makeplural(guard->data->mname));
 #else
@@ -443,7 +443,7 @@ invault()
             if (U_AP_TYPE == M_AP_OBJECT
                 && youmonst.mappearance != GOLD_PIECE)
                 if (!Deaf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     verbalize("Hey!  Who left that %s in here?",
                               mimic_obj_name(&youmonst));
 #else
@@ -484,7 +484,7 @@ invault()
         buf[0] = '\0';
         trycount = 5;
         do {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             getlin(Deaf ? "You are required to supply your name. -"
                         : "\"Hello stranger, who are you?\" -", buf);
 #else
@@ -504,7 +504,7 @@ invault()
             adjalign(-1); /* Liar! */
         }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         if (!strcmpi(buf, "Croesus") || !strcmpi(buf, "Kroisos")
             || !strcmpi(buf, "Creosote")) { /* Discworld */
 #else
@@ -556,7 +556,7 @@ invault()
             return;
         }
         if (Deaf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s doesn't %srecognize you.", noit_Monnam(guard),
                     (Blind) ? "" : "appear to ");
 #else
@@ -844,7 +844,7 @@ int goldx, goldy; /* <gold->ox, gold->oy> */
         Strcpy(monnambuf, Monnam(grd));
         if (!strcmpi(monnambuf, "It"))
             Strcpy(monnambuf, "Someone");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s%s picks up the gold%s.", monnambuf,
               (grd->mpeaceful && EGD(grd)->warncnt > 5)
                  ? " calms down and" : "",
@@ -917,7 +917,7 @@ register struct monst *grd;
 
     if (egrd->witness) {
         if (!Deaf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             verbalize("How dare you %s that gold, scoundrel!",
                       (egrd->witness & GD_EATGOLD) ? "consume" : "destroy");
 #else
@@ -934,7 +934,7 @@ register struct monst *grd;
     if (egrd->fcend == 1) {
         if (u_in_vault && (u_carry_gold || um_dist(grd->mx, grd->my, 1))) {
             if (egrd->warncnt == 3 && !Deaf)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 verbalize("I repeat, %sfollow me!",
                           u_carry_gold
                               ? (!umoney ? "drop that hidden money and "
@@ -977,7 +977,7 @@ register struct monst *grd;
                 grd->mpeaceful = 0;
  letknow:
                 if (!cansee(grd->mx, grd->my) || !mon_visible(grd))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You_hear("%s.",
                              m_carrying(grd, TIN_WHISTLE)
                                  ? "the shrill sound of a guard's whistle"
@@ -989,7 +989,7 @@ register struct monst *grd;
                                  : "\93{\82è\82Ì\8b©\82Ñ");
 #endif
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You(um_dist(grd->mx, grd->my, 2)
                             ? "see %s approaching."
                             : "are confronted by %s.",
@@ -1271,7 +1271,7 @@ boolean silently;
 
     if (u.uinvault) {
         if (!silently)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Your("%ld %s goes into the Magic Memory Vault.",
                  umoney, currency(umoney));
 #else
@@ -1292,7 +1292,7 @@ boolean silently;
             pline("%s\82Í\82 \82È\82½\82Ì\8bà\89Ý\82ð\91q\8cÉ\82É\91\97\82Á\82½\81D", Monnam(grd));
         gx = rooms[EGD(grd)->vroom].lx + rn2(2);
         gy = rooms[EGD(grd)->vroom].ly + rn2(2);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Sprintf(buf, "To Croesus: here's the gold recovered from %s the %s.",
                 plname, mons[u.umonster].mname);
 #else
index b6c4c04..a48e526 100644 (file)
@@ -51,7 +51,7 @@ STATIC_VAR NEARDATA const short skill_names_indices[P_NUM_SKILLS] = {
 
 /* note: entry [0] isn't used */
 STATIC_VAR NEARDATA const char *const odd_skill_names[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "no skill", "bare hands", /* use barehands_or_martial[] instead */
     "two weapon combat", "riding", "polearms", "saber", "hammer", "whip",
     "attack spells", "healing spells", "divination spells",
@@ -65,7 +65,7 @@ STATIC_VAR NEARDATA const char *const odd_skill_names[] = {
 };
 /* indexed vis `is_martial() */
 STATIC_VAR NEARDATA const char *const barehands_or_martial[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "bare handed combat", "martial arts"
 #else
     "\91f\8eè", "\91Ì\8fp"
@@ -86,7 +86,7 @@ STATIC_OVL void
 give_may_advance_msg(skill)
 int skill;
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You_feel("more confident in your %sskills.",
              (skill == P_NONE) ? ""
                  : (skill <= P_LAST_WEAPON) ? "weapon "
@@ -884,7 +884,7 @@ register struct monst *mon;
 #else
                     pline("%s\82Í\95\90\8aí\82ð\8eè\82É\82µ\82æ\82¤\82Æ\82µ\82½\82ª\81C", mon_nam(mon));
 #endif
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s cannot wield that %s.", mon_nam(mon),
                           xname(obj));
 #else
@@ -915,7 +915,7 @@ register struct monst *mon;
 */
             pline("%s\82Í%s\82ð\91\95\94õ\82µ\82½\81I", Monnam(mon), doname(obj));
             if (mwelded(mw_tmp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s to %s %s!", Tobjnam(obj, "weld"),
                       is_plural(obj) ? "themselves" : "itself",
                       s_suffix(mon_nam(mon)), mbodypart(mon, HAND));
@@ -930,7 +930,7 @@ register struct monst *mon;
         if (artifact_light(obj) && !obj->lamplit) {
             begin_burn(obj, FALSE);
             if (canseemon(mon))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s in %s %s!", Tobjnam(obj, "shine"),
                       arti_light_description(obj), s_suffix(mon_nam(mon)),
                       mbodypart(mon, HAND));
@@ -1037,7 +1037,7 @@ boolean verbose;
     /* new state is only reported if it's an increase */
     if (newspe > obj->spe) {
         if (verbose) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             const char *wetness = (newspe < 3)
                                      ? (!obj->spe ? "damp" : "damper")
                                      : (!obj->spe ? "wet" : "wetter");
@@ -1048,7 +1048,7 @@ boolean verbose;
 #endif
 
             if (carried(obj))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s gets %s.", Yobjnam2(obj, (const char *) 0),
                       wetness);
 #else
@@ -1056,7 +1056,7 @@ boolean verbose;
                       wetness);
 #endif
             else if (mcarried(obj) && canseemon(obj->ocarry))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s gets %s.", s_suffix(Monnam(obj->ocarry)),
                       xname(obj), wetness);
 #else
@@ -1086,7 +1086,7 @@ boolean verbose;
     if (newspe < obj->spe) {
         if (verbose) {
             if (carried(obj))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s dries%s.", Yobjnam2(obj, (const char *) 0),
                       !newspe ? " out" : "");
 #else
@@ -1094,7 +1094,7 @@ boolean verbose;
                       !newspe ? "\8a£\82«\82«\82Á\82½" : "\8a£\82¢\82½");
 #endif
             else if (mcarried(obj) && canseemon(obj->ocarry))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s drie%s.", s_suffix(Monnam(obj->ocarry)),
                       xname(obj), !newspe ? " out" : "");
 #else
@@ -1256,7 +1256,7 @@ int skill;
     P_SKILL(skill)++;
     u.skill_record[u.skills_advanced++] = skill;
     /* subtly change the advance message to indicate no more advancement */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You("are now %s skilled in %s.",
         P_SKILL(skill) >= P_MAX_SKILL(skill) ? "most" : "more",
         P_NAME(skill));
@@ -1331,7 +1331,7 @@ enhance_weapon_skill()
         if (eventually_advance > 0 || maxxed_cnt > 0) {
             any = zeroany;
             if (eventually_advance > 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(buf, "(Skill%s flagged by \"*\" may be enhanced %s.)",
                         plur(eventually_advance),
                         (u.ulevel < MAXULEV)
@@ -1347,7 +1347,7 @@ enhance_weapon_skill()
                          MENU_UNSELECTED);
             }
             if (maxxed_cnt > 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(buf,
                  "(Skill%s flagged by \"#\" cannot be enhanced any further.)",
                         plur(maxxed_cnt));
@@ -1418,7 +1418,7 @@ enhance_weapon_skill()
                          MENU_UNSELECTED);
             }
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Strcpy(buf, (to_advance > 0) ? "Pick a skill to advance:"
                                      : "Current skills:");
 #else
@@ -1824,7 +1824,7 @@ register struct obj *obj;
     if (artifact_light(obj) && obj->lamplit) {
         end_burn(obj, FALSE);
         if (canseemon(mon))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s in %s %s %s shining.", The(xname(obj)),
                   s_suffix(mon_nam(mon)), mbodypart(mon, HAND),
                   otense(obj, "stop"));
index 7702ea9..5526ffe 100644 (file)
@@ -133,7 +133,7 @@ register struct monst *mon;
     }
 
     if (canseemon(mon) && !Hallucination)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s changes into a %s.", Monnam(mon),
               is_human(&mons[pm]) ? "human" : mons[pm].mname + 4);
 #else
index 5a1c767..545052c 100644 (file)
@@ -133,7 +133,7 @@ struct obj *obj;
         return FALSE;
 
     /* Prevent wielding cockatrice when not wearing gloves --KAA */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     You("wield %s in your bare %s.",
         corpse_xname(obj, (const char *) 0, CXN_PFX_THE),
         makeplural(body_part(HAND)));
@@ -175,7 +175,7 @@ struct obj *wep;
         /* hero must have been life-saved to get here; use a turn */
         res++; /* corpse won't be wielded */
     } else if (uarms && bimanual(wep)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("cannot wield a two-handed %s while wearing a shield.",
             is_sword(wep) ? "sword" : wep->otyp == BATTLE_AXE ? "axe"
                                                               : "weapon");
@@ -238,7 +238,7 @@ struct obj *wep;
         if (artifact_light(wep) && !wep->lamplit) {
             begin_burn(wep, FALSE);
             if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s to shine %s!", Tobjnam(wep, "begin"),
                       arti_light_description(wep));
 #else
@@ -263,7 +263,7 @@ struct obj *wep;
 
             if ((this_shkp = shop_keeper(inside_shop(u.ux, u.uy)))
                 != (struct monst *) 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s says \"You be careful with my %s!\"",
                       shkname(this_shkp), xname(wep));
 #else
@@ -529,7 +529,7 @@ dowieldquiver()
         /* require confirmation to ready the main weapon */
         if (ynq(qbuf) != 'y') {
             (void) Shk_Your(qbuf, uwep); /* replace qbuf[] contents */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s%s %s wielded.", qbuf,
                   simpleonames(uwep), otense(uwep, "remain"));
 #else
@@ -589,7 +589,7 @@ dowieldquiver()
         /* require confirmation to ready the alternate weapon */
         if (ynq(qbuf) != 'y') {
             (void) Shk_Your(qbuf, uswapwep); /* replace qbuf[] contents */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s%s %s %s.", qbuf,
                   simpleonames(uswapwep), otense(uswapwep, "remain"),
                   u.twoweap ? "wielded" : "as secondary weapon");
@@ -662,7 +662,7 @@ const char *verb; /* "rub",&c */
 #endif
 
     if (obj->owornmask & (W_ARMOR | W_ACCESSORY)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You_cant("%s %s while wearing %s.", verb, yname(obj),
                  more_than_1 ? "them" : "it");
 #else
@@ -702,7 +702,7 @@ const char *verb; /* "rub",&c */
     }
     /* check shield */
     if (uarms && bimanual(obj)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         You("cannot %s a two-handed %s while wearing a shield.", verb,
             (obj->oclass == WEAPON_CLASS) ? "weapon" : "tool");
 #else
@@ -792,7 +792,7 @@ can_twoweapon()
 */
         You("\8f\82\82ð\8e\9d\82Á\82Ä\82¢\82é\8aÔ\82Í\97¼\8eè\8e\9d\82¿\82Å\82«\82È\82¢\81D");
     else if (uswapwep->oartifact)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s being held second to another weapon!",
               Yobjnam2(uswapwep, "resist"));
 #else
@@ -925,7 +925,7 @@ register int amount;
 
         if (amount >= 0 && uwep && will_weld(uwep)) { /* cursed tin opener */
             if (!Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 Sprintf(buf, "%s with %s aura.",
                         Yobjnam2(uwep, "glow"), an(hcolor(NH_AMBER)));
 #else
@@ -943,7 +943,7 @@ register int amount;
             uncurse(uwep);
             update_inventory();
         } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "Your %s %s.", makeplural(body_part(HAND)),
                     (amount >= 0) ? "twitch" : "itch");
 #else
@@ -962,7 +962,7 @@ register int amount;
     if (uwep->otyp == WORM_TOOTH && amount >= 0) {
         multiple = (uwep->quan > 1L);
         /* order: message, transformation, shop handling */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("%s %s much sharper now.", simpleonames(uwep),
              multiple ? "fuse, and become" : "is");
 #else
@@ -988,7 +988,7 @@ register int amount;
     } else if (uwep->otyp == CRYSKNIFE && amount < 0) {
         multiple = (uwep->quan > 1L);
         /* order matters: message, shop handling, transformation */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("%s %s much duller now.", simpleonames(uwep),
              multiple ? "fuse, and become" : "is");
 #else
@@ -1023,7 +1023,7 @@ register int amount;
     if (((uwep->spe > 5 && amount >= 0) || (uwep->spe < -5 && amount < 0))
         && rn2(3)) {
         if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s for a while and then %s.",
                   Yobjnam2(uwep, "violently glow"), color,
                   otense(uwep, "evaporate"));
@@ -1045,7 +1045,7 @@ register int amount;
         xtime = (amount * amount == 1) ? "moment" : "while";
 */
         xtime = (amount*amount == 1) ? "\88ê\8fu" : "\82µ\82Î\82ç\82­\82Ì\8aÔ";
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s for a %s.",
               Yobjnam2(uwep, amount == 0 ? "violently glow" : "glow"), color,
               xtime);
@@ -1075,7 +1075,7 @@ register int amount;
      * spe dependent.  Give an obscure clue here.
      */
     if (uwep->oartifact == ART_MAGICBANE && uwep->spe >= 0) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         Your("right %s %sches!", body_part(HAND),
              (((amount > 1) && (uwep->spe > 1)) ? "flin" : "it"));
 #else
index 63bab45..b416153 100644 (file)
@@ -436,7 +436,7 @@ register struct monst *mtmp;
 
                 if ((otmp = on_ground(which_arti(targ))) != 0) {
                     if (cansee(mtmp->mx, mtmp->my))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s picks up %s.", Monnam(mtmp),
                               (distu(mtmp->mx, mtmp->my) <= 5)
                                   ? doname(otmp)
@@ -755,7 +755,7 @@ wizdead()
 }
 
 const char *const random_insult[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "antic",      "blackguard",   "caitiff",    "chucklehead",
     "coistrel",   "craven",       "cretin",     "cur",
     "dastard",    "demon fodder", "dimwit",     "dolt",
@@ -777,7 +777,7 @@ const char *const random_insult[] = {
 };
 
 const char *const random_malediction[] = {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     "Hell shall soon claim thy remains,", "I chortle at thee, thou pathetic",
     "Prepare to die, thou", "Resistance is useless,",
     "Surrender or die, thou", "There shall be no mercy, thou",
@@ -819,7 +819,7 @@ register struct monst *mtmp;
             verbalize("\96\82\82æ\82¯\82ð\8eè\95ú\82¹\81C%s\81I",
                       random_insult[rn2(SIZE(random_insult))]);
         else if (u.uhp < 5 && !rn2(2)) /* Panic */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             verbalize(rn2(2) ? "Even now thy life force ebbs, %s!"
                              : "Savor thy breath, %s, it be thy last!",
                       random_insult[rn2(SIZE(random_insult))]);
@@ -834,7 +834,7 @@ register struct monst *mtmp;
 */
             verbalize(rn2(2) ? "\97]\82Í\95K\82¸\8bA\82Á\82Ä\82­\82é\81D" : "\97]\82Í\96ß\82Á\82Ä\82­\82é\81D");
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             verbalize("%s %s!",
                       random_malediction[rn2(SIZE(random_malediction))],
                       random_insult[rn2(SIZE(random_insult))]);
index d834cc2..13ca439 100644 (file)
@@ -389,7 +389,7 @@ boolean cuttier; /* hit is by wielded blade or axe or by thrown axe */
         place_worm_seg(worm, x, y); /* place the "head" segment back */
         if (context.mon_moving) {
             if (canspotmon(worm))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("Part of %s tail has been cut off.",
                       s_suffix(mon_nam(worm)));
 #else
index 0cb7948..4f7be0d 100644 (file)
@@ -639,7 +639,7 @@ outer_break:
                 Sprintf(buf, "%s\82ð\82Í\82¸\82µ\82Ä", distant_name(old, doname));
             else
                 buf[0] = '\0';
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s%s puts on %s.", Monnam(mon), buf,
                   distant_name(best, doname));
 #else
@@ -647,7 +647,7 @@ outer_break:
                   distant_name(best,doname));
 #endif
             if (autocurse)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s %s %s %s for a moment.", s_suffix(Monnam(mon)),
                       simpleonames(best), otense(best, "glow"),
                       hcolor(NH_BLACK));
@@ -895,7 +895,7 @@ boolean polyspot;
         if ((otmp = which_armor(mon, W_ARMC)) != 0) {
             if (otmp->oartifact) {
                 if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s falls off!", s_suffix(Monnam(mon)),
                           cloak_simple_name(otmp));
 #else
@@ -907,7 +907,7 @@ boolean polyspot;
                 m_lose_armor(mon, otmp);
             } else {
                 if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s tears apart!", s_suffix(Monnam(mon)),
                           cloak_simple_name(otmp));
 #else
@@ -938,7 +938,7 @@ boolean polyspot;
     } else if (sliparm(mdat)) {
         if ((otmp = which_armor(mon, W_ARM)) != 0) {
             if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s armor falls around %s!", s_suffix(Monnam(mon)),
                       pronoun);
 #else
@@ -956,7 +956,7 @@ boolean polyspot;
         if ((otmp = which_armor(mon, W_ARMC)) != 0) {
             if (vis) {
                 if (is_whirly(mon->data))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s falls, unsupported!", s_suffix(Monnam(mon)),
                           cloak_simple_name(otmp));
 #else
@@ -964,7 +964,7 @@ boolean polyspot;
                           cloak_simple_name(otmp));
 #endif
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s shrinks out of %s %s!", Monnam(mon), ppronoun,
                           cloak_simple_name(otmp));
 #else
@@ -979,14 +979,14 @@ boolean polyspot;
         if ((otmp = which_armor(mon, W_ARMU)) != 0) {
             if (vis) {
                 if (sliparm(mon->data))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s seeps right through %s shirt!", Monnam(mon),
                           ppronoun);
 #else
                     pline("%s\82Í\8e©\95ª\82Ì\83V\83\83\83c\82É\82µ\82Ý\8d\9e\82ñ\82¾\81I", Monnam(mon));
 #endif
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s becomes much too small for %s shirt!",
                           Monnam(mon), ppronoun);
 #else
@@ -1003,7 +1003,7 @@ boolean polyspot;
         /* [caller needs to handle weapon checks] */
         if ((otmp = which_armor(mon, W_ARMG)) != 0) {
             if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s drops %s gloves%s!", Monnam(mon), ppronoun,
                       MON_WEP(mon) ? " and weapon" : "");
 #else
@@ -1016,7 +1016,7 @@ boolean polyspot;
         }
         if ((otmp = which_armor(mon, W_ARMS)) != 0) {
             if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s can no longer hold %s shield!", Monnam(mon),
                       ppronoun);
 #else
@@ -1037,7 +1037,7 @@ boolean polyspot;
             /* flimsy test for horns matches polyself handling */
             && (handless_or_tiny || !is_flimsy(otmp))) {
             if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s helmet falls to the %s!", s_suffix(Monnam(mon)),
                       surface(mon->mx, mon->my));
 #else
@@ -1063,7 +1063,7 @@ boolean polyspot;
 */
                     pline("%s\82Ì\8cC\82Í\82Ê\82°\97\8e\82¿\82½\81I", Monnam(mon));
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s boots %s off %s feet!", s_suffix(Monnam(mon)),
                           verysmall(mdat) ? "slide" : "are pushed", ppronoun);
 #else
index 9f8e481..a7bddf3 100644 (file)
@@ -120,7 +120,7 @@ register struct obj *pen;
         You("\8f\91\82­\82½\82ß\82É\82Í\8eè\82ª\95K\97v\82¾\81I");
         return 0;
     } else if (Glib) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s from your %s.", Tobjnam(pen, "slip"),
               makeplural(body_part(FINGER)));
 #else
@@ -137,7 +137,7 @@ register struct obj *pen;
         return 0;
     /* can't write on a novel (unless/until it's been converted into a blank
        spellbook), but we want messages saying so to avoid "spellbook" */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     typeword = (paper->otyp == SPE_NOVEL)
                   ? "book"
                   : (paper->oclass == SPBOOK_CLASS)
@@ -409,7 +409,7 @@ found:
     /* success */
     if (new_obj->oclass == SPBOOK_CLASS) {
         /* acknowledge the change in the object's description... */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline_The("spellbook warps strangely, then turns %s.",
                   new_book_description(new_obj->otyp, namebuf));
 #else
index a0622b4..28db8ca 100644 (file)
--- a/src/zap.c
+++ b/src/zap.c
@@ -67,7 +67,7 @@ STATIC_VAR const char are_blinded_by_the_flash[] =
 
 const char *const flash_types[] =       /* also used in buzzmu(mcastu.c) */
     {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "magic missile", /* Wands must be 0-9 */
         "bolt of fire", "bolt of cold", "sleep ray", "death ray",
         "bolt of lightning", "", "", "", "",
@@ -84,7 +84,7 @@ const char *const flash_types[] =       /* also used in buzzmu(mcastu.c) */
         "",
 #endif
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "magic missile", /* Spell equivalents must be 10-19 */
         "fireball", "cone of cold", "sleep ray", "finger of death",
         "bolt of lightning", /* there is no spell, used for retribution */
@@ -102,7 +102,7 @@ const char *const flash_types[] =       /* also used in buzzmu(mcastu.c) */
         "",
 #endif
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         "blast of missiles", /* Dragon breath equivalents 20-29*/
         "blast of fire", "blast of frost", "blast of sleep gas",
         "blast of disintegration", "blast of lightning",
@@ -419,7 +419,7 @@ struct obj *otmp;
         } else if ((obj = which_armor(mtmp, W_SADDLE)) != 0) {
             char buf[BUFSZ];
 
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             Sprintf(buf, "%s %s", s_suffix(Monnam(mtmp)),
                     distant_name(obj, xname));
 #else
@@ -429,7 +429,7 @@ struct obj *otmp;
             if (cansee(mtmp->mx, mtmp->my)) {
                 if (!canspotmon(mtmp))
                     Strcpy(buf, An(distant_name(obj, xname)));
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s falls to the %s.", buf,
                       surface(mtmp->mx, mtmp->my));
 #else
@@ -469,7 +469,7 @@ struct obj *otmp;
                     } else
                         mimic_hit_msg(mtmp, otyp);
                 } else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s looks%s better.", Monnam(mtmp),
                           otyp == SPE_EXTRA_HEALING ? " much" : "");
 #else
@@ -603,7 +603,7 @@ struct monst *mtmp;
         (void) display_minventory(mtmp, MINV_ALL | MINV_NOLET | PICK_NONE,
                                   (char *) 0);
     } else {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s is not carrying anything%s.", noit_Monnam(mtmp),
               (u.uswallow && mtmp == u.ustuck) ? " besides you" : "");
 #else
@@ -1010,7 +1010,7 @@ boolean by_hero;
         ghost = find_mid(m_id, FM_FMON);
         if (ghost && ghost->data == &mons[PM_GHOST]) {
             if (canseemon(ghost))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s is suddenly drawn into its former body!",
 #else
                 pline("%s\82Í\93Ë\91R\82à\82Æ\82Ì\91Ì\82É\88ø\82«\8d\9e\82Ü\82ê\82½\81I",
@@ -1509,7 +1509,7 @@ int okind;
     default:
         /* if all else fails... */
         pm_index = PM_STRAW_GOLEM;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         material = "";
 #else
         material = "\95¨\91Ì";
@@ -1524,7 +1524,7 @@ int okind;
     polyuse(obj, okind, (int) mons[pm_index].cwt);
 
     if (mtmp && cansee(mtmp->mx, mtmp->my)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("Some %sobjects meld, and %s arises from the pile!", material,
               a_monnam(mtmp));
 #else
@@ -1926,7 +1926,7 @@ struct obj *obj;
                     else
                         delobj(obj);
                     if (cansee(mon->mx, mon->my))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline_The("figurine %sanimates!",
                                   golem_xform ? "turns to flesh and " : "");
 #else
@@ -2123,7 +2123,7 @@ struct obj *obj, *otmp;
                     /* we don't want to force alive vs dead
                        determination for Schroedinger's Cat here,
                        so just make probing be inconclusive for it */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     You("aren't sure whether %s has %s or its corpse inside.",
                         the(xname(obj)),
                         /* unfortunately, we can't tell whether rndmonnam()
@@ -2235,7 +2235,7 @@ struct obj *obj, *otmp;
                 } else {
                     if (cansee(ox, oy)) {
                         if (canspotmon(mtmp)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                             pline("%s is resurrected!",
                                   upstart(noname_monnam(mtmp, ARTICLE_THE)));
 #else
@@ -2796,7 +2796,7 @@ boolean ordinary;
         learn_it = TRUE;
         (void) unturn_dead(&youmonst);
         if (is_undead(youmonst.data)) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             You_feel("frightened and %sstunned.",
                      Stunned ? "even more " : "");
 #else
@@ -3248,7 +3248,7 @@ struct obj *obj; /* wand or spell */
                    && !Is_qstart(&u.uz)) {
             int dmg;
             /* similar to zap_dig() */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("A rock is dislodged from the %s and falls on your %s.",
                   ceiling(x, y), body_part(HEAD));
 #else
@@ -3296,7 +3296,7 @@ struct obj *obj; /* wand or spell */
                 /* locking transforms hole into trapdoor */
                 ttmp->ttyp = TRAPDOOR;
                 if (Blind || !ttmp->tseen) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("Some %s swirls beneath you.",
                           is_ice(x, y) ? "frost" : "dust");
 #else
@@ -3378,7 +3378,7 @@ struct obj *obj; /* wand or spell */
             case SPE_STONE_TO_FLESH:
                 if (e->engr_type == ENGRAVE) {
                     /* only affects things in stone */
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline_The(Hallucination
                                   ? "floor runs like butter!"
                                   : "edges on the floor get smoother.");
@@ -3585,7 +3585,7 @@ const char *force; /* usually either "." or "!" */
 */
         pline("%s\82Í\89½\82©\82É\96½\92\86\82µ\82½\81D", str);
     else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pline("%s %s %s%s", The(str), vtense(str, "hit"),
               mon_nam(mtmp), force);
 #else
@@ -3599,7 +3599,7 @@ miss(str, mtmp)
 register const char *str;
 register struct monst *mtmp;
 {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     pline(
         "%s %s %s.", The(str), vtense(str, "miss"),
         ((cansee(bhitpos.x, bhitpos.y) || canspotmon(mtmp)) && flags.verbose)
@@ -3764,7 +3764,7 @@ struct obj **pobj; /* object tossed/used, set to NULL
             if (is_pool(bhitpos.x, bhitpos.y) && !mtmp) {
                 in_skip = TRUE;
                 if (!Blind)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s%s.", Yname2(obj), otense(obj, "skip"),
                           skipcount ? " again" : "");
 #else
@@ -3788,7 +3788,7 @@ struct obj **pobj; /* object tossed/used, set to NULL
                     skiprange(range, &skiprange_start, &skiprange_end);
             } else if (mtmp && M_IN_WATER(mtmp->data)) {
                 if ((!Blind && canseemon(mtmp)) || sensemon(mtmp))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s %s over %s.", Yname2(obj), otense(obj, "pass"),
                           mon_nam(mtmp));
 #else
@@ -3909,7 +3909,7 @@ struct obj **pobj; /* object tossed/used, set to NULL
 
             if ((bobj = sobj_at(BOULDER, x, y)) != 0) {
                 if (cansee(x, y))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s hits %s.", The(distant_name(obj, xname)),
                           an(xname(bobj)));
 #else
@@ -3921,7 +3921,7 @@ struct obj **pobj; /* object tossed/used, set to NULL
                 if (!test_move(x - ddx, y - ddy, ddx, ddy, TEST_MOVE)) {
                     /* nb: it didn't hit anything directly */
                     if (cansee(x, y))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         pline("%s jerks to an abrupt halt.",
                               The(distant_name(obj, xname))); /* lame */
 #else
@@ -4574,7 +4574,7 @@ boolean say; /* Announce out of sight hit/miss events if true */
         if (!u.ustuck)
             u.uswallow = 0;
         else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s rips into %s%s", The(fltxt), mon_nam(u.ustuck),
                   exclam(tmp));
 #else
@@ -4639,7 +4639,7 @@ boolean say; /* Announce out of sight hit/miss events if true */
                     if (cansee(mon->mx, mon->my)) {
                         hit(fltxt, mon, exclam(0));
                         shieldeff(mon->mx, mon->my);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         (void) mon_reflects(mon,
                                             "But it reflects from %s %s!");
 #else
@@ -4688,7 +4688,7 @@ boolean say; /* Announce out of sight hit/miss events if true */
                             hit(fltxt, mon, ".");
 */
                             hit(fltxt, mon, "\81D");
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                             pline("%s absorbs the deadly %s!", Monnam(mon),
                                   type == ZT_BREATH(ZT_DEATH) ? "blast"
                                                               : "ray");
@@ -4732,7 +4732,7 @@ boolean say; /* Announce out of sight hit/miss events if true */
                         } else {
                             /* some armor was destroyed; no damage done */
                             if (canseemon(mon))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                                 pline("%s %s is disintegrated!",
                                       s_suffix(Monnam(mon)),
                                       distant_name(otmp, xname));
@@ -4765,7 +4765,7 @@ boolean say; /* Announce out of sight hit/miss events if true */
                 pline("%s\82Í\82 \82È\82½\82É\96½\92\86\82µ\82½\81I", fltxt);
                 if (Reflecting) {
                     if (!Blind) {
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                         (void) ureflects("But %s reflects from your %s!",
                                          "it");
 #else
@@ -4867,7 +4867,7 @@ boolean say; /* Announce out of sight hit/miss events if true */
     if (type == ZT_SPELL(ZT_FIRE))
         explode(sx, sy, type, d(12, 6), 0, EXPL_FIERY);
     if (shopdamage)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         pay_for_damage(abstype == ZT_FIRE
                           ? "burn away"
                           : abstype == ZT_COLD
@@ -5230,14 +5230,14 @@ short exploding_wand_typ;
     /* set up zap text for possible door feedback; for exploding wand, we
        want "the blast" rather than "your blast" even if hero caused it */
     yourzap = (type >= 0 && !exploding_wand_typ);
-#if 0 /*JP*/
+#if 0 /*JP:T*/
     zapverb = "blast"; /* breath attack or wand explosion */
 #else
     zapverb = "\8fÕ\8c\82"; /* breath attack or wand explosion */
 #endif
     if (!exploding_wand_typ) {
         if (abs(type) < ZT_SPELL(0))
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             zapverb = "bolt"; /* wand zap */
 #else
             zapverb = "\8cõ\90ü"; /* wand zap */
@@ -5256,7 +5256,7 @@ short exploding_wand_typ;
            (except on rogue level) */
         newsym(x, y);
         if (see_it)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
             pline("%s %s reveals a secret door.",
                   yourzap ? "Your" : "The", zapverb);
 #else
@@ -5347,7 +5347,7 @@ short exploding_wand_typ;
 */
                     pline_The("\94à\82Í\96³\8f\9d\82¾\81D");
                 else
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline_The("door absorbs %s %s!", yourzap ? "your" : "the",
                               zapverb);
 #else
@@ -5639,7 +5639,7 @@ int osym, dmgtyp;
 
         if (!cnt)
             return;
-#if 0 /*JP*/
+#if 0 /*JP:T*/
         mult = (cnt == 1L)
                 ? ((quan == 1L) ? "Your"                         /* 1 of 1 */
                                 : "One of your")                 /* 1 of N */
@@ -5822,7 +5822,7 @@ int osym, dmgtyp;
             if (obj->otyp == SPE_BOOK_OF_THE_DEAD) {
                 skip++;
                 if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                     pline("%s glows a strange %s, but remains intact.",
                           The(distant_name(obj, xname)), hcolor("dark red"));
 #else
@@ -5892,7 +5892,7 @@ int osym, dmgtyp;
             if (!cnt)
                 continue;
             if (vis)
-#if 0 /*JP*/
+#if 0 /*JP:T*/
                 pline("%s%s %s!",
                       (cnt == obj->quan) ? "" : (cnt > 1L) ? "Some of "
                                                            : "One of ",