ControlClick Taste Halten?

Page 1 of 2 1 2
12/08/2010 13:50 freehuntx#1
Hi.

Ist es möglich bei einem Controlclick die Taste zu halten?
In meinem fall die rechte maustaste.

Danke.
12/08/2010 17:41 puzzlr#2
ist es nicht möglich, den ControlClick in eine Endlosschleife zu setzen?
12/08/2010 17:49 omer36#3
Quote:
Originally Posted by freehuntx View Post
Hi.

Ist es möglich bei einem Controlclick die Taste zu halten?
In meinem fall die rechte maustaste.

Danke.

ich glaube nicht, bin mir aber nicht sicher...
12/08/2010 19:37 Memphiisto#4
Ich wüsste selber nicht wie aber Hab auch ne Frage zu Control Klick : DD

Ehm gibt es so etwas wie ControlImagesearch oder so was? also dass das z.b. Spiel minimiert werden kann aber dass der Bot immer noch in diesem Fenster ImageSearchen kann?..
Wenn ja pls kanns mir jmnd erklären...

Lg Magic

P.s. Falls es diese Möglichkeit nicht gibt wäre es nett wenn ich jmnd hätte wie ich das machen kann indem ich z.b. in der Memory was ändere..
12/08/2010 19:53 PenGuin :O#5
Quote:
Originally Posted by MagicDave View Post
Ehm gibt es so etwas wie ControlImagesearch oder so was? also dass das z.b. Spiel minimiert werden kann aber dass der Bot immer noch in diesem Fenster ImageSearchen kann?..
Wenn ja pls kanns mir jmnd erklären...
Genau, denn das Bild im Spiel besitzt auch Pixel, wenn es minimiert ist :facepalm:
12/08/2010 20:00 Memphiisto#6
Hätte ja sein können ://
Wie machen die dass dan bei den ganzen Professionellen Metin2 Bots?
Kontrollieren die alles über die Memory? :P

Wenn das so ist muss ich wohl mal lernen damit umzugehen....


Lg Magic

P.s. Iw mag ich den Smiley ned XD :

:facepalm:
12/08/2010 21:19 freehuntx#7
Also ich schaffe es zwar links klick zu spammen per controlklick...

aber das halten muss doch auch irgendwie gehen...

@u_failed

eine schleife wiederholt nur die darin stehenden befehle. also würde er immer schnell rechtsklick spammen.


bei mouseclick kann man ja left down und so machen...

naja ich werde es dann eben über eine api aus einer dll machen die ich einfach in tempdir stecke und an scriptschluss lösche ^^


aber danke trotzdem.

Die die es interessiert.

