##Берем два сундука или шкатулки с ключами в бэкпак
##Кладем кучу отмычек рядом на пол
##Закрываем оба контейнера, запускаем скрипт
##Lockpicking v1.00 Kitten

sub Lockpicking() 

uo.exec('addobject Sunduk1') 
while uo.targeting() 
wait(100) 
wend

uo.exec('addobject Key1') 
while uo.targeting() 
wait(100) 
wend

uo.exec('addobject Sunduk2') 
while uo.targeting() 
wait(100) 
wend

uo.exec('addobject Key2') 
while uo.targeting() 
wait(100) 
wend

VAR i = 1
VAR k = 1
##################################################################
repeat

if i == 1 then
         UO.WaitTargetObject('Sunduk1') 
         uo.usefromground(0x14FB) ;Lockpick
         uo.deletejournal()
         CheckLag() 
         wait(7600)
endif

if uo.injournal('You opened the lock!') then
   i = 0
   uo.deletejournal()
   while i == 0
      uo.deletejournal()
      UO.WaitTargetObject('Sunduk1')
        UO.Useobject('Key1')
        CheckLag()
        wait(1000)
           if uo.injournal('You lock it.') then
              i = 1
              uo.deletejournal()
           endif
   wend
endif
   
if k == 1 then
         UO.WaitTargetObject('Sunduk2') 
         uo.usefromground(0x14FB) ;Lockpick
         uo.deletejournal()
         CheckLag() 
         wait(7600)
endif

if uo.injournal('You opened the lock!') then
   k = 0
   while k == 0
      uo.deletejournal()
      UO.WaitTargetObject('Sunduk2')
        UO.Useobject('Key2')
        CheckLag()
        wait(1000)
           if uo.injournal('You lock it.') then
              k = 1
              uo.deletejournal()
           endif
   wend
endif
until 1==0
endsub

sub CheckLag() 
UO.DeleteJournal() 
UO.Click('backpack') 
repeat 
wait(100) 
until UO.InJournal('backpack') 
end sub