Update room13.lua

fixes #57

room13.lua

@@ -30,7 +30,7 @@ room {
 		  Touch = "Шкафы приятные на ощупь. Настоящая древесина.",
 		  obj = {
 			 obj {
-				   -"книги|потёртая книга,книга",
+				   -"книги",
 				description = "Корешки книг подобраны так, что вызывают ощущение идеального порядка в библиотеке. Как будто библиотеку подбирал дизайнер.",
 				--"провёл"
 				Touch = "{#Me/им} {#word/провёл,#me,прш} рукой по корешкам книг.",
@@ -56,7 +56,7 @@ room {
 				end,
 			 }:attr "scenery",
 			 obj {
-				   -"рычаг|тайный рычаг",
+				   -"рычаг|тайный рычаг|потёртая книга,книга",
 				nam = "room13_тайный рычаг",
 				description = "Книга выглядит более потёртой, чем все остальные книги в библиотеке.",
 				--"попробовал"
@@ -76,11 +76,19 @@ room {
 				end,
 				--"потянуть"
 				Pull = function(s)
+                                   if _"room13_шкафы".moved then
+  				      p "Рычаг уже выполнил свою функцию."
+  				      return
+  				   end;
 				   pn "{#Me/им} {#word/потянуть,#me,прш} рычаг."
 				   s.USED(s)
 				end,
 				--"нажать"
 				Push = function(s)
+                                   if _"room13_шкафы".moved then
+  				      p "Рычаг уже выполнил свою функцию."
+  				      return
+  				   end;
 				   pn "{#Me/им} {#word/нажать,#me,прш} рычаг."
 				   s.USED(s)
 				end,