Imagine Nation Forums
Reconnector - Printable Version

+- Imagine Nation Forums (https://in-uo.net/forums)
+-- Forum: Imagine Nation archive (https://in-uo.net/forums/forumdisplay.php?fid=6)
+--- Forum: Technical Support (https://in-uo.net/forums/forumdisplay.php?fid=30)
+--- Thread: Reconnector (/showthread.php?tid=4805)



Reconnector - Zatoichy - 02-16-2012

I have found reconnector script for injection.

My question is: Is is possible to make such a thing that after Connection Lost ; script fit the password of account (in "Password" column)? Because "SavePassword=on" in uo.cfg doesn't work.

PHP Code:
sub Reconnector()
   var 
ReconnectTimeRFlag
   ReconnectTime 
'0'
   
RFlag 1
   Repeat
      
While (UO.ObjAtLayer('Bpack') == '')
         if 
RFlag Then
            ReconnectTime 
MakeTime()
            
RFlag 0
         
endif
         
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 
DTReti
   Ret 
STR(UO.Time())
   
""
   
For 0 To Len(Ret)
      
Ret[Len(Ret)-i] + T
      
If (== 2) OR (== 4Then
         T 
":" T
      
EndIf
   
Next
   Ret 
STR(UO.Date())
   
""
   
For 0 To Len(Ret)
      
Ret[Len(Ret)-i] + D
      
If (== 2) OR (== 4Then
         D 
"." D
      
EndIf
   
Next
   Ret 
" @ " D
   
RETURN Ret
end sub