Хелп Кукинг =)

proZak · Post by **proZak** » 30.05.2008 1:23

Достал макрос вроде все просто написано но всеровно нехочет работать (бывает поработает минут 5 и выдает такую фишку):
2:24:53 [proZak]: UseObject error: Object not finded.

сам макрос:

Code: Select all

Program cooking_elfar;
BEGIN
{указать айди бекпака который лежит в вашем паке, и где лежит еда}
useobject($777E1EDE);
wait(2000);

while true do begin

if FindType($097a, backpack) = 0 then
   begin
        {указать айди того же бекпака что мы указывали выше}
   moveitem (findtype ($097a,$777E1EDE), 1, backpack, 0, 0, 0); 
   wait(400);
   
   end;

   useobject(FindType($097a,backpack));
   WaitForTarget(500);
       {указать айди плавильни, или просто огня.}
   TargetToObject($63087158);
   wait(3200);

end;
END.

AlexM2008 · Post by **AlexM2008** » 30.05.2008 18:22

Ругается потому, что нечего жарить.

Сделай проверку на наличие в контейнере и бери с учетом "грузоподъемности" УО по 2 штуки

if findtype($097a,$777E1EDE) > 0 then MoveItemFindItem,2,Backpack,0,0,0);

Поиск: http://stealth.od.ua/forum/viewtopic.php?t=671

proZak · Post by **proZak** » 30.05.2008 22:46

AlexM2008 wrote:Ругается потому, что нечего жарить.

Сделай проверку на наличие в контейнере и бери с учетом "грузоподъемности" УО по 2 штуки

if findtype($097a,$777E1EDE) > 0 then MoveItemFindItem,2,Backpack,0,0,0);

Поиск: http://stealth.od.ua/forum/viewtopic.php?t=671

вставил проверку как ты написал и вот шо теперь выдает=):

Code: Select all

23:48:28 [proZak]: Compiler: [Error] (1111111111111.txt at 12:42):  Unknown identifier 'MoveItemFindItem'
23:48:28 [proZak]: Compiling failed

-=JoKeR=- · Post by **-=JoKeR=-** » 31.05.2008 0:33

Куда и что ты вставил?
Скрипт показывай, телепаты отдыхают)

Scripts Writer · Post by **Scripts Writer** » 31.05.2008 10:40

proZak wrote:
AlexM2008 wrote:Ругается потому, что нечего жарить.

Сделай проверку на наличие в контейнере и бери с учетом "грузоподъемности" УО по 2 штуки

if findtype($097a,$777E1EDE) > 0 then MoveItemFindItem,2,Backpack,0,0,0);

Поиск: http://stealth.od.ua/forum/viewtopic.php?t=671
вставил проверку как ты написал и вот шо теперь выдает=):
Code: Select all
23:48:28 [proZak]: Compiler: [Error] (1111111111111.txt at 12:42):  Unknown identifier 'MoveItemFindItem'
23:48:28 [proZak]: Compiling failed

Скобку после MoveItem и перед FindItem чтоб получась функция с параметрами

proZak · Post by **proZak** » 31.05.2008 19:06

Scripts Writer wrote:
proZak wrote:
AlexM2008 wrote:Ругается потому, что нечего жарить.

Сделай проверку на наличие в контейнере и бери с учетом "грузоподъемности" УО по 2 штуки

if findtype($097a,$777E1EDE) > 0 then MoveItemFindItem,2,Backpack,0,0,0);

Поиск: http://stealth.od.ua/forum/viewtopic.php?t=671
вставил проверку как ты написал и вот шо теперь выдает=):
Code: Select all
23:48:28 [proZak]: Compiler: [Error] (1111111111111.txt at 12:42):  Unknown identifier 'MoveItemFindItem'
23:48:28 [proZak]: Compiling failed
Скобку после MoveItem и перед FindItem чтоб получась функция с параметрами

зделал как ты писал вот шо выдает=):

Code: Select all

20:10:04 [proZak]: Compiler: [Error] (1111111111111.txt at 12:50):  Invalid number of parameters
20:10:04 [proZak]: Compiling failed
20:10:04 [proZak]: Script 1111111111111.txt stoped successfuly

-=JoKeR=- · Post by **-=JoKeR=-** » 31.05.2008 20:57

А ты зделал как я сказал?
Покажи скрипт, помогут быстрее люди...

proZak · Post by **proZak** » 31.05.2008 23:14

Code: Select all

Program cooking_elfar;
BEGIN
{указать айди бекпака который лежит в вашем паке, и где лежит еда}
useobject($777E1EDE);
wait(2000);

while true do begin

