Yoko

Posted: **2004-06-07 12:41:51**

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

Posted: **2004-06-07 13:59:13**

Code: Select all

sub UpdateContainers(contobj)
  var cont,cnt
  uo.FindType("0x0E76","-1","contobj")
  cnt=uo.FindCount()
  while cnt>0
   uo.UseObject("finditem")
   uo.MoveItem("finditem","0","contobj",STR(uo.GetX("finditem")),STR(uo.GetY("finditem")),STR(uo.GetZ("finditem")))
   wait(100)
   uo.Ignore("finditem")
   UpdateContainers(uo.GetSerial("finditem"))
   uo.FindType("0x0E76","-1","contobj")
    cnt=uo.FindCount()
  wend
  uo.FindType("0x0E75","-1","contobj")
  cnt=uo.FindCount()
  while cnt>0
   uo.UseObject("finditem")
   uo.MoveItem("finditem","0","contobj",STR(uo.GetX("finditem")),STR(uo.GetY("finditem")),STR(uo.GetZ("finditem")))
   wait(100)
   uo.Ignore("finditem")
   UpdateContainers(uo.GetSerial("finditem"))
   uo.FindType("0x0E75","-1","contobj")
    cnt=uo.FindCount()
  wend   
end sub

вызываешь ЭТО, указав в качетсве аргумента серийник своего бакпака
Правда, работает только для сумок, насколько я понял...Но это легко модифицируется

Yoko

Реги

Реги