Hier das script, ihr werdet verstehen was es tut.

Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
HotKeySet("{F1}", "LMSpamON")
HotKeySet("{F2}", "LMSpamOFF")
HotKeySet("{F3}", "RMHoldON")
HotKeySet("{F4}", "RMHoldOFF")
local $TastenSpam = false
local $LMSpam = false
local $RMHold = false
local $AHold = false
local $DHold = false
local $WHold = false
local $SHold = false

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Teewars Window Manager", 420, 374, 243, 196)
$Label1 = GUICtrlCreateLabel("FensterName:", 16, 16, 70, 17)
$Input1 = GUICtrlCreateInput("", 96, 14, 121, 21)
$Label2 = GUICtrlCreateLabel("TastenSpam:", 16, 48, 67, 17)
$Input2 = GUICtrlCreateInput("", 96, 46, 65, 21)
$Button = GUICtrlCreateButton("Ändern", 230, 12, 75, 25)
$Button1 = GUICtrlCreateButton("Start", 184, 45, 75, 25)
$Button2 = GUICtrlCreateButton("Stop", 272, 45, 75, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label3 = GUICtrlCreateLabel("OFF", 368, 50, 24, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label4 = GUICtrlCreateLabel("Linke Maus Spammen:", 16, 96, 112, 17)
$Button3 = GUICtrlCreateButton("Start", 128, 90, 75, 25)
$Button4 = GUICtrlCreateButton("Stop", 216, 90, 75, 25)
$Label5 = GUICtrlCreateLabel("Rechte Maus Halten:", 16, 136, 105, 17)
$Button5 = GUICtrlCreateButton("Start", 128, 132, 75, 25)
$Button6 = GUICtrlCreateButton("Stop", 216, 132, 75, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label6 = GUICtrlCreateLabel("OFF", 368, 94, 24, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label7 = GUICtrlCreateLabel("OFF", 368, 136, 24, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label8 = GUICtrlCreateLabel("A Halten:", 16, 184, 48, 17)
$Label9 = GUICtrlCreateLabel("D Halten:", 16, 216, 49, 17)
$Label10 = GUICtrlCreateLabel("W Halten:", 16, 248, 52, 17)
$Label11 = GUICtrlCreateLabel("S Halten:", 16, 280, 48, 17)
$Button7 = GUICtrlCreateButton("Start", 128, 180, 75, 25)
$Button8 = GUICtrlCreateButton("Start", 128, 212, 75, 25)
$Button9 = GUICtrlCreateButton("Start", 128, 244, 75, 25)
$Button10 = GUICtrlCreateButton("Start", 128, 276, 75, 25)
$Button11 = GUICtrlCreateButton("Stop", 215, 180, 75, 25)
$Button12 = GUICtrlCreateButton("Stop", 215, 212, 75, 25)
$Button13 = GUICtrlCreateButton("Stop", 215, 244, 75, 25)
$Button14 = GUICtrlCreateButton("Stop", 215, 276, 75, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button15 = GUICtrlCreateButton("About", 328, 336, 75, 25)
$Label12 = GUICtrlCreateLabel("By FreehuntX", 16, 344, 68, 17)
$Label13 = GUICtrlCreateLabel("OFF", 368, 184, 24, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label14 = GUICtrlCreateLabel("OFF", 368, 214, 24, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label15 = GUICtrlCreateLabel("OFF", 368, 246, 24, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label16 = GUICtrlCreateLabel("OFF", 368, 280, 24, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###






While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			
		Case $Button
			_Fenstername()
		
		
		
		Case $Button1
			GUICtrlSetData($Label3, 'ON')
			GUICtrlSetBkColor ( $Label3, 0x01DF01 )
			$TastenSpam = true

		Case $Button2
			GUICtrlSetData($Label3, 'OFF') 
			GUICtrlSetBkColor( $Label3, 0xFF0000)
			$TastenSpam = false
			
		Case $Button3
			GUICtrlSetData($Label6, 'ON')
			GUICtrlSetBkColor ( $Label6, 0x01DF01 )
			local $LMSpam = true

		Case $Button4
			GUICtrlSetData($Label6, 'OFF') 
			GUICtrlSetBkColor( $Label6, 0xFF0000)
			local $LMSpam = false
			
		Case $Button5
			GUICtrlSetData($Label7, 'ON')
			GUICtrlSetBkColor ( $Label7, 0x01DF01 )
			local $RMHold = true

		Case $Button6
			GUICtrlSetData($Label7, 'OFF') 
			GUICtrlSetBkColor( $Label7, 0xFF0000)
			local $RMHold = false
			
		Case $Button7
			GUICtrlSetData($Label13, 'ON')
			GUICtrlSetBkColor ( $Label13, 0x01DF01 )
			local $AHold = true

		Case $Button11
			GUICtrlSetData($Label13, 'OFF') 
			GUICtrlSetBkColor( $Label13, 0xFF0000)
			local $AHold = false
			
        Case $Button8
			GUICtrlSetData($Label14, 'ON')
			GUICtrlSetBkColor ( $Label14, 0x01DF01 )
			local $DHold = true

		Case $Button12
			GUICtrlSetData($Label14, 'OFF') 
			GUICtrlSetBkColor( $Label14, 0xFF0000)
			local $DHold = false
			
			Case $Button9
			GUICtrlSetData($Label15, 'ON')
			GUICtrlSetBkColor ( $Label15, 0x01DF01 )
			local $WHold = true

		Case $Button13
			GUICtrlSetData($Label15, 'OFF') 
			GUICtrlSetBkColor( $Label15, 0xFF0000)
			local $WHold = false
			
			Case $Button10
			GUICtrlSetData($Label16, 'ON')
			GUICtrlSetBkColor ( $Label16, 0x01DF01 )
			local $SHold = true

		Case $Button14
			GUICtrlSetData($Label16, 'OFF') 
			GUICtrlSetBkColor( $Label16, 0xFF0000)
			local $SHold = false

	EndSwitch
	
	
	If $TastenSpam = true then ControlSend(Guictrlread($Input1), "", "", Guictrlread($Input2))
		
	If $LMSpam = true then ControlClick(Guictrlread($Input1), "", "","left")
		
	If $RMHold = true then ControlClick(Guictrlread($Input1), "", "","right")
				
	If $AHold = true then ControlSend(Guictrlread($Input1), "", "", "{a down}")
					
	If $DHold = true then ControlSend(Guictrlread($Input1), "", "", "{d down}")
						
	If $WHold = true then ControlSend(Guictrlread($Input1), "", "", "{w down}")
							
	If $SHold = true then ControlSend(Guictrlread($Input1), "", "", "{s down}")
WEnd



Func _Fenstername()
	WinSetTitle("Teeworlds","",Guictrlread($Input1))
	GUICtrlSetState($Input1, $GUI_DISABLE)
EndFunc

Func LMSpamON()
	$LMSpam = true
EndFunc

Func LMSpamOFF()
	$LMSpam = false
EndFunc

Func RMHoldON()
	$RMHold = true
EndFunc

Func RMHoldOFF()
	$RMHold = false
EndFunc
habe die tage langeweile und bastle ein paar sinnfreie programme ^^
12/08/2010 21:28 PenGuin :O#8
Code:
Func MakeLong($LoWord, $HiWord)
	Return BitOR($HiWord * 0x10000, BitAND($LoWord, 0xFFFF))
EndFunc

; send mouse events to non active window
; button = left, right, none
; event = down, up, click, dclick, move
Func MouseSend($hwnd, $btn, $evt, $xpos, $ypos)
	$user32 = DllOpen("user32.dll")
	if $user32 = -1 Then
		ConsoleWrite("MouseSend: cannot open user32.dll")
		Exit
	EndIf

	;define missing constans
	$MK_LBUTTON       =  0x0001
	$WM_LBUTTONDOWN   =  0x0201
	;$WM_LBUTTONUP     =  0x0202 -> defined in WindowsConstants.au3
	$WM_LBUTTONDBLCLK =  0x0203
	$MK_RBUTTON       =  0x0002
	$WM_RBUTTONDOWN   =  0x0204
	$WM_RBUTTONUP     =  0x0205
	$WM_RBUTTONDBLCLK =  0x0206
	;$WM_MOUSEMOVE     =  0x0200 -> defined in WindowsConstants.au3

	;map button to event
	If $btn = "left" Then
		$button = $MK_LBUTTON
		$btdown = $WM_LBUTTONDOWN
		$btup = $WM_LBUTTONUP
		$btdbl = $WM_LBUTTONDBLCLK
	ElseIf $btn = "right" Then
		$button = $MK_RBUTTON
		$btdown = $WM_RBUTTONDOWN
		$btup = $WM_RBUTTONUP
		$btdbl = $WM_RBUTTONDBLCLK
	ElseIf $btn = "none" Then
		If Not ($evt = "move") Then
			ConsoleWrite(StringFormat("MouseSend: bad call:  %s , %s",$btn, $evt))
			Exit
		EndIf
	Else  ;error
		ConsoleWrite(StringFormat("MouseSend: bad button: %s",$btn))
		Exit
	EndIf

	;send messages
	$pos = MakeLong($xpos, $ypos)
	Select
	Case $evt = "move"
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_MOUSEMOVE, "int", 0, "long", $pos)
	Case $evt = "down"
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $btdown, "int", $button, "long", $pos)
	Case $evt = "up"
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $btup, "int", 0, "long", $pos)
	Case $evt = "click"
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_MOUSEMOVE, "int", 0, "long", $pos)
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $btdown, "int", $button, "long", $pos)
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $btup, "int", 0, "long", $pos)
	Case $evt = "dclick"
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_MOUSEMOVE, "int", 0, "long", $pos)
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $btdown, "int", $button, "long", $pos)
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $btup, "int", 0, "long", $pos)
		Sleep(10)
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $btdbl, "int", $button, "long", $pos)
		DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $btup, "int", 0, "long", $pos)
	EndSelect
	DllClose($user32)
