Если нужно просто заполнить книгу свитками то перебор типов от первого до последнего цель на книгу. Типа того:
Code:
sub SpellBook();
var SundLoot = 'ID сундука со свитками'
var SpellBook = 'ID спеллбука'
PUTLoot2(0x1f19, 0x1f6c, '0', SundLoot, SpellBook) ; свиток с 1 по 88 из сумки на книгу.
endsub
Sub PUTLoot2(Type1, Type2, Color, SourceContainer, TargetContainer)
;uo.ignorereset()
for TType = Type1 to Type2
PUTLoot(TType, Color, SourceContainer, TargetContainer)
next
end sub
Sub PUTLoot(Type, Color, SourceContainer, TargetContainer)
var timemove
;uo.ignorereset()
UO.FindType(Type, Color, SourceContainer)
while UO.FindCount()
timemove=UO.Timer()
uo.MoveItem('finditem',0,TargetContainer)
repeat
wait(100)
until UO.ContainerOf('finditem')<>TargetContainer && timemove+30>UO.Timer()
UO.FindType(Type, Color, SourceContainer)
wend
end sub
Если нужна именно копия существующей книги то чуть чуть сложнее.