Yoko
http://forum.yoko.com.ua/

Скитания нуба по строкам кода
http://forum.yoko.com.ua/viewtopic.php?f=20&t=17513
Page 1 of 1

Author:  CxC [ 2014-11-24 08:26:56 ]
Post subject:  Скитания нуба по строкам кода

Алу, Алу, что там не так в скриптах на бесте? :oops:

зы: Mitako
зыы: кто знает, тот поймет :mrgreen:

Author:  Qualis Eram [ 2014-11-24 14:34:14 ]
Post subject:  Re: Скитания нуба по строкам кода

CxC wrote:
Алу, Алу, что там не так в скриптах на бесте? :oops:

зы: Mitako
зыы: кто знает, тот поймет :mrgreen:

зачем? лемоня же теперь отцом станет на бесте, после твоих скриптов не надо этого делать!

Author:  Mirage [ 2014-11-24 21:41:42 ]
Post subject:  Re: Скитания нуба по строкам кода

Дублируй сюда, будем разбираться :) Тут то править можно в любое время. Потом старые варианты заменишь на улучшенные.

Author:  Mirage [ 2014-11-24 22:47:11 ]
Post subject:  Re: Скитания нуба по строкам кода

1) Модификация по сокращению кода
Code:
   UO.Set('finddistance', '2')
   UO.FindType(body,'-1','ground')

равна
uo.findtype(body, -1, 'ground', 2)

2) что бы кто бы не писал по поводу grab и MoveItem у меня вполне себе живут такие конструкции в луте
Code:
               timemove=UO.Timer()
               uo.MoveItem(itemID,0,'backpack')
               repeat
                  wait(100)
               until UO.ContainerOf(itemID)<>'backpack' || timemove+30>UO.Timer()

3)Переработку хлопка я делал чуть по другому
Code:
sub Spinning_Wheel()
   while UO.Count('0x0DF9')>0 or UO.Count('0x0DF8')>0 ; пока есть хлопок или шерсть в паке.
      UO.FindType('0x1015',-1,'ground',2)
      If UO.FindCount() > 0 Then
         UO.WaitTargetObject('finditem')
         ; ********************************
         ; Auto material
         if UO.Count('0x0DF9') || UO.Count('0x0DF8') then
            if UO.Count('0x0DF9') then
               UO.UseType('0x0DF9');
            else
               UO.UseType('0x0DF8');
            endif
         else
            return 1
         endif
         ; ********************************
         Wait( 100 )
      else
         Wait( 50 )
      endif
   wend
   UO.Print(' = Нитки сделаны = ')
end sub

Ставишь 8-10 колес и паришь нитки сразу на всех. Не надо ID прописывать колес. Добиралку и скидывалку материалов дописать самостоятельно :) На рулонах тоже поиск типа - таргет на объект.

Author:  CxC [ 2014-11-25 19:26:58 ]
Post subject:  Re: Скитания нуба по строкам кода

спс, найду время - поправлю )

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/