Yoko
http://forum.yoko.com.ua/

Auto Pickup с земли
http://forum.yoko.com.ua/viewtopic.php?f=17&t=12133
Page 1 of 1

Author:  Shakawkaw [ 2007-06-22 01:38:04 ]
Post subject:  Auto Pickup с земли

Вобшем, нуден скрипт чтоб он сам пондимал веши с пола, но... но чтоб поднимал только указаные ID вешей. Ниже скрипт на поднятия с пола любых вешей в радиусе двух шогов, но мне нужно то что я обписал выше.

Code:
sub pickup() 
uo.set('finddistance','3')
uo.findtype(shmot,'-1','ground')
if uo.findcount() then
  uo.useobject('finditem')                 #юзает итем    ##лишнее
  uo.move('finditem','-1','backpack')      #кладёт в бекпак ##удалить
end if
end sub


И ешё.. Если можно, зделайте пожалуйсто чтоб он подбирал постояно указаные веши, самому чтоб ненадо было тыркать кнопкой когда хочешь подобрать. Кто его мне зделает готов заплатить WMZ.

Author:  arch [ 2007-06-22 08:34:38 ]
Post subject:  Re: Auto Pickup с земли

Shakawkaw wrote:
Вобшем, нуден скрипт чтоб он сам пондимал веши с пола, но... но чтоб поднимал только указаные ID вешей. Ниже скрипт на поднятия с пола любых вешей в радиусе двух шогов, но мне нужно то что я обписал выше.

Code:
sub pickup() 
uo.set('finddistance','3')
uo.findtype(shmot,'-1','ground')
if uo.findcount() then
  uo.useobject('finditem')                 #юзает итем    ##лишнее
  uo.move('finditem','-1','backpack')      #кладёт в бекпак ##удалить
end if
end sub


И ешё.. Если можно, зделайте пожалуйсто чтоб он подбирал постояно указаные веши, самому чтоб ненадо было тыркать кнопкой когда хочешь подобрать. Кто его мне зделает готов заплатить WMZ.

слишком простой скрипт, чтоб платить за него.

Code:
sub pickup_loop()
var N = 10, I
dim my_item[N]
my_item[0] = '0x000'; # сюда вписываешь все типы,
...                              # которые тебе надо поднимать. Не забудь,
my_item[N-1] = '0x0123'; #что в переменной N указано количество типов.

uo.set('finddistance','3')
uo.unsetreceivingcontainer();
repeat
  for I=0 to N-1
    uo.findtype(my_item[I],'-1','ground')
    if uo.findcount() then
      uo.grab('0','finditem')
      wait(200) # пауза при перекладывании
    else
      wait(10)
    end if
  next
until uo.dead()
end sub


1. скрипт написал прямо в окне ответа
2. не тестировал, естественно
3. последний свой скрипт написал месяца четыре назад, так что возможны где-то ошибки. Если что. меня поправят.

Good luck!

Author:  arch [ 2007-06-22 08:36:43 ]
Post subject: 

ЗЫ. Я удалил useobject из скрипта. Как мне кажется, совершенно лишнее действие.

Author:  Shakawkaw [ 2007-06-22 11:21:54 ]
Post subject: 

Спасибо, всё работает. Как от блогодорить?

Author:  arch [ 2007-06-22 11:32:25 ]
Post subject: 

Shakawkaw wrote:
Спасибо, всё работает. Как от блогодорить?
Уже отблагодарил: "Спасибо".

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/