EndFunc
12/08/2010 21:47 lolkop#9
@freehuntx ... du solltest dir dringend angewöhnen mit schleifen und arrays zu arbeiten.
12/08/2010 22:13 freehuntx#10
@pinguin94
verstehe das nicht sorry bin auch kein procoder whatever...

habs jetz so gemacht

DllCall("Functions.dll","int","fnPostMessage","HWn d",$Fenster,"int",0x0204,"int",0x0002, "long",1)

und ner dll.

damit kann ich zwar nicht die taste halten, aber dank eines buggs bleibt der hook im spiel trotzdem bis man wieder die rechte taste clickt...
12/08/2010 22:25 lolkop#11
ich persöhnlich halte es ja nicht für schlau ne dll aufzurufen, die für dich die user32.dll aufruft -.-

nutz einfach direkt die user32.dll, und spar dir die unnütze dll...
Code:
DllCall('user32.dll', 'int', 'PostMessage', 'hwnd', $hwnd, 'int', 0x204, 'int', 2, 'long', 1)
12/08/2010 22:28 freehuntx#12
ahso enthält die etwa die selben funktionen?
12/08/2010 22:31 lolkop#13
guck doch bei msdn nach...
[Only registered and activated users can see links. Click Here To Register...]

da wird auch jedes mal die benötigte dll mit angegeben ganz unten.
12/08/2010 22:43 freehuntx#14
boar dieser scheiss rechtsklick haha

jetz wills nich mit user32.dll

kann ich das vll nicht in einer funktion nutzen??

DllCall("user32.dll","int","fnPostMessage","HWnd", $,"int",0x0204,"int",0x0002, "long",1)
12/08/2010 22:55 lolkop#15
die funktion heist postmessage....
Page 1 of 2 1 2