Probleme mit Resign im Hintergrund? Hier die Lösung!!!

Valvepro · 02/01/2009, 01:21

Moinsen, habt ihr evtl. auch manchmal das Problem mit dem '/resign', dass er es nicht richtig sendet?
Und habt ihr das auch, das eure Bots die mit Control-Befehlen ausgestattet sind nach einer weile spinnen (Tastatur....Shift aktiv....)?
Dann habe ich hier genau das richtige für euch, schauts euch an!

Viel Spass damit

Mit freundlichen Grüßen
ValvePro

NBA · 02/01/2009, 01:28

schaus mir mal an...

aLasca · 02/01/2009, 01:33

Ident würd ich viel toller finden..^^

Dunham · 02/01/2009, 01:34

Quote:

Originally Posted by aLasca

Ident würd ich viel toller finden..^^

gibts doch schon... in der tt6

aLasca · 02/01/2009, 01:37

Ja ihr sagt immer alle tt6... aber ich will das hier zum laufen bekommen

PHP Code:



 
$hWnd = "Guild Wars" 
 
Func _MakeLong($LoWord, $HiWord) 
    Return BitOR($HiWord * 0x10000, BitAND($LoWord, 0xFFFF)) 
EndFunc   ;==>_MakeLong 
 
Func _MouseClick($hWnd, $button, $x, $y, $times = 1, $delay = 15) ; Use the relative coords to the client area of the active window 
    If $hWnd = 0 Then 
        SetError(-1) 
        Return 
    EndIf 
     
    Local $ix 
    Local $lParam = _MakeLong($x, $y) 
    Local $user32 = DllOpen("user32.dll") 
     
    $button = StringLower($button) 
     
    If $button = "left" Then 
        For $ix = 1 To $times 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x200, "int", 0, "long", $lParam) ; Move 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x201, "int", 1, "long", $lParam) ; Down 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x202, "int", 0, "long", $lParam) ; Up 
             
            If $ix < $times Then Sleep($delay) 
        Next 
    ElseIf $button = "right" Then 
        For $ix = 1 To $times 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x200, "int", 0, "long", $lParam) ; Move 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x204, "int", 2, "long", $lParam) ; Down 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x205, "int", 0, "long", $lParam) ; Up 
             
            If $ix < $times Then Sleep($delay) 
        Next 
    Else 
        SetError(-2) 
        If $user32 <> -1 Then DllClose($user32) 
        Return 
    EndIf 
    If $user32 <> -1 Then DllClose($user32) 
EndFunc   ;==>_MouseClick 
 
Opt("MouseClickDelay", 1000) 
 
func _ident() 
 
$hwnd0 = WinGetHandle("Guild Wars") 
ControlSend($hwnd0, "", "", "{.}") 
Sleep(500) 
$ident_x = 40 
$ident_y = 318 
$x = 41 
$y = 78 
 
For $iy = $y To $y + 140 Step 45 
For $ix = $x To $x + 165 Step 40 
ControlClick($hwnd0, "", "", "left", 2, $ident_x, $ident_y) 
Sleep(3000) 
_MouseClick($hwnd0, "left", $ix, $iy, 1, 80) 
Next 
Next 
EndFunc ;==>ident  
 
_ident()

Das Problem ist bei mir das er immer das Identkit mitzieht.. egal wie hoch die Zeiten sind

Dunham · 02/01/2009, 01:39

was spricht denn gegen die funktion von der tt6?? eigenlich nichts... und so wie du das machen willst hab ich das eigenlich auch gemacht und hatte keine probleme damit gehabt

aLasca · 02/01/2009, 01:42

Kannst du mal deine Funktion posten?
Gegen die tt6 spricht, das ich sie nicht verstehe.. weil ich sie nicht verstehen will

User32 war zuerst da.. und ich kann ja nicht sagen weil ich das eine nicht kann nehm ich das andere, man will ja lernen

Valvepro · 02/01/2009, 01:44

Naja, Ihr müsst es ja nicht benutzen...
bzw. es gibt viele Probleme mit Bots die im Hintergrund laufen...Schuld daran sind die Control-Befehle... es lässt den Tastaturpuffer volllaufen ... deswegen habe ich eine Funktion zum entleeren des puffers hinzugepackt...(Der Überlauf tritt aber nur dann auf, wenn der Bot einige Stunden am Stück läuft...deswegen einfach meine Funktion am Anfang von jedem Run einmal ausführen).

MfG

aLasca · 02/01/2009, 01:45

Quote:

Originally Posted by Valvepro

