提交: 46ee79aa41961ee68420e7aa954646fa56904573 - source (git)

patch投げ用

Commit MetaInfo

• 修訂: 46ee79aa41961ee68420e7aa954646fa56904573 (tree)
• 時間: 2016-04-03 03:15:24
• 作者: SHIRAKATA Kentaro <argrath@ub32...>
• Commiter: SHIRAKATA Kentaro

Log Message

add translation

Change Summary

• modified: src/cmd.c
• modified: src/invent.c
• modified: src/light.c
• modified: src/lock.c
• modified: src/mail.c
• modified: src/makemon.c
• modified: src/mcastu.c
• modified: src/mhitm.c
• modified: src/mhitu.c
• modified: src/mkobj.c
• modified: src/mon.c
• modified: src/mondata.c
• modified: src/muse.c
• modified: src/music.c
• modified: src/o_init.c
• modified: src/objnam.c
• modified: src/options.c
• modified: src/pager.c
• modified: src/pickup.c
• modified: src/pline.c
• modified: src/polyself.c
• modified: src/potion.c
• modified: src/weapon.c

差異

--- a/src/cmd.c
+++ b/src/cmd.c
@@ -2636,7 +2636,7 @@ int final;
 /*JP
         you_have("infravision", from_what(INFRAVISION));
 */
-        you_have("暗闇で物を見る能力", from_what(INFRAVISION));
+        you_have("赤外線が見える視覚", from_what(INFRAVISION));
     if (Detect_monsters)
 /*JP
         you_are("sensing the presence of monsters", "");

--- a/src/invent.c
+++ b/src/invent.c
@@ -779,6 +779,7 @@ register int type;
  * http://concord.wikia.com/wiki/List_of_Fictional_Currencies
  */
 static const char *const currencies[] = {
+#if 0 /*JP*/
     "Altarian Dollar",       /* The Hitchhiker's Guide to the Galaxy */
     "Ankh-Morpork Dollar",   /* Discworld */
     "auric",                 /* The Domination of Draka */
@@ -800,6 +801,29 @@ static const char *const currencies[] = {
     "Triganic Pu",           /* The Hitchhiker's Guide to the Galaxy */
     "woolong",               /* Cowboy Bebop */
     "zorkmid",               /* Zork, NetHack */
+#else
+    "アルタイル・ドル",      /* The Hitchhiker's Guide to the Galaxy */
+    "アンクモルポーク・ドル", /* Discworld */
+    "ユーリック",            /* The Domination of Draka */
+    "バッカゾイド",          /* Space Quest */
+    "サーボゾイド",          /* Starslip */
+    "クレジット・チット",    /* Deus Ex */
+    "キュービット",          /* Battlestar Galactica */
+    "フレニアン・ピッブル・ビード", /* The Hitchhiker's Guide to the Galaxy */
+    "フレッツァ",            /* Jules Verne */
+    "帝国クレジット",        /* Star Wars */
+    "香港月ドル",            /* The Moon is a Harsh Mistress */
+    "コンバック",            /* Snow Crash */
+    "ナーナイト",            /* System Shock 2 */
+    "クァトロ",              /* Star Trek, Sim City */
+    "シモレオン",            /* Sim City */
+    "ソラリ",                /* Spaceballs */
+    "スペースバック",        /* Spaceballs */
+    "スポアバック",          /* Spore */
+    "トライガニック・プー",  /* The Hitchhiker's Guide to the Galaxy */
+    "ウーロン",              /* Cowboy Bebop */
+    "ゴールド",              /* Zork, NetHack */
+#endif
 };
 
 const char *
@@ -1250,8 +1274,12 @@ register const char *let, *word;
                     bp = (rn2(2) ? buf : (bp + 4));
                 } else
                     bp = buf;
+#if 0 /*JP*/
                 You("mime %s something%s%s.", ing_suffix(bp), suf ? " " : "",
                     suf ? suf : "");
+#else
+                You("何かを%sふりをした．", bp);
+#endif
             }
             return (allownone ? &zeroobj : (struct obj *) 0);
         }
@@ -1497,12 +1525,12 @@ static NEARDATA const char removeables[] = { ARMOR_CLASS, WEAPON_CLASS,
 /* interactive version of getobj - used for Drop, Identify and */
 /* Takeoff (A). Return the number of times fn was called successfully */
 /* If combo is TRUE, we just use this to get a category list */
-/*JP CHECK: 3.4.3 の呼び出し元
-do.c:864:               (result = ggetobj("drop", drop, 0, FALSE, (unsigned *)0)) < -1)
-do.c:925:       i = ggetobj("drop", drop, 0, TRUE, &ggoresults);
-do_wear.c:2538:     (result = ggetobj("take off", select_off, 0, FALSE, (unsigned *)0)) < -1)
-do_wear.c:2586: if (ggetobj("take off", select_off, 0, TRUE, (unsigned *)0) == -2)
-invent.c:1782:          n = ggetobj("identify", identify, id_limit, FALSE, (unsigned *)0);
+/*JP CHECK: 3.6.0 の呼び出し元
+do.c:962:        || (result = ggetobj("drop", drop, 0, FALSE, (unsigned *) 0)) < -1)
+do.c:1009:        i = ggetobj("drop", drop, 0, TRUE, &ggoresults);
+do_wear.c:2955:        || (result = ggetobj("take off", select_off, 0, FALSE,
+do_wear.c:3007:        if (ggetobj("take off", select_off, 0, TRUE, (unsigned *) 0) == -2)
+invent.c:2014:                n = ggetobj("identify", identify, id_limit, FALSE,
 */
 int
 ggetobj(word, fn, mx, combo, resultflags)
@@ -1717,10 +1745,9 @@ unsigned *resultflags;
  * If allflag then no questions are asked. Max gives the max nr of
  * objects to be treated. Return the number of objects treated.
  */
-/*JP CHECK: 3.4.3 での呼び出し元
-invent.c:1512:ggetobj() int cnt = askchain(&invent, olets, allflag, fn, ckfn, mx, word); 
-pickup.c:2615:("nodot") if (askchain((struct obj **)&current_container->cobj,
-pickup.c:2711:("nodot") (void) askchain((struct obj **)&invent,
+/*JP CHECK: 3.6.0 での呼び出し元
+invent.c:1728:        int cnt = askchain(&invent, olets, allflag, fn, ckfn, mx, word);
+pickup.c:2882:        if (askchain(objlist, (one_by_one ? (char *) 0 : selection), allflag,
   wordには動詞が英語で入る。
 */
 int
@@ -1939,7 +1966,10 @@ int id_limit;
             pline1(thats_enough_tries);
             break;
         } else { /* try again */
+/*JP
             pline("Choose an item; use ESC to decline.");
+*/
+            pline("アイテムを選んでください;やめるならESC．");
         }
     }
 }
@@ -2747,17 +2777,30 @@ dotypeinv()
 
             switch (c) {
             case 'B':
+/*JP
                 which = "known to be blessed";
+*/
+                which = "祝福されているとわかっている";
                 break;
             case 'U':
+/*JP
                 which = "known to be uncursed";
+*/
+                which = "呪われていないとわかっている";
                 break;
             case 'C':
+/*JP
                 which = "known to be cursed";
+*/
+                which = "呪われているとわかっている";
                 break;
             case 'X':
+#if 0 /*JP*/
                 You(
           "have no objects whose blessed/uncursed/cursed status is unknown.");
+#else
+                You("祝福／呪いがわからないものは何ももっていない．");
+#endif
                 break; /* better phrasing is desirable */
             default:
 /*JP
@@ -3037,7 +3080,10 @@ boolean picked_some;
             pline1(fbuf);
         read_engr_at(u.ux, u.uy); /* Eric Backus */
         if (obj_cnt == 1 && otmp->quan == 1L)
+/*JP
             There("is %s object here.", picked_some ? "another" : "an");
+*/
+            There("ここには%s一つものがある．", picked_some ? "もう" : "");
         else
 #if 0 /*JP*/
             There("are %s%s objects here.",
@@ -3056,6 +3102,7 @@ boolean picked_some;
 #endif
         for (; otmp; otmp = otmp->nexthere)
             if (otmp->otyp == CORPSE && will_feel_cockatrice(otmp, FALSE)) {
+#if 0 /*JP*//*"It's (corpse_name), unfortunately"*/
                 pline("%s %s%s.",
                       (obj_cnt > 1)
                           ? "Including"
@@ -3066,6 +3113,16 @@ boolean picked_some;
                       poly_when_stoned(youmonst.data)
                           ? ""
                           : ", unfortunately");
+#else
+                pline("%s%s%s．",
+                      poly_when_stoned(youmonst.data)
+                          ? ""
+                          : "残念ながら",
+                      corpse_xname(otmp, (const char *) 0, CXN_ARTICLE),
+                      (obj_cnt > 1)
+                          ? "を含んでいる"
+                          : "だ");
+#endif
                 feel_cockatrice(otmp, FALSE);
                 break;
             }
@@ -3103,7 +3160,10 @@ boolean picked_some;
         for (; otmp; otmp = otmp->nexthere) {
             if (otmp->otyp == CORPSE && will_feel_cockatrice(otmp, FALSE)) {
                 felt_cockatrice = TRUE;
+/*JP
                 Sprintf(buf, "%s...", doname(otmp));
+*/
+                Sprintf(buf, "%s．．．", doname(otmp));
                 putstr(tmpwin, 0, buf);
                 break;
             }
@@ -3649,7 +3709,10 @@ doorganize() /* inventory organizer by Del Lamb */
     const char *adj_type;
 
     if (!invent) {
+/*JP
         You("aren't carrying anything to adjust.");
+*/
+        You("順序を変えるものを何も持っていない．");
         return 0;
     }
 
@@ -3801,7 +3864,10 @@ doorganize() /* inventory organizer by Del Lamb */
                 } else if (inv_cnt(FALSE) >= 52) {
                     (void) merged(&splitting, &obj); /* undo split */
                     /* "knapsack cannot accommodate any more items" */
+/*JP
                     Your("pack is too full.");
+*/
+                    Your("持ち物は一杯だ．");
                     return 0;
                 } else {
                     bumped = otmp;
@@ -3833,7 +3899,10 @@ doorganize() /* inventory organizer by Del Lamb */
     /* messages deferred until inventory has been fully reestablished */
     prinv(adj_type, obj, 0L);
     if (bumped)
+/*JP
         prinv("Moving:", bumped, 0L);
+*/
+        prinv("移動:", bumped, 0L);
     if (splitting)
         clear_splitobjs(); /* reset splitobj context */
     update_inventory();

--- a/src/light.c
+++ b/src/light.c
@@ -2,6 +2,10 @@
 /* Copyright (c) Dean Luick, 1994                                       */
 /* NetHack may be freely redistributed.  See license for details.       */
 
+/* JNetHack Copyright */
+/* For 3.6-, Copyright (c) SHIRAKATA Kentaro, 2002-2016            */
+/* JNetHack may be freely redistributed.  See license for details. */
+
 #include "hack.h"
 #include "lev.h" /* for checking save modes */
 

--- a/src/lock.c
+++ b/src/lock.c
@@ -355,8 +355,13 @@ struct obj *pick;
         You("%sをつかむことができない！手がないんだもの！", xname(pick));
         return PICKLOCK_DID_NOTHING;
     } else if (u.uswallow) {
+#if 0 /*JP*/
         You_cant("%sunlock %s.", (picktyp == CREDIT_CARD) ? "" : "lock or ",
                  mon_nam(u.ustuck));
+#else
+        You_cant("%sを%sない．", mon_nam(u.ustuck),
+                 (picktyp == CREDIT_CARD) ? "開けられ" : "開け閉めでき");
+#endif
         return PICKLOCK_DID_NOTHING;
     }
 
@@ -626,7 +631,10 @@ doforce()
     char qbuf[QBUFSZ];
 
     if (u.uswallow) {
+/*JP
         You_cant("force anything from inside here.");
+*/
+        You_cant("内側からこじ開けることはできない．");
         return 0;
     }
     if (!uwep /* proper type test */

--- a/src/mail.c
+++ b/src/mail.c
@@ -474,12 +474,30 @@ struct obj *otmp;
 #ifdef AMIGA
         "Only Amiga makes it possible.", "CATS have all the answers.",
 #endif
+/*JP
         "This mail complies with the Yendorian Anti-Spam Act (YASA)",
+*/
+        "このメールはイェンダースパム対策法(YASA)に準拠しています．",
+/*JP
         "Please find enclosed a small token to represent your Owlbear",
+*/
+        "あなたのアウルベアを表現するために同封した小さいトークンを探してください",
+/*JP
         "**FR33 P0T10N 0F FULL H34L1NG**",
+*/
+        "**完全回復の薬プレゼント**",
+/*JP
         "Please return to sender (Asmodeus)",
+*/
+        "送信者(アスモデウス)に送り返してください",
+/*JP
       "Buy a potion of gain level for only $19.99! Guaranteed to be blessed!",
+*/
+      "レベルアップの薬がたったの1980円!祝福保証!",
+/*JP
         "Invitation: Visit the NetHack web site at http://www.nethack.org!"
+*/
+        "招待状: NetHack ウェブサイト http://www.nethack.org に来てね!"
     };
 
     /* XXX replace with more general substitution code and add local

--- a/src/makemon.c
+++ b/src/makemon.c
@@ -2,6 +2,11 @@
 /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
 /* NetHack may be freely redistributed.  See license for details. */
 
+/* JNetHack Copyright */
+/* (c) Issei Numata, Naoki Hamada, Shigehiro Miyashita, 1994-2000  */
+/* For 3.4-, Copyright (c) SHIRAKATA Kentaro, 2002-2016            */
+/* JNetHack may be freely redistributed.  See license for details. */
+
 #include "hack.h"
 
 #include <ctype.h>
@@ -2118,7 +2123,10 @@ int *seencount;  /* secondary output */
         impossible("bad bag o' tricks");
     } else if (bag->spe < 1) {
         /* if tipping known empty bag, give normal empty container message */
+/*JP
         pline1((tipping && bag->cknown) ? "It's empty." : nothing_happens);
+*/
+        pline1((tipping && bag->cknown) ? "それは空だ．" : nothing_happens);
         /* now known to be empty if sufficiently discovered */
         if (bag->dknown && objects[bag->otyp].oc_name_known)
             bag->cknown = 1;
@@ -2144,7 +2152,10 @@ int *seencount;  /* secondary output */
             if (bag->dknown)
                 makeknown(BAG_OF_TRICKS);
         } else if (!tipping) {
+/*JP
             pline1(!moncount ? nothing_happens : "Nothing seems to happen.");
+*/
+            pline1(!moncount ? nothing_happens : "何も起きなかったようだ．");
         }
     }
     return moncount;

