關於數字化血條(其實是日本的MOD)的日語亂碼設定腳本的翻譯(含原始出處和論壇分享帖連結)

hatsutoli

這原本是個日本的MOD吧?

原始出處在這裡：http://vanillavillage.blog54.fc2.com/blog-entry-31.html

論壇分享帖：http://3dmgame.chnren.com/bbs/showtopic-769009-1.html

我本來想打開來看看腳本能不能修改成對隱形或使用變色龍效果的敵人無效，

結果打開第一個腳本就看到一堆亂碼，想說是不是簡體中文的關係，結果花了好大功夫才發現是日語的

如果是英文我還能處理，但日語我就沒輒了，我把唯一有日語的腳本貼上來，有興趣的人麻煩翻譯一下吧！

看這樣子，是可以自行設定顯示方式的？
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
scriptname zzScouterConfigQuestScript
float fQuestDelayTime
short doMenu
short menuParent
short button
short tmpint
begin gamemode
if fQuestDelayTime != 0.01
  set fQuestDelayTime to 0.01
endif
if doMenu == 0
  stopQuest zzScouterConfigQuest
elseif doMenu == 1
  set doMenu to 2
  if menuParent == 0
   messageBox "ヘルス表示設定" "- 終了 -" "条件" "距離" "最大数" "感知" "内容" "位置"
  elseif menuParent == 1
   messageBox "表示条件" "戦闘中" "抜刀中" "無条件" "表示しない"
  elseif menuParent == 2
   messageBox "最大表示距離(現在%g 標準1200)" zzScouterQuest.distanceMax "- 戻る -" "+100" "-100"
  elseif menuParent == 3
   messageBox "同時表示数(現在%g)" zzScouterQuest.idxMax "1" "2" "3" "4" "5" "6" "7" "8"
  elseif menuParent == 4
   if zzScouterQuest.sensor
    messageBox "対象の自動感知(有効)" "- 戻る -" "無効にする" "感度設定"
   else
    messageBox "対象の自動感知(無効)" "- 戻る -" "有効にする" "感度設定"
   endif
  elseif menuParent == 5
   messageBox "表示内容" "数値と横棒" "数値のみ"
  elseif menuParent == 6
   messageBox "表示位置" "- 戻る -" "高度" "位置" "その他"
  elseif menuParent == 11
   if zzScouterQuest.sensorRange
    messageBox "感知距離(現在%g 標準600 高精度)" zzScouterQuest.sensorMax "- 戻る -" "+100" "-100" "精度を下げる"
   else
    messageBox "感知距離(現在%g 標準600 低精度)" zzScouterQuest.sensorMax "- 戻る -" "+100" "-100" "精度を上げる"
   endif
  elseif menuParent == 21
   messageBox "表示高度(現在%g 標準150)" zzScouterQuest.baseZ "- 戻る -" "+10" "+5" "+1" "-1" "-5" "-10"
  elseif menuParent == 22
   messageBox "表示位置(現在%g ＋後ろへ 0=中央 －前へ)" zzScouterQuest.baseXY "- 戻る -" "+10" "+5" "+1" "-1" "-5" "-10"
  elseif menuParent == 23
   messageBox "表示位置の雑多な設定(スケール%g 例外%g)" zzScouterQuest.baseScale zzScouterQuest.baseEx "- 戻る -" "スケールを適用する" "スケールを適用しない" "例外処理を行う" "例外処理を行わない"
  endif
elseif doMenu == 2
  set button to getButtonPressed
  if button == -1
   return
  endif
  set doMenu to 1
  if menuParent == 0
   if button == 0
    set doMenu to 0
   else
    set menuParent to button
   endif
  elseif menuParent == 1
   set menuParent to 0
   set zzScouterQuest.mode to button
  elseif menuParent == 2
   if button == 0
    set menuParent to 0
   elseif button == 1
    set zzScouterQuest.distanceMax to zzScouterQuest.distanceMax + 100
   elseif button == 2
    set zzScouterQuest.distanceMax to zzScouterQuest.distanceMax - 100
   endif
   if zzScouterQuest.distanceMax < 100
    set zzScouterQuest.distanceMax to 100
   elseif zzScouterQuest.distanceMax > 10000
    set zzScouterQuest.distanceMax to 10000
   endif
   if zzScouterQuest.sensorMax > zzScouterQuest.distanceMax
    set zzScouterQuest.sensorMax to zzScouterQuest.distanceMax
   endif
  elseif menuParent == 3
   set menuParent to 0
   set zzScouterQuest.idx to 0
   set zzScouterQuest.idxMax to button + 1
   set zzScouterTQ00.do to 0
   set zzScouterTQ01.do to 0
   set zzScouterTQ02.do to 0
   set zzScouterTQ03.do to 0
   set zzScouterTQ04.do to 0
   set zzScouterTQ05.do to 0
   set zzScouterTQ06.do to 0
   set zzScouterTQ07.do to 0
  elseif menuParent == 4
   if button == 0
    set menuParent to 0
   elseif button == 1
    if zzScouterQuest.sensor
     set zzScouterQuest.sensor to 0
    else
     set zzScouterQuest.sensor to 1
    endif
   elseif button == 2
    set menuParent to 11
   endif
  elseif menuParent == 5
   set menuParent to 0
   set zzScouterQuest.disableBar to button
  elseif menuParent == 6
   if button == 0
    set menuParent to 0
   else
    set menuParent to button + 20
   endif
  elseif menuParent == 11
   if button == 0
    set menuParent to 4
   elseif button == 1
    set zzScouterQuest.sensorMax to zzScouterQuest.sensorMax + 100
   elseif button == 2
    set zzScouterQuest.sensorMax to zzScouterQuest.sensorMax - 100
   elseif button == 3
    if zzScouterQuest.sensorRange
     set zzScouterQuest.sensorRange to 0
    else
     set zzScouterQuest.sensorRange to 1
    endif
   endif
   if zzScouterQuest.sensorMax > zzScouterQuest.distanceMax
    set zzScouterQuest.sensorMax to zzScouterQuest.distanceMax
   elseif zzScouterQuest.sensorMax < 100
    set zzScouterQuest.sensorMax to 100
   endif
  elseif menuParent == 21 || menuParent == 22
   if button == 0
    set menuParent to 6
   elseif button == 1
    set tmpint to 10
   elseif button == 2
    set tmpint to 5
   elseif button == 3
    set tmpint to 1
   elseif button == 4
    set tmpint to -1
   elseif button == 5
    set tmpint to -5
   elseif button == 6
    set tmpint to -10
   endif
   if menuParent == 21
    set zzScouterQuest.baseZ to zzScouterQuest.baseZ + tmpint
   elseif menuParent == 22
    set zzScouterQuest.baseXY to zzScouterQuest.baseXY + tmpint
   endif
  elseif menuParent == 23
   set menuParent to 6
   if button == 1
    set zzScouterQuest.baseScale to 1
   elseif button == 2
    set zzScouterQuest.baseScale to 0
   elseif button == 3
    set zzScouterQuest.baseEx to 1
   elseif button == 4
    set zzScouterQuest.baseEx to 0
   endif
  endif
endif
end
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