как давно это было...
Code:
sub fishing_around_ex(side):
var x, ym min_x, max_x, min_y, max_y
dim side_nums[4]
side_nums[0] = '-6 6 3 6'
side_nums[1] = '3 6 -6 6'
side_nums[2] = '-6 6 6 3'
side_nums[3] = '6 3 -6 6'
min_x = getword(side_numbers[side], 1)
max_x = getword(side_numbers[side], 2)
min_y = getword(side_numbers[side], 3)
max_y = getword(side_numbers[side], 4)
for x = min_x to max_x
for y = min_y to max_y
fishingHere(uo.getx('self')+x, uo.gety('self')+y)
if check_something() == 0 then
return 0
endif
next
next
endsub