Jump to content

another golbez dumb question..


Recommended Posts

is there a way 2 send keystrokes other then controlsend or send?

the reason y i ask this is because in the game i play i wanted to make it autologging (im lazy)

for some reason the send and control send functions dont work.. but i can manual type it in.. is there a way 2 make it so i can make it type in the pass n account?

btw the game is Legend Of Ares

Link to comment
Share on other sites

Have you tried using some type of password manager? It may be a easier route.

If you wish to use AutoIt, did you first try to see if AutoIt can see the window, and if so, did you have it named correctly. Frequently the reason for send and controlsend to fail is the name of the window that is being addressed is incorrect.

Link to comment
Share on other sites

this is the code...

(btw i think it sees the window...)

Dim $loadercor
Opt("SendKeyDelay", 5)       ;5 milliseconds
Opt("SendKeyDownDelay", 1)   ;1 millisecond
Opt("CaretCoordMode", 1)       ;1=absolute, 0=relative, 2=client
Opt("MouseCoordMode", 1)       ;1=absolute, 0=relative, 2=client
Opt("GUIOnEventMode", 0)       ;0=disabled, 1=OnEvent mode enabled

$start = 0
    IniLoad() ; iniload function called here
$start = 1

Run($loadgame, "", @SW_MAXIMIZE)
Sleep ($loadd)
IF Not WinActive($loadgamew) Then WinActivate($loadgamew)
$loadercor = WinGetPos($loadgamew)
;MsgBox(0, "Active window stats (x,y,width,height):", $loader[0] & " " & $loader[1] & " " & $loader[2] & " " & $loader[3])
IF Not WinActive($loadgamew) Then WinActivate($loadgamew)
MouseClick("left", ($loadercor[0] + 345), ($loadercor[1] + 300), $mcs)
Sleep ($loadgs)
Opt("MouseCoordMode", 2)       ;1=absolute, 0=relative, 2=client
MouseClickDrag ( "left", 0, -1, 125, -25 , 0) 
MouseClick ( "button", 500, 300)
Opt("MouseCoordMode", 1)       ;1=absolute, 0=relative, 2=client
IF Not WinActive($gamew) Then WinActivate($gamew)
MouseClick ( "button", 500, 300)
Sleep(3000)

Send($account & ("{TAB}") & $pass)

Func HoldTime()
    $x = 2
    MsgBox(48, "", "Paused", $md)
EndFunc
Func StartTime()
    MsgBox(48, "", "Started", $md)
    $x = 1
EndFunc
Func Terminate()
    Exit 0
EndFunc
Func OpenIni()
    MsgBox(64, "", "ini File opened", $md)
    Run($fd & " WMO.ini","", @SW_MAXIMIZE)
EndFunc
Func IniLoad()
   ;Other
        Global $account = IniRead("LoA.ini", "Other", "account", "NotFound")
        Global $pass = IniRead("LoA.ini", "Other", "pass", "NotFound")
        Global $game = IniRead("LoA.ini", "Other", "game", "NotFound")
        Global $gamew = IniRead("LoA.ini", "Other", "gamewindow", "NotFound")
        Global $gamedir = IniRead("LoA.ini", "Other", "gamedirectory", "NotFound")
        Global $loadgame = IniRead("LoA.ini", "Other", "loadgame", "NotFound")
        Global $loadgamew = IniRead("LoA.ini", "Other", "loadgamewindow", "NotFound")
        Global $mcs = IniRead("LoA.ini", "Other", "mouseclickspeed", "NotFound")
   ;Delays
        Global $md = IniRead("LoA.ini", "Delays", "messagedelay", 3)
        Global $loadd = IniRead("LoA.ini", "Delays", "loaderdelay", 3)
        Global $loadgs = IniRead("LoA.ini", "Delays", "loadgamestart", 3)
    
   ;Hot Keys
        Global $ek = IniRead("LoA.ini", "Hot Keys", "endkey", "NotFound")
        Global $pk = IniRead("LoA.ini", "Hot Keys", "pausekey", "NotFound")
        Global $stk = IniRead("LoA.ini", "Hot Keys", "startkey", "NotFound")
        Global $irk = IniRead("LoA.ini", "Hot Keys", "iniload", "NotFound")
        Global $iok = IniRead("LoA.ini", "Hot Keys", "iniopen", "NotFound")
            HotKeySet($ek, "Terminate")
            HotKeySet($pk, "HoldTime")
            HotKeySet($stk, "StartTime")
            HotKeySet($irk, "IniLoad")
            HotKeySet($iok, "OpenIni") 
    If $start = 1 Then MsgBox(64, "", "InI loaded", $md)
EndFunc

this is the ini

[Other]
account = Golbez
password = dontwish?
game = Ares.exe
gamedirectory = C:\Program Files\Legend Of Ares\
gamewindow = Ares OnLine Client
loadgame = C:\Program Files\Legend Of Ares\Launcher.exe
loadgamewindow = Ares OnLine AUTO UPGRADE LAUNCHER
mouseclickspeed = 1
iniprogram = C:\Program Files\AutoIt3\SciTE\SciTe.exe
;iniprogram = notepad.exe

[Delays]
loaderdelay = 200
loadgamestart = 200

[Hot keys]
endkey = {END}
pausekey = {PGUP}
startkey = {HOME}
iniload = {PGDN}
iniopen = {INS

i think they have it blocked and wanted 2 no if there was a way around the block

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...