Yoko

Posted: **2007-01-23 07:46:34**

Взял с форума скрипт на мининг, немного его доделал, чтобы чар реколился домой, выкладывал руду и прыгал назад в шахту. Такая вот проблема возникла: оставляю чара например на ночь копать, скрипт сбивается. чар просто останавливается, и стоит на месте. по-моему происходит это когда в журнале уо появляется какое нибудь постороннее сообщение. приведен та часть скрипта, во время выполнения которой чар встаёт на месте:

Code: Select all


Sub mine_spot() 
   HideInMine()
   While UO.InJournal("There is no")==0 
   UO.Print("Mining time!") 
   UO.DeleteJournal() 
   UO.WaitTargetTile("1339",STR(UO.GetX()),STR(UO.GetY()),"0") 
   UO.UseType("pickaxe") 
   Repeat 
      Wait(200) 
      Until UO.InJournal("You put") OR UO.InJournal("There is no") OR UO.injournal("You loosen") 
   Wend
   if uo.weight>=maxWeight then
         mark("rune_Temp")
         recall("rune_Home")
         unload()
         load()
         recall("rune_Temp")
      endif
   return 0 
end sub

может кто либо знает в чём дело?

Posted: **2007-01-23 07:59:40**

Походу всё дело в строке:

Code: Select all

Repeat 
      Wait(200) 
      Until UO.InJournal("You put") OR UO.InJournal("There is no") OR UO.injournal("You loosen") 
   Wend

при появлении постороннего сообщения условие не выполняется и чар ставится в "режим ожидания"

. как можно это исправить?

Yoko

Ходилка в мининге сбивается.

Ходилка в мининге сбивается.