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

Fishing script
http://forum.yoko.com.ua/viewtopic.php?f=17&t=17428		 Page 1 of 1
Author:  Oberon77 [ 2014-04-11 17:15:22 ]
Post subject:  Fishing script
I have scripted this.

Can someone say if it's ok or if it can be sripted better?

thi is the script:

sub main()

while true
repeat
uo.waittargettile(0,5262,3235,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)


repeat
uo.waittargettile(0,5261,3235,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)

repeat
uo.waittargettile(0,5263,3235,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)

repeat
uo.waittargettile(0,5264,3235,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)

repeat
uo.waittargettile(0,5264,3237,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)

repeat
uo.waittargettile(0,5266,3237,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)

repeat
uo.waittargettile(0,5266,3239,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)

repeat
uo.waittargettile(0,5267,3237,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)

repeat
uo.waittargettile(0,5267,3238,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)

repeat
uo.waittargettile(0,5264,3238,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)

repeat
uo.waittargettile(0,5266,3236,-5)
wait(1000)
uo.usetype("Canna")
wait(5000)
until uo.injournal("There doesn't seem to be any fish here")
wait(1000)
cibo()
wait(1000)
uo.deletejournal()
wait(5000)
uo.press(113)
wend
end sub





sub cibo()
if UO.injournal("absolutely famished") then
UO.Deletejournal()
UO.Exec("usetype 'cibo'")
wait(5000)
end if
end sub
Author:  Incorrect User [ 2014-04-11 20:35:43 ]
Post subject:  Re: Fishing script
Fishing around self, 6 tiles. Remake it for your shard.
Code:
sub Fish()
   var waittime, i, x, y, myposx, msg = "pull out|fail to catch|far away|no fish here|Try fishing|too quick"
   repeat
      for x = -6 to 6
         for y = -6 to 6
            uo.deletejournal(msg)
            uo.waittargettile(-1, uo.getx() + x, uo.gety() + y, uo.getz())
            uo.recount()
            uo.usetype("0x0DBF")
            waittime = uo.timer() + 150
            repeat
               wait(100)
            until uo.injournal(msg) or uo.timer() > waittime 
            if uo.injournal("fail to catch|too quick|far away|no fish here|Try fishing") then
               wait(3000)
            else
               wait(1000)
            end if
         until uo.injournal("far away|no fish here|Try fishing|pull out")
      next
   next
end sub
Author:  Oberon77 [ 2014-04-13 00:26:33 ]
Post subject:  Re: Fishing script
my injection doesnt know the uo.recount command :(
Author:  Incorrect User [ 2014-04-13 00:40:00 ]
Post subject:  Re: Fishing script
Quote:
uo.recount()

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