Сканер ПК

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
vertijok2000
Posts: 61
Joined: 2015-11-26 10:16:44

Сканер ПК

Post by vertijok2000 »

есть вот такой вот скрипт

Code: Select all

sub ScanPlayers()
   var i,player,caster
   var Message1,Message2
   Message1="is attacking you"
   Message2="Wis Quas|In Ex Grav|An Ex Por|In Sanct Ylem|Vas An Ort"
   UO.Ignore('self')
   UO.Set('finddistance','24')
   caster=''
   dim Char[2]
   Char[1]='0x0190' ; Male
   Char[2]='0x0191' ; Female
   UO.DeleteJournal()
   while not UO.Dead()
      for i=1 to 2
         UO.FindType(Char[i],'-1','1')
         if UO.FindCount()>0 then
            player=UO.GetSerial('finditem')
            if UO.GetNotoriety(player)==6 or UO.GetNotoriety(player)==4 or UO.InJournal(Message1) then
               UO.DeleteJournal()
               UO.Print('???????')
               runehome()
            end if
            if UO.InJournal(Message2) then ; ????
               caster=UO.JournalSerial(UO.InJournal(Message2)-1)
               UO.Cast('Magic Arrow',caster)
               wait(1000)  ;  ????? ????? ??????? ??????????????
               UO.DeleteJournal()
               runehome()           
            end if
            wait(100)
         end if
      next
   wend
end sub


как зделать так чтобы он не сработало runehome() по смс а по появления чяра на экране
Incorrect User
Posts: 949
Joined: 2011-05-23 00:33:30

Re: Сканер ПК

Post by Incorrect User »

Добавь в автостарт

Code: Select all

   uo.addfindlist("Alarm", "0x0190")
   uo.addfindlist("Alarm", "0x0191")

И вот скрипт на поиск

Code: Select all

sub Find()
   uo.ignore("self")           
   while not uo.findlist("Alarm", "ground", 30)
     wait(100)
   wend
   runehome()
end sub
vertijok2000
Posts: 61
Joined: 2015-11-26 10:16:44

Re: Сканер ПК

Post by vertijok2000 »

Code: Select all

sub Find()
   uo.addfindlist("Alarm", "0x0190")
   uo.addfindlist("Alarm", "0x0191")
   uo.ignore("self")         
   while not uo.findlist("Alarm", "ground", 30)
      wait(100)
   wend
   UO.DeleteJournal()
   uo.print('Yes Player')
end sub


я вот так зделал но почемута после первого раза запуска всё норм но потом хоть и игрока нету в поле зрения он его находит
Incorrect User
Posts: 949
Joined: 2011-05-23 00:33:30

Re: Сканер ПК

Post by Incorrect User »

Потому что ищет на 30 тайлов от чара. А это дальше за экран. Но это только если этот итем уже был ранее на экране. Поставь дистанцию поиска 18.
vertijok2000
Posts: 61
Joined: 2015-11-26 10:16:44

Re: Сканер ПК

Post by vertijok2000 »

тоже самое хз что ищо зделать

но спс за помощь тебе
kobol
Posts: 119
Joined: 2012-12-15 12:03:25
Location: C-Петербург

Re: Сканер ПК

Post by kobol »

у меня такого эффекта нет. Поставь дистанцию 3 и проверь. Подходишь на расстояние 3 - срабатывает, отходишь на 4 клетки, запускаешь скрипт - не срабатывает, подходишь ближе - снова срабатывает.
Ну еще, стоит галка "очищать память" в списке на вкладке Main в инже.
Post Reply