if FindType($097a, backpack) = 0 then
   begin
        {указать айди того же бекпака что мы указывали выше}
   if findtype($097a,$777E1EDE) > 0 then MoveItem)(FindItem,2,Backpack,0,0,0); 
   wait(400);
   
   end;

   useobject(FindType($097a,backpack));
   WaitForTarget(500);
       {указать айди плавильни, или просто огня.}
   TargetToObject($63087158);
   wait(3200);

end;
END.

-=JoKeR=- · Post by **-=JoKeR=-** » 31.05.2008 23:55

OMG

ты что сам не видишь?
if findtype($097a,$777E1EDE) > 0 then MoveItem)(FindItem,2,Backpack,0,0,0);

Компилятор тебе указал строку и столбец с ошибкой.

proZak · Post by **proZak** » 01.06.2008 15:52

собствено зделал все как вы писали и всероно опять после запуска минут 5 поработает а потом выдает такую фишку:

Code: Select all

16:55:04 [proZak]: UseObject error: Object not finded.
16:55:08 [proZak]: UseObject error: Object not finded.
16:55:13 [proZak]: UseObject error: Object not finded.
16:55:17 [proZak]: UseObject error: Object not finded.
16:55:22 [proZak]: UseObject error: Object not finded.
16:55:26 [proZak]: UseObject error: Object not finded.

AlexM2008 · Post by **AlexM2008** » 02.06.2008 11:15

Вопрос: мешок со Стейками где живет?

Code: Select all

Program cooking_elfar; 

const 
boxress=$777E1EDE; 
Steake=$097A;
food=$097B; {Еда}

var 
Quantity : integer; 

BEGIN 
useobject(boxress); 
wait(1000); 

while true do begin 

if FindType(Steake, backpack) = 0 then 
   begin 
	findtype(Steake,boxress);
	Quantity:=FindFullQuantity; 
	AddToSystemJournal(IntToStr(Quantity)+' Steaks на данный момент в мешке.');

	if findtype(Steake,boxress) > 0 then MoveItem(FindItem,2,Backpack,0,0,0); 
	wait(400); 
 	findtype(Steake,backpack);
	Quantity:=FindFullQuantity; 
	AddToSystemJournal(IntToStr(Quantity)+' Steaks на данный момент в бекпаке.');
   
   end; 

  while count(Steake) > 0 do 
    begin 
	usetype(Steake,$FFFF);
 //  useobject(FindType(Steake,backpack)); 
	WaitForTarget(500); 
       {указать айди плавильни, или просто огня.} 
	TargetToObject($63087158); 
	wait(3200); 
    end 

  while FindType(food,backpack) > 0 do 
    begin 
      MoveItem(FindItem,0,boxress,0,0,0); 
      wait(250); 
    end 


end; 
END.

proZak · Post by **proZak** » 02.06.2008 16:45

Мешок со стейками лежыт в Бекпаке!

AlexM2008 · Post by **AlexM2008** » 02.06.2008 17:27

Это не есть Good

Тогда так:
1. Почему нельзя жарить из этого мешка прямо
2. Что произойдет если попытаться пожарить стопку из 10 Стейков
3. Как долго сможет работать такой скрипт (сколько ты поднимаешь Стейков в мешке)
и
4. На что ругается нарисованный выше скрипт?

proZak · Post by **proZak** » 02.06.2008 20:48

AlexM2008 wrote:Это не есть Good

Тогда так:
1. Почему нельзя жарить из этого мешка прямо
2. Что произойдет если попытаться пожарить стопку из 10 Стейков
3. Как долго сможет работать такой скрипт (сколько ты поднимаешь Стейков в мешке)
и
4. На что ругается нарисованный выше скрипт?

1.Незнаю не я писал скрипт (наверное так задумано, потомушо из стопки в 50К стейков нада оделять както ети 2 стейка постояно и потом их жарить);
2.Смысл 2 или 10? разницы помоему от етого не будет токо уйдет больше стейков на прокачку етого скила;
3.Непонял вопрос -)
4. Ну я чесно говоря незнаю, зналбы наверника может както попыталсобы устронить .

AlexM2008 · Post by **AlexM2008** » 03.06.2008 7:20

Попытка намберту

1. Можно ли жарить с земли, из мешка в бекпаке или ТОЛЬКО из бекпака?
2. То-есть, сколько тыкнешь, столько и пожарит!?
3. Скрипт будет работать пока не закончатся стейки в мешке. Поднять ты можешь ограниченный вес. Есть смысл брать Стейки не из мешка в бекпаке, а из мешка на земле или в сундуке, так как Стейков туда можно положить БОЛЬШЕ.
4. Ты так и не ответил. Скрипт, что я нарисовал выше работает или нет?