Code: Select all
while testmode do
begin
FindType(MobTypeList[3],ground);
AddToSystemJournal('0.1 '+inttostr(FindCount));
while (FindCount>0) do
begin
AddToSystemJournal('1 '+inttostr(FindCount));
attack(FindItem);
wait(100);
FindType(MobTypeList[3],ground);
ignore(FindItem);
end;
FindType(MobTypeList[4],ground);
AddToSystemJournal('15 '+inttostr(FindCount));
while (FindCount>0) do
begin
AddToSystemJournal('18 '+inttostr(FindCount));
attack(FindItem);
wait(100);
FindType(MobTypeList[4],ground);
ignore(FindItem);
end;
FindTypeEx(MobTypeList[4],$0901,ground,false);
AddToSystemJournal('02 '+inttostr(FindCount));
while (FindCount>0) do
begin
AddToSystemJournal('2 '+inttostr(FindCount));
attack(FindItem);
wait(100);
FindTypeex(MobTypeList[4],$0901,ground,false);
ignore(FindItem);
end;
ignorereset;
end;
22:39:18:847 [PFUO]: 02 0
22:39:18:847 [PFUO]: 0.1 0
22:39:18:847 [PFUO]: 15 0
радиус поиска 50. т.е. в любом случае если моб есть на world должен находить. ищю быков типы $00E8, $00E9