controlsend в играх

[morgan1991]

Здравствуйте!
Скажите пожалуйста как можно в играх отлавливать поля ввода, кнопки и т.д. и т.п.
Допустим известная всем игра World of Warcraft
Захожу в неё с Au3info и отлавливаю поле ввода, в итоге получаю следующее:

>>>> Window <<<<
Title: World of Warcraft
Class: GxWindowClassD3d
Position: -32000, -32000
Size: 160, 30
Style: 0xB6080000
ExStyle: 0x00040008
Handle: 0x005B048C

>>>> Control <<<<
Class:
Instance:
ClassnameNN:
Advanced (Class):
ID:
Text:
Position:
Size:
ControlClick Coords:
Style:
ExStyle:
Handle: 0x000100C8

>>>> Mouse <<<<
Position: 32536, 32610
Cursor ID: 15
Color: 0xF4F4F4

>>>> StatusBar <<<<

>>>> Visible Text <<<<


>>>> Hidden Text <<<<

Но такой код не работает:

ControlSend("World of Warcraft", "", "GxWindowClassD3d", "kjhgkjh")

Помогите плиз как мне быть?
Или хотябы как сделать так чтобы можно было отловить с помощью hotkeyset и тут же выслать нажатие этой клавиши используя макрос @HotKeyPressed, но чтобы hotkeyset не вызвался повторно после нажатия этой клавиши.

[proxy]

самый банальный пример:
#region: - Include
#include <GUIConstantsEx.au3>
#Include <Misc.au3>
#include <WindowsConstants.au3>
#endregion

#region: - Option
Opt('GUIOnEventMode', 1)
Opt('MustDeclareVars', 1)
Opt('TrayIconDebug', 1)
Opt('TrayIconHide', 0)
#endregion

#region: - Global
Global $hWinMain
#endregion

#region: GUI
$hWinMain = GUICreate('Test', 400, 400, -1, -1)
GUISetIcon('shell32.dll', -50)
GUISetOnEvent($GUI_EVENT_CLOSE, '_Pro_Exit')

GUICtrlCreateButton('Exit', 10, 50, 150, 25)
GUICtrlSetOnEvent(-1, '_Pro_Exit')
#endregion

#region: - После создания всех GUI
GUISetState(@SW_SHOW, $hWinMain)
#endregion

#region: - Sleep, Exit
While 1
Sleep(10)
If _IsPressed(11) Then
If _IsPressed(47) Then
MsgBox(0, '', 'asd')
EndIf
EndIf
WEnd

Func _Pro_Exit()
Exit
EndFunc
#endregion


