kyosha

debugger

7 posts in this topic

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

Share this post


Link to post
Share on other sites



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

1 person likes this

Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______My UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Share this post


Link to post
Share on other sites
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.

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

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 by Melba23
Added tags

Share this post


Link to post
Share on other sites

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

1 person likes this

Visit the SciTE4AutoIt3 Download page for the latest versions        Beta files                                                          Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Share this post


Link to post
Share on other sites
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 ?

 

Share this post


Link to post
Share on other sites

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


Visit the SciTE4AutoIt3 Download page for the latest versions        Beta files                                                          Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.