--- a/src/mcastu.c
+++ b/src/mcastu.c
@@ -759,20 +759,34 @@ int spellnum;
         fmt = 0;
         if (!seecaster) {
             char *arg; /* [not const: upstart(N==1 ? an() : makeplural())] */
+/*JP
             const char *what = (let == S_SNAKE) ? "snake" : "insect";
+*/
+            const char *what = (let == S_SNAKE) ? "ヘビ" : "虫";
 
             if (newseen <= oldseen || Unaware) {
                 /* unseen caster fails or summons unseen critters,
                    or unconscious hero ("You dream that you hear...") */
+/*JP
                 You_hear("someone summoning %s.", makeplural(what));
+*/
+                You_hear("誰かが%sを召喚しているのを聞いた．", what);
             } else {
                 /* unseen caster summoned seen critter(s) */
                 arg = (newseen == oldseen + 1) ? an(what) : makeplural(what);
                 if (!Deaf)
+#if 0 /*JP*/
                     You_hear("someone summoning something, and %s %s.", arg,
                              vtense(arg, "appear"));
+#else
+                    You_hear("誰かが何かを召喚するのを聞いた，そして%sが現れた．",
+                             arg);
+#endif
                 else
+/*JP
                     pline("%s %s.", upstart(arg), vtense(arg, "appear"));
+*/
+                    pline("%sが現れた．", arg);
             }
 
             /* seen caster, possibly producing unseen--or just one--critters;

--- a/src/mhitm.c
+++ b/src/mhitm.c
@@ -119,7 +119,7 @@ struct attack *mattk;
         fmt = (could_seduce(magr, mdef, mattk) && !magr->mcan)
                   ? "%s pretends to be friendly to"
                   : "%s misses";
-#else
+#else /*JP:英語と変数展開のタイミングが異なるので注意*/
         fmt = (could_seduce(magr,mdef,mattk) && !magr->mcan)
                   ? "%sは%%sに友好的なふりをした．"
                   : "%sの%%sへの攻撃は外れた．";
@@ -276,12 +276,18 @@ boolean quietly;
                 return MM_HIT; /* no damage during the polymorph */
             }
             if (!quietly && canspotmon(magr))
+/*JP
                 pline("%s turns to stone!", Monnam(magr));
+*/
+                pline("%sは石になった！", Monnam(magr));
             monstone(magr);
             if (magr->mhp > 0)
                 return MM_HIT; /* lifesaved */
             else if (magr->mtame && !vis)
+/*JP
                 You(brief_feeling, "peculiarly sad");
+*/
+                You(brief_feeling, "もの悲しい");
             return MM_AGR_DIED;
         }
     }
@@ -291,8 +297,12 @@ boolean quietly;
     place_monster(magr, tx, ty); /* put down at target spot */
     place_monster(mdef, fx, fy);
     if (vis && !quietly)
+#if 0 /*JP*/
         pline("%s moves %s out of %s way!", Monnam(magr), mon_nam(mdef),
               is_rider(pa) ? "the" : mhis(magr));
+#else
+        pline("%sは%sを押しのけた！", Monnam(magr), mon_nam(mdef));
+#endif
     newsym(fx, fy);  /* see it */
     newsym(tx, ty);  /*   all happen */
     flush_screen(0); /* make sure it shows up */
@@ -626,7 +636,7 @@ struct attack *mattk;
         Sprintf(buf, "%s gazes at", Monnam(magr));
         pline("%s %s...", buf, mon_nam(mdef));
 #else
-        Sprintf(buf,"%sは%%sをにらみつけた．．．", Monnam(magr));
+        Sprintf(buf, "%sは%%sをにらみつけた．．．", Monnam(magr));
         pline(buf, mon_nam(mdef));
 #endif
     }
@@ -737,7 +747,7 @@ register struct attack *mattk;
         Sprintf(buf, "%s swallows", Monnam(magr));
         pline("%s %s.", buf, mon_nam(mdef));
 #else
-        Sprintf(buf,"%sは%%sをぐっと飲みこんだ．", Monnam(magr));
+        Sprintf(buf, "%sは%%sをぐっと飲みこんだ．", Monnam(magr));
         pline(buf, mon_nam(mdef));
 #endif
     }
@@ -1100,13 +1110,14 @@ register struct attack *mattk;
                       Monnam(mdef));
             tmp = 0;
         } else if (vis) {
-#if 0 /*JP*/
+/*JP
             pline("%s is covered in acid!", Monnam(mdef));
-            pline("It burns %s!", mon_nam(mdef));
-#else
+*/
             pline("%sは酸につつまれた！", Monnam(mdef));
+/*JP
+            pline("It burns %s!", mon_nam(mdef));
+*/
             pline("%sは焼かれた！", mon_nam(mdef));
-#endif
         }
         if (!rn2(30))
             erode_armor(mdef, ERODE_CORRODE);
@@ -1888,7 +1899,10 @@ boolean givemsg;
             || attacktype(mon->data, AT_BREA))) {
         mon->mspec_used += d(2, 2);
         if (givemsg)
+/*JP
             pline("%s seems lethargic.", Monnam(mon));
+*/
+            pline("%sは無気力になったようだ．", Monnam(mon));
     }
 }
 

--- a/src/mhitu.c
+++ b/src/mhitu.c
@@ -503,7 +503,10 @@ register struct monst *mtmp;
                    so mtmp's next move will be a regular attack */
                 place_monster(mtmp, mtmp->mx, mtmp->my); /* put back */
                 newsym(u.ux, u.uy); /* u.uundetected was toggled */
+/*JP
                 pline("%s draws back as you drop!", Monnam(mtmp));
+*/
+                pline("あなたが落ちることで%sは引き戻された！", Monnam(mtmp));
                 return 0;
             }
 
@@ -717,7 +720,10 @@ register struct monst *mtmp;
             int numseen, numhelp;
             char buf[BUFSZ], genericwere[BUFSZ];
 
