Есть ли такая функция ?

[Venom]

FindID ?
а если нету, то можно ли добавить ?

[Vizit0r]

можно все. а вот нужно ли...
я должен догадываться, что делает функция?

[Venom]

К примеру, есть две процедуры:
Одна - атака
Вторая - ходьба.

И в первой и во второй процедуре, присутствует 0190 тайп цели.
Скрипт не понимает, что ему делать, то ли атаковать, то ли идти.

(Это вкратце)

[Vizit0r]

ничего не понял, но попахивает совершенно неправильной организацией скрипта.

[Fenix]

К примеру, есть две процедуры:
И в первой и во второй процедуре, присутствует 0190 тайп цели.
Скрипт не понимает, что ему делать, то ли атаковать, то ли идти.

Толи дает знать о себе температура, толи литр пива, но я не понимаю, как скрипт может "не понимать что ему делать". Если вызвал процедуру атаки, то скрипту надо атаковать, если вызвал процедуру перемещения, то скрипту нужно идти. Конкретнее что ты хочешь от метода FindID? Если хочешь узнать есть ли объект с таким ID, то вызови GetType, вернул ноль - объекта нету.

[Venom]

К примеру, есть две процедуры:
И в первой и во второй процедуре, присутствует 0190 тайп цели.
Скрипт не понимает, что ему делать, то ли атаковать, то ли идти.

Толи дает знать о себе температура, толи литр пива, но я не понимаю, как скрипт может "не понимать что ему делать". Если вызвал процедуру атаки, то скрипту надо атаковать, если вызвал процедуру перемещения, то скрипту нужно идти. Конкретнее что ты хочешь от метода FindID? Если хочешь узнать есть ли объект с таким ID, то вызови GetType, вернул ноль - объекта нету.

Конкретно:

Code: Select all

program test;
const
prime = $12345;

procedure MoveOn;
var
friend: cardinal;
begin
if findtype($0190, ground) <> 0 then
begin
if finditem= prime then
begin
friend:=finditem
movexy(getx(friend), gety(friend), false, 1, false);
.....

Я имел в виду следующее, можно ли заменить

Code: Select all

if findtype($0190, ground) <> 0

на

Code: Select all

if findID($12345, ground) <> 0

PS.

Code: Select all

function GetType(ObjID: Cardinal): Word

Если информацию по мобу не найдёт, то вернёт ноль. Хотя тоже не факт, что корректно отработает.

[Fenix]

Сначала делаешь FindType, потом GetFindedList и в цикле проверяешь содержимое списка найденых объектов на предмет совпадения с prime.