[Gatin]

if anyone need tinker for inject
i think its work

Code:

VAR Sunduk = '0x4013FA45'
Sub Tinkering()
VAR TT='0x1EB8'
VAR counter
While UO.SkillVal('Tinkering','1') < 1000
     UO.DeleteJournal()
counter = 0
  UO.RClick(146,82)
  UO.WaitMenu('Tinkering menu','Tools','Tinkering menu','lockpick')
  UO.UseType(TT)
       Repeat
        wait(200)
counter = counter + 1
     Until UO.InJournal('You create') OR UO.InJournal('You failed') OR (counter>40)
     Wait(100)
If UO.Count('0x1BEF') <= 100 then
  Grab_Iron()
EndIf
  If UO.Count('0x14FC') >= 100 then
     Drop_LockPicks()
    wait(2000)
  EndIf
Wend
EndSub
Sub Grab_Iron()
     UO.FindType(0x1BEF,-1,Sunduk)
     UO.Moveitem('finditem','200','backpack')
     Wait(1000)
EndSub
Sub Drop_Lockpicks()
     UO.FindType(0x14FC,-1,'backpack')
     UO.Moveitem('finditem','100',Sunduk)
     wait(1000)
EndSub