From 5886c70ecf2f3fa51f0fa4e8a157074bd2f15f81 Mon Sep 17 00:00:00 2001
From: Alexander Yakovlev <keloero@oreolek.ru>
Date: Thu, 15 Aug 2019 02:10:48 +0700
Subject: [PATCH] BeforeParsing solution by @cheshire

---
 examine_ru.h | 17 +++++++++++++++++
 source.inf   |  2 +-
 2 files changed, 18 insertions(+), 1 deletion(-)
 create mode 100644 examine_ru.h

diff --git a/examine_ru.h b/examine_ru.h
new file mode 100644
index 0000000..bd22f10
--- /dev/null
+++ b/examine_ru.h
@@ -0,0 +1,17 @@
+[ BeforeParsing o i j n;
+  objectloop (o provides name) {
+    for (i=1 : i<=parse-->0 : i++) {
+      if (TestScope(o, player) && Refers(o, i)) {
+        n++;
+      }
+    }
+  }
+  if (n < parse-->0) rfalse;
+  for (j=buffer-->0 : j>0 : j--) {
+    buffer-->(j+2) = buffer-->j;
+  }
+  buffer-->1 = 'о';
+  buffer-->2 = ' ';
+  buffer-->0 = buffer-->0 + 2;
+  VM_Tokenise(buffer, parse);
+];
diff --git a/source.inf b/source.inf
index ca0ed76..a076d47 100644
--- a/source.inf
+++ b/source.inf
@@ -5,7 +5,7 @@ Constant Headline   "^Тест Информа.^";
 
 Include "Parser";
 Include "VerbLib";
-Include "./examine_en";
+Include "./examine_ru";
 
 [ Initialise;
     location = gallery;