Ultima Online Antares

sub Tinkering()

VAR Ing = '0x1BEF'
VAR Instrum = '0x1EBC'

uo.cancelmenu()
uo.automenu('Tinkering','Miscellaneous')
uo.automenu('Miscellaneous','Iron Key')
while UO.Count('0x1BEF')>3
UO.DeleteJournal()
UO.UseType('0x1EBC')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("failed")
wait(300)
wend
wend
end sub


Нада чтоб он эти ключики выкидывал под себя , и чтобы когда ломался инструмент он его находил и заново начинал
спс

под себя не стоит там только пару десятков влезет потом спамить будет много много. Лучше в трешку или продавать.

трешку где взять то?

бутылки лучше делай, пригодятся)

sub botl()
While UO.Count('0x1BEF') > 0
UO.deletejournal()
UO.Exec("waitmenu 'Tinkering' 'Miscellaneous' 'Miscellaneous' 'Empty Bottle'")
UO.usetype("0x1EBC")
repeat
wait(500)
until UO.injournal("You put") OR UO.InJournal("fail")
wend
end sub