Помогите с Auto\Wait menu
Posted: 01.03.2010 3:00
Не могу реализовать крафт любых вещей, пробовал варианты и с тейлором и бс-ом и тинкером, гампы крафта вроде вызываются, а вот "батоны" не выбирает.
Code: Select all
...
const
ttools = $1EB8;
var
TimeStart : TDateTime;
k : integer;
...
Begin
addtosystemjournal('Craft Pickaxe');
k :=0
timestart :=now;
cancelmenu;
automenu('Tinkering' , 'Tools');
automenu('Tools' , 'shovel')
useobject(findtype(ttools,Backpack));
repeat
wait(1000);
k:=k+1;
checksave;
until (injournalbetweentimes('You put|failed', TimeStart, Now)<>-1)or(k>4)
end.