;# СКРИПТ нА НИКЛАСЫ #########################################
sub TinkerTrain_Necklace()
var ironbag, emptybag, fullbag, nowbag, kkk
;#############################################################
;# НАСТРОЙКИ #################################################
ironbag  = "0x403073DF" ; сумка с ироном
emptybag = "0x40081652" ; сумка с пустыми мешками
fullbag  = "0x400D9022" ; сюда складываются заполненные мешки
;#############################################################
kkk      = 255
uo.cancelmenu()
UO.automenu("Tinkering", "Jewelry")
UO.automenu("Jewelry", "necklace")
uo.useobject(ironbag)
uo.useobject(emptybag)
uo.useobject(fullbag)
repeat
InHide()
if kkk>=255 then
uo.Print("CONTAINER POLON")
uo.Print("BERU SLEDUSHIj")
uo.useobject(emptybag)
CheckLag()
UO.FindType("0x0E76", "-1", emptybag)
if uo.FindCount() then
uo.moveitem("finditem", "1", fullbag)
wait(3000)
CheckLag()
kkk    = 0
uo.UseObject("finditem")
uo.setreceivingcontainer("finditem")
else
uo.Print("EMPTY CONTAINER KONETC")
GoTo ExitF
endif
endif
UO.FindType("0x1BEF", "-1", "my")
if not uo.FindCount() then
uo.Print("NET IRON'a")
uo.Print("BERU ESHE...")
uo.useobject(ironbag)
CheckLag()
UO.FindType("0x1BEF", "-1", ironbag)
if uo.FindCount() then
uo.moveitem("finditem", "255")
wait(3000)
CheckLag()
else
uo.Print("IRON konetc")
GoTo ExitF
endif
endif
UO.DeleteJournal()
UO.Usetype("0x1EBC")
while not (UO.InJournal("You put") or UO.InJournal("Tinkering failed"))
wait(500)
wend
UO.FindType("0x1085", "-1", "my")
if uo.FindCount() then
uo.grab("1", "finditem")
kkk = kkk + 1
endif
until FALSE
ExitF:
uo.Print("***   FINISH   ***")
end sub


;# СКРИПТ на бутылки #########################################
sub TinkerTrain_Bottles()
var ironbag, bottlebag
;#############################################################
;# НАСТРОЙКИ #################################################
ironbag   = "0x403073DF" ; СУМКА С ИРОНОМ 
bottlebag = "0x400EC4AF" ; СЮДЫ СКЛАДЫВАЮТСЯ БУТЫЛКИ
;#############################################################
uo.cancelmenu()
UO.automenu("Tinkering", "Tools")
UO.automenu("Tools", "empty bottle")
uo.useobject(ironbag)
repeat
InHide()
UO.FindType("0x1BEF", "-1", "my")
if UO.GetQuantity('finditem')<10 then
uo.useobject(ironbag)
CheckLag()
UO.FindType("0x1BEF", "-1", ironbag)
if uo.FindCount() then
uo.moveitem("finditem", "255")
wait(3000)
CheckLag()
else
uo.Print("IRON konetc")
GoTo ExitF
endif
endif
UO.DeleteJournal()
UO.Usetype("0x1EBC")
while not (UO.InJournal("You put") or UO.InJournal("Tinkering failed"))
wait(500)
wend
UO.FindType("0x0F0E", "-1", "my")
if UO.GetQuantity('finditem')>100 then
uo.moveitem("finditem", "all", bottlebag)
endif
until FALSE
ExitF:
uo.Print("***   FINISH   ***")
end sub


;# СКРИПТ НА ЛОКПИКИ ############################ 
sub TinkerTrain_Lockpick()
var ironbag, bottlebag
;#############################################################
;# НАСТРОЙКИ #################################################
ironbag   = "0x403073DF" ; сумка с ироном
bottlebag = "0x403073DF" ; сумка для отмычек
;#############################################################
uo.cancelmenu()
UO.automenu("Tinkering", "Tools")
UO.automenu("Tools", "lockpick")
uo.useobject(ironbag)
repeat
InHide()
UO.FindType("0x1BEF", "-1", "my")
if not uo.FindCount() then
uo.useobject(ironbag)
CheckLag()
UO.FindType("0x1BEF", "-1", ironbag)
if uo.FindCount() then
uo.moveitem("finditem", "255")
wait(3000)
CheckLag()
else
uo.Print("IRON konetc")
GoTo ExitF
endif
endif
UO.DeleteJournal()
UO.Usetype("0x1EBC")
while not (UO.InJournal("You put") or UO.InJournal("Tinkering failed"))
wait(500)
wend
UO.FindType("0x14FB", "-1", "my")
if UO.GetQuantity('finditem')>100 then
uo.moveitem("finditem", "all", bottlebag)
endif
until FALSE
ExitF:
uo.Print("***   FINISH   ***")
end sub

;# ДПРПМОЙФЕМШОБС ЖТЕОШ
sub InHide()
uo.WarMode(0)
CheckLag()
if not uo.Hidden() then
while NOT uo.Hidden()
uo.useskill('Hiding')
wait(5000)
CheckLag()
wend
endif
end sub
sub CheckLag()
if uo.Waiting()>0 then
uo.Exec('canceltarget')
end if
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(300)
until uo.InJournal('backpack')
end sub
sub Terminate()
uo.cancelmenu()
uo.canceltarget()
Uo.Print("Terminate ALL")
uo.Exec("terminate all")
end sub