+/*JP
             Strcpy(genericwere, "creature");
+*/
+            Strcpy(genericwere, "何か");
             numhelp = were_summon(mdat, FALSE, &numseen, genericwere);
             if (youseeit) {
 /*JP
@@ -765,10 +771,7 @@ register struct monst *mtmp;
                         pline("%s%s!", upstart(buf), from_nowhere);
 #else
                         pline("%sが%s現れた！",
-                              strcmp(genericwere, "creature")
-                              ? genericwere
-                              : "何か",
-                              from_nowhere);
+                              genericwere, from_nowhere);
 #endif
                     }
                 } /* else no help came; but you didn't know it tried */

--- a/src/mkobj.c
+++ b/src/mkobj.c
@@ -631,9 +631,15 @@ register struct obj *otmp;
 
 /* alteration types; must match COST_xxx macros in hack.h */
 static const char *const alteration_verbs[] = {
+#if 0 /*JP*/
     "cancel", "drain", "uncharge", "unbless", "uncurse", "disenchant",
     "degrade", "dilute", "erase", "burn", "neutralize", "destroy", "splatter",
     "bite", "open", "break the lock on", "rust", "rot", "tarnish"
+#else
+    "無効化した", "劣化させた", "放出させた", "祝福を解いた", "呪いを解いた", "魔力を減らした",
+    "劣化させた", "薄めた", "消した", "燃やした", "無毒化した", "壊した", "使った",
+    "食べた", "開けた", "鍵を壊した", "錆びさせた", "腐らせた", "傷つけた"
+#endif
 };
 
 /* possibly bill for an object which the player has just modified */
@@ -645,7 +651,9 @@ int alter_type;
     xchar ox, oy;
     char objroom;
     boolean set_bknown;
+#if 0 /*JP*//*使わない*/
     const char *those, *them;
+#endif
     struct monst *shkp = 0;
 
     if (alter_type < 0 || alter_type >= SIZE(alteration_verbs)) {
@@ -676,10 +684,12 @@ int alter_type;
             return;
     }
 
+#if 0 /*JP*//*日本語では不要*/
     if (obj->quan == 1L)
         those = "that", them = "it";
     else
         those = "those", them = "them";
+#endif
 
     /* when shopkeeper describes the object as being uncursed or unblessed
        hero will know that it is now uncursed; will also make the feedback
@@ -691,17 +701,27 @@ int alter_type;
     case OBJ_INVENT:
         if (set_bknown)
             obj->bknown = 1;
+#if 0 /*JP*/
         verbalize("You %s %s %s, you pay for %s!",
                   alteration_verbs[alter_type], those, simpleonames(obj),
                   them);
+#else
+        verbalize("%sを%sのなら，買ってもらうよ！",
+                  simpleonames(obj), alteration_verbs[alter_type]);
+#endif
         bill_dummy_object(obj);
         break;
     case OBJ_FLOOR:
         if (set_bknown)
             obj->bknown = 1;
         if (costly_spot(u.ux, u.uy) && objroom == *u.ushops) {
+#if 0 /*JP*/
             verbalize("You %s %s, you pay for %s!",
                       alteration_verbs[alter_type], those, them);
+#else
+            verbalize("%sのなら，買ってもらうよ！",
+                      alteration_verbs[alter_type]);
+#endif
             bill_dummy_object(obj);
         } else {
             (void) stolen_value(obj, ox, oy, FALSE, FALSE);
@@ -2096,15 +2116,24 @@ boolean tipping; /* caller emptying entire contents; affects shop handling */
                 do {
                     obj->otyp = rnd_class(POT_BOOZE, POT_WATER);
                 } while (obj->otyp == POT_SICKNESS);
+/*JP
             what = (obj->quan > 1L) ? "Some potions" : "A potion";
+*/
+            what = "薬";
         } else {
             obj = mkobj(FOOD_CLASS, FALSE);
             if (obj->otyp == FOOD_RATION && !rn2(7))
                 obj->otyp = LUMP_OF_ROYAL_JELLY;
+/*JP
             what = "Some food";
+*/
+            what = "食べ物";
         }
         ++objcount;
+/*JP
         pline("%s %s out.", what, vtense(what, "spill"));
+*/
+        pline("%sが飛び出てきた．", what);
         obj->blessed = horn->blessed;
         obj->cursed = horn->cursed;
         obj->owt = weight(obj);
@@ -2116,6 +2145,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*/
             obj = hold_another_object(
                 obj, u.uswallow ? "Oops!  %s out of your reach!"
                                 : (Is_airlevel(&u.uz) || Is_waterlevel(&u.uz)
@@ -2124,6 +2154,16 @@ boolean tipping; /* caller emptying entire contents; affects shop handling */
                                       ? "Oops!  %s away from you!"
                                       : "Oops!  %s to the floor!",
                 The(aobjnam(obj, "slip")), (const char *) 0);
+#else
+            obj = hold_another_object(
+                obj, u.uswallow ? "おっと！%sは届かない！"
+                                : (Is_airlevel(&u.uz) || Is_waterlevel(&u.uz)
+                                   || levl[u.ux][u.uy].typ < IRONBARS
+                                   || levl[u.ux][u.uy].typ >= ICE)
+                                      ? "おっと！%sはあなたの手から滑り落ちた！"
+                                      : "おっと！%sは床に滑り落ちた！",
+                xname(obj), (const char *)0);
+#endif
         } else {
             /* assumes this is taking place at hero's location */
             if (!can_reach_floor(TRUE)) {
@@ -2132,8 +2172,13 @@ 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*/
                     pline("%s %s to the %s.", Doname2(obj),
                           otense(obj, "drop"), surface(u.ux, u.uy));
+#else
+                    pline("%sは%sに落ちた．", Doname2(obj),
+                          surface(u.ux, u.uy));
+#endif
                 dropy(obj);
             }
         }

--- a/src/mon.c
+++ b/src/mon.c
@@ -1779,11 +1779,11 @@ struct monst *mtmp;
 /*JP
             pline("But wait...");
 */
-                        pline("しかし．．．");
+            pline("ちょっとまった．．．");
 /*JP
             pline("%s medallion begins to glow!", s_suffix(Monnam(mtmp)));
 */
-            pline("%sのメダリオンが輝きはじめた！", Monnam(mtmp));
+            pline("%sの魔除けが輝きはじめた！", Monnam(mtmp));
             makeknown(AMULET_OF_LIFE_SAVING);
             /* amulet is visible, but monster might not be */
             if (canseemon(mtmp)) {
@@ -1802,7 +1802,7 @@ struct monst *mtmp;
 /*JP
             pline_The("medallion crumbles to dust!");
 */
-            pline_The("メダリオンはこなごなにくだけてしまった！");
+            pline("魔除けはこなごなにくだけた！");
         }
         m_useup(mtmp, lifesave);
 
@@ -1854,6 +1854,7 @@ register struct monst *mtmp;
                             || amorphous(mtmp->data));
 
             /* construct a format string before transformation */
+#if 0 /*JP*/
             Sprintf(buf, "The %s%s suddenly %s and rises as %%s!",
                     spec_mon ? "" : "seemingly dead ",
                     x_monnam(mtmp, ARTICLE_NONE, (char *) 0,
@@ -1861,6 +1862,15 @@ register struct monst *mtmp;
                                  | SUPPRESS_INVISIBLE | SUPPRESS_IT,
                              FALSE),
                     spec_mon ? "reconstitutes" : "transforms");
+#else
+            Sprintf(buf, "%s%sは突然%s，%%sとして蘇った！",
+                    spec_mon ? "" : "死んだように思われた",
+                    x_monnam(mtmp, ARTICLE_NONE, (char *) 0,
+                             SUPPRESS_SADDLE | SUPPRESS_HALLUCINATION
+                                 | SUPPRESS_INVISIBLE | SUPPRESS_IT,
+                             FALSE),
+                    spec_mon ? "再構成され" : "変化し");
+#endif
             mtmp->mcanmove = 1;
             mtmp->mfrozen = 0;
             if (mtmp->mhpmax <= 0)
@@ -2373,7 +2383,11 @@ int dest; /* dest==1, normal; dest==0, don't print message; dest==2, don't
                 /* oc_big is also oc_bimanual and oc_bulky */
                 && (otmp->owt > 30 || objects[otyp].oc_big)) {
                 delobj(otmp);
+#if 0 /*JP*/
             } else if (!flooreffects(otmp, x, y, (dest & 1) ? "fall" : "")) {
+#else
+            } else if (!flooreffects(otmp, x, y, (dest & 1) ? "落ちる" : "")) {
+#endif
                 place_object(otmp, x, y);
                 stackobj(otmp);
             }
@@ -2384,7 +2398,10 @@ int dest; /* dest==1, normal; dest==0, don't print message; dest==2, don't
                                                    : CORPSTAT_NONE);
             if (burycorpse && cadaver && cansee(x, y) && !mtmp->minvis
                 && cadaver->where == OBJ_BURIED && (dest & 1)) {
+/*JP
                 pline("%s corpse ends up buried.", s_suffix(Monnam(mtmp)));
+*/
+                pline("%sの死体は埋まってしまった．", s_suffix(Monnam(mtmp)));
             }
         }
     }
@@ -2525,8 +2542,12 @@ struct monst *mtmp;
     if (!in_mklev && (mtmp->mstrategy & STRAT_APPEARMSG)) {
         mtmp->mstrategy &= ~STRAT_APPEARMSG; /* one chance only */
         if (!couldspot && canspotmon(mtmp))
+#if 0 /*JP*/
             pline("%s suddenly %s!", Amonnam(mtmp),
                   !Blind ? "appears" : "arrives");
+#else
+            pline("突然%sが現れた！", Amonnam(mtmp));
+#endif
     }
     return;
 }
@@ -3790,14 +3811,20 @@ struct permonst *mdat;
         switch (mndx) {
         case PM_ROTHE:
         case PM_MINOTAUR:
+/*JP
             You("notice a bovine smell.");
+*/
+            You("牛のようなにおいに気付いた．");
             msg_given = TRUE;
             break;
         case PM_CAVEMAN:
         case PM_CAVEWOMAN:
         case PM_BARBARIAN:
         case PM_NEANDERTHAL:
+/*JP
             You("smell body odor.");
+*/
+            pline("体臭のようなにおいがした．");
             msg_given = TRUE;
             break;
         /*
@@ -3820,7 +3847,10 @@ struct permonst *mdat;
         case PM_WERERAT:
         case PM_WEREWOLF:
         case PM_OWLBEAR:
+/*JP
             You("detect an odor reminiscent of an animal's den.");
+*/
+            pline("動物のねぐらを思い出すようなにおいがした．");
             msg_given = TRUE;
             break;
         /*
@@ -3828,16 +3858,25 @@ struct permonst *mdat;
             break;
         */
         case PM_STEAM_VORTEX:
+/*JP
             You("smell steam.");
+*/
+            pline("蒸気のにおいがした．");
             msg_given = TRUE;
             break;
         case PM_GREEN_SLIME:
+/*JP
             pline("%s stinks.", Something);
+*/
+            pline("悪臭がした．");
             msg_given = TRUE;
             break;
         case PM_VIOLET_FUNGUS:
         case PM_SHRIEKER:
+/*JP
             You("smell mushrooms.");
+*/
+            pline("きのこのにおいがした．");
             msg_given = TRUE;
             break;
         /* These are here to avoid triggering the
@@ -3855,35 +3894,61 @@ struct permonst *mdat;
         if (nonspecific)
             switch (mdat->mlet) {
             case S_DOG:
+/*JP
                 You("notice a dog smell.");
+*/
+                You("犬のにおいに気付いた．");
                 msg_given = TRUE;
                 break;
             case S_DRAGON:
+/*JP
                 You("smell a dragon!");
+*/
+                pline("ドラゴンのにおいがする！");
                 msg_given = TRUE;
                 break;
             case S_FUNGUS:
+/*JP
                 pline("%s smells moldy.", Something);
+*/
+                pline("何か苔のようなにおいがする．");
                 msg_given = TRUE;
                 break;
             case S_UNICORN:
+#if 0 /*JP*/
                 You("detect a%s odor reminiscent of a stable.",
                     (mndx == PM_PONY) ? "n" : " strong");
+#else
+                pline("馬小屋を思い出すような%sにおいがした．",
+                    (mndx == PM_PONY) ? "" : "強い");
+#endif
                 msg_given = TRUE;
                 break;
             case S_ZOMBIE:
+/*JP
                 You("smell rotting flesh.");
+*/
+                pline("腐った肉のにおいがした．");
                 msg_given = TRUE;
                 break;
             case S_EEL:
+/*JP
                 You("smell fish.");
+*/
+                pline("魚のにおいがした．");
                 msg_given = TRUE;
                 break;
             case S_ORC:
                 if (maybe_polyd(is_orc(youmonst.data), Race_if(PM_ORC)))
+/*JP
                     You("notice an attractive smell.");
+*/
+                    You("魅力的なにおいに気付いた．");
                 else
+/*JP
                     pline("A foul stench makes you feel a little nauseated.");
+*/
+                    pline("むかつくような悪臭で少し気分が悪くなった．");
                 msg_given = TRUE;
                 break;
             default:

--- a/src/mondata.c
+++ b/src/mondata.c
@@ -252,9 +252,15 @@ 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 ((o->owornmask & W_ARMH)
                 && (s = OBJ_DESCR(objects[o->otyp])) != (char *) 0
                 && !strcmp(s, "visored helmet"))
+#else
+            if ((o->owornmask & W_ARMH)
+                && (s = OBJ_DESCR(objects[o->otyp])) != (char *) 0
+                && !strcmp(s, "面頬付きの兜"))
+#endif
                 return FALSE;
     }
 

--- a/src/muse.c
+++ b/src/muse.c
@@ -85,7 +85,10 @@ struct obj *obj;
         struct monst *mtmp;
 
         potion_descr = OBJ_DESCR(objects[obj->otyp]);
