помогите разобраться!

[kykypy3a]

я его настроил! но в скриптах я не очень! надо когда с бэкпака пропадает(воруют) блэкперлы что бы чяр добирал из из сундука(трюма) но он просто стоит и ничего не делает! Шард Форест варс! кто может помогите плз!

Code: Select all

Program testing;

const 
Item= $0F7A; // Итем
Color= $0000; // Цвет
Sunduk= $47B7F194; // ИД Сундука
waittime= 10; // Сколько ждать
qty= 65; // Кол-Во

procedure CheckItem;
begin
if (Count(Item) < 1) then
  begin
  MoveItem(FindTypeEx(Item,Color,Sunduk,False),qty,Backpack,0,0,0);
  wait(waittime);
end;
end;

BEGIN

addtosystemjournal('Скрипт стартовал');
setarstatus(true);
while true do
begin
CheckItem;
end;
END.

[MuDaCk]

Code: Select all

Program testing;

const 
Item= $0F7A; // Итем
Color= $0000; // Цвет
Sunduk= $47B7F194; // ИД Сундука
waittime= 10; // Сколько ждать
qty= 65; // Кол-Во


procedure CheckItem;
begin
if (CountEx(item,ResColor,Backpack) < 1) then
  begin
  MoveItem(FindTypeEx(Item,Color,Sunduk,False),qty,Backpack,0,0,0);
  wait(waittime);
end;
end;

BEGIN

addtosystemjournal('Скрипт стартовал');
setarstatus(true);
while true do
begin
CheckItem;
wait(100);
end;
END.

[kykypy3a]

спасибо за помощь! тока токая проблемка! сундук под ногами( ид прописал ) когда запускаяю скрипт пишет Drag error: Object not found.

в этой строчке с Sunduk

Code: Select all

MoveItem(FindTypeEx(Item,Color,Sunduk,False),qty,Backpack,0,0,0);

поменял на Ground

Code: Select all

MoveItem(FindTypeEx(Item,Color,Ground,False),qty,Backpack,0,0,0);

и вот какая проблема! когда из пака мой вор ворует эти 65 шт ( в данном случае блэк перлы) тоон все лишь 1 раз берет с пола а потом просто стоит! в чем может быть проблема ?

когда делаю дисконект и сразу конект и запускаю скрипт он опять возмет эти 65шт у него их украдут и он просто стоит ничего не делает ( помогите плз

[MuDaCk]

Code: Select all

Program testing;

const 
Item= $0F7A; // Итем
Color= $0000; // Цвет
Sunduk= $47B7F194; // ИД Сундука
waittime= 10; // Сколько ждать
qty= 65; // Кол-Во


procedure CheckItem;
begin
if (CountEx(item,ResColor,Backpack) < 1) then
  begin
useobject(Sunduk);
wait(400);
  MoveItem(FindTypeEx(Item,Color,Sunduk,False),qty,Backpack,0,0,0);
  wait(waittime);
end;
end;

BEGIN

addtosystemjournal('Скрипт стартовал');
setarstatus(true);
while true do
begin
CheckItem;
wait(100);
end;
END.

вотч то я добавил
useobject(Sunduk);
wait(400);
но там лучше через кол-во итемов в сундуке - типо если больше нуля, то воровать, если нет, то открывать сундук - так будет быстрее

[kykypy3a]

спасибо щя потестю! тока вот еще чего так ?
at 13:18): Unknown identifier 'ResColor'

1 раз берет бп после это у него из пака их воруют и он просто стоит! больше не берет в пак ничего!

когда
он берет блэк перлы по 1 штуке все работает! а когда по 2 и до 9999 не хочет! тоесть как я понял он не проверяет кол-во складываемых обьектов!

кто в этом шарит помогите плз!

[MuDaCk]

Code: Select all

at 13:18): Unknown identifier 'ResColor'

с этим надеюсь всё понятно)

когда
он берет блэк перлы по 1 штуке все работает! а когда по 2 и до 9999 не хочет! тоесть как я понял он не проверяет кол-во складываемых обьектов!

кто в этом шарит помогите плз!

Не могу понять как он может брать по одной штуке, если у тебя кол-во стоит 65. Хотя может ты в сундук по одной штучке складываешь...

