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

Помогите с реконектором ПЛЗ
http://forum.yoko.com.ua/viewtopic.php?f=20&t=6996		 Page 1 of 1
Author:  Seriy [ 2006-03-16 09:36:03 ]
Post subject:  Помогите с реконектором ПЛЗ
Дело в том что у меня слабый нэт и переодически он падает. Плз помогите с реконектором у меня есть но что то он не пашет. Выдаёт ошибку!!

sub anatomy() # имя скрипта anatomy! у тебя будет свое имя!!!
UO.Exec('terminate Reconnector')
UO.Exec('exec Reconnector')
# тут вставляешь нужный тебе скрипт без sub и end sub
end sub
sub Reconnector()
var ReconnectTime, RFlag
ReconnectTime = '0'
RFlag = 1
Repeat
While (UO.ObjAtLayer('Bpack') == '')
if RFlag Then
ReconnectTime = MakeTime()
RFlag = 0
endif
Wait(20000) # WorldSave Protection
UO.Say('')
Wait(3000)
UO.Say('')
Wait(3000)
UO.Say('')
Wait(3000)
UO.LDblClick(357,164)
UO.LClick(616,459)
Wait(3000)
WEnd
Wait(3000)
if (RFlag == 0) and (ReconnectTime <> '0') Then
UO.Exec('terminate anatomy') # тут место моего имени anatomy поставишь свое!!! обезательно!!! имя скрипта
UO.Exec('exec anatomy') #и тут тоже!
UO.LClick(400,263)
UO.TextOpen()
UO.TextPrint('Disconnected & Reconnected @ '+ReconnectTime)
RFlag = 1
ReconnectTime = '0'
endif
Until false
end sub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/