FindDistance, Ignore

[-=JoKeR=-]

1) Какое максимальное значение FindDistance, чтобы оно нормально видело объекты ?
2) Если я заигнорил объект:

Code: Select all

		  FindType(Corpse,ground);
		  Ignore(FindItem);

то стэлс при следующем поиске не видит его уже вообще ?

[grundick]

1.вообще навреное от сервера зависит, но мне кажется везде на 21 тайл видит.
2.а как стелс по твоему определяет что предмет в игноре?:%)

[-=JoKeR=-]

Такс, мне так не подходит...
Жду конкретных ответов от Edred-а например.

[Unholy]

2) Если я заигнорил объект:

Code: Select all

		  FindType(Corpse,ground);
		  Ignore(FindItem);

то стэлс при следующем поиске не видит его уже вообще ?

Обьект добавляеться в список игнорируемых обьектов при поиске.
То есть при следующем FindType(Corpse,ground) именно этот обьект оно не найдет.

[-=JoKeR=-]

Unholy, спс)

[grundick]

Если он его не найдет, то как он определит что это именно тот предмет ,что был в игноре?:)

[-=JoKeR=-]

Так он его не найдёт, ему нечего определять

[Edred]

Если он его не найдет, то как он определит что это именно тот предмет ,что был в игноре?:)

А как по-твоему работает поиск в стелсе или инжекте? Неужели ты думаешь, что он на самом деле что-то ищет вокруг чара или в паке чара? Все объекты, полученные в пакетах от сервера, сидят в индексированном списке в стелсе. Именно в этом индексированном списке и идет "поиск". А сам поиск есть просто перебор всех элементов списка с тупым сравнением - подходит объект под указанные характеристики или нет. И игнор - это просто еще одна характеристика этого объекта. Соответственно, стелс при переборе списка объект с игнором просто пропустит, не будет даже сравнивать подходит он под параметры или нет.

[grundick]

Дэ факто он обращается к этому обьекту! Вот что я имел ввиду.

[Edred]

Ты хоть прочитал, что я написал? Ни к какому объекту стелс не обращается, он работает только со списком в своей памяти. А обращение к объекту - это уже пакет на сервер.

[grundick]

Чел спросил ,видит ли стелс объект после игнора.Вообще фраза дурацкая, но тем не менее... Стелс видит все обьекты.Они в списке.При поиске идет перебор всех обьектов и проверка их свойств.Стелс видит заигноренный обьект.Вот что я имею ввиду.

[-=JoKeR=-]

Edred, а по FindDistance не ответил...
По поводу игнора: я спросил потому, что в моей процедуре стэлс находит труп, забирает что нужно, игнорит труп и при повторном поиске опять таки его находит (игнор я не снимаю нигде, потому, что мне тот труп уже не нужен). Видимо или игнор кривой, или моя процедура

[Edred]

Видимо или игнор кривой, или моя процедура

Скрипт в студию.

[-=JoKeR=-]

Три процедуры, которые идут друг за другом в главной программе.
Ответь по FindDistance пожалуста

Code: Select all

// <============================= Ищем труп ================================>
  procedure Find_Corpse;
  begin
    repeat
	  begin
        FindDistance := 2;
        FindType(Corpse,ground);
	    If FindCount > 0 then
	      begin
	        AddToSystemJournal('-= Найден труп =-');
	      end
	    else
	      begin
	        wait(1000);
	      end;
	  end;
	until GetQuantity(Finditem) > 0;
  end;

// <======================== Ищем золото в трупе =========================>
  procedure Get_Gold;
  var tmpgold : cardinal;
      tmpgoldcount : integer;
    begin
	  FindType(Corpse,ground);
	  tmpcorpse := FindItem;
	  checksave;
	  UseObject(FindItem);
	  checklag;
	  wait(2000);
	  tmpgold := FindType(Gold_Coins,tmpcorpse);
	  If FindCount >= 1 then
	    begin
		  tmpgoldcount := GetQuantity(FindItem);
		  checklag;
		  wait(500);
		  MoveItem(tmpgold,tmpgoldcount,backpack,0,0,0);
		  AddToSystemJournal('-= Золото найдено, положил в backpack =-');
		end
	  else
	    begin
		  AddToSystemJournal('-= Нет золота в трупе о_0 , шота тут не то... =-');
		end;
	end;

// <======================== Ищем заточку в трупе =======================>	
  procedure Get_Enchant_Scroll;
  var tmpes : cardinal;
    begin
	  FindType(Corpse,ground);
	  checksave;
	  UseObject(FindItem);
	  checklag;
	  wait(2000);
	  tmpes := FindType(Enchant_Scroll,tmpcorpse);
	  If FindCount >= 1 then
	    begin
		  checklag;
		  wait(500);
		  MoveItem(tmpes,1,backpack,0,0,0);
		  AddToSystemJournal('-= Заточка найдена, положил в backpack =-');
		  wait(500);
		  FindType(Corpse,ground);
		  Ignore(FindItem);
		end
	  else
	    begin
		  AddToSystemJournal('-= Нет заточки в трупе =-');
		end;
	end;

[Edred]

1. По файнддистанс отвечать просто нечего - это зависит от шарда. О каком радиусе вокруг чара сервер присылает клиенту инфу, такова и finddistance. Обычно это от 15 до 21 клетки.

2. По скриптам. Кривые они, конечно... И кривизна именно в поиске. В каждой процедуре ты заново ищешь труп. Зачем? Ты не задумывался, что в разных процедурах стелс будет находить тебе разные трупы? То есть первый поиск - первый труп, процедура напишет что труп найден. Во второй процедуре новый поиск - если трупов несколько - совсем не факт, что стелс тебе выдаст тот же труп - из него ты возьмешь золото. В третьей процедуре новый поиск - может быть и новый найденный труп, из которого будет взят скролл. А дальше еще лучше - перед игнором новый поиск - тут точно стелс выдаст новый труп, который и будет заигнорен. Результат: тот труп, из которого ты что-то взял - незаигнорен, а труп, который ты быстрее всего еще не лутил - в игноре.

Труп надо искать один раз, в цикле естественно. Далее сериал найденного в переменную, все процедуры лута переделать в функции, которым передавать параметром сериал трупа. Ну и игнор также, через сериал. Вот тогда никаких глюков не будет.