Yoko

Code: Select all

sub ContItemCounter()
var i, ci = 5 ; количество типов контейнеров
var in_search = "ground" ; где искать контейнеры
DIM cnt[val(str(ci))]
cnt[0] = "0x0000" ; тип контейнера
cnt[1] = "0x0000" ; тип контейнера
cnt[2] = "0x0000" ; тип контейнера
cnt[3] = "0x0000" ; тип контейнера
cnt[4] = "0x0000" ; тип контейнера
DIM msg[val(str(ci))]
msg[0] = "a bag [0 items]" ; сабж с нулём при клаце
msg[1] = "a bag [0 items]" ; сабж с нулём при клаце
msg[2] = "a bag [0 items]" ; сабж с нулём при клаце
msg[3] = "a bag [0 items]" ; сабж с нулём при клаце
msg[4] = "a bag [0 items]" ; сабж с нулём при клаце
uo.textprint("Найденные контейнеры с больше, чем 0 предметов.")
for i=0 to ci-1
repeat
uo.findtype(cnt[i], "-1", in_search)
if uo.findcount() then
deljournal(msg[i])
uo.click("finditem")
checklag()
if not uo.injournal(msg[i]) then
uo.textprint("ID: "+uo.getSerial("finditem"))
endif
uo.ignore("finditem")
until not uo.findcount()
next
uo.textopen()
endsub

Sub deljournal(msg)
while uo.injournal(msg)
uo.setjournalline(uo.injournal(msg)-1,"")
wend
endsub

Sub checklag()
deljournal("backpack|Backpack")
uo.click("backpack")
repeat
wait(100)
until uo.injournal("backpack|Backpack")
endsub

Code: Select all

metal chest (12 items)