sub main() 
var mx, my, mz, i, j 
mx = UO.GetX('self') 
my = UO.GetY('self') 
mz = UO.GetZ('self') 
UO.DeleteJournal() 
while true 
for i = mx-4 to mx+4 
for j = my -4 to my+4 
UO.Print("Now Fishing In: "+str(mx-i)+" "+str(my-j)) 
while not UO.InJournal("no fish here") and not UO.InJournal("fishing in water") 
UO.DeleteJournal() 
UO.Waittargettile("6040", str(i), str(j), str(mz)) 
UO.Usetype('0x0DC0') 
while uo.targeting() 
wait(100) 
wend
while not UO.InJournal('You pull out') and not UO.InJournal('fail') and not UO.InJournal('no fish') and not UO.InJournal("fishing in water") 
wait (100) 
wend 
wend 
UO.DeleteJournal() 
next 
next 
wend 
end sub