sub tinker()
   VAR iron = '0x1BEF'
   VAR tool = '0x1EBC'
   uo.print('%autoload by SmaCk')
   uo.print('Tinkering 1.0 DMS Shard')
   wait(2000)
   uo.print('Usa-se Tinker Tools e Iron Ingots, o Macro faz clock parts')
   wait(5000)
   repeat
      if uo.count(tool)>=1 then
         if uo.count(iron)>=1 then ; IRON
            uo.usetype('0x1EBC') ; tinker tools
            UO.AutoMenu('Tinkering','Parts') ; seleciona clock parts para fazer
            UO.AutoMenu('Parts','hinge')
            wait(3500)
         else
            UO.print(UO.GetNAME('self') + ", Voce nao possui Iron Ingot suficiente em sua bag, voce precisa ter pelo menos 1, mas possui apenas: " +Str(UO.Count( iron ))+ ' Iron Ingots')
            wait(15000)
         endif
      else
         uo.print(UO.GetName('self') +", Voce precisa ter um Tinker Tool na sua bag para o macro funcionar")
         wait(15000)
      end if
   until uo.dead()
end sub