Yoko

Помогите пожалуйста со скриптом на кэмпинг!!! Очень нуно!

Замени начало функции GotoXY(x,y) на это:

Sub GotoXY(x,y) 
   VAR i 
   VAR dir,ldir,rdir,key,olddir 
   VAR dx,dy,Exit=0
   x=x+1 # Тут сам подбирай. Влом было писать определение дистан-
   y=y+1 # ции по направлению к дереву
   While Exit<>1       
      dx=x-UO.GetX() 
      dy=y-UO.GetY()
      If dx==0  AND dy==0 Then 
         Exit=1 
      Endif 
      If dx<>0 AND dy<>0 Then

В этом случае чар будет подходить к деревьям с одной стороны, с какой - подбери сам.

Смотри внимательно сообщения. Скорее всего там выходит месага, что вы не можете юзать этот итем.

Описание: скрипт на перекладку однотипных item'ов (цвет тоже учитывается) из одного контейнера в другой.
Особенности: по умолчанию поставленно перекладывание по 50к менять переменную следует, если перекладываемые вами item'ы складывабтся в кучку и вы не можете поднять на борт 50к этих item'ов;
если надо опустошить какой то контейнер то после фразы 'Что брать то?' нажимаете ESC.

sub MoveFromTo()
var qType = '50000' #кол-во перекладываемых за раз item'ов
var tType, cType
   UO.Print('Откуда тырим?')
   uo.addobject('objFrom') 
   while uo.Targeting() 
      wait(200) 
   wend
   UO.Print('И куда ж пререложим то?')
   uo.addobject('objResiv') 
   while uo.Targeting() 
      wait(200) 
   wend
   uo.useobject('objFrom')
   CheckLag()
   UO.Print('Что брать то?')
   uo.addobject('objType') 
   while uo.Targeting() 
      wait(200) 
   wend
   tType = uo.GetGraphic('objType')
   cType = uo.GetColor('objType')
   UO.Findtype(tType,cType,'objFrom')
   while UO.GetQuantity('finditem')>0
      UO.MoveItem('finditem',qType,'objResiv')
      wait(1000)
      CheckLag()
      UO.Findtype(tType,cType,'objFrom')
   wend
   UO.Print('< < < Усё > > >')
end sub

sub CheckLag() 
   UO.DeleteJournal() 
   UO.Click('backpack') 
   repeat 
      wait(50) 
   until UO.InJournal('backpack') 
end sub

Нет. Достать могу , он его юзает 2-3 раза , если не зажёгся , то переходит к следующиму , а этот остаётся лежать.