FindDistance, Ignore

[-=JoKeR=-]

Насчёт функций спасибо, переделаю.
А вот насчёт поиска других трупов - этого не может быть.
Трупов рядом нету, разве, что на расстоянии 5-10 клеток, а я ищу на 2.

Code: Select all

// <============================= Ищем труп ================================> 
  procedure Find_Corpse; 
  begin 
    repeat 
     begin 
        FindDistance := 2;

[grundick]

я конечно не Великий Edred и дико извиняюсь за вмешательство, но в твоем скрипте он игнорит труп только при условии что нашел EnchantScroll в TmpCorpse...

[-=JoKeR=-]

опааа, а вот это мой тупняк
спасибо большое за поправку