Page 1 of 1

Помощь в координатах

Posted: 2015-06-03 17:53:08
by genri
var x, y
var f, g

for f = -6 to 6
for g = 3 to 6
x = uo.getX()
y = uo.getY()
if (g > 2) then
fishingHere(x+g, y+f)

должен ловить от себя по X+3 клетки и до 6
по y от -6 до 6 но где то косяк

Re: Помощь в координатах

Posted: 2015-06-03 20:33:58
by genri
это кусочек где данные прописаны
может кто в скайп или аську поможет так как вокруг он рыбачит себя но мне нужно конкретную сторону указать

Re: Помощь в координатах

Posted: 2015-06-03 22:00:21
by genri
раньше макрос был настроен рыбачить вокруг себя квадрат) щас я стою на лодке и получается по оси Y я могу ловить везде а по оси X только от +3 координат от себя и более до 6
sub fishingArround()
var x, y
var f, g
for f = -6 to 6
for g = 3 to 6
x = uo.getX()
y = uo.getY()
fishingHere(x+g, y+f)
if (uo.life == 0) then
uo.print('you dead')
return
end if
next
next
end sub

sub fishingHere(x, y)

uo.waitTargetTile('all', x, y, 0)
uo.useType('fish_pole')

ну и бла бла бла

Re: Помощь в координатах

Posted: 2015-06-04 09:17:14
by ZeroDX
как давно это было...

Code: Select all

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