Yoko

sub Tinkering()

VAR Exit = 0, k, bag

VAR color = '0x0000'
VAR item = '0x09C2'

VAR chesttoput = ''
VAR chestwithbags = ''
VAR chestwithings = ''

uo.Deletejournal()
While UO.SkillVal( 'Tinkering' ) < 1200

uo.useobject(chesttoput)
checklag()
uo.useobject(chestwithbags)
checklag()
uo.useobject ...

Интересно сделан скрипт, первый раз вижу крафт с помощью функции реколл, помоему у тебя конструкция Del('You put|fail|World Save') как-то не так работает, не удаляет она все эти строки из журнала, поэтому когда ты крафтишь следующий щит, в журнале уже висит или ю пут или фэйл, поэтому цикл ожидания ...

Рекол здесь применен т.к. крафт происходит путем дабл клика на инготы и выбором итема для крафтинга в меню. То есть в данном случае сам краф происходит через гампы.
Wait правильно должен выглядеть вот так?

Del('You put|fail|World Save')
uo.FindType('0x1BEF', color ,'backpack')
checklag()
uo.recall ...

Скрипт следующий:

sub Blacksmithy()
VAR Exit = 0, k, bag
VAR color = '' ;Цвет крафта
VAR item = '0x1b73' ;Крафт
VAR chesttoput = '0x40022f3a' ;Яшики
VAR chestwithbags = '0x40022f3a' ;Яшики
VAR chestwithings = '0x40022f3a' ;Яшики

uo.Deletejournal()
uo.useobject(chesttoput)
checklag()
uo ...

Скрипт следующий:

sub Blacksmithy()
VAR Exit = 0, k, bag
VAR color = '' ;Цвет крафта
VAR item = '0x1b73' ;Крафт
VAR chesttoput = '0x40022f3a' ;Яшики
VAR chestwithbags = '0x40022f3a' ;Яшики
VAR chestwithings = '0x40022f3a' ;Яшики

uo.Deletejournal()
uo.useobject(chesttoput)
checklag()
uo ...

Собственно попытался соединить пару скриптов на мининг, дабы сделать тот который подойдет к моему шарду (Oldparadise).
Получилось следующее:

sub mine()
var x, y, i, tmp, inside, goto_x, st, first
st=0
first=UO.GetX()

start:
inside=0
for y=-2 to 2
for x=-2 to 2

try:
UO.Exec ...