<![CDATA[Home of Gamehacking - Archiv - AutoIt]]> http://archiv-homeofgamehacking.de/ Wed, 08 Apr 2026 08:48:01 +0000 MyBB <![CDATA[Code Injection + AutoIT]]> http://archiv-homeofgamehacking.de/showthread.php?tid=1307 Sun, 06 Jan 2013 11:54:44 +0000 http://archiv-homeofgamehacking.de/showthread.php?tid=1307 Ich hab mal wieder eine Frage, undzwar: Wenn ich in CheatEngine ein Script für CodeInjection habe. Kann ich das dann irgendwie in AutoIT einbauen? Wenn ja, wie? Bis jetzt kann ich mit AutoIT nur Adressen und Pointer manipulieren.
Danke!]]> Ich hab mal wieder eine Frage, undzwar: Wenn ich in CheatEngine ein Script für CodeInjection habe. Kann ich das dann irgendwie in AutoIT einbauen? Wenn ja, wie? Bis jetzt kann ich mit AutoIT nur Adressen und Pointer manipulieren.
Danke!]]> <![CDATA[Crysis Trainer +4 - Sourcecode]]> http://archiv-homeofgamehacking.de/showthread.php?tid=1046 Sun, 24 Jun 2012 09:45:11 +0000 http://archiv-homeofgamehacking.de/showthread.php?tid=1046 ich habe mich diese Woche einwenig mit Gamehacking beschäftigt und einen kleinen Trainer in Autoit geschrieben. Den Sourcecode möchte ich euch nicht vorenthalten.

PHP-Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
 
#cs
	Crysis v1.1.1687 by 07c0

	Numeric keypad 1 key - freeze energy
	Numeric keypad 2 key - freeze shield
	Numeric keypad 3 key - freeze ammo
	Numeric keypad 4 key - freeze grenades
	Numeric keypad 5 key - unfreeze all
	Numeric keypad 6 key - exit trainer
#ce


#include <Misc.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>


$frmMain = GUICreate("Crysis v1.1.1687 Trainer", 300, 169, 192, 124)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 297, 168, BitOR($ES_CENTER, $ES_WANTRETURN))
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlSetData(-1, StringFormat("\r\nNumeric keypad 1 key - freeze energy\r\nNumeric keypad 2 key - freeze shield\r\nNumeric keypad 3 key - freeze ammo\r\nNumeric keypad 4 key - freeze grenades\r\nNumeric keypad 5 key - unfreeze all\r\nNumeric keypad 6 key - exit trainer"))
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)


While 1
	Select
		Case _IsPressed("61", DllOpen("user32.dll"))
			energie()
		Case _IsPressed("62", DllOpen("user32.dll"))
			schild()
		Case _IsPressed("63", DllOpen("user32.dll"))
			munition()
		Case _IsPressed("64", DllOpen("user32.dll"))
			granaten()
		Case _IsPressed("65", DllOpen("user32.dll"))
			zurueck()
		Case _IsPressed("66", DllOpen("user32.dll"))
			Exit
	EndSelect

	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
	EndSwitch
WEnd



Func energie()
	Dim $hid = ProcessExists("Crysis.exe")

	Dim $hhid = memopen($hid)
	memwrite($hhid, 0x372540a7, "9090909090")
EndFunc   ;==>energie

Func schild()
	Dim $hid = ProcessExists("Crysis.exe")

	Dim $hhid = memopen($hid)
	memwrite($hhid, 0x37270dd8, "9090909090")
EndFunc   ;==>schild

Func munition()
	Dim $hid = ProcessExists("Crysis.exe")

	Dim $hhid = memopen($hid)
	memwrite($hhid, 0x10ADF, "BA63000000895014E9803C")
	memwrite($hhid, 0x10AEA, "3937")
	memwrite($hhid, 0x373A4767, "E973C3C6C8")
EndFunc   ;==>munition

