И снова... автолут :)

[Nearga]

Начну с того, что моя теперешняя автолутилка прекрасно работает, гребет то, что нужно, распределяет по сумкам и вообще все прекрасно (имеется в виду, что данный пост - не просьба "хачу автолут")
Но совершенству нет предела, да и я наткнулся на старую тему http://forum.yoko.com.ua/viewtopic.php?p=20978
Там говорится о том, что

Скорость достигаеца за счет того, что в UNSP на drw задержка лута 500мс., однако как фаст лут действия игрока распознаются, если полутано больше чем 2-3 вещи за 500мс.

Окей, давайте попробуем

Code: Select all

      
grabbed = 0
repeat
       UO.FindType(Loot[i],-1,'lastcontainer')
        if UO.GetQuantity('finditem') then
         UO.Grab('0','finditem')
         grabbed = grabbed +1
         wait(10)
         Else
        endif
        if (grabbed > 1) then
         wait(500)
          grabbed = 0
        endif
      until Exit==1 OR uo.injournal("loot")

Лутим вещи парами: между первой и второй шмоткой пауза 10, между воторой и третьей - 510, потом опять 10 и снова 510.

Получаем:


Как с этим борятся на Дрв? Ставят задержку побольше после каждой шмотки?

[Kynep]

Задержка на перемещение вещей на ДРВ, при идеальном коннекте, составляет 600мс.

[Mirage]

все паузы заменить на

wait(500+uo.random(3)*50)

и усе

[Nearga]

Code: Select all

wait(500+uo.random(3)*50)

Низзя - та же фигня. 600 - работает, да.

Сорри, что не сказал о ДРВ раньше - на сколько я читал, остальные шарды нынче не очень популярны. Посему думал, что любой новый участнег определяется в ДРВ по умолчанию

[Mirage]

Я там например никогда не играл

[Sirocco]

любой новый участнег определяется в ДРВ по умолчанию

суперская реклама

[Nearga]

суперская реклама

[Nearga]

А если по теме: поставил задержку 600 и все ок, спасибо Куперу за инфу.

[Mirage]

Однакож можно немного сократить.

Code: Select all

var lootwait = 50
Sub Loot(Type, Color, SourceContainer, TargetContainer,X,Y,Z)
   ;uo.ignorereset()
   UO.FindType(Type, Color, SourceContainer)
   while UO.FindCount()
         timemove=UO.Timer()
         while UO.ContainerOf( UO.GetSerial('finditem') )==SourceContainer && timemove+20>UO.Timer() 
            uo.MoveItem('finditem',0,TargetContainer,X,Y,Z)
            wait(lootwait)
         wend
      UO.FindType(Type, Color, SourceContainer)
   wend
end sub