Yoko

Почему то не берет логи с пола..... Че делатЬ?

sub carpentry() 
   VAR Sunduk1 = '0x4001B91F'       ; Сериал сундука с пустыми мешками 
   VAR Sunduk2 = '0x40230C58'       ; Сериал пустого сундука 
   VAR Meshok = '0x0E76'          ; Тип мешка 
   VAR Logi = '0x1BDD'          ; Тип логов 
   VAR Udochka = '0xDBF'          ; Тип удочки 
   VAR Kolvo = 255          ; Брать логов (1 лога= 1 удочка) 
   VAR MeshSer, j, k 
   While TRUE 
      UO.FindType( Logi, -1, 1 )       ; Ищем логи на полу 
      UO.Grab( Str( Kolvo ), 'finditem' )    ; Кладем логи в пак 
      wait( 2000 ) 
      If UO.FindCount() == 0 Then 
         UO.Print("Logs not found, script terminated") 
         return 
      Endif 
      hide()
      wait(1000)
      UO.useobject('0x4001B91F')
      wait(500)
      UO.useobject('0x40230C58')
      UO.FindType( Meshok, -1, Sunduk1 )       ; Ищем мешок в сундуке 1 
      MeshSer = UO.GetSerial( 'finditem' ) 
      UO.Grab( '1', 'finditem' )          ; Кладем его в бэкпак 
      wait( 2000 ) 
      UO.MoveItem( MeshSer, 0, Sunduk2 ) 
      wait( 2000 ) 
      While UO.Count( Logi ) > 4 
         ; Пока в паке есть логи 
         CheckLag()
         UO.Print('Ostalos ' + Str( UO.Count( Logi ) ) + ' logov' ) 
         uo.DeleteJournal() 
         uo.CancelMenu() 
         uo.WaitMenu ('Carpentry','Weapons & Tools','Weapons & Tools','fishing pole') 
         uo.UseType('0x1030') 
         wait(12000)
         k = 0 
         while NOT ( k < 30 ) 
         k = k + 1 
         wend 
         ; Скрафтили удочку 
         ; Сразу переложим ее в мешок 
         CheckLag()
         if UO.Count( Udochka ) > 0 then 
            UO.FindType( Udochka, -1, 'backpack' ) 
            UO.MoveItem( 'finditem', 0, MeshSer ) 
            wait( 2000 ) 
            UO.Print( 'Udochka perelozhena' ) 
         end if 
      Wend 
   Wend 
end sub



sub CheckLag() 
if uo.Waiting()>0 then 
uo.Exec('canceltarget') 
end if 
uo.DeleteJournal() 
uo.Click('backpack') 
repeat 
wait(50) 
until uo.InJournal('backpack') 
end sub

sub hide() 
while NOT UO.Hidden() 
UO.DeleteJournal() 
UO.Exec('warmode 0') 
UO.UseSkill('Stealth') 
repeat 
wait(50) 
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preoccupied') 
endif 
wend 
end sub

Скрипт правильный. А почему он не берет...
1) TWI
2) finddistance
3) setreceivingcontainer
4) Ignore
5) другой тип логов
6) перевес
7)...

Можно перечислять еще долго. Ясновидящие гады все еще в отпуске, а сообщения об ошибках ты не опубликовывал...

Я же написал не берет логи с пола просто пишел Ю КЕН НО РИЧ ЗЕТ. хотя логи рядом.

мля... а тупо перепечатать сообщение никак? или в УО набрать ,showjournal и копирнуть оттуда сообщение?
и кста в каком месте?

vat maxdist = 1; область поиска
UO.Set('finddistance', STR(maxdist)); в начало скрипта

всть на логи перед запуском скрипта.

Я один слепой или в первом посте реально нет этой фразы?

ну у меня походу также херово с глазками