Func granaten()
	Dim $hid = ProcessExists("Crysis.exe")

	Dim $hhid = memopen($hid)
	memwrite($hhid, 0x10ABF, "BF0900000089385F5EC20800")
	memwrite($hhid, 0x10ACB, "FBD21637")
	memwrite($hhid, 0x3717DDC2, "E9F82CE9C8")
EndFunc   ;==>granaten

Func zurueck()
	Dim $hid = ProcessExists("Crysis.exe")

	Dim $hhid = memopen($hid)
	memwrite($hhid, 0x3717DDC2, "89385F5EC3") ;granaten
	memwrite($hhid, 0x372540a7, "F30F114640") ;energie
	memwrite($hhid, 0x37270dd8, "F30F114634") ;schild
	memwrite($hhid, 0x373a4767, "895014") ;muni
EndFunc   ;==>zurueck



Func memopen($ppid)
	Local $id = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', 0x1F0FFF, 'int', 1, 'int', $ppid)
	Return $id[0]
EndFunc   ;==>memopen

Func memwrite($id, $adress, $hex)
	Local $struct = DllStructCreate('byte[' & BinaryLen('0x' & $hex) & ']')

	For $i = DllStructGetSize($struct) To 1 Step -1
		DllStructSetData($struct, 1, BinaryMid('0x' & $hex, $i, 1), $i)
	Next

	Local $x = DllCall("kernel32.dll", 'int', 'VirtualProtectEx', 'int', $id, 'ptr', $adress, 'int', DllStructGetSize($struct), 'dword', 0x40, 'dword*', 0)
	DllCall("kernel32.dll", 'int', 'WriteProcessMemory', 'int', $id, 'int', $adress, 'ptr', DllStructGetPtr($struct), 'int', DllStructGetSize($struct), 'int', 0)
	DllCall("kernel32.dll", 'int', 'VirtualProtectEx', 'int', $id, 'ptr', $adress, 'int', DllStructGetSize($struct), 'dword', $x[5], 'dword*', 0)
EndFunc   ;==>memwrite

]]> ich habe mich diese Woche einwenig mit Gamehacking beschäftigt und einen kleinen Trainer in Autoit geschrieben. Den Sourcecode möchte ich euch nicht vorenthalten.

PHP-Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
 
#cs
	Crysis v1.1.1687 by 07c0

	Numeric keypad 1 key - freeze energy
	Numeric keypad 2 key - freeze shield
	Numeric keypad 3 key - freeze ammo
	Numeric keypad 4 key - freeze grenades
	Numeric keypad 5 key - unfreeze all
	Numeric keypad 6 key - exit trainer
#ce


#include <Misc.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>


$frmMain = GUICreate("Crysis v1.1.1687 Trainer", 300, 169, 192, 124)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 297, 168, BitOR($ES_CENTER, $ES_WANTRETURN))
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlSetData(-1, StringFormat("\r\nNumeric keypad 1 key - freeze energy\r\nNumeric keypad 2 key - freeze shield\r\nNumeric keypad 3 key - freeze ammo\r\nNumeric keypad 4 key - freeze grenades\r\nNumeric keypad 5 key - unfreeze all\r\nNumeric keypad 6 key - exit trainer"))
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)


While 1
	Select
		Case _IsPressed("61", DllOpen("user32.dll"))
			energie()
		Case _IsPressed("62", DllOpen("user32.dll"))
			schild()
		Case _IsPressed("63", DllOpen("user32.dll"))
			munition()
		Case _IsPressed("64", DllOpen("user32.dll"))
			granaten()
		Case _IsPressed("65", DllOpen("user32.dll"))
			zurueck()
		Case _IsPressed("66", DllOpen("user32.dll"))
			Exit
	EndSelect

	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
	EndSwitch
WEnd



Func energie()
	Dim $hid = ProcessExists("Crysis.exe")

	Dim $hhid = memopen($hid)
	memwrite($hhid, 0x372540a7, "9090909090")
