[AutoIt]Help!

01/29/2012 13:07 heysen09#1
I Make AutoIt Trainer. But XTrap catch. Sorry my bad english.

Code:
#RequireAdmin
#include <NomadMemory.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate(" Hack 0.1", 305, 151, 437, 359)
$god = GUICtrlCreateCheckbox("Godmode", 8, 8, 73, 17)
$hp = GUICtrlCreateCheckbox("200 HP", 8, 40, 57, 17)
$sp = GUICtrlCreateCheckbox("Inf.SP", 8, 72, 73, 17)
$hit = GUICtrlCreateCheckbox("1 Hit KİLL", 112, 8, 73, 17)
$wallshot = GUICtrlCreateCheckbox("WallShot", 112, 40, 89, 17)
$toy = GUICtrlCreateCheckbox("Card Hack", 112, 72, 73, 17)
$fast = GUICtrlCreateCheckbox("Fast fire", 224, 8, 65, 17)
$zoom = GUICtrlCreateCheckbox("Wea. Zoom", 224, 40, 73, 17)
$gm = GUICtrlCreateCheckbox("Ghost mode", 224, 72, 65, 17)
$Button1 = GUICtrlCreateButton("Start!", 8, 96, 99, 49)
$Button2 = GUICtrlCreateButton("Exit!", 192, 96, 107, 49)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			_hack()
		Case  $Button2
			Exit

	EndSwitch
WEnd

Func _hack()
ToolTip("S4League Open",0,0)
$WAIT = ProcessWait("S4Client.exe")
$PID = ProcessExists("S4Client.exe")
$Open = _MemoryOpen($PID)
ToolTip("have fun.",0,0)
Sleep(2000)
If GUICtrlRead($god) = 1 Then
	_MemoryWrite(0x00, $Open, "90 90 90", "dword")
EndIf
If GUICtrlRead($hp) = 1 Then
	_MemoryWrite(0x0, $Open, "03", "dword")
EndIf
If GUICtrlRead($sp) = 1 Then
	_MemoryWrite(0x00455C4E, $Open, "02", "dword")
EndIf
If GUICtrlRead($hit) = 1 Then
	_MemoryWrite(0x00, $Open, "01", "dword")
EndIf
If GUICtrlRead($wallshot) = 1 Then
	_MemoryWrite(0x00, $Open, "1", "Float")
EndIf
If GUICtrlRead($toy) = 1 Then
	_MemoryWrite(0x0, $Open, "0", "char[19]")
EndIf
If GUICtrlRead($fast) = 1 Then
	_MemoryWrite(0x00, $Open, "90 90 90", "dword")
EndIf
If GUICtrlRead($zoom) = 1 Then
	_MemoryWrite(0x00, $Open, "9", "Float")
EndIf
If GUICtrlRead($gm) = 1 Then
	_MemoryWrite(0x00, $Open, "01", "dword")
EndIf
Exit
EndFunc
Help:confused::confused::confused:
01/29/2012 14:26 Lex-#2
u must use a bypass
all AutoIT Trainer will detected