und zwar habe ich folgendes Problem ich möchte mit einem Hotkeyset (bei mir INS) das Fenster verstecken und dann auf den gleichen Hotkeyset das wieder zeigen lassen. Da wäre meine Frage wie ich dies hinbekommen könnte.Ich freue mich über jede Hilfe.
PHP Code:
#Include <Pointer.au3>
#include <Apple Base.au3>
Global $Address,$Address1,$Address2,$Address3,$Address4,$Handle,$Handle1,$Handle2,$Handle3,$Handle4,$Offset,$Offset1,$Offset2,$Offset3,$Offset4
_Apple_Startup(6, 0x00FF00, 0x008000, 0xFF0000)
$GUI = _Apple_Draw_Gui(250, 195, 1, "D3D Age of Empires Multihack", 0x00C0C0, 230)
_Apple_Create_Text("Age of Empires Hack ", 400)
_Apple_Create_Function("Inf.Holz", 43) ;function _0
_Apple_Create_Function("Inf.Gold", 43) ;function _1
_Apple_Create_Function("Inf.Nahrung", 55) ;funktion _2
_Apple_Create_Function("Inf.Stein", 45) ;funktion _3
_Apple_Create_Function("Inf.Bevölkerung", 75) ;funktion _4
_Apple_Create_Function("Exit", 25) ;funktion _4
_Apple_Create_Text("Made by ", 200)
_Apple_State_Gui(1, $GUI)
_Apple_Topmost_Check("D3D Age of Empires Multihack")
HotKeySet("{INS}","Hide")
_Apple_Enable_Up_Down()
While True
Sleep(100)
WEnd
Func _0($action)
If $action = 1 Then
$prozessname = "empires2.exe"
$PID = ProcessExists(""&$prozessname&"")
If $PID > 0 Then
$Handle = _MemoryOpen($PID)
$Address = _MemoryModuleGetBaseAddress(ProcessExists(""&$prozessname&""), ""&$prozessname&"")
$Address = "0x" & Hex($Address + Dec("0035FC5C"))
Dim $Offset[4] = [0,0xfc,0xa8,0x4]
EndIf
$Write = _MemoryPointerWrite($Address, $Handle, $Offset, 1203982208)
AdlibRegister("A2",1)
ElseIf $action = 0 Then
AdlibunRegister("A2")
EndIf
EndFunc
Func _1($action)
If $action = 1 Then
$prozessname = "empires2.exe"
$PID = ProcessExists(""&$prozessname&"")
If $PID > 0 Then
$Handle = _MemoryOpen($PID)
$Address = _MemoryModuleGetBaseAddress(ProcessExists(""&$prozessname&""), ""&$prozessname&"")
$Address = "0x" & Hex($Address + Dec("0035FC5C"))
Dim $Offset2[4] = [0,0xfc,0xa8,0xc]
Endif
$Write = _MemoryPointerWrite($Address, $Handle, $Offset2, 1203982208)
AdlibRegister("A1",1)
ElseIf $action = 0 Then
AdlibunRegister("A1")
EndIf
EndFunc
Func _2($action)
If $action = 1 Then
$prozessname = "empires2.exe"
$PID = ProcessExists(""&$prozessname&"")
If $PID > 0 Then
$Handle = _MemoryOpen($PID)
$Address = _MemoryModuleGetBaseAddress(ProcessExists(""&$prozessname&""), ""&$prozessname&"")
$Address = "0x" & Hex($Address + Dec("0035FC5C"))
Dim $Offset1[4] = [0,0xfc,0xa8,0x0]
Endif
$Write = _MemoryPointerWrite($Address, $Handle, $Offset1, 1203982208)
AdlibRegister("A4",1)
ElseIf $action = 0 Then
AdlibunRegister("A4")
EndIf
EndFunc
Func _3($action)
If $action = 1 Then
$prozessname = "empires2.exe"
$PID = ProcessExists(""&$prozessname&"")
If $PID > 0 Then
$Handle = _MemoryOpen($PID)
$Address = _MemoryModuleGetBaseAddress(ProcessExists(""&$prozessname&""), ""&$prozessname&"")
$Address = "0x" & Hex($Address + Dec("0035FC5C"))
Dim $Offset3[4] = [0,0xfc,0xa8,0x8]
EndIf
$Write = _MemoryPointerWrite($Address, $Handle, $Offset3, 1203982208)
AdlibRegister("A3",1)
ElseIf $action = 0 Then
AdlibUnRegister("A3")
EndIf
EndFunc
Func _4($action)
If $action = 1 Then
$prozessname = "empires2.exe"
$PID = ProcessExists(""&$prozessname&"")
If $PID > 0 Then
$Handle = _MemoryOpen($PID)
$Address = _MemoryModuleGetBaseAddress(ProcessExists(""&$prozessname&""), ""&$prozessname&"")
$Address = "0x" & Hex($Address + Dec("0035FC5C"))
Dim $Offset4[4] = [0,0xfc,0xa8,0x2c]
EndIf
$Write = _MemoryPointerWrite($Address, $Handle, $Offset4, 0)
AdlibRegister("A5",1)
ElseIf $action = 0 Then
AdlibUnRegister("A5")
EndIf
EndFunc
Func _5($action)
If $action = 1 Then
Exit
EndIf
EndFunc
Func Hide()
;Hab schon Sachen ausprobiert aber die funktionierten nicht :D
WinSetState("D3D Age of Empires Multihack","",@SW_HIDE)
WinSetState("D3D Age of Empires Multihack","",@SW_SHOW)
EndFunc
Func A1()
$Write = _MemoryPointerWrite($Address, $Handle, $Offset2, 1203982208)
EndFunc
Func A2()
$Write = _MemoryPointerWrite($Address, $Handle, $Offset, 1203982208)
EndFunc
Func A3()
$Write = _MemoryPointerWrite($Address, $Handle, $Offset3, 1203982208)
EndFunc
Func A4()
$Write = _MemoryPointerWrite($Address, $Handle, $Offset1, 1203982208)
EndFunc
Func A5()
$Write = _MemoryPointerWrite($Address, $Handle, $Offset4, 0)
EndFunc