sub main()
   var n
   uo.set("finddistance", "28")
   
   UO.Print("Поехали по магазинам.") 
   uo.findtype(rune,-1,'backpack')
   if uo.findcount() and not uo.count(rune)>1 then
      Runehome=uo.getserial('finditem')
   else
      uo.print('Runehome not found! Terminate.')
      uo.exec('terminate all')
   endif
   Open(Sunduk)
   GrabBlankRune()   
   repeat   
      Open(Runebag)
      uo.findtype(rune,-1,RuneBag)
      while uo.findcount() 
         Nrune=uo.getserial('finditem')
         uo.moveitem('finditem',0,Dropbag)
         checklag()
         wait(700)
         RegCheck()
         RegCheck()
         if uo.mana < uo.int then
            meditation(uo.int)
         endif
         RecallRune(Nrune)
         uo.useskill('Meditation')
         if uo.injournal('The recall rune fades completely.') then
            markflag=1
            Mark(BlankRune,0)
            RuniNetu=1
         end if
         wait(500)
         Hlopok()
         checklag()
         
         RecallRune(RuneHome)
         uo.useskill('Meditation') # uo.useskill('Hiding')
         if uo.injournal('The recall rune fades completely.') then
            if RuniNetu==1 then
               Open(Sunduk)
               GrabBlankRune()
            endif         
            Mark(BlankRune,1)
            GrabBlankRune()
         end if
         if RuniNetu==1 then
            Open(Sunduk)
            GrabBlankRune()
         endif
         Open(Sunduk)
         if markflag==1 then
            uo.moveitem(Nrune,0,Dropbag)
            checklag()
            wait(700)
            markflag=0
         endif
         DropItems()
         uo.findtype(rune,-1,RuneBag)
      wend
      DropbagCheck()
   until uo.dead() 
end sub