Yoko

sub Inscript()
UO.CancelMenu()
UO.AutoMenu('Spell Circle 4','Recall')
UO.AutoMenu('Spell Circles','Fourth Circle')
#Здесь вбей ИД сундука, из которго брать реги, бланки, и туда же будут складываться готовые реколы.
var Container='0x40222FA9'
var exit=0

repeat
#Лепим свитки
while UO ...

sub Camping()
var Exit=0
var q=3
var w=0
var e=0
uo.Print('Выбери Сундук с Хворостом: ')
uo.Exec('addobject Chest')
while uo.Targeting()
wait(100)
wend
var mx, my, mz, i, j
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
UO.DeleteJournal()
uo.exec("set distance 1 ...

sub Camping()
var Exit=0
var q=0
var w=0
var e=0
uo.Print('Âûáåðè Ñóíäóê ñ Õâîðîñòîì: ')
uo.Exec('addobject Chest')
while uo.Targeting()
wait(100)
wend

for w=0 to 4
while not uo.Dead() or Exit<>1
for q=0 to 25
UO.DeleteJournal()
uo.FindType('0x0DE1','0x0000','Chest')
if uo.GetQuantity ...