debugger

[kyosha]

hi. I'VE to see what (it's a bot which download something after log in) program is downloading. Probably I should use debugger. How can I do that? Debugger is a program or what? Should I add some func or smth like that? Thanks for answers

[Melba23]

kyosha,

Could you be any more cryptic if you tried? What is this "bot" that you wish to debug? Is it a script written in AutoIt? Or is it a complied AutoIt executable? How do you know it downloads "something"? What sort of "something"? Please give us some more information.

M23

[kyosha]

4 hours ago, Melba23 said:

kyosha,

Could you be any more cryptic if you tried? What is this "bot" that you wish to debug? Is it a script written in AutoIt? Or is it a complied AutoIt executable? How do you know it downloads "something"? What sort of "something"? Please give us some more information.

M23

program is in autoit (source). My friend told me that I have only loader source. When I log in and press "load" script check usergroup and if it's premium new windows is opened.

[kyosha]

expandcollapse popup

Func loginattempt()
 GUISetState(@SW_DISABLE, $guilogin)
 GUICtrlSetState($btnlogin, $gui_hide)
 $progressbar = _guictrlcreategif(@ScriptDir & "\patch\images\progress\or_0.gif", "", 160 - (80 / 2), 190)
 Global $username = GUICtrlRead($inptusername), $password = GUICtrlRead($inptpassword)
 Global $passcryptattempt = _crypt_hashdata($password, $calg_sha1)
 $passwordcheck = BinaryToString(InetRead($rootwebloader & "/interactive/infos/password_check.php?a=" & $username & "&b=" & $passcryptattempt & "&c=-", 1))
 If $passwordcheck = 1 Then
  FileDelete("rememberme.one")
  If GUICtrlRead($checkbox0_0) = 1 Then FileWriteLine("rememberme.one", $username & @CRLF & $password)
  logged()
 EndIf
 MsgBox(0, "Error", "Sorry, that user name or password does not match our records. Please re-check your entries and try again.")
 _gif_deletegif($progressbar)
 GUICtrlSetState($btnlogin, $gui_show)
 WinActivate($guilogin)
 GUISetState(@SW_ENABLE, $guilogin)
EndFunc





Func logged()
 $lastversionloader = BinaryToString(InetRead($rootwebloader & "/interactive/infos/status.php?get=a", 1))
 If $lastversionloader <> $version Then update()
 For $clist = 0 To $maxidcheats
  Local $lastversion = BinaryToString(InetRead(Execute("$RootWebStuff" & $clist) & "/interactive/infos/status.php?get=a", 1))
  Local $lastupdate = BinaryToString(InetRead(Execute("$RootWebStuff" & $clist) & "/interactive/infos/status.php?get=b", 1))
  Local $status = BinaryToString(InetRead(Execute("$RootWebStuff" & $clist) & "/interactive/infos/status.php?get=c", 1))
  GUICtrlSetData(Execute("$idStuff" & $clist), "||" & $lastversion & "|" & $lastupdate & "|" & $status)
 Next
 Local $getuserid = BinaryToString(InetRead($rootwebloader & "/interactive/infos/user.php?a=" & $username & "&b=0", 1))
 Local $getuseremail = BinaryToString(InetRead($rootwebloader & "/interactive/infos/user.php?a=" & $username & "&b=1", 1))
 Local $getusergroup = BinaryToString(InetRead($rootwebloader & "/interactive/infos/user.php?a=" & $username & "&b=2", 1))
 Local $getexpireddate = BinaryToString(InetRead($rootwebloader & "/interactive/infos/user.php?a=" & $username & "&b=3", 1))
 GUICtrlSetData($userusername, "Username: " & $username)
 GUICtrlSetData($userid, "User ID: " & $getuserid)
 GUICtrlSetData($usergroup, "Group: " & $getusergroup)
 GUICtrlSetData($useremail, "Email: " & $getuseremail)
 FileDelete($rootuser & "/data.one")
 FileWriteLine($rootuser & "/data.one", $username & @CRLF & $passcryptattempt)
 If $getusergroup = "Premium" Then
  Local $vpartedge[2] = [310, 75]
  Local $vparttext[2] = [$getusergroup & " -> Expire in " & $getexpireddate, ""]
  $statusbar = _guictrlstatusbar_create($guiappdesktop, $vpartedge, $vparttext)
 EndIf
 GUISetState(@SW_HIDE, $guilogin)
 GUISetState(@SW_SHOW, $guiappdesktop)
 While 1
  $nmsg = GUIGetMsg()
  Switch $nmsg
   Case $gui_event_close
    Exit
   Case $idstuff0
    Global $alphaidstuff = $alphaid0, $idstuff = 0, $processstuff = $alphaid0 & ".exe"
    GUICtrlSetData($labelstatus, "Ready to load " & $alphaidstuff & ".")
   Case $btnload
    If $alphaidstuff = "none" Then
     MsgBox(0, "Error", "Please, select your hack or bot first.")
    ElseIf ProcessExists("NostaleX.dat") = 0 Then
     MsgBox(0, "Error", "Please, run Nostale first.")
    Else
     loadstuff()
    EndIf
  EndSwitch
  Sleep(5)
 WEnd
