-;; Thorald is a character in the Tutorial game.
+;; ¥½¥é¥ë¥É¤Ï¥Á¥å¡¼¥È¥ê¥¢¥ë¤ÎÅоì¿Íʪ¤Ç¤¢¤ë¡£
(define (thorald-mixi knpc kpc)
- (say knpc "To M)ix spells first press the 'M' key. "
- "Then type the first letter of each spell syllable followed by ENTER. "
- "For example, In Ex Por would be: i, e, p, ENTER.")
+ (say knpc "Ä´¹ç¤¹¤ë¤¿¤á¤Ë¤Ï¡¢¤Þ¤º'm'¥¡¼¤ò²¡¤¹¡£"
+ "¤½¤·¤Æ¡¢¼öʸ¤Î¤½¤ì¤¾¤ì¤ÎºÇ½é¤Îʸ»ú¤òÆþÎϤ·¡¢Enter¤ò²¡¤¹¡£"
+ "Î㤨¤Ð¡¢In Ex Por ¤Ê¤é i, e, p, Enter ¤À¡£")
(prompt-for-key)
- (say knpc "Next, select the reagents using the space bar. ")
+ (say knpc "¼¡¤Ë¡¢ÈëÌô¤ò¥¹¥Ú¡¼¥¹¥Ð¡¼¤ÇÁª¤Ö¡£")
(prompt-for-key)
- (say knpc "Next, press ENTER and type the number of mixtures to make. "
- "Just mix 1 for now. ")
+ (say knpc "ºÇ¸å¤Ë¡¢Ä´¹ç¤·À¸À®¤¹¤ë¿ô¤òÆþÎϤ·Enter¤ò²¡¤¹¡£"
+ "º£¤Ï1¤ÄÄ´¹ç¤¹¤ì¤Ð¤è¤¤¡£")
(prompt-for-key)
- (say knpc "You can see what spells you have mixed with the Z)tatus command. "
- "Why don't you try mixing one now? Talk to me again when you've succeeded.")
+ (say knpc "¤É¤Î¼öʸ¤òÄ´¹ç¤·¤¿¤«¤Ï'z'¥³¥Þ¥ó¥É¤Ç¸«¤ë¤³¤È¤¬¤Ç¤¤ë¡£"
+ "1¤ÄÄ´¹ç¤·¤Æ¤ß¤Æ¤Ï¤É¤¦¤À¡©¤¦¤Þ¤¯¤¤¤Ã¤¿¤é¤Þ¤¿Ïä·¤«¤±¤Æ¤¯¤ì¡£")
(kern-conv-end)
)
(ifc nil
(method 'bye
(lambda (knpc kpc)
- (say knpc "Oh, I'm sure we'll be seeing more of each other.")))
+ (say knpc "¤ª¤ª¡¢¤Þ¤¿²ñ¤ª¤¦¡£")))
(method 'default
(lambda (knpc kpc)
- (say knpc "I can't help you with that.")))
+ (say knpc "¤½¤ì¤Ï¼ê½õ¤±¤Ç¤¤ó¤Ê¡£")))
(method 'hail
(lambda (knpc kpc)
- (kern-log-msg "You meet a bored old man.")
+ (kern-log-msg "¤¢¤Ê¤¿¤ÏÂà¶þ¤½¤¦¤ÊÏ·¿Í¤ËÏä·¤«¤±¤¿¡£")
(if (in-inventory? kpc in_ex_por)
- (say knpc "I see you have an In Ex Por spell. "
- "Ask me about casting it if you don't know how.")
- (say knpc "Welcome to the tutorial. Why don't you ask me about my job, "
- "or maybe that door over there.")
+ (say knpc "In Ex Por ¤Î¼öʸ¤Ï¤Ç¤¤¿¤è¤¦¤À¤Ê¡£"
+ "¤É¤¦¾§¤¨¤ë¤«¤ï¤«¤é¤Ê¤«¤Ã¤¿¤éʹ¤¤¤Æ¤¯¤ì¡£")
+ (say knpc "¥Á¥å¡¼¥È¥ê¥¢¥ë¤Ø¤è¤¦¤³¤½¡£»ä¤Î»Å»ö¤Ë¤Ä¤¤¤Æ¤¿¤º¤Í¤Æ¤ß¤Æ¤Ï¤É¤¦¤À¡©"
+ "¤½¤ì¤È¤âÈâ¤Î¤³¤È¤òÃΤꤿ¤¤¤Î¤«¤Í¡©")
)))
(method 'join
(lambda (knpc kpc)
- (say knpc "Yes, let's get this show on the road. "
- "Press 'F' and I'll follow you. "
- "Later if you want me to take turns moving with you, press 'F' again. "
- "And if you want me to explore while you wait, press '2'. "
- "You can always press 'F' again to get me to follow you.")
+ (say knpc "¤è¤·¡¢¤Ç¤Ï¹Ô¤³¤¦¡£"
+ "'f'¤ò²¡¤¹¤È»ä¤Ï¤ªÁ°¤Î»Ø¼¨¤Ë½¾¤¦¡£"
+ "¤ªÁ°¤Î¸å¤ò¤Ä¤¤¤Æ¤¤ÆÍߤ·¤¤¤Ê¤é¤â¤¦°ìÅÙ'f'¤ò²¡¤»¤Ð¤è¤¤¡£"
+ "¤½¤·¤Æ¤ªÁ°¤¬ÂԤäƤ¤¤ë´Ö¤Ë»ä¤Ëõº÷¤·¤ÆÍߤ·¤¤¾ì¹ç¤Ï'2'¤ò²¡¤¹¤Î¤À¡£"
+ "'f'¤ò²¡¤»¤Ð¤É¤³¤Ë¤¤¤Æ¤âÌá¤Ã¤Æ¤¤Æ¡¢ºÆ¤Ó¸å¤Ë¤Ä¤¤¤Æ¹Ô¤¯¤¾¡£")
(join-player knpc)
(kern-conv-end)
))
(method 'name
(lambda (knpc kpc)
- (say knpc "I'm Thorald. Hi.")))
+ (say knpc "»ä¤Ï¥½¥é¥ë¥É¤À¡£¤è¤í¤·¤¯¡£")))
(method 'job
(lambda (knpc kpc)
- (say knpc "I'm just the hired help.")))
+ (say knpc "»ä¤Ï¤¿¤ÀÀâÌÀ¤¹¤ë¤¿¤á¤Ë¸Û¤ï¤ì¤Æ¤¤¤ë¤Î¤À¡£")))
(method 'door
(lambda (knpc kpc)
- (say knpc "Yes, I know a spell that can open that magically locked door. "
- "Imagine that! Why don't you ask me about it?")
+ (say knpc "¤½¤¦¡¢»ä¤Ï¤³¤ÎËâË¡¤ÇÉõ°õ¤µ¤ì¤¿Èâ¤ò³«¤¯¼öʸ¤òÃΤäƤ¤¤ë¡£"
+ "¹Í¤¨¤è¡ª¼¡¤Ï²¿¤òʹ¤±¤Ð¤è¤¤¤«¡©")
))
(method 'spel
(lambda (knpc kpc)
- (say knpc "The In Ex Por spell unlocks magically locked doors. "
- "To mix it you'll need sulphurous ash and blood moss. "
- "Ask me about mixing if you don't know how.")))
+ (say knpc "Èâ¤ÎÉõ°õ¤ò²ò¤¯¤Î¤Ï In Ex Por ¤Î¼öʸ¤Ç¤¢¤ë¡£"
+ "¤½¤·¤Æ¤½¤ì¤òÄ´¹ç¤¹¤ë¤Ë¤Ïⲫ¤Î³¥¤È·ì¤ÎÂݤ¬É¬ÍפÀ¡£"
+ "Ä´¹ç¤¹¤ëÊýË¡¤¬²ò¤é¤Ê¤±¤ì¤Ð¤¿¤º¤Í¤è¡£")))
(method 'mix thorald-mixi)
(method 'mixi thorald-mixi)
(method 'cast
(lambda (knpc kpc)
- (say knpc "To C)ast a spell press 'c' and then enter the first letter of each magic word. "
- "For example, to cast In Ex Por you enter 'i', 'e' and 'p'. "
- "Use backspace if you mess up. "
- "When the spell is right hit ENTER to cast it. "
- "In Ex Por requires you to target the door.")))
+ (say knpc "¼öʸ¤ò¾§¤¨¤ë¤Ë¤Ï'c'¤ò²¡¤·¡¢ËâË¡¤Î¤½¤ì¤¾¤ì¤ÎºÇ½é¤Îʸ»ú¤òÆþÎϤ¹¤ë¡£"
+ "Î㤨¤Ð¡¢In Ex Por ¤ò¾§¤¨¤ë¤Ê¤é'i', 'e', ¤½¤·¤Æ'p'¤À¡£"
+ "¤ï¤«¤é¤Ê¤¯¤Ê¤Ã¤¿¤é¥Ð¥Ã¥¯¥¹¥Ú¡¼¥¹¤ò²¡¤»¤Ð¤è¤¤¡£"
+ "¼öʸ¤òÀµ¤·¤¯ÆþÎϤǤ¤¿¤Ê¤é¡¢Enter¤ò²¡¤·¤Æ¾§¤¨¤ë¡£"
+ "In Ex Por ¤ÏÈâ¤ò¼¨¤¹É¬Íפ¬¤¢¤ë¤¾¡£")))
))
-
+
(define (thorald-ai kchar) #t)
(define (mk-thorald)
(kern-mk-char
'ch_thorald ; tag
- "Thorald Greybeard" ; name
+ "¥½¥é¥ë¥É¡¦¥°¥ì¥¤¥Ù¥¢¡¼¥É" ; name
sp_human ; species
oc_wrogue ; occ
s_companion_wizard ; sprite
)
nil
))
+
+(kern-dictionary
+ "¥È¥Ó¥é" "door" "Èâ"
+ "¥¸¥å¥â¥ó" "spel" "¼öʸ"
+ "¥Á¥ç¥¦¥´¥¦" "mix" "Ä´¹ç"
+ "¥È¥Ê¥¨¥ë" "cast" "¾§¤¨¤ë")