Code:
sub fishing_2()
uo.useobject('trjum')
var mx, my, mz, i, j
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
for i = mx-4 to mx+4
for j = my -8 to my+8
UO.DeleteJournal()
while not UO.InJournal("no fish here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in water")
UO.DeleteJournal()
nazhivka()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Useobject("fish pole")
while not UO.InJournal("You pull") and not UO.InJournal("location") and not UO.InJournal("no fish") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in water")
wait (500)
wend
wend
next
next
end sub
sub nazhivka()
uo.findtype('0x15F8','-1','trjum')
if uo.findcount > 0 then
uo.moveitem('finditem',1,'backpack')
wait(50)
uo.say('Zalazj dorogaja, na krjuchok')
else
uo.say('Nehrena na krjuchok sazhat')
endif
end sub