Код:
set $a you put
set $b %
set $c tailoring failed.
double_left 852, 97 //стопка еды
wait 1s
repeat 50
set lastobjectID 1094852205 //идишка приспособления для шитья
send Delete //ластобжект, вайтфортагрет, ласт таргет
wait 1s
while_not 64, 65 10855845 //цвет и координаты меню
end_while
double_left 64, 65 // тыкаем по координатам
while_not 218, 73 9219517 // цвет и координата того что шить
end_while
double_left 218, 73 //тыкаем что бы начал шить
while_not lastmsg = $a or lastmsg = $b or lastmsg = $c
end_while
end_repeat
Думаю смысл понятен...