翻訳

[beyond-jp/beyond-jp.git] / ADPARSER.PAS

diff --git a/ADPARSER.PAS b/ADPARSER.PAS
index db823bc..09939d9 100644 (file)
--- a/ADPARSER.PAS
+++ b/ADPARSER.PAS
@@ -339,7 +339,7 @@ procedure Check(var SepWord : Str16);
                   ' inside by under using near over onto top below '+
                   ' from away want across ')>0 then begin
              write('The word ''',Word);RL(393)end
-           else writeln('I don''t understand the word ''',Word,'.''');
+           else writeln('\81u',Word,'\81v\82Æ\82¢\82¤\8c¾\97t\82Í\82í\82©\82ç\82È\82¢\81B');
      'b'  :begin
             if pos(' ',Word)>0 then delete(Word,pos(' ',Word),9);
             writeln('You can''t use the word ''',Word,''' here.')