sub BowCraft() repeat uo.FindType('0x1bd4','0x0000','backpack') put: if uo.GetQuantity('finditem')<1 then uo.FindType('0x1bd4','0x0000','0x40001988') ;Сериал сундука uo.Grab('1','finditem') wait(400) end if uo.FindType('0x1bd4','0x0000','backpack') if uo.GetQuantity('finditem')<1 then goto put end if uo.Usetype('0x1bd4') uo.CancelMenu() uo.WaitMenu('Select arrow type','bolt') wait (1000) uo.DeleteJournal() while not (uo.InJournal("You put") or uo.InJournal("You fail")) wait(300) wend uo.UnSetReceivingContainer() wait(200) until uo.Dead() end sub