EndFunc




Func loadstuff()
 GUISetState(@SW_DISABLE, $guiappdesktop)
 GUICtrlSetState($btnload, $gui_hide)
 $progressbar = _guictrlcreategif(@ScriptDir & "\patch\images\progress\or_0.gif", "", 325, 238)
 $myrelease = BinaryToString(InetRead($rootwebloader & "/interactive/infos/password_check.php?a=" & $username & "&b=" & $passcryptattempt & "&c=0", 1))
 $rootwebstuff = @ScriptDir & "\patch\stuff\" & $idstuff & "\" & $alphaidstuff & ".exe"
 InetGet(Execute("$RootWebStuff" & $idstuff) & $myrelease, $rootwebstuff, 1)
 If FileExists($rootwebstuff) = 0 Then
  MsgBox(0, "Error", "You should log in.")
 Else
  $mystuffrunned = ShellExecute($rootwebstuff)
  ProcessWait($mystuffrunned)
  waittoendbot()
 EndIf
 _gif_deletegif($progressbar)
 GUICtrlSetState($btnlogin, $gui_show)
 GUISetState(@SW_ENABLE, $guiappdesktop)
 GUICtrlSetState($btnload, $gui_show)
 WinActivate($guiappdesktop)
EndFunc




Func waittoendbot()
 GUISetState(@SW_HIDE, $guiappdesktop)
 ProcessWaitClose($mystuffrunned)
 FileDelete($rootwebstuff)
 Exit
EndFunc

this is part of source.

 

Edited January 30, 2016 by Melba23
Added tags

[Jos]

Much clearer

Seriously, I do understand your native language isn't English, but it is totally unclear what you want from us.

On top of that It feels this all has to do with Game hacks/mods ... right?

Jos

[kyosha]

20 minutes ago, Jos said:

Much clearer

Seriously, I do understand your native language isn't English, but it is totally unclear what you want from us.

On top of that It feels this all has to do with Game hacks/mods ... right?

Jos

So...let's starts again.

I got a source code of very nice nostale's bot (it's a game). This bot isn't working since 1 year, because forum of these bot is offline and no one can buy premium group which is needed to makes this bot working. Autor of this bot has ended playing more than year ago. I asked him about this script and he decided to let me source. He told me that i can edit this and use it on my own. The only one problem is connection with offline forum (where bot has smth like sql base). Is it passible to delate internet connection from this file ?

 

[Jos]

Ok, that is much clearer, but also tells me you haven't read our forum rules in relation to game automation.

Please do so now and make sure you follow these rules in your future topics in our forums.

Jos