sub Blacksmithing() var Exit=0, LastTimer while Exit<>1 uo.DeleteJournal() LastTimer=uo.Timer() uo.WaitMenu('Blacksmithing','Weapons','Weapons','Swords','Swords','dagger') uo.UseType('0x0FB1')
while not uo.InJournal('You put') and not uo.InJournal('You have failed') wait(500) wend
if uo.InJournal('You have failed') then repeat wait(100) until uo.Timer()>=LastTimer+100 end if repeat UO.FindType('0x13E4',-1,'backpack') If UO.GetQuantity('finditem') then UO.WaitTargetObject('finditem') UO.UseObject(0x403AB6AC) ; Oi?? wait(1250) Endif UO.FindType('0x0F51',-1,'backpack') until not UO.GetQuantity('finditem')
uo.FindType('0x1BEF',-1,'backpack') if uo.GetQuantity('finditem')<10 then uo.FindType('0x09A8','0x0000','0x40473F0A') ;Cундук с ингами wait(2000) uo.Grab('500','finditem') Endif wait(1500) wend end sub
