Нужен скрипт. Отблагодарю)
Генерал Полковник (32151950)12 летИнквизитор
Inquisitor
Сообщений: 766
Рег. 13.07.2011
7 мая 2017 23:23
Сообщение #1
Ребят, мне нужен скрипт на фишинг. Перепробывал разные с форума, всё не то.)
Нужно, что бы чар ловил с корабля. Уплывал на другое место, когда на одном кончается рыба. Кушал. Скидывал всю рыбу в трюм.
Отблагодарю, но чисто символически.
Старший Сержант (960341)8 лет
Dragonstalker
Сообщений: 516
Рег. 9.03.2016
8 мая 2017 01:28
Сообщение #2
Я этим рыбачил. Рыбачит в круг, плывет прямо, и так до победы. Он работает, но требует доработки. Нужно удалить лишние типы, которые у нас не ловятся и еще что-то там было. Проверку на усталость также неплохо бы добавить.
Исправленный скрипт, я, к сожалению, потерял.
Генерал Полковник (32151950)12 летИнквизитор
Inquisitor
Сообщений: 766
Рег. 13.07.2011
8 мая 2017 14:05
Сообщение #3
DeaTh,
Попробовал его запустить, ошибку выдает. А что-то изменять в скрипте я не смогу правильно, не умею .)
Лейтенант (4548828)10 лет
Dragonstalker
Сообщений: 3319
Рег. 19.11.2013
8 мая 2017 17:49
Сообщение #4
Я так, на всякий случай. Ты же его в стелс клиенте запускаешь? Не в инжекте?
Генерал Полковник (32151950)12 летИнквизитор
Inquisitor
Сообщений: 766
Рег. 13.07.2011
8 мая 2017 19:18
Сообщение #5
Mirage,
Мне стыдно это признавать,но...
А для инжекта есть ?
Старший Сержант (960341)8 лет
Dragonstalker
Сообщений: 516
Рег. 9.03.2016
8 мая 2017 21:42
Сообщение #6
Цитата: Mirage
Я так, на всякий случай. Ты же его в стелс клиенте запускаешь? Не в инжекте?

Я не был готов к этому :crazy:
Цитата: Sid Vicious
А для инжекта есть ?

А зачем? Зачем запускать клиент под работы, в которых ты не должен принимать участия? Стелс для такого скрипта можно настроить минут за 10 по любому гайду.
Цитата: Sid Vicious
Отблагодарю, но чисто символически.

С учетом этого пункта, большую часть все равно придется выполнять самому.
Генерал Полковник (32151950)12 летИнквизитор
Inquisitor
Сообщений: 766
Рег. 13.07.2011
8 мая 2017 23:11
Сообщение #7
DeaTh,
А ты мне можешь помочь разобраться со стелсом?
Старшина (1213389)14 лет
Ranger
Сообщений: 1029
Рег. 7.09.2009
9 мая 2017 00:51
Сообщение #8
уже 10 лет прошло а проблемы все те же
Генерал Полковник (32151950)12 летИнквизитор
Inquisitor
Сообщений: 766
Рег. 13.07.2011
9 мая 2017 09:50
Сообщение #9
Все еще актуально)
Прапорщик (1606194)5 лет
Ranger
Сообщений: 207
Рег. 4.04.2018
26 апреля 2018 08:30
Сообщение #10
Sid Vicious,
Есть вот такой скрипт
sub fish()
uo.deletejournal()
var mx, my, mz, i, j
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
for i = mx+2 to mx+6
for j = my-3 to my+3
UO.Print("Now Fishing In: "+str(mx-i)+" "+str(my-j))
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype("0x0DBF")
uo.deletejournal()
while not UO.InJournal("You pull") and not UO.InJournal("location") and not UO.InJournal("no fish") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in water")
wait(500)
wend
next
next
uo.say("forward")
wait(7000)
uo.say("stop")
uo.exec("exec fish")
end sub

НО! Ловит только по правому борту и не собирает рыбу :(
Вот с этим бы его объеденить - отличный бы получился скрипт с одной только проблемой - при поломке удочки не берет новую :(
var MaxFailure=8
sub FishingAround()
   var iX,iY
   for var iStep=0 to 1000
      for iX=-6 to 6
         for iY=-6 to 6
            GetAllFish(UO.GetX()+iX,UO.GetY()+iY)
         next
      next
   next
end sub

Sub GetAllFish(iX,iY)
   var counter=0
   repeat
      counter=counter+1
      UO.DeleteJournal()
      UO.WaitTargetTile(0,iX,iY,251)
      UO.UseType('0x0DBF')
      while not UO.InJournal('You pull out a') and not UO.InJournal('You fish a while, but fail to catch anything') and not UO.InJournal('There are no fish here.') and not UO.InJournal('Try fishing in water') and not UO.InJournal('Try fishing elsewhere') and not UO.InJournal('That is too far away') and not UO.InJournal('You cannot fish so close to yourself') and not uo.InJournal('*Your Fishing Pole destroyed!*')
         wait(100)
      wend
      if UO.InJournal('You pull out a') then
         counter=0
         GetFish()
      end if
   until UO.Injournal('There are no fish here.') OR UO.InJournal('Try fishing elsewhere') OR UO.InJournal('That is too far away') OR UO.InJournal('You cannot fish so close to yourself') OR UO.InJournal('Try fishing in water') OR uo.InJournal('*Your Fishing Pole destroyed!*') OR counter>MaxFailure
end sub

Sub GetFish()
   UO.set('finddistance',0)
   UO.IgnoreReset()
   UO.Ignore('self')
   UO.FindType(-1,-1,'ground')
   while UO.FindCount()>0
      UO.WaitTargetObject('finditem')
      UO.UseType('0x0F51')
      UO.Ignore('finditem')
      wait(500)
      UO.FindType(-1,-1,'ground')
   wend
   UO.Ignorereset()
   UO.Ignore('self')
   UO.FindType(-1,-1,'ground')
   while UO.FindCount()>0
      UO.Grab(0,'finditem')
      wait(100)
      UO.FindType(-1,-1,'ground')
   wend
   UO.Ignorereset()
  
end sub
Лейтенант (4548828)10 лет
Dragonstalker
Сообщений: 3319
Рег. 19.11.2013
27 апреля 2018 00:08
Сообщение #11
1341 попробуй поменять на 0
Последние посетители (0):

 
Сейчас: 29 марта 2024 08:12