Code: Select all
sub BlackSmith()
UO.AutoMenu('Blacksmithing','Weapons');
UO.AutoMenu('Weapons','Swords');
UO.AutoMenu('Swords','dagger');
UO.UseType(0x1bf2);
wend
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(100)
wend
If UO.InJournal("You put") then
repeat
EndIf
end subПомогите, плиз, ньюбику...