[kykypy3a]

Code: Select all

at 13:18): Unknown identifier 'ResColor'

с этим надеюсь всё понятно)

когда
он берет блэк перлы по 1 штуке все работает! а когда по 2 и до 9999 не хочет! тоесть как я понял он не проверяет кол-во складываемых обьектов!

кто в этом шарит помогите плз!

Не могу понять как он может брать по одной штуке, если у тебя кол-во стоит 65. Хотя может ты в сундук по одной штучке складываешь...

кстати по 1 тоже не берет (

ну это я разное пробывал и по 1 и по 100 не хочет и все!

какая система игрок№1 стоит берет к себе в бэк пак по 100 блэкперлов только тогда когда у него из бек пака игрок№2 их сворует! он берет только 1 раз по этому скрипту и все! дальше просто стоит!

[MuDaCk]

значит скрипт зависает и паузу между проверками надо больше поставить...

[kykypy3a]

я его дом труба шатал этого скрипта ) вообщем просто поменял
это
(CountEx(item,ResColor,Backpack) < 1) then
на это
(FindTypeEx(item,ResColor,Backpack,False) < 1) then
и все работает ))
спс за помощь )

[kykypy3a]

я его дом труба шатал этого скрипта ) вообщем просто поменял
это
(CountEx(item,ResColor,Backpack) < 1) then
на это
(FindTypeEx(item,ResColor,Backpack,False) < 1) then
и все работает ))
спс за помощь )

и все же проблема актуальна! скрипт заработа но берет и по 1 и по 100 и по 65 шт но проблема в бругов! работает примерно 5 минут! и потом опять же просто стоит! иралса с задержками не помогло! в чем может быть причита ! вот скрипт который заработал!

Code: Select all

Program testing;

const 
Item= $0F7A; // Итем
ResColor= $0000; // Цвет
Sunduk= $47D99ACA; // ИД Сундука
waittime= 1000; // Сколько ждать
qty= 100 ; // Кол-Во


procedure CheckItem;
begin
if (FindTypeEx(item,ResColor,Backpack,False) < 1) then
  begin
useobject(Sunduk);
wait(400);
  MoveItem(FindTypeEx(Item,ResColor,Sunduk,False),qty,Backpack,0,0,0);
  wait(waittime);
end;
end;

BEGIN

addtosystemjournal('Скрипт стартовал');
setarstatus(true);
while true do
begin
CheckItem;
end;
END.

[MuDaCk]

Code: Select all

BEGIN

addtosystemjournal('Скрипт стартовал');
setarstatus(true);
while true do
begin
CheckItem;
end;
END.

Ты хочешь сказать что ты после чек итем ставил задержку и скрипт всё равно зависает? А зачем ты её убрал? задержка должна быть обязательно!

[CFA]

Code: Select all

const
	itemType = $0F7A;
	itemColor = $0000;
	container = $47B7F194;
	qty = 65;

begin
	useObject(container);
	checkLag(5000);
	
	while true do
	begin
		wait(200);
		findTypeEx(itemType, itemColor, Backpack, false);
		
		if (finditem = 0) then
		begin
			findTypeEx(itemType, itemColor, container, false);
			
			if findItem <> 0 then
			begin
				moveItem(finditem, qty, Backpack, 0, 0 ,0);
				checkLag(5000);
			end
			else
			begin
				addToSystemJournal('В сундуке нет регов!');
				exit;
			end;
		end;
	end;
end.

[kykypy3a]

Code: Select all

const
	itemType = $0F7A;
	itemColor = $0000;
	container = $47B7F194;
	qty = 65;

begin
	useObject(container);
	checkLag(5000);
	
	while true do
	begin
		wait(200);
		findTypeEx(itemType, itemColor, Backpack, false);
		
		if (finditem = 0) then
		begin
			findTypeEx(itemType, itemColor, container, false);
			
			if findItem <> 0 then
			begin
				moveItem(finditem, qty, Backpack, 0, 0 ,0);
				checkLag(5000);
			end
			else
			begin
				addToSystemJournal('В сундуке нет регов!');
				exit;
			end;
		end;
	end;
end.

огромное спасибо все работает!