Register for your free account! | Forgot your password?

Go Back   elitepvpers > MMORPGs > Guild Wars > GW Bots
You last visited: Today at 02:35

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Frage zur Ident-Funktion

Discussion on Frage zur Ident-Funktion within the GW Bots forum part of the Guild Wars category.

Reply
 
Old   #1
 
Metas's Avatar
 
elite*gold: 0
Join Date: Apr 2008
Posts: 15
Received Thanks: 0
Arrow Frage zur Ident-Funktion

Hi leute,

das Thema wurde zwar schonmal durchgekaut aber ich kriegs einfach nich hin.

er soll "einfach" nur im Hintergrund identifizieren, er klickt allerdings immer nur das Ident-Werkzeug an...

Code:
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", 15)

$ident_x = 30
$ident_y = 290
$x = 30
$y = 85

ControlSend($hwnd, "", "", "{F9}")

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(200)
    _MouseClick($hwnd, "left", $ix, $iy, 1, 80)
   Next
Next
wisst ihr vielleicht was ich ändern muss?

MfG Metas
Metas is offline  
Old 02/11/2009, 20:41   #2
 
elite*gold: 0
Join Date: Jan 2008
Posts: 1,098
Received Thanks: 198
Den Sleep zwischen den Klicks erhöhen oder mal kucken ob du die richtige Auflösung vom Fenster hast .
i4mSoH34Vy is offline  
Old 02/11/2009, 21:07   #3
 
Metas's Avatar
 
elite*gold: 0
Join Date: Apr 2008
Posts: 15
Received Thanks: 0
erhöhung der sleepzeiten bringt nix =/
die auflösung is richtig, sonst würde er ja nicht das ident kit auswählen

hat sonst noch wer ne idee?
Metas is offline  
Old 02/11/2009, 21:44   #4
 
elite*gold: 0
Join Date: Jun 2008
Posts: 350
Received Thanks: 67
MouseCoordMode ändern ??? weiß nicht ob das was im background bbringt
bunney is offline  
Old 02/11/2009, 21:47   #5
 
cab_killer's Avatar
 
elite*gold: 9
Join Date: Jan 2009
Posts: 206
Received Thanks: 24
Ich habe es mal mit meinem Vergliche und mir ist aufgefallen das du für die slots $x angibst aber die variabel schon anderweilig vergeben ist.

Guck mal ob es so geht bei dir

PHP Code:
Opt("MouseClickDelay"15)

$ident_x 30
$ident_y 
290
$Slot1_x 
30
$Slot1_y 
85

ControlSend
($hwnd"""""{F9}")

For 
$iy $Slot1_y To $Slot1_y 140 Step 45
   
For $ix $Slot1_x To $Slot1_x 165 Step 40
    ControlClick
($hwnd"""""left"2$ident_x$ident_y)
    
Sleep(200)
    
_MouseClick($hwnd"left"$ix$iy180)
   
Next
Next 
MFG
cab_killer is offline  
Thanks
1 User
Old 02/11/2009, 21:57   #6
 
Metas's Avatar
 
elite*gold: 0
Join Date: Apr 2008
Posts: 15
Received Thanks: 0
danke das hat funktioniert
Metas is offline  
Reply


Similar Threads Similar Threads
[Frage]Thx Funktion weg?
01/11/2010 - Main - 9 Replies
Ich seh bei mir die Thx nicht mehr ... sind die weg? Also die Thx-anzeige..
ANNI IDENT PLS HELP
12/21/2009 - Diablo 2 - 5 Replies
IS THE LVL OF MY CHAR IMPORTANT FOR ANNI IDENTIFICATION? IS THE CHANCE TO GET A GOOD ANNI HIGHER IF THE CHAR IS 99?? OR CAN THE CHAR BE LVL 1 SRY FOR CAPS MY KEYBOARD IS BROKEN
Ident Kit verschieben
02/28/2009 - GW Bots - 8 Replies
Ich möchte mit der tt6-Routine _MouseClick das Ident Kit in der vorletzten Zeile von der Position 1 der Reihe auf die 2. Position verschieben. Dardurch soll die mögliche Zalh der Idents von 100 auf 200 erhöht werden. Wie sollte eine solche Funktion lauten? Gibt es da einen Vorschlag?
Frage zu MoveTo Funktion
01/07/2009 - Guild Wars - 1 Replies
Hi ich benutze das TT6 Scribt und den Waipointer Dunham um meinen Charakter zu bewegen funktioniert aus ganz gut jetzt hab ich das Problem, dass ein einer Stelle abundzu ein hinderniss kommt das Script dannn in der Funktion stehen bleibt und mein Charakter stirbt und jetzt wollte ich wissen wie ich erkennen kann, dass mein Char vor einem Hinderniss steht und dann aus der Funktion rausgeht und normal weiter seine Skills castet ?
Schon immer eine Ident Funktion gesucht? Dann Schaut einfach mal hier rein :)
08/07/2008 - Guild Wars - 1 Replies
Huhu, habe hier mal eine 'Ident Funktion' geschrieben, die ich schon sehr sehr lange benutze... (könnt ihr natürlich 'modden', sodass er keine Goldenen Gegenstände etc. identifiziert...) Folgende Infos die Ihr evtl. wissen müsstet, wenn ihr den Script nicht anpassen wollt. Jedoch ist es relativ einfach anzupassen, da man nur wenige Variablen ändern muss. (Siehe selbst) Auflösung: 1024*768 Interface Größe: Klein Die Taschen (F9) müssen unten Links hingeschoben werden. Das Ident-Kit...



All times are GMT +1. The time now is 02:36.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.