+ офф сайт, там смотрел?
1 (http://www.autoitscript.com/forum/index.php?showtopic=90950&hl=Warcraft)
2 (http://www.autoitscript.com/forum/index.php?showtopic=90774&hl=Warcraft)
3 (http://www.autoitscript.com/forum/index.php?showtopic=37998&hl=Warcraft)
4 (http://www.autoitscript.com/forum/index.php?showtopic=90436&hl=Warcraft)
5 (http://www.autoitscript.com/forum/index.php?showtopic=90077&hl=Warcraft)
и т.д. (http://www.autoitscript.com/forum/index.php?act=Search&CODE=show&searchid=f12149772733b7a495c87efb71817002&search_in=posts&result_type=posts&highlite=+Warcraft)

[Creat0R]

такой код не работает »
И не должен :) «GxWindowClassD3d» это класс окна, а не контроля.

Можно попробовать так:

ControlSend("[CLASS:GxWindowClassD3d]", "", "", "kjhgkjh")

как сделать так чтобы можно было отловить с помощью hotkeyset и тут же выслать нажатие этой клавиши используя макрос @HotKeyPressed, но чтобы hotkeyset не вызвался повторно после нажатия этой клавиши. »
Так:

HotKeySet("g", "Test_Func")
HotKeySet("r", "Test_Func")
HotKeySet("e", "Test_Func")
HotKeySet("^q", "Test_Func")

While 1
Sleep(100)
WEnd

Func Test_Func()
HotKeySet(@HotKeyPressed)
Send(@HotKeyPressed)
HotKeySet(@HotKeyPressed, "Test_Func")

If @HotKeyPressed = "^q" Then Exit
EndFunc

?

[proxy]

Func Test_Func()
HotKeySet(@HotKeyPressed)
Send(@HotKeyPressed)
HotKeySet(@HotKeyPressed, "Test_Func")
If @HotKeyPressed = "^q" Then Exit
EndFunc »
хитро ))

[morgan1991]

Так: »
Всё супер только одна проблемка, если в hotkeyset вставить русские буквы тогда при
Send(@HotKeyPressed)
высылаются русские буквы, а если сделать так:
msgbox(0, "", @HotKeyPressed)
или так:
FileWrite($fileopen, @HotKeyPressed)
тогда всеравно пишутся английские буквы.
Как это исправить?

[Creat0R]

если в hotkeyset вставить русские буквы »
Полный пример можно?

[morgan1991]

Полный пример можно? »
Сори сразу не понял, оказывается hotkeyset совсем не отлавливает нажатие русских букв.
т.е. когда ставлю русскую раскладку клавиатуры.
Как это исправить?

[Creat0R]

hotkeyset совсем не отлавливает нажатие русских букв »
А зчем, указывайте английские, например, вместо буквы «А», укажите «F» :).

[morgan1991]

ну дак мне нужно отловить если нажимаются определённые клавиши нужно их записать в другой текстовик, среди них есть и русские и английские буквы. Как я потом в этом текстовике отличу какие символы были нажаты русские или английские?

[Creat0R]

Как я потом в этом текстовике отличу какие символы были нажаты русские или английские? »
Можно через @KBLayout:

Func Test_Func()
If @HotKeyPressed = "^q" Then Exit

HotKeySet(@HotKeyPressed)

Send(@HotKeyPressed)

$sSetKey = @HotKeyPressed
If @KBLayout = "0419" Then $sSetKey &= " (рус.)"

HotKeySet(@HotKeyPressed, "Test_Func")
EndFunc

[morgan1991]

спасибо

[morgan1991]

И всёже как можно отследить окно игры? нужно чтобы когда пользователь войдёт под своим логином в игру запустить функцию. Титла у окна игры нету, пробовал через отслеживал HANDLE, но он всегда одинаковый. Может можно както отслеживать изменения в памяти процесса? Я просто в этом не понимаю, научите плиз...

[proxy]

morgan1991, просотй пример чтения памяти: http://forum.ru-board.com/topic.cgi?forum=5&bm=1&topic=29240&start=520#2
а так, попробуй спросить у парня: Belfigor au3, - у него те же задачи............

[morgan1991]

proxy, не работает выдаёт такое:

[proxy]

все забываю...вот она:
#include-once
#region _Memory
;==================================================================================
; AutoIt Version: 3.1.127 (beta)
;
; Functions:
;
;==================================================================================
; Function: _MemoryOpen($iv_Pid[, $iv_DesiredAccess[, $iv_InheritHandle]])
; Description: Opens a process and enables all possible access rights to the
; process. The Process ID of the process is used to specify which
; process to open. You must call this function before calling
; _MemoryClose(), _MemoryRead(), or _MemoryWrite().
; Parameter(s): $iv_Pid - The Process ID of the program you want to open.
; $iv_DesiredAccess - (optional) Set to 0x1F0FFF by default, which
; enables all possible access rights to the
; process specified by the Process ID.
; $iv_InheritHandle - (optional) If this value is TRUE, all processes
; created by this process will inherit the access
; handle. Set to 1 (TRUE) by default. Set to 0
; if you want it FALSE.
; Requirement(s): None.
; Return Value(s): On Success - Returns an array containing the Dll handle and an
; open handle to the specified process.
; On Failure - Returns 0
; @Error - 0 = No error.
; 1 = Invalid $iv_Pid.
; 2 = Failed to open Kernel32.dll.
; 3 = Failed to open the specified process.
; Author(s): Nomad
; Note(s):
;==================================================================================
Func _MemoryOpen($iv_Pid, $iv_DesiredAccess = 0x1F0FFF, $iv_InheritHandle = 1)

If Not ProcessExists($iv_Pid) Then
SetError(1)
Return 0
EndIf

Local $ah_Handle[2] = [DllOpen('kernel32.dll')]

If @Error Then
SetError(2)
Return 0
EndIf

Local $av_OpenProcess = DllCall($ah_Handle[0], 'int', 'OpenProcess', 'int', $iv_DesiredAccess, 'int', $iv_InheritHandle, 'int', $iv_Pid)

If @Error Then
DllClose($ah_Handle[0])
SetError(3)
Return 0
EndIf

$ah_Handle[1] = $av_OpenProcess[0]

Return $ah_Handle

EndFunc

;==================================================================================
; Function: _MemoryRead($iv_Address, $ah_Handle[, $sv_Type])
; Description: Reads the value located in the memory address specified.
; Parameter(s): $iv_Address - The memory address you want to read from. It must
; be in hex format (0x00000000).
; $ah_Handle - An array containing the Dll handle and the handle
; of the open process as returned by _MemoryOpen().
; $sv_Type - (optional) The "Type" of value you intend to read.
; This is set to 'dword'(32bit(4byte) signed integer)
; by default. See the help file for DllStructCreate
; for all types. An example: If you want to read a
; word that is 15 characters in length, you would use
; 'char[16]' since a 'char' is 8 bits (1 byte) in size.
; Return Value(s): On Success - Returns the value located at the specified address.
; On Failure - Returns 0
; @Error - 0 = No error.
; 1 = Invalid $ah_Handle.
; 2 = $sv_Type was not a string.
; 3 = $sv_Type is an unknown data type.
; 4 = Failed to allocate the memory needed for the DllStructure.
; 5 = Error allocating memory for $sv_Type.
; 6 = Failed to read from the specified process.
; Author(s): Nomad
; Note(s): Values returned are in Decimal format, unless specified as a
; 'char' type, then they are returned in ASCII format. Also note
; that size ('char[size]') for all 'char' types should be 1
; greater than the actual size.
;==================================================================================
Func _MemoryRead($iv_Address, $ah_Handle, $sv_Type = 'dword')

If Not IsArray($ah_Handle) Then
SetError(1)
Return 0
EndIf

Local $v_Buffer = DllStructCreate($sv_Type)

If @Error Then
SetError(@Error + 1)
Return 0
EndIf

DllCall($ah_Handle[0], 'int', 'ReadProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '')

If Not @Error Then
Local $v_Value = DllStructGetData($v_Buffer, 1)
Return $v_Value
Else
SetError(6)
Return 0
EndIf

EndFunc

;==================================================================================
; Function: _MemoryWrite($iv_Address, $ah_Handle, $v_Data[, $sv_Type])
; Description: Writes data to the specified memory address.
; Parameter(s): $iv_Address - The memory address which you want to write to.
; It must be in hex format (0x00000000).
; $ah_Handle - An array containing the Dll handle and the handle
; of the open process as returned by _MemoryOpen().
; $v_Data - The data to be written.
; $sv_Type - (optional) The "Type" of value you intend to write.
; This is set to 'dword'(32bit(4byte) signed integer)
; by default. See the help file for DllStructCreate
; for all types. An example: If you want to write a
; word that is 15 characters in length, you would use
; 'char[16]' since a 'char' is 8 bits (1 byte) in size.
; Return Value(s): On Success - Returns 1
; On Failure - Returns 0
; @Error - 0 = No error.
; 1 = Invalid $ah_Handle.
; 2 = $sv_Type was not a string.
; 3 = $sv_Type is an unknown data type.
; 4 = Failed to allocate the memory needed for the DllStructure.
; 5 = Error allocating memory for $sv_Type.
; 6 = $v_Data is not in the proper format to be used with the
; "Type" selected for $sv_Type, or it is out of range.
; 7 = Failed to write to the specified process.
; Author(s): Nomad
; Note(s): Values sent must be in Decimal format, unless specified as a
; 'char' type, then they must be in ASCII format. Also note
; that size ('char[size]') for all 'char' types should be 1
; greater than the actual size.
;==================================================================================
Func _MemoryWrite($iv_Address, $ah_Handle, $v_Data, $sv_Type = 'dword')

If Not IsArray($ah_Handle) Then
SetError(1)
Return 0
EndIf

Local $v_Buffer = DllStructCreate($sv_Type)

If @Error Then
SetError(@Error + 1)
Return 0
Else
DllStructSetData($v_Buffer, 1, $v_Data)
If @Error Then
SetError(6)
Return 0
EndIf
EndIf

DllCall($ah_Handle[0], 'int', 'WriteProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '')

If Not @Error Then
Return 1
Else
SetError(7)
Return 0
EndIf

EndFunc

;==================================================================================
; Function: _MemoryClose($ah_Handle)
; Description: Closes the process handle opened by using _MemoryOpen().
; Parameter(s): $ah_Handle - An array containing the Dll handle and the handle
; of the open process as returned by _MemoryOpen().
; Return Value(s): On Success - Returns 1
; On Failure - Returns 0
; @Error - 0 = No error.
; 1 = Invalid $ah_Handle.
; 2 = Unable to close the process handle.
; Author(s): Nomad
; Note(s):
;==================================================================================
Func _MemoryClose($ah_Handle)

If Not IsArray($ah_Handle) Then
SetError(1)
Return 0
EndIf

DllCall($ah_Handle[0], 'int', 'CloseHandle', 'int', $ah_Handle[1])
If Not @Error Then
DllClose($ah_Handle[0])
Return 1
Else
DllClose($ah_Handle[0])
SetError(2)
Return 0
EndIf

EndFunc

;==================================================================================
; Function: SetPrivilege( $privilege, $bEnable )
; Description: Enables (or disables) the $privilege on the current process
; (Probably) requires administrator privileges to run
;
; Author(s): Larry (from autoitscript.com's Forum)
; Notes(s):
; http://www.autoitscript.com/forum/index.php?s=&showtopic=31248&view=findpost&p=223999
;==================================================================================

Func SetPrivilege( $privilege, $bEnable )
Const $MY_TOKEN_ADJUST_PRIVILEGES = 0x0020
Const $MY_TOKEN_QUERY = 0x0008
Const $MY_SE_PRIVILEGE_ENABLED = 0x0002
Local $hToken, $SP_auxret, $SP_ret, $hCurrProcess, $nTokens, $nTokenIndex, $priv
$nTokens = 1
$LUID = DLLStructCreate("dword;int")
If IsArray($privilege) Then $nTokens = UBound($privilege)
$TOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
$NEWTOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
$hCurrProcess = DLLCall("kernel32.dll","hwnd","GetCurrentProcess")
$SP_auxret = DLLCall("advapi32.dll","int","OpenProcessToken","hwnd",$hCurrProcess[0], _
"int",BitOR($MY_TOKEN_ADJUST_PRIVILEGES,$MY_TOKEN_QUERY),"int*",0)
If $SP_auxret[0] Then
$hToken = $SP_auxret[3]
DLLStructSetData($TOKEN_PRIVILEGES,1,1)
$nTokenIndex = 1
While $nTokenIndex <= $nTokens
If IsArray($privilege) Then
$priv = $privilege[$nTokenIndex-1]
Else
$priv = $privilege
EndIf
$ret = DLLCall("advapi32.dll","int","LookupPrivilegeValue","str","","str",$priv, _
"ptr",DLLStructGetPtr($LUID))
If $ret[0] Then
If $bEnable Then
DLLStructSetData($TOKEN_PRIVILEGES,2,$MY_SE_PRIVILEGE_ENABLED,(3 * $nTokenIndex))
Else
DLLStructSetData($TOKEN_PRIVILEGES,2,0,(3 * $nTokenIndex))
EndIf
DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetData($LUID,1),(3 * ($nTokenIndex-1)) + 1)
DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetData($LUID,2),(3 * ($nTokenIndex-1)) + 2)
DLLStructSetData($LUID,1,0)
DLLStructSetData($LUID,2,0)
EndIf
$nTokenIndex += 1
WEnd
$ret = DLLCall("advapi32.dll","int","AdjustTokenPrivileges","hwnd",$hToken,"int",0, _
"ptr",DllStructGetPtr($TOKEN_PRIVILEGES),"int",DllStructGetSize($NEWTOKEN_PRIVILEGES), _
"ptr",DllStructGetPtr($NEWTOKEN_PRIVILEGES),"int*",0)
$f = DLLCall("kernel32.dll","int","GetLastError")
EndIf
$NEWTOKEN_PRIVILEGES=0
$TOKEN_PRIVILEGES=0
$LUID=0
If $SP_auxret[0] = 0 Then Return 0
$SP_auxret = DLLCall("kernel32.dll","int","CloseHandle","hwnd",$hToken)
If Not $ret[0] And Not $SP_auxret[0] Then Return 0
return $ret[0]
EndFunc ;==>SetPrivilege

#endregion

запишите это в новый файл NomadMemory.au3 и сохраните в папку: C:\Program Files\AutoIt3\Include\
эт только пример, вот основа (http://www.autoitscript.com/forum/index.php?showtopic=90077&hl=read+process+memory),
посмотрите адреса параметров ячеек памяти, может найдется то, что нужно...
и думаю эти ребята, что с для Wow уже кучу всякого наделали, могут мнооооогое подсказать..

И всёже как можно отследить окно игры? »
окно то можно определить.
а вот полей вода или кнопок - не получится, т.к.
в обычных окнах кнопочки обробатывает виндовс api (если не ошибаюсь),
а в играх - это уже как то на уровне виде адаптера/драйверов...

[morgan1991]

я уже качал эту прогу только так и не понял как её пользоваться и что она вообще должна делать.

[.:TimoXa:.]

Параметры и создание окон и кнопок можно отследить...теоретически
Самы "простой" способ это см. за трафиком игры...на сколько мне известно ВоВ общается с сервером пакетами...в зависимости от того какой пакет идет от сервера/к серверу можно достаточно точно(без особых задержек) определять происходящие в игре...
Для этого небходимо внедрить в процесс свою dll, котрая в свою очередь будет как фильтр, при прохождение пакета нужного вида отправлять в твою програму этот пакет...боле или менее читаемом виде)
Все это теория и может сильно отличатся от реальности и от назначения топика

[proxy]

проще говоря - все значения: сколько здоровья, сколько патронов и т.д. - это, по идее, вытаскивается из памяти процесса.
т.е. в памяти есть место - ячейка - где храниться значени, к примеру: "10 HP" и т.д. - вот это можно прочитать зная адрес этой самой ячейки памяти.
...так же, не мало вероятно, может быть возможно, по аналогии - прочитать из памяти какой сейчас пользователь залогинился....
либо все это определять другими методами. просто там на офф форуме уже много разработок по wow, может уже, что то и есть из отго, что ищите.
попробуйте точнее описать задачу...вместе и подумаем..

[morgan1991]

дак куда уж точнее мне всегото надо узнать что пользователь ввёл логин пароль и нажал вход. Отловить нажатие мышки или ентера не предлогайте уже думал над этим.

[proxy]

хз....на офф форуме только прутся с подобной задачи ))
можно попробовать через PixelGetColor - но это будет муторно и много риска....