Yoko

Code: Select all

if uo.dead() then
uo.deletejournal()
main()
else
Return
end if

Code: Select all

sub main()
   var filetype = "BMP" ; в каком формате сохранять скриншоты
   var filename = sc_dir
   var self = 'self', name, telo
   mkdir( filename )
   filename = filename + uo.getInfo( "shard" ) + "/"
   mkdir( filename )
   filename = filename + uo.getInfo( "character" ) + "/"
   mkdir( filename )
   filename = filename + getDate( "." ) + " " + getTime( "-" )
   uo.set('finddistance',25)
   uo.ignore(self)
   repeat
      uo.findman()
      if uo.findcount() then
         telo = UO.GetSerial('finditem')
         UO.Click(telo)
         name = UO.GetName(telo)
         uo.snap( filetype, filename + "." + filetype )
      endif
      wait(500)
   uo.closeuo()
   until  uo.dead()   
end sub