вот скрипт на боукрафт, делает стрелы по 1 шт, только не складывает в кучку - как это прописать ?
sub Bowcraft()
var Kolvo=1
while uo.count("0x1BD1") > 0
uo.findtype("0x1BD4", -1, "ground")
UO.Grab( Str( Kolvo ), 'finditem' )
wait(500)
repeat
wait(250)
until uo.count("0x1BD4") > 0
uo.waitmenu("What", "Arrow")
uo.waittargettype("0x1BD1")
uo.usetype("0x1BD4")
uo.deletejournal()
repeat
wait(250)
until uo.injournal("You create") or uo.injournal("You destroy")
wend
end sub