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

Реги

Реги