Yoko
http://forum.yoko.com.ua/

FISHING
http://forum.yoko.com.ua/viewtopic.php?f=17&t=11637		 Page 1 of 1
Author:  DogStyle [ 2007-03-19 18:34:57 ]
Post subject:  FISHING
hey.... im from brazil and i only know english :O well...

i need a fishing script.... i know there are couple fishing scripts but they never work here... im using this one:
Code:
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("Nao parece ter peixe aqui") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("Isso esta muito longe") 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("Nao parece ter peixe aqui") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("Isso esta muito longe") and not UO.InJournal("Voce nao pode pescar ai!")
            wait (500) 
            wend 
         wend 
      next 
   next 
end sub


dont care about the UO.injournal i change into my language...

but the problem is... it never hits the fucking water!!! never and i dont know why.... it trys and shows you cant fish there,you cant fish there,you cant fish there,you cant fish there,you cant fish there,you cant fish there, and go on....

i think i have to change the type of location... like real X,Y but i dont know how to do it...

so if anyone know..plz help me

thx
Author:  Nmy [ 2007-03-19 20:14:59 ]
Post subject: 
Code:
   for i = x-140 to x+140
      for j = y-150 to y+150

the problem is that this script is trying to fish like 140 tiles from you... you must change it to:
Code:
   for i = x-4 to x+4
      for j = y-4 to y+4
Author:  DogStyle [ 2007-03-19 20:22:39 ]
Post subject: 
i tried theese numbers too... but it keep saying "you cant fish there"

is there a way to use real X,Y? i mean... not tiles like co-ordinated
Ex: x=1344 y6758


in injection we have the command ramdom?

thx
Author:  Nmy [ 2007-03-19 20:26:14 ]
Post subject: 
Code:
UO.Waittargettile("1341", str(i), str(j), str(z))
Author:  DogStyle [ 2007-03-19 20:32:25 ]
Post subject: 
as i said!

same thing... "you cant fish there"

is there another way to set co-ordinate ??????

plz write something ¬¬

and ths for ur help!
Author:  Nmy [ 2007-03-19 21:10:51 ]
Post subject: 
if i write something in code I mean you need to replace something in your code ...
Author:  Nmy [ 2007-03-19 21:15:55 ]
Post subject: 
try this:
Code:
sub fishing_2()
var x, y, z, i, j
   x = UO.GetX("self")
   y = UO.GetY("self")
   z = UO.GetZ("self")
   for i = x-4 to x+4
      for j = y-4 to y+4
         UO.DeleteJournal()
         while not UO.InJournal("Nao parece ter peixe aqui") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("Isso esta muito longe") and not UO.InJournal("Voce nao pode pescar ai!") and not UO.InJournal("fish there")
            UO.DeleteJournal()
            UO.Print("Now Fishing In: "+str(i)+" "+str(j))
            UO.Waittargettile("1341", str(i), str(j), str(z))
            UO.Usetype("0x0DBF")
            while not UO.InJournal("Nao parece ter peixe aqui") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("Isso esta muito longe") and not UO.InJournal("Voce nao pode pescar ai!")
            wait (500)
            wend
         wend
      next
   next
end sub


keep in mind that if you need some help you must give maximum information, like in this case you have message in journal and it stops fishing
Author:  DogStyle [ 2007-03-20 05:35:33 ]
Post subject: 
hey... i have found out the problem!!!

look:
Code:
UO.Waittargettile("1341", str(i), str(j), str(z))


the problem is here in this line....
i dont know why but the injection is only reading the TILE INFORMATION (1341) and not the i,j,z.... and i have no idea WHY!

and i change FOR by RANDOM command. i think is the same.

now is like that:
Code:
sub main() 
var x, y, z
inicio:
x=UO.Random(50)
y=UO.Random(80)
z=0
UO.DeleteJournal() 
while not UO.InJournal("Nao parece ter peixe aqui") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("Isso esta muito longe") and not UO.InJournal("Voce nao pode pescar ai!")
UO.DeleteJournal()
UO.Print("Now Fishing In: "+str(x)+" "+str(y))
UO.Waittargettile("1341", str(x), str(y), str(z)) 
UO.Usetype("0x0DBF") 
while not UO.InJournal("Nao parece ter peixe aqui") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("Isso esta muito longe") and not UO.InJournal("Voce nao pode pescar ai!")
wait(500) 
wend 
wend 
goto inicio
end sub


MY SERVER IS POL EMULATOR !!!!

i need t change the way to CLICK.... is there a way?
Author:  Nmy [ 2007-03-20 12:03:35 ]
Post subject: 
how do you fish ? d-click and then target the water ?
Author:  DogStyle [ 2007-03-20 13:26:29 ]
Post subject: 
but it is strange...why its not workint here....????
Author:  Nmy [ 2007-03-20 17:30:17 ]
Post subject: 
okey lets go back to my script ... does it hit water atleast once ?
Author:  DogStyle [ 2007-03-20 18:36:15 ]
Post subject: 
no, never.... it only show you cant fish there!

i changed this line:

Code:
UO.Waittargettile("1341", str(i), str(j), str(z))

to
Code:
UO.Waittargettile("lasttile", str(i), str(j), str(z))


so i click on water and what happen? now the script hit the same place everytime, even with i j z locations.... same tile everytime....

so i think that the problem is in this line...

remember im playing with POL emulator.....

thx NMY for help me
Author:  Nmy [ 2007-03-20 18:58:31 ]
Post subject: 
write down ,infotile and hit the water
Code:
sub fishing_2()
var x, y, z, i, j
   x = UO.GetX()
   y = UO.GetY()
   z = UO.GetZ()
   for i = x-4 to x+4
      for j = y-4 to y+4
         UO.DeleteJournal()
         while not UO.InJournal("Nao parece ter peixe aqui") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("Isso esta muito longe") and not UO.InJournal("Voce nao pode pescar ai!") and not UO.InJournal("fish there")
            UO.DeleteJournal()
            UO.Print("Now Fishing In: "+str(i)+" "+str(j))
            UO.Waittargettile("1341", str(i), str(j), str(z))
            UO.Usetype("0x0DBF")
            while not UO.InJournal("Nao parece ter peixe aqui") and not UO.InJournal("Voce nao consegue ver este local!") and not UO.InJournal("Isso esta muito longe") and not UO.InJournal("Voce nao pode pescar ai!")
            wait (500)
            wend
         wend
      next
   next
end sub
Author:  DogStyle [ 2007-03-21 07:02:26 ]
Post subject: 
i knew this command ,infotile

it shows 6039

works BUT not properly, cause even hiting the graund he try to fish lol... and shows a little bugged tile where im fishing!!!!

well... i think we cant solve it... but its ok i will cry alone!!

:D

thx
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/