Naja, Ihr müsst es ja nicht benutzen...
bzw. es gibt viele Probleme mit Bots die im Hintergrund laufen...Schuld daran sind die Control-Befehle... es lässt den Tastaturpuffer volllaufen ... deswegen habe ich eine Funktion zum entleeren des puffers hinzugepackt...(Der Überlauf tritt aber nur dann auf, wenn der Bot einige Stunden am Stück läuft...deswegen einfach meine Funktion am Anfang von jedem Run einmal ausführen).

MfG

Ich habe es sofort mit eingebunden in den Bot den ich grade schreibe, danke

Ident würde mich trotzdem interessieren

NBA · 02/01/2009, 01:48

Nur mal so ne kleine frage...wirst wieder versuchen es zu verkaufen wie bei deiner moveto valvepro?

Dunham · 02/01/2009, 02:02

da mit dem bugfix hört sich gut an :-) direkt mal in alle bot reinbauen :-p

@nba wie will er es denn jetzt noch vekaufen? ich denke mal das es wohl ohne gw mems läuft dh das man ja kein update braucht ^^ (denk ich mal)

aLasca · 02/01/2009, 02:03

Sooo.. Ident über user32 läuft bei mir jetzt einwandfrei

NBA · 02/01/2009, 02:07

Quote:

Originally Posted by aLasca

Sooo.. Ident über user32 läuft bei mir jetzt einwandfrei

Würde es Ihnen etwas ausmachen, den SourceCode bzw. Das Ident-Script zu Posten oder Hochzuladen?

aLasca · 02/01/2009, 02:09

Quote:

Originally Posted by NBA

Würde es Ihnen etwas ausmachen, den SourceCode bzw. Das Ident-Script zu Posten oder Hochzuladen?

Selbst verständich nicht!

PHP Code:



 
$hWnd = WinGetHandle("Guild Wars") 
 
Func _MakeLong($LoWord, $HiWord) 
    Return BitOR($HiWord * 0x10000, BitAND($LoWord, 0xFFFF)) 
EndFunc   ;==>_MakeLong 
 
Func _MouseClick($hWnd, $button, $x, $y, $times = 1, $delay = 15) ; Use the relative coords to the client area of the active window 
    If $hWnd = 0 Then 
        SetError(-1) 
        Return 
    EndIf 
 
    Local $ix 
    Local $lParam = _MakeLong($x, $y) 
    Local $user32 = DllOpen("user32.dll") 
 
    $button = StringLower($button) 
 
    If $button = "left" Then 
        For $ix = 1 To $times 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x200, "int", 0, "long", $lParam) ; Move 
            Sleep(100) 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x201, "int", 1, "long", $lParam) ; Down 
            Sleep(100) 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x202, "int", 0, "long", $lParam) ; Up 
            Sleep(100) 
 
            If $ix < $times Then Sleep($delay) 
        Next 
    ElseIf $button = "right" Then 
        For $ix = 1 To $times 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x200, "int", 0, "long", $lParam) ; Move 
            Sleep(100) 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x204, "int", 2, "long", $lParam) ; Down 
            Sleep(100) 
            DllCall($user32, "int", "PostMessage", "hwnd", $hWnd, "int", 0x205, "int", 0, "long", $lParam) ; Up 
            Sleep(100) 
 
            If $ix < $times Then Sleep($delay) 
        Next 
    Else 
        SetError(-2) 
        If $user32 <> -1 Then DllClose($user32) 
        Return 
    EndIf 
    If $user32 <> -1 Then DllClose($user32) 
EndFunc   ;==>_MouseClick 
 
Opt("MouseClickDelay", 10) 
 
Func _ident() 
    ControlSend($hWnd, "", "", "{.}") 
    Sleep(500) 
    $ident_x = 32 
    $ident_y = 270 
    $x = 33 
    $y = 72 
 
    For $iy = $y To $y + 140 Step 45 
        For $ix = $x To $x + 165 Step 40 
            ControlClick($hWnd, "", "", "left", 2, $ident_x, $ident_y) 
            Sleep(100) 
            _MouseClick($hWnd, "left", $ix, $iy, 1, 100) 
        Next 
    Next 
    ControlSend($hWnd, "", "", "{.}") 
EndFunc   ;==>_ident

Die Sleepzeiten zwischen Move;Down;Up haben es gebracht..

Valvepro · 02/01/2009, 02:10

Quote:

Originally Posted by NBA

Nur mal so ne kleine frage...wirst wieder versuchen es zu verkaufen wie bei deiner moveto valvepro?

Nein, es wird nicht's kosten... bin dabei eine 'große' .dll zu coden in der viele nützliche Funktionen stecken unter anderem die MoveTo und Pub stellen! 4 FREE