Page 1 of 1

Fishing script

Posted: 2014-04-11 17:15:22
by Oberon77
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

Re: Fishing script

Posted: 2014-04-11 20:35:43
by Incorrect User
Fishing around self, 6 tiles. Remake it for your shard.

Code: Select all

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

Re: Fishing script

Posted: 2014-04-13 00:26:33
by Oberon77
my injection doesnt know the uo.recount command :(

Re: Fishing script

Posted: 2014-04-13 00:40:00
by Incorrect User
uo.recount()
Delete this line.