EndFunc   ;==>energie

Func schild()
	Dim $hid = ProcessExists("Crysis.exe")

	Dim $hhid = memopen($hid)
	memwrite($hhid, 0x37270dd8, "9090909090")
EndFunc   ;==>schild

Func munition()
	Dim $hid = ProcessExists("Crysis.exe")

	Dim $hhid = memopen($hid)
	memwrite($hhid, 0x10ADF, "BA63000000895014E9803C")
	memwrite($hhid, 0x10AEA, "3937")
	memwrite($hhid, 0x373A4767, "E973C3C6C8")
EndFunc   ;==>munition

Func granaten()
	Dim $hid = ProcessExists("Crysis.exe")

	Dim $hhid = memopen($hid)
	memwrite($hhid, 0x10ABF, "BF0900000089385F5EC20800")
	memwrite($hhid, 0x10ACB, "FBD21637")
	memwrite($hhid, 0x3717DDC2, "E9F82CE9C8")
EndFunc   ;==>granaten

Func zurueck()
	Dim $hid = ProcessExists("Crysis.exe")

	Dim $hhid = memopen($hid)
	memwrite($hhid, 0x3717DDC2, "89385F5EC3") ;granaten
	memwrite($hhid, 0x372540a7, "F30F114640") ;energie
	memwrite($hhid, 0x37270dd8, "F30F114634") ;schild
	memwrite($hhid, 0x373a4767, "895014") ;muni
EndFunc   ;==>zurueck



Func memopen($ppid)
	Local $id = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', 0x1F0FFF, 'int', 1, 'int', $ppid)
	Return $id[0]
EndFunc   ;==>memopen

Func memwrite($id, $adress, $hex)
	Local $struct = DllStructCreate('byte[' & BinaryLen('0x' & $hex) & ']')

	For $i = DllStructGetSize($struct) To 1 Step -1
		DllStructSetData($struct, 1, BinaryMid('0x' & $hex, $i, 1), $i)
	Next

	Local $x = DllCall("kernel32.dll", 'int', 'VirtualProtectEx', 'int', $id, 'ptr', $adress, 'int', DllStructGetSize($struct), 'dword', 0x40, 'dword*', 0)
	DllCall("kernel32.dll", 'int', 'WriteProcessMemory', 'int', $id, 'int', $adress, 'ptr', DllStructGetPtr($struct), 'int', DllStructGetSize($struct), 'int', 0)
	DllCall("kernel32.dll", 'int', 'VirtualProtectEx', 'int', $id, 'ptr', $adress, 'int', DllStructGetSize($struct), 'dword', $x[5], 'dword*', 0)
EndFunc   ;==>memwrite

]]> <![CDATA[Einsteiger AutoIt Tutorials]]> http://archiv-homeofgamehacking.de/showthread.php?tid=836 Thu, 05 Jan 2012 13:02:52 +0000 http://archiv-homeofgamehacking.de/showthread.php?tid=836 hier mal meinen beiden Tutorials für AutoIt. Die Tutorials sind auf jeden Fall für Einsteiger geeignet, die schon wissen wie man mit CheatEngine umgeht.

Tutorial für eine einfache Adresse:
http://homeofgamehacking.de/attachment.php?aid=667

Pointer Tutorial:

.rar   Autoit Pointer Tutorial.rar (Größe: 4,15 MB / Downloads: 1237) ]]> hier mal meinen beiden Tutorials für AutoIt. Die Tutorials sind auf jeden Fall für Einsteiger geeignet, die schon wissen wie man mit CheatEngine umgeht.

Tutorial für eine einfache Adresse:
http://homeofgamehacking.de/attachment.php?aid=667

Pointer Tutorial:

.rar   Autoit Pointer Tutorial.rar (Größe: 4,15 MB / Downloads: 1237) ]]>