Yoko

sub Tinkering()

VAR Exit = 0, k, bag

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

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

uo.Deletejournal()
While UO&#46;SkillVal&#40; 'Tinkering' &#41; < 1200

uo&#46;useobject&#40;chesttoput&#41;
checklag&#40;&#41;
uo ...

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

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

Del&#40;'You put|fail|World Save'&#41;
uo&#46;FindType&#40;'0x1BEF', color ,'backpack ...

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

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

uo&#46;Deletejournal&#40;&#41;
uo&#46;useobject ...

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

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

uo&#46;Deletejournal&#40;&#41;
uo&#46;useobject ...

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

sub mine&#40;&#41;
var x, y, i, tmp, inside, goto_x, st, first
st=0
first=UO&#46;GetX&#40;&#41;

start&#58;
inside=0
for y=-2 to 2
for x=-2 to 2 ...