Page 1 of 1
Проблема с банковским сундуком.
Posted: 2006-11-25 18:17:16
by romandze
У меня такая проблема, есть пещера, в ней стоит сундук банковский, как сделать так чтобы он в него скидывал например выкопаную руду, обьясните просто как заставить туда складывать, как выкопать и как подойти к сундуку я знаю, просто нельзя в него бросить методом перетаскивания, нужно обязательно открывать. Подскажите, а?
Posted: 2006-11-25 19:00:11
by omi4
Posted: 2006-11-25 19:29:29
by slonopotam
Когда задаешь такие вопросы, нужно как минимум указать как открывается банк, сказав "bank" или дабл кликом?
Posted: 2006-11-26 01:49:50
by romandze
банк открывается двойным кликом..
Posted: 2006-11-26 02:09:47
by slonopotam
А что именно непонятно, как открыть банк или как переложить руду?
Открывается банк обычным uo.usetype(type,[color]),
А чтоб переложить, ненужно мудрить, брось в банк какойнибудь контейнер (сундук, мешок). И перекладывай в него. Предварительно создав массив с типами руды.
Code: Select all
Sub DropOre()
uo.Print('Начинаем разгрузку.')
if uo.Waiting() then
uo.CancelTarget()
end if
var a,Exit
dim Ruda[1]
Ruda[0]=0x19B9
uo.Print('Выкладываем руду.')
uo.SetReceivingContainer(Sunduk2)
wait(500)
for a=0 to 0
Exit=0
repeat
uo.FindType(Ruda[a])
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
wait(1500)
else
Exit=1
end if
until Exit==1
next
if SteikFat==1 then
SteikFat()
end if
uo.UnSetReceivingContainer(Sunduk2)
uo.Print('Руда Выложена.')
end sub
Posted: 2006-11-26 10:21:02
by romandze
спасибо