Process Suspender

08/06/2010 14:43 s4Gammler#31
hmm also bei mir geht der
08/06/2010 15:11 Maurixius#32
klappt.. aber warum kann man maps net mehr beim spielen aus tauschen?^^
08/06/2010 15:25 FichteFoll#33
Code:
#RequireAdmin

HotKeySet("{F11}", "_Resume")

_Suspend()

While Sleep(100)
WEnd

Func _Resume()
	_PROCESSRESUME(ProcessExists("HGWC.exe"))
	_PROCESSRESUME(ProcessExists("S4Client.exe"))
	Exit
EndFunc

Func _Suspend()
	ToolTip("Waiting for S4League...", 0, 0)
	ProcessWait("HGWC.exe")
	ProcessWait("S4Client.exe")
	_PROCESSSUSPEND(ProcessExists("HGWC.exe"))
	_PROCESSSUSPEND(ProcessExists("S4Client.exe"))
	ToolTip("")
EndFunc

Func _PROCESSSUSPEND($PROCESSID)
	If $PROCESSID Then
		Global $AI_HANDLE = DllCall("kernel32.dll", "int", "OpenProcess", "int", 2035711, "int", False, "int", $PROCESSID)
		Global $I_SUCESS = DllCall("ntdll.dll", "int", "NtSuspendProcess", "int", $AI_HANDLE[0])
		DllCall("kernel32.dll", "ptr", "CloseHandle", "ptr", $AI_HANDLE)
		If IsArray($I_SUCESS) Then
			Return 1
		Else
			SetError(1)
			Return 0
		EndIf
	Else
		Return SetError(2)
	EndIf
EndFunc
Func _PROCESSRESUME($RPROCESSPID)
	If $RPROCESSPID Then
		$AI_HANDLE = DllCall("kernel32.dll", "int", "OpenProcess", "int", 2035711, "int", False, "int", $RPROCESSPID)
		$I_SUCESS = DllCall("ntdll.dll", "int", "NtResumeProcess", "int", $AI_HANDLE[0])
		DllCall("kernel32.dll", "ptr", "CloseHandle", "ptr", $AI_HANDLE)
		If IsArray($I_SUCESS) Then
			Return 1
		Else
			SetError(1)
			Return 0
		EndIf
	Else
		SetError(2)
		Return 0
	EndIf
EndFunc
Sorry, aber es gibt Dinge, die wirklich kein GUI benötigen.
Naja egal.

€dit: [Only registered and activated users can see links. Click Here To Register...]
08/06/2010 15:44 Maurixius#34
Quote:
Originally Posted by FichteFoll View Post
Code:
#RequireAdmin

HotKeySet("{F11}", "_Resume")

_Suspend()

While Sleep(100)
WEnd

Func _Resume()
	_PROCESSRESUME(ProcessExists("HGWC.exe"))
	_PROCESSRESUME(ProcessExists("S4Client.exe"))
	Exit
EndFunc

Func _Suspend()
	ToolTip("Waiting for S4League...", 0, 0)
	ProcessWait("HGWC.exe")
	ProcessWait("S4Client.exe")
	_PROCESSSUSPEND(ProcessExists("HGWC.exe"))
	_PROCESSSUSPEND(ProcessExists("S4Client.exe"))
	ToolTip("")
EndFunc

Func _PROCESSSUSPEND($PROCESSID)
	If $PROCESSID Then
		Global $AI_HANDLE = DllCall("kernel32.dll", "int", "OpenProcess", "int", 2035711, "int", False, "int", $PROCESSID)
		Global $I_SUCESS = DllCall("ntdll.dll", "int", "NtSuspendProcess", "int", $AI_HANDLE[0])
		DllCall("kernel32.dll", "ptr", "CloseHandle", "ptr", $AI_HANDLE)
		If IsArray($I_SUCESS) Then
			Return 1
		Else
			SetError(1)
			Return 0
		EndIf
	Else
		Return SetError(2)
	EndIf
EndFunc
Func _PROCESSRESUME($RPROCESSPID)
	If $RPROCESSPID Then
		$AI_HANDLE = DllCall("kernel32.dll", "int", "OpenProcess", "int", 2035711, "int", False, "int", $RPROCESSPID)
		$I_SUCESS = DllCall("ntdll.dll", "int", "NtResumeProcess", "int", $AI_HANDLE[0])
		DllCall("kernel32.dll", "ptr", "CloseHandle", "ptr", $AI_HANDLE)
		If IsArray($I_SUCESS) Then
			Return 1
		Else
			SetError(1)
			Return 0
		EndIf
	Else
		SetError(2)
		Return 0
	EndIf
EndFunc
Sorry, aber es gibt Dinge, die wirklich kein GUI benötigen.
Naja egal.
warum? meinst du das?^^
08/06/2010 15:44 1337_Noize#35
ehm ich glaube ein paar Leute hier haben mal auf Brain.exe Suspend geklickt xD
08/06/2010 15:47 KraYYzii#36
Bei mir Funkt. der net Warum ?
08/06/2010 15:48 șØŋ1Ќ™#37
Quote:
Originally Posted by FichteFoll View Post
Code:
#RequireAdmin

HotKeySet("{F11}", "_Resume")
........
Sorry, aber es gibt Dinge, die wirklich kein GUI benötigen.
Naja egal.
let him learn, even with nonsense
08/06/2010 15:49 Maurixius#38
Quote:
Originally Posted by KraYYzii View Post
Bei mir Funkt. der net Warum ?
32bit??
08/06/2010 22:39 bossalex0078#39
nice nice der geht sehr gut ^^

hab thanks gegeben
08/07/2010 00:45 IceBaer#40
funzt =)
08/07/2010 01:21 wtfitsu77#41
make a vid?
08/07/2010 10:00 KraYYzii#42
Quote:
Originally Posted by Maurixius View Post
32bit??
Ja
08/07/2010 14:27 waldi_#43
Quote:
Originally Posted by wtfitsu77 View Post
make a vid?
read description?
08/07/2010 14:29 critical1234#44
#Vote 4 sticky
naja etz muss ich nur noch n par Werte wissen.
08/07/2010 17:37 11Hertz#45
Quote:
Originally Posted by waldi_ View Post
Du kannst Cheat Engine öffnen und Maps oder Waffenskins austauschen..
des kapier ich nich haste i-etwas anderes als icq?