Page 1 of 1

Скрипт на фиш работает но не ловит рыбу

Posted: 2007-06-28 18:02:00
by MeLFiS
Не хочет ловить рыбу что нада исправить ?там чето он отшитывает но не ловит





Code: Select all

sub fishing_2() 
var x, y, z, i, j
   x = UO.GetX("self")
   y = UO.GetY("self")
   z = UO.GetZ("self")
   for i = x-140 to x+140
      for j = y-150 to y+150
         UO.DeleteJournal()
         while not UO.InJournal("You catch a nice fish!") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("You can't fish there!") and not UO.InJournal("Voce nao pode pescar ai!")
            UO.DeleteJournal()
            UO.Print("Now Fishing In: "+str(x-i)+" "+str(y-j))
            UO.Waittargettile("1341", str(x-i), str(y-j), str(z))
            UO.Usetype("0x0DBF")
            while not UO.InJournal("You catch a nice fish!") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("You can't fish there!") and not UO.InJournal("Voce nao pode pescar ai!")
            wait (500)
            wend
         wend
      next
   next
end sub

Posted: 2007-06-28 18:08:03
by Mihail
тоесть он работает и не работает?

p.s. найти по поиску нормальный скрипт, а? их тут одним местом жуй

Posted: 2007-06-28 19:26:25
by MeLFiS
нашол много и все они похожи друг на друга и не 1 не хочеш из них ловить рыбу

Posted: 2007-06-28 23:48:39
by MeLFiS
Топ можна закрывать :!:

Re: Скрипт на фиш работает но не ловит рыбу

Posted: 2007-06-29 08:19:41
by arch
MeLFiS wrote:Не хочет ловить рыбу что нада исправить ?там чето он отшитывает но не ловит





Code: Select all

sub fishing_2() 
var x, y, z, i, j
   x = UO.GetX("self")
   y = UO.GetY("self")
   z = UO.GetZ("self")
   for i = x-140 to x+140
      for j = y-150 to y+150
         UO.DeleteJournal()
         while not UO.InJournal("You catch a nice fish!") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("You can't fish there!") and not UO.InJournal("Voce nao pode pescar ai!")
            UO.DeleteJournal()
            UO.Print("Now Fishing In: "+str(x-i)+" "+str(y-j))
            UO.Waittargettile("1341", str(x-i), str(y-j), str(z))
            UO.Usetype("0x0DBF")
            while not UO.InJournal("You catch a nice fish!") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("You can't fish there!") and not UO.InJournal("Voce nao pode pescar ai!")
            wait (500)
            wend
         wend
      next
   next
end sub

Честно говоря, непонятно, почему он должен работать.
У тебя слишком большой диапазон вылавливания.
ты в курсе, что пытаешься ловить на квадрате 300 на 300? :)
на моем шарде ловить можно не дальше 7 клеток от чара. Иначе - цель недоступна.

Posted: 2007-06-29 09:26:30
by Mihail
у него наверное длинная леска на удочке %)

Posted: 2007-06-29 13:53:18
by MeLFiS
Та я все клетки перепробывал даже 2 на 2 всеравно тотже ефект

Posted: 2008-07-18 19:52:35
by Shax
MeLFiS wrote:Та я все клетки перепробывал даже 2 на 2 всеравно тотже ефект



попробуй тайб другой UO.Usetype("0x0DBF")
UO.Usetype("??????") поменяй на свой

и wait (500) попробуй wait (1500) или 2000 поставить а то он слишком быстро ловит