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 поставить а то он слишком быстро ловит