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

Carpentry_problem
http://forum.yoko.com.ua/viewtopic.php?f=20&t=10455		 Page 1 of 1
Author:  Dimage [ 2006-12-11 16:59:34 ]
Post subject:  Carpentry_problem
Code:
sub Carpentry(); делаем dartboard-ы!
    repeat
     UO.usetype(0x1034,0)
     UO.waitmenu('Carpentry','Weapons','Weapons','fishing pole')
     while not UO.InJournal("You put the fishing") and not UO.InJournal("You fail to create the")
       Wait(100)
     wend
     UO.DeleteJournal()
     if (UO.Count('0x1BDD',0) < 50) then
        uo.findtype("0x1BDD","0","ground")
        if uo.FindCount() then
           UO.grab("500","finditem")
           UO.Print('Нашли логи на полу... и взяли их в пак')    
        endif
        Wait(1000)
     endif
     if (UO.Count('0x0EED',0) > 0) then
        uo.findtype("0x0EED","0","my")
        UO.drop("-1","0","0","0","finditem")
        UO.Print('Выбросили бабло...')
        Wait(100)
     endif
    until (UO.Count('0x1BDD',0) < 50)
    UO.Print('Мля логи закончились...')
    UO.Print('Ещё логов хочууу...');
end sub


Почемуто на выборе мену иногда выключается...можеты быть паузу добавить?
Author:  TheXupypr [ 2006-12-14 08:44:34 ]
Post subject: 
Возможно надо паузу поставить или попробуй поменять вот это
Code:
     while not UO.InJournal("You put the fishing") and not UO.InJournal("You fail to create the") 
       Wait(100) 
     wend

НА
Code:
repeat 
      wait(300) 
   until uo.InJournal('You put the fishing') or uo.InJournal('You fail to create the')


Выше указанная команда помоему гармоничнеё получаеться и она спецмально для этого предназначена
И ешо
Code:
UO.DeleteJournal()
Должно идти не после цикла а перед ним... попробуй думаю должно заработать
Author:  Nmy [ 2006-12-14 12:08:11 ]
Post subject: 
Code:
     UO.waitmenu
     UO.usetype(0x1034,0)
Author:  Dimage [ 2006-12-14 20:09:50 ]
Post subject: 
NMY wrote:
Code:
     UO.waitmenu
     UO.usetype(0x1034,0)


СПС за подсказку ... нашёл ещё решение в automenu

Code:
sub Carpentry();
   UO.automenu('Carpentry','Weapons')
   UO.automenu('Weapons','fishing pole')
   repeat
      UO.usetype(0x1034,0)
      while not UO.InJournal("You put the fishing") and not UO.InJournal("You fail to create the")
         Wait(100)
      wend
      UO.DeleteJournal()
      if (UO.Count('0x1BDD',0) < 50) then
         uo.findtype("0x1BDD","0","ground")
         if uo.FindCount() then
            UO.grab("500","finditem")
         endif
         Wait(1000)
      endif
      if (UO.Count('0x0EED',0) > 0) then
         uo.findtype("0x0EED","0","my")
         UO.drop("-1","0","0","0","finditem")
         Wait(100)
      endif
   until (UO.Count('0x1BDD',0) < 50)
   UO.cancelmenu()
end sub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/