ребят выручите скриптом с коробля плз

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
ViRuSSSSSS
Posts: 7
Joined: 2012-11-06 11:38:56

ребят выручите скриптом с коробля плз

Post by ViRuSSSSSS »

что бы ловил вокруг и потом писал форвард и стоп и поновой ловил
tylllkah
Posts: 243
Joined: 2012-03-20 00:32:06
Location: РФ, г. Москва

Re: ребят выручите скриптом с коробля плз

Post by tylllkah »

ViRuSSSSSS wrote:что бы ловил вокруг и потом писал форвард и стоп и поновой ловил

Code: Select all

sub main()
   var x=0, y=0
   while 1
      submain()
      x=uo.getx()
      y=uo.gety()
      uo.msg('Back')
      repeat
         wait(100)
      until uo.getx() > x+8 or uo.getx() < x-8 or uo.gety() < y-8 or uo.gety() > y+8
      uo.msg('Stop')
      submain()
      x=uo.getx()
      y=uo.gety()
      uo.msg('Forward')
      checklag()
      repeat
         wait(100)
      until uo.getx() > x+8 or uo.getx() < x-8 or uo.gety() < y-8 or uo.gety() > y+8
      uo.msg('Stop')
   wend
end sub

Code: Select all

sub submain()
   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-4 to my+4
         Tohide()
         UO.Print('Ловим в координатах: '+str(mx-i)+' '+str(my-j))
         fishing(i,j,mz)
      next
   next
endsub
sub fishing(mx,my,mz)
   var n
   for n=0 to 10
      checklag()
      uo.waittargettile('1341',mx,my,mz)
      uo.usetype('0x0DC0')
      if waitforfish()==1 then
         return
      endif
   next
endsub
sub waitforfish()
   var n
   for n=0 to 100
      if uo.injournal('no fish here|fishing in water|You pull out') then
         return 1
      endif
      if uo.injournal('but fail') then
         return
      endif
      wait(1000)     
   next
endsub
sub Tohide()
   while not uo.Hidden()
      uo.warmode(0)
      uo.Print('Пытаемся уйти в хайд...')
      uo.UseSkill('Hiding')
      wait(4000)
   wend
end sub
sub CheckLag()
   repeat
      UO.DeleteJournal()
      UO.Click('backpack')
   until backpack()==1
endsub
sub backpack()
   var n
   for n=0 to 200
      if uo.injournal('a backpack') then
         return 1
      endif
      wait(200)
   next
endsub
Не быть жадным - уже богатство, не быть расточительным – доход.
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
ViRuSSSSSS
Posts: 7
Joined: 2012-11-06 11:38:56

Re: ребят выручите скриптом с коробля плз

Post by ViRuSSSSSS »

спасибо
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: ребят выручите скриптом с коробля плз

Post by Mirage »

Так ловить будет не на всех шардах... :roll:
tylllkah
Posts: 243
Joined: 2012-03-20 00:32:06
Location: РФ, г. Москва

Re: ребят выручите скриптом с коробля плз

Post by tylllkah »

Mirage wrote:Так ловить будет не на всех шардах... :roll:

значит с дрв, если всё работает
Не быть жадным - уже богатство, не быть расточительным – доход.
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
ZeroDX
Posts: 718
Joined: 2006-12-08 10:51:50
Location: Москва
Contact:

Re: ребят выручите скриптом с коробля плз

Post by ZeroDX »

все делают под дрв и все надо адаптировать под другие шарды :(
tylllkah
Posts: 243
Joined: 2012-03-20 00:32:06
Location: РФ, г. Москва

Re: ребят выручите скриптом с коробля плз

Post by tylllkah »

согласен печально...
ПЕРЕХОДИМ ВСЕ НА ДРВ!!!!!
Не быть жадным - уже богатство, не быть расточительным – доход.
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Post Reply