Yoko :: ЧекЛаг с Ворд Сейвом

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

ЧекЛаг с Ворд Сейвом http://forum.yoko.com.ua/viewtopic.php?f=17&t=12760	Page 1 of 1

Author:	$keR [ 2007-11-13 20:47:24 ]
Post subject:	ЧекЛаг с Ворд Сейвом
всем доброго времени суток... вобщем недавно смарел тут, видел чеклаг с проверкоий на ворлд сейв и сервер ресинк... щас почему то немогу найти.. у кого есть..выложите плизз..

Author:

GAUHAR [ 2007-11-13 21:57:58 ]

Post subject:

Я использую такой вариант:

Code:

CheckWS()
CheckLAg()

Функции:

Code:

SUB CheckWS()
   if UO.InJournal("World is saving now|PAUSED for Resync") then
      DelJournal("World is saving now")
      DelJournal("PAUSED for Resync")
      UO.Print("НАЧАЛОСЬ СОХРАНЕНИЕ МИРА")
      while not UO.InJournal("World data saved in|Resync Complete")
         wait(100)
      wend
      UO.Print("СОХРАНЕНИЕ МИРА СВЕРШИЛОСЬ")
   endif
endsub

SUB CheckLag()
   DelJournal("backpack")
   UO.Click('backpack')
   repeat
      wait(100)
   until UO.InJournal('backpack')
endsub

SUB DelJournal(msg)
   while UO.InJournal(msg)
      UO.SetJournalLine(UO.InJournal(msg) - 1, "-- -- --")
   wend
endsub

Попробуй может поможет.

Author:	$keR [ 2007-11-13 22:01:16 ]
Post subject:
СЕНКС! ща потестю...

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