+/*JP
         if (potion_descr && !strcmp(potion_descr, "milky")) {
+*/
+        if (potion_descr && !strcmp(potion_descr, "ミルク色の")) {
             if (!(mvitals[PM_GHOST].mvflags & G_GONE)
                 && !rn2(POTION_OCCUPANT_CHANCE(mvitals[PM_GHOST].born))) {
                 if (!enexto(&cc, mon->mx, mon->my, &mons[PM_GHOST]))
@@ -125,7 +128,7 @@ struct obj *obj;
 /*JP
         if (potion_descr && !strcmp(potion_descr, "smoky")
 */
-        if (potion_descr && !strcmp(potion_descr, "煙の出ている薬")
+        if (potion_descr && !strcmp(potion_descr, "煙の出ている")
             && !(mvitals[PM_DJINNI].mvflags & G_GONE)
             && !rn2(POTION_OCCUPANT_CHANCE(mvitals[PM_DJINNI].born))) {
             if (!enexto(&cc, mon->mx, mon->my, &mons[PM_DJINNI]))

--- a/src/music.c
+++ b/src/music.c
@@ -483,19 +483,35 @@ int force;
                                 ((Fumbling && !rn2(5))
                                  || (!rnl(Role_if(PM_ARCHEOLOGIST) ? 3 : 9))
                                  || ((ACURR(A_DEX) > 7) && rn2(5)));
+/*JP
                             You("are jostled around violently!");
+*/
+                            You("乱暴に押しのけられた！");
                             u.utrap = rn1(6, 2);
                             u.utraptype = TT_PIT; /* superfluous */
+#if 0 /*JP*/
                             losehp(Maybe_Half_Phys(rnd(keepfooting ? 2 : 4)),
                                    "hurt in a chasm", NO_KILLER_PREFIX);
+#else
+                            losehp(Maybe_Half_Phys(rnd(keepfooting ? 2 : 4)),
+                                   "地割れで傷ついて", NO_KILLER_PREFIX);
+#endif
                             if (keepfooting)
                                 exercise(A_DEX, TRUE);
                             else
+#if 0 /*JP*/
                                 selftouch(
                                     (Upolyd && (slithy(youmonst.data)
                                                 || nolimbs(youmonst.data)))
                                         ? "Shaken, you"
                                         : "Falling down, you");
+#else
+                                selftouch(
+                                    (Upolyd && (slithy(youmonst.data)
+                                                || nolimbs(youmonst.data)))
+                                        ? "揺さぶられて，あなたは"
+                                        : "落ちながら，あなたは");
+#endif
                         }
                     } else
                         newsym(x, y);
@@ -712,7 +728,10 @@ struct obj *instr;
                 || instr->otyp == TOOLED_HORN || instr->otyp == FROST_HORN
                 || instr->otyp == FIRE_HORN || instr->otyp == BUGLE)
                && !can_blow(&youmonst)) {
+/*JP
         You("are incapable of playing %s.", the(distant_name(instr, xname)));
+*/
+        You("%sを演奏する能力がない．", the(distant_name(instr, xname)));
         return 0;
     }
     if (instr->otyp != LEATHER_DRUM && instr->otyp != DRUM_OF_EARTHQUAKE) {

--- a/src/o_init.c
+++ b/src/o_init.c
@@ -493,11 +493,15 @@ oclass_to_name(oclass, buf)
 char oclass;
 char *buf;
 {
+#if 0 /*JP*//*使わない*/
     char *s;
+#endif
 
     Strcpy(buf, let_to_name(oclass, FALSE, FALSE));
+#if 0 /*JP*//*小文字化しない*/
     for (s = buf; *s; ++s)
         *s = lowc(*s);
+#endif
     return buf;
 }
 
@@ -506,10 +510,22 @@ int
 doclassdisco()
 {
     static NEARDATA const char
+/*JP
         prompt[] = "View discoveries for which sort of objects?",
+*/
+        prompt[] = "どの種類の発見物を見ますか？",
+/*JP
         havent_discovered_any[] = "haven't discovered any %s yet.",
+*/
+        havent_discovered_any[] = "まだ何も%sを発見していない．",
+/*JP
         unique_items[] = "unique items",
+*/
+        unique_items[] = "特殊アイテム",
+/*JP
         artifact_items[] = "artifacts";
+*/
+        artifact_items[] = "聖器";
     char *s, c, oclass, menulet, allclasses[MAXOCLASSES],
         discosyms[2 + MAXOCLASSES + 1], buf[BUFSZ];
     int i, ct, dis, xtras;
@@ -573,7 +589,10 @@ doclassdisco()
 
     /* there might not be anything for us to do... */
     if (!discosyms[0]) {
+/*JP
         You(havent_discovered_any, "items");
+*/
+        You(havent_discovered_any, "アイテム");
         if (tmpwin != WIN_ERR)
             destroy_nhwindow(tmpwin);
         return 0;
@@ -645,7 +664,10 @@ doclassdisco()
         break;
     default:
         oclass = def_char_to_objclass(c);
+/*JP
         Sprintf(buf, "Discovered %s", let_to_name(oclass, FALSE, FALSE));
+*/
+        Sprintf(buf, "発見した%s", let_to_name(oclass, FALSE, FALSE));
         putstr(tmpwin, iflags.menu_headings, buf);
         for (i = bases[(int) oclass];
              i < NUM_OBJECTS && objects[i].oc_class == oclass; ++i) {
@@ -716,11 +738,20 @@ rename_disco()
         }
     }
     if (ct == 0) {
+/*JP
         You("haven't discovered anything yet...");
+*/
+        You("まだ何も発見していない．．．");
     } else if (mn == 0) {
+/*JP
         pline("None of your discoveries can be assigned names...");
+*/
+        pline("名前の付けられる発見物はない．．．");
     } else {
+/*JP
         end_menu(tmpwin, "Pick an object type to name");
+*/
+        end_menu(tmpwin, "名前を付けるオブジェクトの種類を選んでください");
         dis = STRANGE_OBJECT;
         sl = select_menu(tmpwin, PICK_ONE, &selected);
         if (sl > 0) {

--- a/src/objnam.c
+++ b/src/objnam.c
@@ -56,6 +56,7 @@ struct Jitem {
              && typ != SAPPHIRE && typ != BLACK_OPAL && typ != EMERALD \
              && typ != OPAL)))
 
+#if 0 /*JP*/
 STATIC_OVL struct Jitem Japanese_items[] = { { SHORT_SWORD, "wakizashi" },
                                              { BROADSWORD, "ninja-to" },
                                              { FLAIL, "nunchaku" },
@@ -69,6 +70,21 @@ STATIC_OVL struct Jitem Japanese_items[] = { { SHORT_SWORD, "wakizashi" },
                                              { FOOD_RATION, "gunyoki" },
                                              { POT_BOOZE, "sake" },
                                              { 0, "" } };
+#else
+STATIC_OVL struct Jitem Japanese_items[] = { { SHORT_SWORD, "脇差し" },
+                                             { BROADSWORD, "忍者刀" },
+                                             { FLAIL, "ヌンチャク" },
+                                             { GLAIVE, "なぎなた" },
+                                             { LOCK_PICK, "おさく" },
+                                             { WOODEN_HARP, "琴" },
+                                             { KNIFE, "刺刀" },
+                                             { PLATE_MAIL, "短甲" },
+                                             { HELMET, "兜" },
+                                             { LEATHER_GLOVES, "弓懸" },
+                                             { FOOD_RATION, "丸薬" },
+                                             { POT_BOOZE, "酒" },
+                                             { 0, "" } };
+#endif
 
 STATIC_DCL const char *FDECL(Japanese_item_name, (int i));
 
@@ -834,7 +850,10 @@ unsigned cxn_flags; /* bitmask of CXN_xxx values */
     if (obj->otyp == T_SHIRT && program_state.gameover) {
         char tmpbuf[BUFSZ];
 
+/*JP
         Sprintf(eos(buf), " with text \"%s\"", tshirt_text(obj, tmpbuf));
+*/
+        Sprintf(eos(buf), "(「%s」と書いてある)", tshirt_text(obj, tmpbuf));
     }
 
 #if 0 /*JP*/
@@ -894,8 +913,13 @@ struct obj *obj;
         bareobj.spe = obj->spe;
 
     bufp = distant_name(&bareobj, xname); /* xname(&bareobj) */
+#if 0 /*JP*/
     if (!strncmp(bufp, "uncursed ", 9))
         bufp += 9; /* Role_if(PM_PRIEST) */
+#else
+    if (!strncmp(bufp, "呪われていない", 14))
+        bufp += 14; /* Role_if(PM_PRIEST) */
+#endif
 
     objects[otyp].oc_uname = saveobcls.oc_uname;
     objects[otyp].oc_name_known = saveobcls.oc_name_known;
@@ -2914,6 +2938,8 @@ STATIC_OVL NEARDATA const struct o_range o_ranges[] = {
     { "grey stone", GEM_CLASS, LUCKSTONE, FLINT },
 };
 
+
+#if 0 /*JP*//*not used*/
 /* alternate spellings; if the difference is only the presence or
    absence of spaces and/or hyphens (such as "pickaxe" vs "pick axe"
    vs "pick-axe") then there is no need for inclusion in this list;
@@ -2957,6 +2983,7 @@ struct alt_spellings {
     { "flintstone", FLINT },
     { (const char *) 0, 0 },
 };
+#endif
 
 short
 rnd_otyp_by_wpnskill(skill)
@@ -3274,6 +3301,7 @@ struct obj *no_wish;
         contents = SPINACH;
     }
 
+#if 0 /*JP*//*日本語では処理しない*/
     /*
     Skip over "pair of ", "pairs of", "set of" and "sets of".
 
@@ -3298,7 +3326,9 @@ struct obj *no_wish;
     } else if (!strncmpi(bp, "sets of ", 8)) {
         bp += 8;
     }
+#endif
 
+#if 0 /*JP*//*日本語では処理しない*/
     /* intercept pudding globs here; they're a valid wish target,
      * but we need them to not get treated like a corpse.
      *
@@ -3330,6 +3360,7 @@ struct obj *no_wish;
                 *p = 0;
         }
     }
+#endif
     /* Find corpse type w/o "of" (red dragon scale mail, yeti corpse) */
     if (strncmpi(bp, "samurai sword", 13))   /* not the "samurai" monster! */
         if (strncmpi(bp, "wizard lock", 11)) /* not the "wizard" monster! */
@@ -3361,6 +3392,7 @@ struct obj *no_wish;
                             }
                         }
 
+#if 0 /*JP*//*単数化はしない*/
     /* first change to singular if necessary */
     if (*bp) {
         char *sng = makesingular(bp);
@@ -3370,7 +3402,9 @@ struct obj *no_wish;
             Strcpy(bp, sng);
         }
     }
+#endif
 
+#if 0 /*JP*//*スペル揺れ処理はしない*/
     /* Alternate spellings (pick-ax, silver sabre, &c) */
     {
         struct alt_spellings *as = spellings;
@@ -3393,6 +3427,7 @@ struct obj *no_wish;
                 ++p; /* self terminating */
         }
     }
+#endif
 
     /* dragon scales - assumes order of dragons */
     if (!strcmpi(bp, "scales") && mntmp >= PM_GRAY_DRAGON
@@ -3403,6 +3438,7 @@ struct obj *no_wish;
     }
 
     p = eos(bp);
+#if 0 /*JP*/
     if (!BSTRCMPI(bp, p - 10, "holy water")) {
         typ = POT_WATER;
         if ((p - bp) >= 12 && *(p - 12) == 'u')
@@ -3411,11 +3447,31 @@ struct obj *no_wish;
             blessed = 1;
         goto typfnd;
     }
