Page 1 of 1

Автолут по циклу

Posted: 2006-08-23 15:04:44
by predator-uo
поискал, посматрел, попробывал... А ваще может ли существовать этакий макр :shock: Пусть лутает только ГП хоть, но быстро :)
И есть ли какаета команда которая заставляет клиент грузить ЦП на 100%? если есть то какая...
взаранее спасибо.

Posted: 2006-08-23 15:57:03
by predator-uo
Если нету такого скрипта который по циклу, то что нужна изменить в этом макре чтобы он лутал толька "бабло"

Code: Select all

sub Loot() 
  uo.WaitTargetObject('lastcorpse')
  wait(500)
  uo.FindType('-1','-1','lastcorpse')
  while uo.FindCount()
    uo.FindType('-1','-1','lastcorpse')   
    uo.moveitem('finditem','-1','backpack')
    wait(500)
  wend
end sub

Posted: 2006-08-23 18:20:25
by Leo

Code: Select all

sub Loot() 
  uo.WaitTargetObject('lastcorpse')
  wait(500)
  uo.FindType('тип бабла','-1','lastcorpse') #командой ,info узнай тип бабла и впиши сюда
  while uo.FindCount()
    uo.FindType('тип бабла','-1','lastcorpse')  #и тут впиши 
    uo.moveitem('finditem','-1','backpack')
    wait(500)
  wend
end sub

Posted: 2006-08-23 19:04:31
by predator-uo
спасибо, всё работает, но я сделал в цикл:

sub Loot()
uo.WaitTargetObject('lastcorpse')
wait(500)
uo.FindType('0x0EED','-1','lastcorpse') #êîìàíäîé ,info óçíàé òèï áàáëà è âïèøè ñþäà
while uo.FindCount()
uo.FindType('0x0EED','-1','lastcorpse') #è òóò âïèøè
uo.moveitem('finditem','-1','backpack')
wait(500)
wend
wait(300)
Loot()
end sub

что нужно теперь сделать, чтобы не писалося в левой части экрана:
Items found: 0
Auto target cancelled

Re: Автолут по циклу

Posted: 2006-08-23 19:17:08
by Edred
predator-uo wrote:И есть ли какаета команда которая заставляет клиент грузить ЦП на 100%?


Пустой цикл поможет от подобных проблем.

Code: Select all

sub ProseccorNa100()
   while TRUE
       If UO.Dead() Then
            return
       Endif
   wend
endsub


Вот тебе полная загрузка проца при живом чаре. Выход через суицид.

Posted: 2006-08-23 19:37:08
by predator-uo
Стало лишь жестоко лагать :)

Posted: 2006-08-23 20:10:17
by SLAK
predator-uo wrote:спасибо, всё работает, но я сделал в цикл:
sub Loot()

end sub

Code: Select all

sub Loot()
While not uo.dead()
 uo.FindType('0x0EED','-1','lastcorpse')
    if uo.findcount() then
      uo.moveitem('finditem','-1','backpack')
      wait(500)
    end if
 wait(300)
wend
end sub

Постоянная рекурсия скрипта ведёт к неприятностям!!!

Posted: 2006-08-23 20:28:56
by predator-uo
теперь пишется лишь Items found: 0

Posted: 2006-08-24 18:01:03
by SLAK
Из хелпника: lastcorpse - Последний появившийся в области радиусом два экрана труп. Тобиш не самый лучший вариант, поскольку если контейнер не открыт инжа ,обычно, не знает что в нём...
Лучше юзать lastcontainer (Последний контейнер открытый сервером для вас), а на закладке Main инжекта поставить галочку напротив Corpses autoopen, а в скрипт добавить проверку : лутить с ластконтейнера только если он не бекпак или контейнер сам не в паке:

Code: Select all

sub Loot() 
While not uo.dead()
 uo.FindType('0x0EED','-1','lastcontainer')
    if uo.findcount() and uo.GetSerial('lastcontainer')<>uo.GetSerial('backpack') and uo.ContainerOf('lastcontainer')<>GetSerial('backpack') then
      uo.moveitem('finditem','-1','backpack')
      wait(500)
    end if
 wait(300)
wend
end sub


или можно сделать проверку на растояние до трупа, но галочку на закладке мейн всьо равно поставь:

Code: Select all

sub Loot() 
While not uo.dead()
if uo.GetDistance('lastcorpse')<2 then
 uo.FindType('0x0EED','-1','lastcorpse')
    if uo.findcount() then
      uo.moveitem('finditem','-1','backpack')
      wait(500)
    end if
endif
 wait(300)
wend
end sub

Posted: 2006-08-28 07:45:14
by predator-uo
SLAK wrote:
predator-uo wrote:спасибо, всё работает, но я сделал в цикл:
sub Loot()

end sub

Code: Select all

sub Loot()
While not uo.dead()
 uo.FindType('0x0EED','-1','lastcorpse')
    if uo.findcount() then
      uo.moveitem('finditem','-1','backpack')
      wait(500)
    end if
 wait(300)
wend
end sub

Постоянная рекурсия скрипта ведёт к неприятностям!!!


Вот юзаю этот макр, а можнали чтобы он при 1 повторе тащил гп ( что он щас и делает), при втором повторе он уже не гп лутал а кожу к примеру, при 3 повторе снова гп, при четвертом кожу.... Вот... но не в кем случае чтобы он всё это за одно повторение делал.

Posted: 2006-08-28 09:56:41
by Nmy
,emptycontainer 600 'lastcorpse'

+ ставим галку корпс автоопен :roll:

Posted: 2006-08-28 10:50:23
by Ex-Brodyaga
SLAK wrote:Постоянная рекурсия скрипта ведёт к неприятностям!!!


И где же там рекурсия?

Posted: 2006-08-28 21:25:39
by SLAK
Ex-Brodyaga wrote:И где же там рекурсия?

predator-uo wrote:спасибо, всё работает, но я сделал в цикл:

sub Loot()
uo.WaitTargetObject('lastcorpse')
wait(500)
uo.FindType('0x0EED','-1','lastcorpse')
while uo.FindCount()
uo.FindType('0x0EED','-1','lastcorpse')
uo.moveitem('finditem','-1','backpack')
wait(500)
wend
wait(300)
Loot()
end sub

что нужно теперь сделать, чтобы не писалося в левой части экрана:
Items found: 0
Auto target cancelled

Выделил жирным