Page 1 of 1

Save password (не инжект)

Posted: 2004-06-24 21:32:54
by BETEPAH
Вопросик малость не в тему .....кому не сложно подскажите плиз ....как сделать так чтобы появилася галка на Save password для акка....

Порылся в Яндыксе нашел обьяснение .Цытирую: Надо добавить в файл UO.CFG строчку RememberAcctPW=on

Но при перезапуске УО строчка удаляется автоматом ....... как сделать ее не удалимую...пробовал проктически все .....если кто знает ответ прозьба помочь.


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

Дабы не нарушать традицию.....выкладываю скрипт Savadge
Скрипт проверен ...работае ...просто у меня раньше ставилась Галка и было все ок......псле того как Умер комп и Ультиму пришлося переустановить галка пропала ......так что жду предложений

Posted: 2004-06-25 14:37:34
by Savage
Если ты имел в виду меня, то официально заявляю что это не мое творение :)
На счет галочки - информация про нее всегда хранится в хэлпе для пилота:
RememberAcctPW=on
Но наверное правишь не тот uo.cfg попробуй и в десктопе и в главной папке уо.

Posted: 2004-06-25 16:24:03
by BETEPAH
Все заработало сенк ....совсем забыл что в главной папке Уо.cfg не главный ....... выложу этот скрипт в Scripts!

Posted: 2004-07-30 22:46:48
by Sabbath
Дело в том, что если поставить такую штуку, то парольшифруется стандартным шифром, например многие юзают лаунчеры аксисовские, но ключ шифрования аксиса всем известен... Поэтому это опасно для людей, которые не всекают в компьютерную безопасность впринципе.
Например я юзаю программу собственного изготовления, шифрующую мой пароль собственным ключом

Posted: 2004-07-31 05:31:40
by nagger
Not sure whats being said in this thread but heres the reconnecter i use.
you could prolly cut the waittimes a lot if you like, i use high waits cause im normally lagged.


Code: Select all

sub Recon() 
repeat

While (UO.ObjAtLayer('Bpack') >"0")
wait(500)
wend

wait(10000)
uo.lclick(399,327)
wait(1000)
uo.lclick(399,327)
wait(1000)
uo.lclick(399,327)
wait(100)
if (UO.ObjAtLayer('Bpack') >"0")  then
else
uo.say("password")
end if
wait(10000)
uo.lclick(617,454)
wait(2000)
uo.lclick(617,454)
wait(5000)
uo.lclick(617,454)
wait(2000)
uo.lclick(617,454)
until false
end sub