sub Blacksmithing() var Exit=0, LastTimer while Exit<>1 uo.DeleteJournal() LastTimer=uo.Timer() uo.WaitMenu('Blacksmithing','Weapons','Weapons','Swords','Swords','dagger') uo.UseType('0x1BEF')
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('0x0F51',-1,'backpack') If UO.GetQuantity('finditem') then UO.WaitTargetObject('finditem') UO.UseObject(0x404A52A4) ;Forzha 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('0x1BEF','0x0000','0x400546E5') ;Cундук с ингами wait(2000) uo.Grab('500','finditem') Endif wait(1500) wend end sub