+#else /*JP:聖水と不浄な水を別に判定*/
+    if (!BSTRCMPI(bp, p - 4, "聖水")) {
+        typ = POT_WATER;
+	blessed = 1;
+        goto typfnd;
+    }
+    if (!BSTRCMPI(bp, p - 4, "不浄な水")) {
+        typ = POT_WATER;
+	iscursed = 1;
+        goto typfnd;
+    }
+#endif
+#if 0 /*JP*/
     if (unlabeled && !BSTRCMPI(bp, p - 6, "scroll")) {
+#else
+    if (unlabeled && !BSTRCMPI(bp, p - 4, "巻物")) {
+#endif
         typ = SCR_BLANK_PAPER;
         goto typfnd;
     }
+#if 0 /*JP*/
     if (unlabeled && !BSTRCMPI(bp, p - 9, "spellbook")) {
+#else
+    if (unlabeled && !BSTRCMPI(bp, p - 6, "魔法書")) {
+#endif
         typ = SPE_BLANK_PAPER;
         goto typfnd;
     }
@@ -3425,9 +3481,14 @@ struct obj *no_wish;
      * gold/money concept.  Maybe we want to add other monetary units as
      * well in the future. (TH)
      */
+#if 0 /*JP*/
     if (!BSTRCMPI(bp, p - 10, "gold piece") || !BSTRCMPI(bp, p - 7, "zorkmid")
         || !strcmpi(bp, "gold") || !strcmpi(bp, "money")
         || !strcmpi(bp, "coin") || *bp == GOLD_SYM) {
+#else
+    if (!BSTRCMPI(bp, p - 4, "金貨") || !BSTRCMPI(bp, p - 8, "ゴールド")
+        || *bp == GOLD_SYM) {
+#endif
         if (cnt > 5000 && !wizard)
             cnt = 5000;
         else if (cnt < 1)
@@ -3622,7 +3683,11 @@ srch:
         Strcat(bp, " mail");
         goto retry;
     }
+#if 0 /*JP*/
     if (!strcmpi(bp, "spinach")) {
+#else
+    if (!strcmp(bp, "ホウレン草")) {
+#endif
         contents = SPINACH;
         typ = TIN;
         goto typfnd;

--- a/src/options.c
+++ b/src/options.c
@@ -2,6 +2,11 @@
 /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
 /* NetHack may be freely redistributed.  See license for details. */
 
+/* JNetHack Copyright */
+/* (c) Issei Numata, Naoki Hamada, Shigehiro Miyashita, 1994-2000  */
+/* For 3.4-, Copyright (c) SHIRAKATA Kentaro, 2002-2016            */
+/* JNetHack may be freely redistributed.  See license for details. */
+
 #ifdef OPTION_LISTS_ONLY /* (AMIGA) external program for opt lists */
 #include "config.h"
 #include "objclass.h"
@@ -478,8 +483,13 @@ static struct Comp_Opt {
     { "hicolor",  "パレットが同じとき、指示したものだけ反転させる", 15, SET_IN_FILE },
 #endif
 #endif
+#if 0 /*JP*/
     { "paranoid_confirmation", "extra prompting in certain situations", 28,
       SET_IN_GAME },
+#else
+    { "paranoid_confirmation", "一部の状況で追加の確認をする", 28,
+      SET_IN_GAME },
+#endif
 /*JP
     { "pettype", "your preferred initial pet type", 4, DISP_IN_GAME },
 */
@@ -494,10 +504,20 @@ static struct Comp_Opt {
 */
     { "pickup_types", "自動で拾いあげる物のシンボル",
       MAXOCLASSES, SET_IN_GAME },
+#if 0 /*JP*/
     { "pile_limit", "threshold for \"there are many objects here\"", 24,
       SET_IN_GAME },
+#else
+    { "pile_limit", "「ここにはたくさんのものがある」のしきい値", 24,
+      SET_IN_GAME },
+#endif
+#if 0 /*JP*/
     { "playmode", "normal play, non-scoring explore mode, or debug mode", 8,
       DISP_IN_GAME },
+#else
+    { "playmode", "通常モード，探検モード，デバッグモードのいずれか", 8,
+      DISP_IN_GAME },
+#endif
 /*JP
     { "player_selection", "choose character via dialog or prompts", 12,
 */
@@ -533,7 +553,10 @@ static struct Comp_Opt {
 */
     { "scroll_margin", "マップ端からのマップスクロール開始距離", 20,
       DISP_IN_GAME }, /*WC*/
+/*JP
     { "sortloot", "sort object selection lists by description", 4,
+*/
+    { "sortloot", "物体選択リストを説明でソートする", 4,
       SET_IN_GAME },
 #ifdef MSDOS
 /*JP
@@ -541,11 +564,22 @@ static struct Comp_Opt {
 */
     { "soundcard", "使用しているサウンドカードの種類", 20, SET_IN_FILE },
 #endif
+#if 0 /*JP*/
     { "symset", "load a set of display symbols from the symbols file", 70,
       SET_IN_GAME },
+#else
+    { "symset", "symbolsファイルから表示シンボルの設定を読み込む", 70,
+      SET_IN_GAME },
+#endif
+#if 0 /*JP*/
     { "roguesymset",
       "load a set of rogue display symbols from the symbols file", 70,
       SET_IN_GAME },
+#else
+    { "roguesymset",
+      "symbolsファイルからローグレベルの表示シンボルの設定を読み込む", 70,
+      SET_IN_GAME },
+#endif
 /*JP
     { "suppress_alert", "suppress alerts about version-specific features", 8,
 */
@@ -611,13 +645,25 @@ static struct Comp_Opt {
 */
     { "windowtype", "使用するウインドウシステム", WINTYPELEN, DISP_IN_GAME },
 #ifdef WINCHAIN
+/*JP
     { "windowchain", "window processor to use", WINTYPELEN, SET_IN_SYS },
+*/
+    { "windowchain", "使用するウィンドウプロセッサ", WINTYPELEN, SET_IN_SYS },
 #endif
 #ifdef BACKWARD_COMPAT
+/*JP
     { "DECgraphics", "load DECGraphics display symbols", 70, SET_IN_FILE },
+*/
+    { "DECgraphics", "DECGraphics表示シンボルを読み込む", 70, SET_IN_FILE },
+/*JP
     { "IBMgraphics", "load IBMGraphics display symbols", 70, SET_IN_FILE },
+*/
+    { "IBMgraphics", "IBMGraphics表示シンボルを読み込む", 70, SET_IN_FILE },
 #ifdef MAC_GRAPHICS_ENV
+/*JP
     { "Macgraphics", "load MACGraphics display symbols", 70, SET_IN_FILE },
+*/
+    { "Macgraphics", "MACGraphics表示シンボルを読み込む", 70, SET_IN_FILE },
 #endif
 #endif
 #if 1 /*JP*/

--- a/src/pager.c
+++ b/src/pager.c
@@ -2,6 +2,11 @@
 /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
 /* NetHack may be freely redistributed.  See license for details. */
 
+/* JNetHack Copyright */
+/* (c) Issei Numata, Naoki Hamada, Shigehiro Miyashita, 1994-2000  */
+/* For 3.4-, Copyright (c) SHIRAKATA Kentaro, 2002-2016            */
+/* JNetHack may be freely redistributed.  See license for details. */
+
 /* This file contains the command routines dowhatis() and dohelp() and */
 /* a few other help related facilities */
 
@@ -367,6 +372,7 @@ char *buf, *monbuf;
                 how |= 4;
 
             if (how)
+#if 0 /*JP*/
                 Sprintf(
                     eos(buf), " [seen: %s%s%s%s%s]",
                     (how & 1) ? "infravision" : "",
@@ -375,6 +381,16 @@ char *buf, *monbuf;
                     /* add comma if detect and (infrav or telep or both) */
                     ((how & 7) > 4) ? ", " : "",
                     (how & 4) ? "monster detection" : "");
+#else
+                Sprintf(
+                    eos(buf), " [感知: %s%s%s%s%s]",
+                    (how & 1) ? "赤外線" : "",
+                    /* add comma if telep and infrav */
+                    ((how & 3) > 2) ? ", " : "", (how & 2) ? "テレパシー" : "",
+                    /* add comma if detect and (infrav or telep or both) */
+                    ((how & 7) > 4) ? ", " : "",
+                    (how & 4) ? "怪物感知" : "");
+#endif
         }
     } else if (u.uswallow) {
         /* all locations when swallowed other than the hero are the monster */
@@ -971,15 +987,24 @@ coord *click_cc;
                versions: "Specify unknown object by cursor?" */
             add_menu(win, NO_GLYPH, &any,
                      flags.lootabc ? 0 : any.a_char, 'y', ATR_NONE,
+/*JP
                      "something on the map", MENU_UNSELECTED);
+*/
+                     "地図上にあるもの", MENU_UNSELECTED);
             any.a_char = 'i';
             add_menu(win, NO_GLYPH, &any,
                      flags.lootabc ? 0 : any.a_char, 0, ATR_NONE,
+/*JP
                      "something you're carrying", MENU_UNSELECTED);
+*/
+                     "あなたが持っているもの", MENU_UNSELECTED);
             any.a_char = '?';
             add_menu(win, NO_GLYPH, &any,
                      flags.lootabc ? 0 : any.a_char, 'n', ATR_NONE,
+/*JP
                      "something else (by symbol or name)", MENU_UNSELECTED);
+*/
+                     "それ以外(シンボルか名前で指定)", MENU_UNSELECTED);
             if (!u.uswallow && !Hallucination) {
                 any = zeroany;
                 add_menu(win, NO_GLYPH, &any, 0, 0, ATR_NONE,
@@ -992,21 +1017,36 @@ coord *click_cc;
                 any.a_char = 'm';
                 add_menu(win, NO_GLYPH, &any,
                          flags.lootabc ? 0 : any.a_char, 0, ATR_NONE,
+/*JP
                          "nearby monsters", MENU_UNSELECTED);
+*/
+                         "近くにいる怪物", MENU_UNSELECTED);
                 any.a_char = 'M';
                 add_menu(win, NO_GLYPH, &any,
                          flags.lootabc ? 0 : any.a_char, 0, ATR_NONE,
+/*JP
                          "all monsters shown on map", MENU_UNSELECTED);
+*/
+                         "地図上にいる全ての怪物", MENU_UNSELECTED);
                 any.a_char = 'o';
                 add_menu(win, NO_GLYPH, &any,
                          flags.lootabc ? 0 : any.a_char, 0, ATR_NONE,
+/*JP
                          "nearby objects", MENU_UNSELECTED);
+*/
+                         "近くにあるもの", MENU_UNSELECTED);
                 any.a_char = 'O';
                 add_menu(win, NO_GLYPH, &any,
                          flags.lootabc ? 0 : any.a_char, 0, ATR_NONE,
+/*JP
                          "all objects shown on map", MENU_UNSELECTED);
+*/
+                         "地図上にある全てのもの", MENU_UNSELECTED);
             }
+/*JP
             end_menu(win, "What do you want to look at:");
+*/
+            end_menu(win, "何を見る？");
             if (select_menu(win, PICK_ONE, &pick_list) > 0) {
                 i = pick_list->item.a_char;
                 free((genericptr_t) pick_list);
@@ -1226,9 +1266,15 @@ boolean do_mons; /* True => monsters, False => objects */
     if (count)
         display_nhwindow(win, TRUE);
     else
+#if 0 /*JP*/
         pline("No %s are currently shown %s.",
               do_mons ? "monsters" : "objects",
               nearby ? "nearby" : "on the map");
+#else
+        pline("今のところ%sに%s．",
+              nearby ? "近く" : "地図上",
+              do_mons ? "怪物はいない" : "ものはない");
+#endif
     destroy_nhwindow(win);
 }
 

--- a/src/pickup.c
+++ b/src/pickup.c
@@ -75,15 +75,15 @@ static NEARDATA struct obj *current_container;
 /*JP
 static const char moderateloadmsg[] = "You have a little trouble lifting";
 */
-static const char moderateloadmsg[] = "を持ったら少しふらついた．";
+static const char moderateloadmsg[] = "を持ったら少しふらついた";
 /*JP
 static const char nearloadmsg[] = "You have much trouble lifting";
 */
-static const char nearloadmsg[] = "はずっしりと肩にのしかかった．";
+static const char nearloadmsg[] = "はずっしりと肩にのしかかった";
 /*JP
 static const char overloadmsg[] = "You have extreme difficulty lifting";
 */
-static const char overloadmsg[] = "を持ちあげるのはとてもつらい．";
+static const char overloadmsg[] = "を持ちあげるのはとてもつらい";
 
 /* BUG: this lets you look at cockatrice corpses while blind without
    touching them */
@@ -945,8 +945,13 @@ boolean FDECL((*allow), (OBJ_P)); /* allow function */
 
         any = zeroany;
         if (sorted && n > 1) {
+#if 0 /*JP*/
             Sprintf(buf, "%s Creatures",
                     is_animal(u.ustuck->data) ? "Swallowed" : "Engulfed");
+#else
+            Sprintf(buf, "%s込まれている怪物",
+                    is_animal(u.ustuck->data) ? "飲み" : "巻き");
+#endif
             add_menu(win, NO_GLYPH, &any, 0, 0, iflags.menu_headings, buf,
                      MENU_UNSELECTED);
         }
@@ -1183,7 +1188,7 @@ int how;               /* type of query */
 /*JP
                  "Items of unknown B/C/U status", MENU_UNSELECTED);
 */
-                        "祝福／呪いがわからないもの", MENU_UNSELECTED);
+                 "祝福／呪いがわからないもの", MENU_UNSELECTED);
     }
     end_menu(win, qstr);
     n = select_menu(win, how, pick_list);
@@ -1360,7 +1365,7 @@ int *wt_before, *wt_after;
                 (qq == 1L) ? "one" : "some", obj_nambuf, where);
 #else
             You("%s%sのうちの%sしか%s．",
-                where, obj_nambuf, (qq == 1L) ? "１つ" : "いくつか", verb);
+                where, obj_nambuf, (qq == 1L) ? "一つ" : "いくつか", verb);
 #endif
         *wt_after = wt;
         return qq;
@@ -1465,19 +1470,41 @@ boolean telekinesis;
                 result = 0; /* don't lift */
             } else {
                 char qbuf[BUFSZ];
+#if 1 /*JP*/
+                char qsfx[BUFSZ];
+#endif
                 long savequan = obj->quan;
 
                 obj->quan = *cnt_p;
+#if 0 /*JP*/
                 Strcpy(qbuf, (next_encumbr > HVY_ENCUMBER)
                                  ? overloadmsg
                                  : (next_encumbr > MOD_ENCUMBER)
                                        ? nearloadmsg
                                        : moderateloadmsg);
+#else
+                /*JP:アイテム名の後ろに付けたいがsafe_qbufのqsuffixは
+                     qbufと共用できないので別にqsfxを用意してそちらを使う*/
+                Strcpy(qsfx, (next_encumbr > HVY_ENCUMBER)
+                                 ? overloadmsg
+                                 : (next_encumbr > MOD_ENCUMBER)
+                                       ? nearloadmsg
+                                       : moderateloadmsg);
+                Strcat(qsfx, "．続けますか？");
+#endif
+
+#if 0 /*JP*//*日本語ではどちらも「持つ」で済ませる*/
                 if (container)
                     (void) strsubst(qbuf, "lifting", "removing");
+#endif
+#if 0 /*JP*/
                 Strcat(qbuf, " ");
                 (void) safe_qbuf(qbuf, qbuf, ".  Continue?", obj, doname,
                                  ansimpleoname, something);
+#else /*JP:前には何も付けず後ろにqsfxを付ける*/
+                (void) safe_qbuf(qbuf, "", qsfx, obj, doname,
+                                 ansimpleoname, "これ");
+#endif
                 obj->quan = savequan;
                 switch (ynq(qbuf)) {
                 case 'q':
@@ -1817,7 +1844,7 @@ doloot()
     int timepassed = 0;
     coord cc;
     boolean underfoot = TRUE;
-#if 0 /*JP*/
+#if 0 /*JP*//*not used*/
     const char *dont_find_anything = "don't find anything";
 #endif
     struct monst *mtmp;
@@ -1842,7 +1869,10 @@ doloot()
         if (rn2(6) && reverse_loot())
             return 1;
         if (rn2(2)) {
+/*JP
             pline("Being confused, you find nothing to loot.");
+*/
+            pline("混乱しているので，開けるものを見つけられない．");
             return 1; /* costs a turn */
         }             /* else fallthrough to normal looting */
     }
@@ -2029,7 +2059,10 @@ reverse_loot()
          */
         for (n = inv_cnt(TRUE), otmp = invent; otmp; --n, otmp = otmp->nobj)
             if (!rn2(n + 1)) {
+/*JP
                 prinv("You find old loot:", otmp, 0L);
+*/
+                prinv("以前開けたもの:", otmp, 0L);
                 return TRUE;
             }
         return FALSE;
@@ -2094,7 +2127,10 @@ reverse_loot()
             if (!rn2(10))
                 levl[x][y].looted = T_LOOTED;
         } else {
+/*JP
             You("drop %s.", doname(goldob));
+*/
+            You("%sを落した．", doname(goldob));
             dropx(goldob);
         }
     }
@@ -2718,12 +2754,23 @@ int held;
     for (;;) { /* repeats if '?' or ":' gets chosen */
         outmaybe = (outokay || !current_container->cknown);
         if (!outmaybe)
+#if 0 /*JP*/
             (void) safe_qbuf(qbuf, (char *) 0, " is empty.  Do what with it?",
                              current_container, Yname2, Ysimple_name2,
                              "This");
+#else
+            (void) safe_qbuf(qbuf, (char *) 0, "は空だ．どうする？",
+                             current_container, Yname2, Ysimple_name2,
+                             "これ");
+#endif
         else
+#if 0 /*JP*/
             (void) safe_qbuf(qbuf, "Do what with ", "?", current_container,
                              yname, ysimple_name, "it");
+#else
+            (void) safe_qbuf(qbuf, (char *) 0, "をどうする？", current_container,
+                             yname, ysimple_name, "これ");
+#endif
         /* ask player about what to do with this container */
         if (flags.menu_style == MENU_FULL) {
             if (!inokay && !outmaybe) {
@@ -2786,8 +2833,12 @@ int held;
 
     if ((loot_in || stash_one)
         && (!invent || (invent == current_container && !invent->nobj))) {
+#if 0 /*JP*/
         You("don't have anything%s to %s.", invent ? " else" : "",
             stash_one ? "stash" : "put in");
+#else
+        You("%s入れるものがない．", invent ? "他に" : "");
+#endif
         loot_in = stash_one = FALSE;
     }
 
@@ -2866,12 +2917,18 @@ boolean put_in;
     int used = 0, menu_on_request = 0;
 
     if (put_in) {
+/*JP
         action = "put in";
+*/
+        action = "入れる";
         objlist = &invent;
         actionfunc = in_container;
         checkfunc = ck_bag;
     } else {
+/*JP
         action = "take out";
+*/
+        action = "取り出す";
         objlist = &(current_container->cobj);
         actionfunc = out_container;
         checkfunc = (int FDECL((*), (OBJ_P))) 0;
@@ -2897,7 +2954,10 @@ boolean put_in;
     int n, i, n_looted = 0;
     boolean all_categories = TRUE, loot_everything = FALSE;
     char buf[BUFSZ];
+/*JP
     const char *action = put_in ? "Put in" : "Take out";
+*/
+    const char *action = put_in ? "入れる" : "取り出す";
     struct obj *otmp, *otmp2;
     menu_item *pick_list;
     int mflags, res;
@@ -2907,7 +2967,10 @@ boolean put_in;
         all_categories = (retry == -2);
     } else if (flags.menu_style == MENU_FULL) {
         all_categories = FALSE;
+/*JP
         Sprintf(buf, "%s what type of objects?", action);
+*/
+        Sprintf(buf, "どの種類のものを%s？", action);
         mflags = put_in
                      ? ALL_TYPES | BUC_ALLBKNOWN | BUC_UNKNOWN
                      : ALL_TYPES | CHOOSE_ALL | BUC_ALLBKNOWN | BUC_UNKNOWN;
@@ -2940,7 +3003,10 @@ boolean put_in;
             mflags |= USE_INVLET;
         if (!put_in)
             current_container->cknown = 1;
+/*JP
         Sprintf(buf, "%s what?", action);
+*/
+        Sprintf(buf, "何を%s？", action);
         n = query_objlist(buf, put_in ? invent : current_container->cobj,
                           mflags, &pick_list, PICK_ANY,
                           all_categories ? allow_all : allow_category);
@@ -2992,40 +3058,63 @@ boolean outokay, inokay, alreadyused;
     start_menu(win);
 
     any.a_int = 1; /* ':' */
+/*JP
     Sprintf(buf, "Look inside %s", thesimpleoname(obj));
+*/
+    Sprintf(buf, "%sの中身を見る", thesimpleoname(obj));
     add_menu(win, NO_GLYPH, &any, menuselector[any.a_int], 0, ATR_NONE, buf,
              MENU_UNSELECTED);
     if (outokay) {
         any.a_int = 2; /* 'o' */
+/*JP
         Sprintf(buf, "take %s out", something);
+*/
+        Strcpy(buf, "何かを取り出す");
         add_menu(win, NO_GLYPH, &any, menuselector[any.a_int], 0, ATR_NONE,
                  buf, MENU_UNSELECTED);
     }
     if (inokay) {
         any.a_int = 3; /* 'i' */
+/*JP
         Sprintf(buf, "put %s in", something);
+*/
+        Strcpy(buf, "何かを入れる");
         add_menu(win, NO_GLYPH, &any, menuselector[any.a_int], 0, ATR_NONE,
                  buf, MENU_UNSELECTED);
     }
     if (outokay) {
         any.a_int = 4; /* 'b' */
+/*JP
         Sprintf(buf, "%stake out, then put in", inokay ? "both; " : "");
+*/
+        Sprintf(buf, "%sまず取り出す，それから入れる", inokay ? "両方; " : "");
         add_menu(win, NO_GLYPH, &any, menuselector[any.a_int], 0, ATR_NONE,
                  buf, MENU_UNSELECTED);
     }
     if (inokay) {
         any.a_int = 5; /* 'r' */
+#if 0 /*JP*/
         Sprintf(buf, "%sput in, then take out",
                 outokay ? "both reversed; " : "");
+#else
+        Sprintf(buf, "%sまず入れる，それから取り出す",
+                outokay ? "両方を逆順で; " : "");
+#endif
         add_menu(win, NO_GLYPH, &any, menuselector[any.a_int], 0, ATR_NONE,
                  buf, MENU_UNSELECTED);
         any.a_int = 6; /* 's' */
+/*JP
         Sprintf(buf, "stash one item into %s", thesimpleoname(obj));
+*/
+        Sprintf(buf, "ものを一つだけ%sに入れる", thesimpleoname(obj));
         add_menu(win, NO_GLYPH, &any, menuselector[any.a_int], 0, ATR_NONE,
                  buf, MENU_UNSELECTED);
     }
     any.a_int = 7; /* 'q' */
+/*JP
     Strcpy(buf, alreadyused ? "done" : "do nothing");
+*/
+    Strcpy(buf, alreadyused ? "終わる" : "何もしない");
     add_menu(win, NO_GLYPH, &any, menuselector[any.a_int], 0, ATR_NONE, buf,
              MENU_SELECTED);
 
@@ -3062,8 +3151,12 @@ 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*/
         Sprintf(buf, "You can't tip %s while carrying so much.",
                 !flags.verbose ? "a container" : (boxes > 1) ? "one" : "it");
+#else
+        Strcpy(buf, "たくさんものを持ちすぎているのでひっくりかえせない．");
+#endif
         if (!check_capacity(buf) && able_to_loot(cc.x, cc.y, FALSE)) {
             if (boxes > 1 && (flags.menu_style != MENU_TRADITIONAL
                               || iflags.menu_requested)) {
@@ -3124,9 +3217,15 @@ dotip()
                     nobj = cobj->nexthere;
                     if (!Is_container(cobj))
                         continue;
+#if 0 /*JP*/
                     c = ynq(safe_qbuf(qbuf, "There is ", " here, tip it?",
                                       cobj,
                                       doname, ansimpleoname, "container"));
+#else
+                    c = ynq(safe_qbuf(qbuf, "ここには", " がある，ひっくり返す?",
+                                      cobj,
+                                      doname, ansimpleoname, "入れ物"));
+#endif
                     if (c == 'q')
                         return 0;
                     if (c == 'n')
@@ -3152,30 +3251,57 @@ dotip()
     /* assorted other cases */
     if (Is_candle(cobj) && cobj->lamplit) {
         /* note "wax" even for tallow candles to avoid giving away info */
+/*JP
         spillage = "wax";
+*/
+        spillage = "ろう";
     } else if ((cobj->otyp == POT_OIL && cobj->lamplit)
                || (cobj->otyp == OIL_LAMP && cobj->age != 0L)
                || (cobj->otyp == MAGIC_LAMP && cobj->spe != 0)) {
+/*JP
         spillage = "oil";
+*/
+        spillage = "油";
         /* todo: reduce potion's remaining burn timer or oil lamp's fuel */
     } else if (cobj->otyp == CAN_OF_GREASE && cobj->spe > 0) {
         /* charged consumed below */
+/*JP
         spillage = "grease";
+*/
+        spillage = "脂";
     } else if (cobj->otyp == FOOD_RATION || cobj->otyp == CRAM_RATION
                || cobj->otyp == LEMBAS_WAFER) {
+/*JP
         spillage = "crumbs";
+*/
+        spillage = "パンくず";
     } else if (cobj->oclass == VENOM_CLASS) {
+/*JP
         spillage = "venom";
+*/
+        spillage = "毒液";
     }
     if (spillage) {
         buf[0] = '\0';
         if (is_pool(u.ux, u.uy))
+/*JP
             Sprintf(buf, " and gradually %s", vtense(spillage, "dissipate"));
+*/
+            Strcpy(buf, "そして徐々に散っていった．");
         else if (is_lava(u.ux, u.uy))
+#if 0 /*JP*/
             Sprintf(buf, " and immediately %s away",
                     vtense(spillage, "burn"));
+#else
+            Strcpy(buf, "そしてすぐに燃えつきた．");
+#endif
+#if 0 /*JP*/
         pline("Some %s %s onto the %s%s.", spillage,
               vtense(spillage, "spill"), surface(u.ux, u.uy), buf);
+#else
+        pline("%sが%sの上に飛び散った．%s", spillage,
+              surface(u.ux, u.uy), buf);
+#endif
         /* shop usage message comes after the spill message */
         if (cobj->otyp == CAN_OF_GREASE && cobj->spe > 0) {
             consume_obj_charge(cobj, TRUE);
@@ -3185,7 +3311,10 @@ dotip()
     }
     /* anything not covered yet */
     if (cobj->oclass == POTION_CLASS) /* can't pour potions... */
+/*JP
         pline_The("%s %s securely sealed.", xname(cobj), otense(cobj, "are"));
+*/
+        pline_The("%sはしっかりと栓がされている．", xname(cobj));
     else if (cobj->otyp == STATUE)
 /*JP
         pline("Nothing interesting happens.");
@@ -3221,7 +3350,10 @@ struct obj *box; /* or bag */
        non-standard "container" horn of plenty */
     box->lknown = 1;
     if (box->olocked) {
+/*JP
         pline("It's locked.");
+*/
+        pline("鍵が掛かっている．");
     } else if (box->otrapped) {
         /* we're not reaching inside but we're still handling it... */
         (void) chest_trap(box, HAND, FALSE);
@@ -3247,9 +3379,15 @@ struct obj *box; /* or bag */
 
         if (box->spe < old_spe) {
             if (bag)
+#if 0 /*JP*/
                 pline((seen == 0) ? "Nothing seems to happen."
                                   : (seen == 1) ? "A monster appears."
                                                 : "Monsters appear!");
+#else
+                pline((seen == 0) ? "何も起きなかったようだ．"
+                                  : (seen == 1) ? "怪物が現れた．"
+                                                : "怪物が現れた！");
+#endif
             /* check_unpaid wants to see a non-zero charge count */
             box->spe = old_spe;
             check_unpaid_usage(box, TRUE);
@@ -3264,13 +3402,19 @@ struct obj *box; /* or bag */
         observe_quantum_cat(box);
         if (!Has_contents(box)) /* evidently a live cat came out */
             /* container type of "large box" is inferred */
+/*JP
             pline("%sbox is now empty.", Shk_Your(yourbuf, box));
+*/
+            pline("%s箱は空になった．", Shk_Your(yourbuf, box));
         else /* holds cat corpse or other random stuff */
             empty_it = TRUE;
         box->cknown = 1;
     } else if (!Has_contents(box)) {
         box->cknown = 1;
+/*JP
         pline("It's empty.");
+*/
+        pline("これは空だ．");
     } else {
         empty_it = TRUE;
     }
@@ -3286,9 +3430,14 @@ struct obj *box; /* or bag */
         if (u.uswallow)
             highdrop = altarizing = FALSE;
         box->cknown = 1;
+#if 0 /*JP*/
         pline("%s out%c",
               box->cobj->nobj ? "Objects spill" : "An object spills",
               !(highdrop || altarizing) ? ':' : '.');
+#else
+        pline("中身が出てきた%s",
+              !(highdrop || altarizing) ? "：" : "．");
+#endif
         for (otmp = box->cobj; otmp; otmp = nobj) {
             nobj = otmp->nobj;
             obj_extract_self(otmp);
@@ -3311,17 +3460,28 @@ struct obj *box; /* or bag */
                 if (altarizing)
                     doaltarobj(otmp);
                 else if (verbose)
+#if 0 /*JP*/
                     pline("%s %s to the %s.", Doname2(otmp),
                           otense(otmp, "drop"), surface(ox, oy));
+#else
+                    pline("%sは%sの上に落ちた．", Doname2(otmp),
+                          surface(ox, oy));
+#endif
                 else
+/*JP
                     pline("%s%c", doname(otmp), nobj ? ',' : '.');
+*/
+                    pline("%s%s", doname(otmp), nobj ? "，" : "．");
                 dropy(otmp);
             }
             if (maybeshopgoods)
                 iflags.suppress_price--; /* reset */
         }
         if (loss) /* magic bag lost some shop goods */
+/*JP
             You("owe %ld %s for lost merchandise.", loss, currency(loss));
+*/
+            You("失ったものに対して%ld%sの負債を負った．", loss, currency(loss));
         box->owt = weight(box); /* mbag_item_gone() doesn't update this */
         if (held)
             (void) encumber_msg();

--- a/src/pline.c
+++ b/src/pline.c
@@ -2,6 +2,11 @@
 /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
 /* NetHack may be freely redistributed.  See license for details. */
 
+/* JNetHack Copyright */
+/* (c) Issei Numata, Naoki Hamada, Shigehiro Miyashita, 1994-2000  */
+/* For 3.4-, Copyright (c) SHIRAKATA Kentaro, 2002-2016            */
+/* JNetHack may be freely redistributed.  See license for details. */
+
 #define NEED_VARARGS /* Uses ... */ /* comment line for pre-compiled headers \
                                        */
 #include "hack.h"
@@ -493,6 +498,7 @@ register struct monst *mtmp;
     /* a stethoscope exposes mimic before getting here so this
        won't be relevant for it, but wand of probing doesn't */
     if (mtmp->m_ap_type)
+#if 0 /*JP*/
         Sprintf(eos(info), ", mimicking %s",
                 (mtmp->m_ap_type == M_AP_FURNITURE)
                     ? an(defsyms[mtmp->mappearance].explanation)
@@ -503,6 +509,18 @@ register struct monst *mtmp;
                           : (mtmp->m_ap_type == M_AP_MONSTER)
                                 ? an(mons[mtmp->mappearance].mname)
                                 : something); /* impossible... */
+#else
+        Sprintf(eos(info), ", %sのまねをしている",
+                (mtmp->m_ap_type == M_AP_FURNITURE)
+                    ? an(defsyms[mtmp->mappearance].explanation)
+                    : (mtmp->m_ap_type == M_AP_OBJECT)
+                          ? ((mtmp->mappearance == GOLD_PIECE)
+                                 ? "金貨"
+                                 : an(simple_typename(mtmp->mappearance)))
+                          : (mtmp->m_ap_type == M_AP_MONSTER)
+                                ? an(mons[mtmp->mappearance].mname)
+                                : something); /* impossible... */
+#endif
     if (mtmp->mcan)
 /*JP
         Strcat(info, ", cancelled");
@@ -820,19 +838,33 @@ struct obj *otmp2;
     if ((!Blind && visible) || inpack) {
         if (Hallucination) {
             if (onfloor) {
+/*JP
                 You_see("parts of the floor melting!");
+*/
+                You_see("床の一部が溶けているのを見た！");
             } else if (inpack) {
+/*JP
                 Your("pack reaches out and grabs something!");
+*/
+                Your("かばんが手を伸ばして何かをつかんだ！");
             }
             /* even though we can see where they should be,
              * they'll be out of our view (minvent or container)
              * so don't actually show anything */
         } else if (onfloor || inpack) {
+#if 0 /*JP*/
             pline("The %s coalesce%s.", makeplural(obj_typename(otmp->otyp)),
                   inpack ? " inside your pack" : "");
+#else
+            pline("%sが%s合体した．", obj_typename(otmp->otyp),
+                  inpack ? "あなたのかばんの中で" : "");
+#endif
         }
     } else {
+/*JP
         You_hear("a faint sloshing sound.");
+*/
+        You_hear("かすかなバシャバシャという音を聞いた．");
     }
 }
 

--- a/src/polyself.c
+++ b/src/polyself.c
@@ -133,9 +133,16 @@ boolean on;
            vulnerable form into another causes the counter to be reset */
         if (uamul && uamul->otyp == AMULET_OF_STRANGULATION
             && can_be_strangled(&youmonst)) {
+#if 0 /*JP*/
             Your("%s %s your %s!", simpleonames(uamul),
                  Strangled ? "still constricts" : "begins constricting",
                  body_part(NECK)); /* "throat" */
+#else
+            Your("%s%s%sを絞め%s！", simpleonames(uamul),
+                 Strangled ? "はまだ" : "が",
+                 body_part(NECK),
+                 Strangled ? "ている" : "はじめた");
+#endif
             Strangled = 6L;
             makeknown(AMULET_OF_STRANGULATION);
         }
@@ -144,7 +151,10 @@ boolean on;
     } else {
         if (Strangled && !can_be_strangled(&youmonst)) {
             Strangled = 0L;
+/*JP
             You("are no longer being strangled.");
+*/
+            You("もはや窒息していない．");
         }
     }
 }
@@ -407,7 +417,10 @@ int psflags;
             controllable_poly = Polymorph_control && !(Stunned || Unaware);
 
     if (Unchanging) {
+/*JP
         pline("You fail to transform!");
+*/
+        pline("あなたは変化に失敗した！");
         return;
     }
     /* being Stunned|Unaware doesn't negate this aspect of Poly_control */
@@ -498,7 +511,10 @@ int psflags;
                     pm_name = the(pm_name);
                 else if (!type_is_pname(&mons[mntmp]))
                     pm_name = an(pm_name);
+/*JP
                 You_cant("polymorph into %s.", pm_name);
+*/
+                You_cant("%sに変化できない．", pm_name);
             } else
                 break;
         } while (--tryct > 0);
@@ -530,13 +546,20 @@ int psflags;
                     /* similar to noarmor(invent.c),
                        shorten to "<color> scale mail" */
                     dsmail = strcpy(buf, simpleonames(uarm));
+#if 0 /*JP*/
                     if ((p = strstri(dsmail, " dragon ")) != 0)
                         while ((p[1] = p[8]) != '\0')
                             ++p;
+#endif
                     /* tricky phrasing; dragon scale mail
                        is singular, dragon scales are plural */
+#if 0 /*JP*/
                     Your("%s reverts to scales as you merge with them.",
                          dsmail);
+#else
+                    Your("%sは鱗に戻った．",
+                         dsmail);
+#endif
                     /* uarm->spe enchantment remains unchanged;
                        re-converting scales to mail poses risk
                        of evaporation due to over enchanting */
@@ -563,7 +586,10 @@ int psflags;
                             ? PM_WOLF
                             : !rn2(4) ? PM_FOG_CLOUD : PM_VAMPIRE_BAT;
             if (controllable_poly) {
+/*JP
                 Sprintf(buf, "Become %s?", an(mons[mntmp].mname));
+*/
+                Sprintf(buf, "%sになる？", mons[mntmp].mname);
                 if (yn(buf) != 'y')
                     return;
             }
@@ -805,9 +831,17 @@ int mntmp;
         if (touch_petrifies(u.usteed->data) && !Stone_resistance && rnl(3)) {
             char buf[BUFSZ];
 
+#if 0 /*JP*/
             pline("%s touch %s.", no_longer_petrify_resistant,
                   mon_nam(u.usteed));
+#else
+            pline("%sは%sに触れた．", no_longer_petrify_resistant,
+                  mon_nam(u.usteed));
+#endif
+/*JP
             Sprintf(buf, "riding %s", an(u.usteed->data->mname));
+*/
+            Sprintf(buf, "%sに乗って", u.usteed->data->mname);
             instapetrify(buf);
         }
         if (!can_ride(u.usteed))
@@ -1161,22 +1195,35 @@ int alone;
             candropwep = canletgo(uwep, "");
             candropswapwep = !u.twoweap || canletgo(uswapwep, "");
             if (alone) {
+#if 0 /*JP*/
                 what = (candropwep && candropswapwep) ? "drop" : "release";
+#endif
+/*JP
                 which = is_sword(uwep) ? "sword" : weapon_descr(uwep);
+*/
+                which = is_sword(uwep) ? "剣" : weapon_descr(uwep);
                 if (u.twoweap) {
                     whichtoo =
+/*JP
                         is_sword(uswapwep) ? "sword" : weapon_descr(uswapwep);
+*/
+                        is_sword(uswapwep) ? "剣" : weapon_descr(uswapwep);
                     if (strcmp(which, whichtoo))
+/*JP
                         which = "weapon";
+*/
+                        which = "武器";
                 }
+#if 0 /*JP*//*複数形にしない*/
                 if (uwep->quan != 1L || u.twoweap)
                     which = makeplural(which);
+#endif
 
 #if 0 /*JP*/
                 You("find you must %s %s %s!", what,
                     the_your[!!strncmp(which, "corpse", 6)], which);
 #else
-                You("%sを落としたことに気づいた！", what);
+                You("%sを落としたことに気づいた！", which);
 #endif
             }
             if (u.twoweap) {
@@ -1726,12 +1773,21 @@ dohide()
     /* can't hide while being held (or holding) or while trapped
        (except for floor hiders [trapper or mimic] in pits) */
     if (u.ustuck || (u.utrap && (u.utraptype != TT_PIT || on_ceiling))) {
+#if 0 /*JP*/
         You_cant("hide while you're %s.",
                  !u.ustuck ? "trapped" : !sticks(youmonst.data)
                                              ? "being held"
                                              : humanoid(u.ustuck->data)
                                                    ? "holding someone"
                                                    : "holding that creature");
+#else
+        You_cant("%s間は隠れられない．",
+                 !u.ustuck ? "捕まっている" : !sticks(youmonst.data)
+                                             ? "捕まえられている"
+                                             : humanoid(u.ustuck->data)
+                                                   ? "誰かをつかんでいる"
+                                                   : "怪物をつかんでいる");
+#endif
         if (u.uundetected
             || (ismimic && youmonst.m_ap_type != M_AP_NOTHING)) {
             u.uundetected = 0;
@@ -1744,26 +1800,41 @@ dohide()
        such critters aren't offered the option of hiding via #monster */
     if (youmonst.data->mlet == S_EEL && !is_pool(u.ux, u.uy)) {
         if (IS_FOUNTAIN(levl[u.ux][u.uy].typ))
+/*JP
             The("fountain is not deep enough to hide in.");
+*/
+            The("泉は隠れられるほど深くない．");
         else
+/*JP
             There("is no water to hide in here.");
+*/
+            There("ここには隠れるための水がない．");
         u.uundetected = 0;
         return 0;
     }
     if (hides_under(youmonst.data) && !level.objects[u.ux][u.uy]) {
+/*JP
         There("is nothing to hide under here.");
+*/
+        There("ここには隠れられるものがない．");
         u.uundetected = 0;
         return 0;
     }
     /* Planes of Air and Water */
     if (on_ceiling && !has_ceiling(&u.uz)) {
+/*JP
         There("is nowhere to hide above you.");
+*/
+        There("あなたの上には隠れられる場所がない．");
         u.uundetected = 0;
         return 0;
     }
     if ((is_hider(youmonst.data) && !Flying) /* floor hider */
         && (Is_airlevel(&u.uz) || Is_waterlevel(&u.uz))) {
+/*JP
         There("is nowhere to hide beneath you.");
+*/
+        There("あなたの下には隠れられる場所がない．");
         u.uundetected = 0;
         return 0;
     }
@@ -1795,7 +1866,10 @@ dopoly()
     if (is_vampire(youmonst.data)) {
         polyself(2);
         if (savedat != youmonst.data) {
+/*JP
             You("transform into %s.", an(youmonst.data->mname));
+*/
+            You("%sの姿になった．", youmonst.data->mname);
             newsym(u.ux, u.uy);
         }
     }
@@ -2145,7 +2219,10 @@ int part;
 #endif
     }
     if (mptr == &mons[PM_STALKER] && part == HEAD)
+/*JP
         return "head";
+*/
+        return "頭";
     if (mptr->mlet == S_EEL && mptr != &mons[PM_JELLYFISH])
         return fish_parts[part];
     if (mptr->mlet == S_WORM)

--- a/src/potion.c
+++ b/src/potion.c
@@ -484,11 +484,17 @@ boolean talk;
 
     if (!xtime && old) {
         if (talk)
+/*JP
             You("can hear again.");
+*/
+            You("また聞こえるようになった．");
         toggled = TRUE;
     } else if (xtime && !old) {
         if (talk)
+/*JP
             You("are unable to hear anything.");
+*/
+            You("何も聞こえなくなった．");
         toggled = TRUE;
     }
     /* deafness isn't presently shown on status line, but
@@ -1527,7 +1533,10 @@ const char *objphrase; /* "Your widget glows" or "Steed's saddle glows" */
     } else if (potion->cursed) {
         if (targobj->blessed) {
             func = unbless;
+/*JP
             glowcolor = "brown";
+*/
+            glowcolor = "茶色の";
             costchange = COST_UNBLSS;
         } else if (!targobj->cursed) {
             func = curse;
@@ -1549,10 +1558,19 @@ const char *objphrase; /* "Your widget glows" or "Steed's saddle glows" */
            is cleared instead of set if perception is distorted */
         if (useeit) {
             glowcolor = hcolor(glowcolor);
+            /*JP:3.6.0時点では動詞は"glow"だけなので決め撃ち*/
             if (altfmt)
+#if 0 /*JP*/
                 pline("%s with %s aura.", objphrase, an(glowcolor));
+#else
+                pline("%sは%sオーラにつつまれた．", objphrase, glowcolor);
+#endif
             else
+#if 0 /*JP*/
                 pline("%s %s.", objphrase, glowcolor);
+#else
+                pline("%sは%s輝いた．", objphrase, jconj_adj(glowcolor));
+#endif
             iflags.last_msg = PLNMSG_OBJ_GLOWS;
             targobj->bknown = !Hallucination;
         }
@@ -1702,7 +1720,10 @@ boolean your_fault;
 
         switch (obj->otyp) {
         case POT_WATER:
+/*JP
             Sprintf(saddle_glows, "%s %s", buf, aobjnam(saddle, "glow"));
+*/
+            Sprintf(saddle_glows, "%s", buf);
             affected = H2Opotion_dip(obj, saddle, useeit, saddle_glows);
             break;
         case POT_POLYMORPH:
@@ -1710,7 +1731,10 @@ boolean your_fault;
             break;
         }
         if (useeit && !affected)
+/*JP
             pline("%s %s wet.", buf, aobjnam(saddle, "get"));
+*/
+            pline("%sは濡れた．", buf);
     } else {
         boolean angermon = TRUE;
 
@@ -2233,8 +2257,8 @@ dodip()
 
 #if 0 /*JP*/
     Sprintf(qbuf, "dip %s into", thesimpleoname(obj));
-#else
-    Sprintf(qbuf, "%sを浸しますか", thesimpleoname(obj));
+#else /*JP:英語では何を浸すかを含めているが日本語では処理の都合でとりあえず省略*/
+    Sprintf(qbuf, "dip into");
 #endif
     here = levl[u.ux][u.uy].typ;
     /* Is there a fountain to dip into here? */
@@ -2288,7 +2312,11 @@ dodip()
     potion->in_use = TRUE; /* assume it will be used up */
     if (potion->otyp == POT_WATER) {
         boolean useeit = !Blind || (obj == ublindf && Blindfolded_only);
+#if 0 /*JP*/
         const char *obj_glows = Yobjnam2(obj, "glow");
+#else
+        const char *obj_glows = cxname(obj);
+#endif
 
         if (H2Opotion_dip(potion, obj, useeit, obj_glows))
             goto poof;
@@ -2452,22 +2480,35 @@ 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*/
         (void) hold_another_object(obj, "You drop %s!", doname(obj),
                                    (const char *) 0);
+#else
+        (void) hold_another_object(obj, "%sを落した！", doname(obj),
+                                   (const char *) 0);
+#endif
         return 1;
     }
 
     if (potion->otyp == POT_ACID && obj->otyp == CORPSE
         && obj->corpsenm == PM_LICHEN && !Blind) {
+#if 0 /*JP*/
         pline("%s %s %s around the edges.", The(cxname(obj)),
               otense(obj, "turn"),
               potion->odiluted ? hcolor(NH_ORANGE) : hcolor(NH_RED));
+#else
+        pline("%sはふちが%sなった．", The(cxname(obj)),
+              jconj_adj(potion->odiluted ? hcolor(NH_ORANGE) : hcolor(NH_RED)));
+#endif
         potion->in_use = FALSE; /* didn't go poof */
         return 1;
     }
 
     if (potion->otyp == POT_WATER && obj->otyp == TOWEL) {
-        pline_The("towel soaks it up!");
+/*JP
+        pline_The("towel soak up!");
+*/
+        pline_The("タオルは水を吸い込んだ！");
         /* wetting towel already done via water_damage() in H2Opotion_dip */
         goto poof;
     }

--- a/src/weapon.c
+++ b/src/weapon.c
@@ -119,29 +119,47 @@ struct obj *obj;
     case P_SLING:
         if (is_ammo(obj))
             descr = (obj->otyp == ROCK || is_graystone(obj))
+/*JP
                         ? "stone"
+*/
+                        ? "石"
                         /* avoid "rock"; what about known glass? */
                         : (obj->oclass == GEM_CLASS)
+/*JP
                             ? "gem"
+*/
+                            ? "宝石"
                             /* in case somebody adds odd sling ammo */
                             : def_oc_syms[(int) obj->oclass].name;
         break;
     case P_BOW:
         if (is_ammo(obj))
+/*JP
             descr = "arrow";
+*/
+            descr = "矢";
         break;
     case P_CROSSBOW:
         if (is_ammo(obj))
+/*JP
             descr = "bolt";
+*/
+            descr = "ボルト";
         break;
     case P_FLAIL:
         if (obj->otyp == GRAPPLING_HOOK)
+/*JP
             descr = "hook";
+*/
+            descr = "フック";
         break;
     case P_PICK_AXE:
         /* even if "dwarvish mattock" hasn't been discovered yet */
         if (obj->otyp == DWARVISH_MATTOCK)
+/*JP
             descr = "mattock";
+*/
+            descr = "つるはし";
         break;
     default:
         break;