Page 2 of 2

Posted: 2006-09-28 21:44:40
by comatoza
DerMeister =) wrote:А чё, самому слабо процедуру написать?

Code: Select all

sub abs(x)
    if (x < 0) then
        x = -x
    end if
    return x
end sub

мда.... Ыпанутым счастья нет :)
это про меня.... я о таком даже не подумал :)))

Posted: 2006-10-04 22:42:05
by comatoza

Code: Select all

sub autostab()
 var i, X, Y, dir
 uo.deletejournal()
 while not uo.injournal('initial base')
  x=abs(uo.getx()-uo.getx('zertva'))
  y=abs(uo.gety()-uo.gety('zertva'))
  dir=(uo.getdir()-uo.getdir('zertva'))
  if (((x==1 AND y==1) OR (x==0 AND y==1) OR (x==1 AND y==0)) AND dir==0) then
   uo.waittargetobject('zertva')
   uo.msg('.ab 1')   
  endif
 wend
end sub


вот такая петрушка... но! срабатывает при любом раскладе когда сам подходишь к противнику и при этом не срабатывает когда он пробегает сквозь тебя...