Снуп и стил
Posted: 09.12.2010 2:40
вот пишу скриптик Snooping&stealing (Я видел снуп-стил для ДРВ, но у меня другой шард).
он запускается и работает, но почему-то в паке 2-го чара он или не обнаруживает то что ворую, или вообще по каким-то причинам в него не залазит.
Пока в голову приходит только одно, указать более точный путь: IDигрока->слой->требуемый итем. Так можно???
Первая часть на снупинг работает хорошо, сумка 2го чара открывается. Дальше я получаю что кол-во вещей, которые ворую, ноль. На этом он опять лезет открывать сумку... Может я чтото сделал не так?
ЗЫ. Особо не пинайте, это мой первый скрипт, который с нуля пишу))) Раньше все переделывал))
он запускается и работает, но почему-то в паке 2-го чара он или не обнаруживает то что ворую, или вообще по каким-то причинам в него не залазит.
Пока в голову приходит только одно, указать более точный путь: IDигрока->слой->требуемый итем. Так можно???
Первая часть на снупинг работает хорошо, сумка 2го чара открывается. Дальше я получаю что кол-во вещей, которые ворую, ноль. На этом он опять лезет открывать сумку... Может я чтото сделал не так?
ЗЫ. Особо не пинайте, это мой первый скрипт, который с нуля пишу))) Раньше все переделывал))
Program snop_steal;
var
stime : TDateTime;
const
BackEny = $50b5fce5; // ИД бекпака чара на ком качаемся
Togor = $0000156d; // ИД чара у которого воруем
Sunduk = $50d7abc2; // Сундук с рыбой
itemst = $09ce; // Что будем красть
perchatki = $13c6; // Перчатки вора
BEGIN
while true do
begin
useobject(ObjAtLayer($07));
waitfortarget(400);
if targetpresent then
begin
TargetToObject(Togor);
end;
wait(5000);
Findtype(itemst,BackEny);
addtosystemjournal(IntToStr(findcount));
if finditem > 0 then
repeat
stime :=now;
wait(5000);
begin
useobject(ObjAtLayer($07));
WaitForTarget(5000);
if targetpresent then
begin
WaitTargetObject(FindItem);
end;
end;
Until (InJournalBetweenTimes('gained', STime, Now)>0);
end;
END.