Code:
;===============================================================================
;
; Function Name: _MouseClickPlus()
; Version added: 0.1
; Description: Sends a click to window, not entirely accurate, but works
; minimized.
; Parameter(s): $Window = Title of the window to send click to
; $Button = "left" or "right" mouse button
; $X = X coordinate
; $Y = Y coordinate
; $Clicks = Number of clicks to send
; Remarks: You MUST be in "MouseCoordMode" 0 to use this without bugs.
; Author(s): Insolence <insolence_9@yahoo.com>
;
;===============================================================================
Func _MouseClickPlus($Window, $Button = "left", $X = "", $Y = "", $Clicks = 2)
Local $MK_LBUTTON = 0x0001
Local $WM_LBUTTONDOWN = 0x0201
Local $WM_LBUTTONUP = 0x0202
Local $MK_RBUTTON = 0x0002
Local $WM_RBUTTONDOWN = 0x0204
Local $WM_RBUTTONUP = 0x0205
Local $WM_MOUSEMOVE = 0x0200
Local $i = 0
Select
Case $Button = "left"
$Button = $MK_LBUTTON
$ButtonDown = $WM_LBUTTONDOWN
$ButtonUp = $WM_LBUTTONUP
Case $Button = "right"
$Button = $MK_RBUTTON
$ButtonDown = $WM_RBUTTONDOWN
$ButtonUp = $WM_RBUTTONUP
EndSelect
If $X = "" OR $Y = "" Then
$MouseCoord = MouseGetPos()
$X = $MouseCoord[0]
$Y = $MouseCoord[1]
EndIf
For $i = 1 to $Clicks
DllCall("user32.dll", "int", "SendMessage", _
"hwnd", WinGetHandle( $Window ), _
"int", $WM_MOUSEMOVE, _
"int", 0, _
"long", _MakeLong($X, $Y))
DllCall("user32.dll", "int", "SendMessage", _
"hwnd", WinGetHandle( $Window ), _
"int", $ButtonDown, _
"int", $Button, _
"long", _MakeLong($X, $Y))
DllCall("user32.dll", "int", "SendMessage", _
"hwnd", WinGetHandle( $Window ), _
"int", $ButtonUp, _
"int", $Button, _
"long", _MakeLong($X, $Y))
Next
EndFunc
Func _MakeLong($LoWord,$HiWord)
Return BitOR($HiWord * 0x10000, BitAND($LoWord, 0xFFFF))
EndFunc
;hWin=AutoIt.WinGetHandle(StarCraft II)
;WScript.Echo "hWin=" + hWin
;AutoIt.ControlSend StarCraft II, "", hWin, "^n"
sleep(2000)
$MPos = MouseGetPos()
MsgBox ( 0, "MSG", "MousePos: "& @CRLF& _
"x: "&$MPos[0] & @CRLF& _
"y: " & $MPos[1] , 1 )
while 1
_MouseClickPlus( "StarCraft II", "left", 346, 130 ) ;multiplayer
sleep (100)
_MouseClickPlus( "StarCraft II", "left", 221, 833 ) ;join
sleep (100)
_MouseClickPlus( "StarCraft II", "left", 354, 15 ) ;menu
sleep (100)
ControlSend("StarCraft II","","","{F10}") ;menu
sleep (10000)
ControlSend("StarCraft II","","","n") ;surrender
sleep (100)
ControlSend("StarCraft II","","","s") ;score
sleep (100)
_MouseClickPlus( "StarCraft II", "left", 864, 544 ) ;occasional dc mg
sleep (100)
wend The only small problem I see with this is you are missing some small details. If you were to run this, and capture the messages that are sent to