Дроп вещей.Надо показать где ошибка.
Posted: 2009-12-15 05:58:13
Помогите со скриптом надо чтоб он работал постоянно и искал шмотки чтоб выкинуть ...и он когда выкидывает все шмотки пишит ошибку помогите разобраться...) буду очень Благодарен!
sub drop()
var i
DIM types[4]
types[0] = '0x09CC'
types[1] = '0x1711'
types[2] = '0x170F'
types[3] = '0x0DD6'
for i = 0 to 3
UO.FindType(types[i], 'backpack')
If UO.FindCount() > 0 then
repeat
UO.MoveItem('finditem', '-1', 'ground')
wait(1000)
UO.FindType(types[i], 'backpack')
until NOT UO.FindCount()
endif
next
next
end sub
sub drop()
var i
DIM types[4]
types[0] = '0x09CC'
types[1] = '0x1711'
types[2] = '0x170F'
types[3] = '0x0DD6'
for i = 0 to 3
UO.FindType(types[i], 'backpack')
If UO.FindCount() > 0 then
repeat
UO.MoveItem('finditem', '-1', 'ground')
wait(1000)
UO.FindType(types[i], 'backpack')
until NOT UO.FindCount()
endif
next
next
end sub