;; Entrance to Brundegardt
(kern-mk-place
'p_brundegardt ; tag
- "Brundegardt" ; name
+ "¥Ö¥ë¥ó¥Ç¥¬¡¼¥É" ; name
s_dungeon ; sprite
(kern-mk-map
nil 19 19 pal_expanded
(put (mk-monman) 0 0)
(put (spawn-pt 'troll) 12 14)
(put (spawn-pt 'troll) 11 15)
- (put (let ((kriddle (mk-riddle 'noor 't_doorway 18 3 1 1 #t
- "All who would pass must speak the password!")))
+ (put (let ((kriddle (mk-riddle "¥Î¥¢" 't_doorway 18 3 1 1 #t
+ "¤³¤³¤òÄ̤ë¼Ô¤Ï¹ç¸ÀÍÕ¤ò½Ò¤Ù¤è¡ª")))
(riddle-set-rm-on-wrong! (gob kriddle) #f)
kriddle)
17 3)
;; Brundegardt Keep
(kern-mk-place
'p_brundegardt_keep ; tag
- "Brundegardt Keep" ; name
+ "¥Ö¥ë¥ó¥Ç¥¬¡¼¥É¤ÎÁÒ¸Ë" ; name
nil
(kern-mk-map
nil 25 25 pal_expanded
;;----------------------------------------------------------------------------
;; Cave Shrine
(mk-dungeon-room
- 'p_cave_shrine "Cave Shrine"
+ 'p_cave_shrine "ƶ·¢¤Î¿ÀÅÂ"
(list
"rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn "
"rn rn rn rn rn ,V ,I ,G ,I ,L ,A ,N ,C ,E rn rn rn rn rn "
;; Ratling Warren
(kern-mk-place
'p_ratling_warren ; tag
- "Ratling Warren" ; name
+ "¥Í¥º¥ß¿Í´Ö¤ÎÁã·ê" ; name
nil
(kern-mk-map
nil 25 25 pal_expanded
(put (mk-corpse) 23 3)
(put (kern-mk-obj t_int_potion 1) 18 4)
- (put (mk-broken-clock s_clock_hand_s s_clock_hand_n "The clock reads 6:00") 19 4)
+ (put (mk-broken-clock s_clock_hand_s s_clock_hand_n "»þ·×¤Ï6»þ00ʬ¤À¡£") 19 4)
(put (kern-mk-obj t_mana_potion 1) 20 4)
(put (kern-mk-obj t_gem 1) 21 4)
(put (kern-mk-obj t_gold_coins 2) 22 4)
;;----------------------------------------------------------------------------
;; Tunnel Turn
(kern-mk-place
- 'p_tunnel_turn "Tunnel Turn"
+ 'p_tunnel_turn "¶Ê¤¬¤ê³Ñ"
nil
(kern-mk-map
nil 19 19 pal_expanded
;;----------------------------------------------------------------------------
;; Black River
(mk-dungeon-room
- 'p_black_canal "Black Canal"
+ 'p_black_canal "¹õ¤¤ÍÑ¿åÏ©"
(list
"rn rn r8 r8 r8 rn rn r8 r8 r8 r8 r8 rn rn rn rn rn rn rn "
"rn rc gg gg gg ra rc bb ~s _s _s _s ra rn rn rn rn rn rn "
;;----------------------------------------------------------------------------
;; Tunnels
(mk-dungeon-room
- 'p_tunnels "Tunnels"
+ 'p_tunnels "²£·ê"
(list
"rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn "
"rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn "
;;----------------------------------------------------------------------------
;; Chasm Drawbridge
(mk-dungeon-room
- 'p_wide_chasm "Wide Chasm"
+ 'p_wide_chasm "¹¤¤Îö¤±ÌÜ"
(list
"rn rn rn rn rn rn rn r8 r8 r8 r8 r8 rn rn rn rn rn rn rn "
"rn rn rn rn rn rn rc *3 *1 *1 *1 *5 ra rn rn rn rn rn rn "
;;----------------------------------------------------------------------------
;; Tower L1
(mk-dungeon-room
- 'p_brundegardt_tower_1 "BrundeGardt Tower L1"
+ 'p_brundegardt_tower_1 "¥Ö¥ë¥ó¥Ç¥¬¡¼¥É¤ÎÅã1³¬"
(list
"rn rn rn rn rn xx xx xx xx xx xx xx xx xx rn rn rn rn rn "
"rn rn rn xx xx xx xx xx cc cc cc xx xx xx xx xx rn rn rn "
;;----------------------------------------------------------------------------
;; Tower L2
(mk-dungeon-room
- 'p_brundegardt_tower_2 "BrundeGardt Tower L2"
+ 'p_brundegardt_tower_2 "¥Ö¥ë¥ó¥Ç¥¬¡¼¥É¤ÎÅã2³¬"
(list
"rn rn r8 r8 rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn "
"rn rc bb bb ra r8 xx xx xx xx xx xx xx rn rn rn rn rn rn "
;;----------------------------------------------------------------------------
;; Tower L3
(mk-dungeon-room
- 'p_brundegardt_tower_3 "BrundeGardt Tower L3"
+ 'p_brundegardt_tower_3 "¥Ö¥ë¥ó¥Ç¥¬¡¼¥É¤ÎÅã3³¬"
(list
"rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn "
"rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn "
;; Tower L4
(kern-load "tim.scm")
(mk-19x19-town
- 'p_brundegardt_tower_4 "BrundeGardt Tower L4" nil
+ 'p_brundegardt_tower_4 "¥Ö¥ë¥ó¥Ç¥¬¡¼¥É¤ÎÅã4³¬" nil
(list
"^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. "
"^. ^. ^. ^. ^. bb {1 {5 {{ {{ {3 {1 {1 bb ^. ^. ^. ^. ^. "
;; Tower L5
(kern-load "eye-of-brune.scm")
(mk-19x19-town
- 'p_brundegardt_tower_5 "BrundeGardt Tower L5" nil
+ 'p_brundegardt_tower_5 "¥Ö¥ë¥ó¥Ç¥¬¡¼¥É¤ÎÅã5³¬" nil
(list
"^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. ^. "
"^. ^. ^. ^. ^. bb {1 {5 {{ {{ {3 {1 {1 bb ^. ^. ^. ^. ^. "
;;----------------------------------------------------------------------------
;; Griffin Peak
(mk-19x19-town
- 'p_griffin_peak_s "South Face of Griffin Peak" nil
+ 'p_griffin_peak_s "¥°¥ê¥Õ¥£¥ó¤Î»³Äº¤ÎÆîÌÌ" nil
(list
"^^ ^^ ^^ ^^ ^^ ^^ ^^ ^^ {2 .. {4 ^^ ^^ ^^ ^^ ^^ ^^ ^^ ^^ "
"^^ ^^ ^^ ^^ ^^ ^^ ^^ ^^ {2 .. {4 ^^ ^^ ^^ ^^ ^^ ^^ ^^ ^^ "
(mk-19x19-town
- 'p_griffin_peak_se "Southeast Face of Griffin Peak" nil
+ 'p_griffin_peak_se "¥°¥ê¥Õ¥£¥ó¤Î»³Äº¤ÎÆîÅìÌÌ" nil
(list
"^^ ^^ ^^ ^^ ^^ ^^ ^^ ^. {a .. .. ^v ^v ^v ^v ^v ^v ^v ^v "
"^^ ^^ ^^ ^^ ^^ ^^ ^^ ^. ^. {a .. ^v ^v ^v ^v ^v ^v ^v ^v "
5)
(mk-19x19-town
- 'p_griffin_peak_ne "Northeast Face of Griffin Peak" nil
+ 'p_griffin_peak_ne "¥°¥ê¥Õ¥£¥ó¤Î»³Äº¤ÎËÌÅìÌÌ" nil
(list
"^v ^v ^v {{ ta |. |. |. tc {{ ^^ ^^ ^^ ^^ ^^ ^^ ^^ ^^ ^^ "
"^v ^v ^v ^v {% ta |. tc {# ^. ^. ^^ ^^ ^^ ^^ ^^ ^^ ^^ ^^ "
(mk-place-music p_griffin_peak_ne 'ml-outdoor-adventure)
(mk-19x19-town
- 'p_griffin_peak_n "North Face of Griffin Peak" nil
+ 'p_griffin_peak_n "¥°¥ê¥Õ¥£¥ó¤Î»³Äº¤ÎËÌÌÌ" nil
(list
"^v ta |. ~a ~5 tt ^v ^v ^. ^. ^. ^^ ^^ ^^ ^^ ^^ ^^ ^. ^. "
"^v ^v tt |. ~~ |. t5 ^v ^v ^. ^. ^. ^. ^^ ^^ ^^ ^. ^. ^. "
;; will vary at runtime and may break the illusion, but try to initialize
;; object placement the same at the start of play.
(mk-19x19-town
- 'p_griffin_peak "Griffin Peak" nil
+ 'p_griffin_peak "¥°¥ê¥Õ¥£¥ó¤Î»³Äº" nil
(list
"^. ^. ^. ^. ^v ^v ^v ^v {2 .. {4 ^v ^v ^v ^v ^. ^. ^. ^. "
"^. ^. ^. ^v ^v ^v ^v ^v {2 .. {4 ^v ^v ^v ^v ^. ^. ^. ^. "