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/