Реконект, как сделать...

[Sanch]

Имеется скрипт Ветерана на реконект, только вообще не догоняю что он делает, точнее как работает, не мог бы кто поопытнее подсобить, хочу сделать скрипт на рекконект, а именно, скрипт при юзании которого, будет делаться логаут, ждать пол часа, заходить обратно в уо. Это хочу впихнуть в свой скрипт на мининг, чтобы при появлении гма сразу выходить, ждать, потмо снова входить и копать дальше, тк за добычу чего либо на скрипте у нас банят . Всех зарание благодарю за посильный хелп.

Code: Select all

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 all') 
;UO.Exec('exec autoload') 
UO.TextOpen() 
UO.TextPrint('Disconnected & Reconnected @ '+ReconnectTime) 
RFlag = 1 
ReconnectTime = '0' 
endif 
Until false 
end sub 

sub MakeTime() 
VAR D, T, Ret, i 
Ret = STR(UO.Time()) 
T = "" 
For i = 0 To Len(Ret) 
T = Ret[Len(Ret)-i] + T 
If (I == 2) OR (I == 4) Then 
T = ":" + T 
EndIf 
Next 
Ret = STR(UO.Date()) 
D = "" 
For i = 0 To Len(Ret) 
D = Ret[Len(Ret)-i] + D 
If (I == 2) OR (I == 4) Then 
D = "." + D 
EndIf 
Next 
Ret = T + " @ " + D 
RETURN Ret 
end sub

[Scripts Writer]

Code: Select all

;UO.Exec('terminate all')  ; Тут он выключает все имеющиееся скрипты
;UO.Exec('exec autoload') ; А тут он уже запускает.

Собственно, убери ; перед командами которые написал выше, которые тебе нужны, а потом:

Code: Select all

UO.Exec('exec autoload') ; в команде запуска скрипта,впиши название своего скрипта на мининг (exec mining)

[Sanch]

Сори но че то я всеравно ничего не понял, скрипт который я отпостил работает совсем по другому принцепу.

[Scripts Writer]

как я понял, Тебе надо доработать этот реконектор на выход из уо,вход в уо, и продолжение скрипта =\ хм

[yean]

вот я задумался, окромя ,closeuo есть другой, менее радикальный, способ дисконнекта ??? не считая кучи lclick ?

[Sanch]

вот я задумался, окромя ,closeuo есть другой, менее радикальный, способ дисконнекта ??? не считая кучи lclick ?

Гампы, тока я в них не силен, а то бы уже давно свой реконект написал и не парился бы, хотя я могу ошибаться.

как я понял, Тебе надо доработать этот реконектор на выход из уо,вход в уо, и продолжение скрипта =\ хм

Прям в точку

[Rijo]

Ну все равно на мой взгялд самым радикальным способом уйти в логаут, это потыкаться lclick- ми и ждать допустим 300секунд. Хотя собсно что мешает ГМу встать в инвиз ?

[Sanch]

Ну все равно на мой взгялд самым радикальным способом уйти в логаут, это потыкаться lclick- ми и ждать допустим 300секунд. Хотя собсно что мешает ГМу встать в инвиз ?

А то что мож мне по на надписи внизу экрана, тк я занят копкой, как определить координаты кнопок на экране, подскажите плс?