PHP Code:
; Author shokwave8 (Credits Logtetsch!!!!)
#RequireAdmin
SetPrivilege("SeDebugPrivilege", 1)
if ProcessExists ("TClient.exe") = false Then
MsgBox (48,"Error","Cannot find 4Story!")
Exit
EndIf
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Pointer.au3>
#Include <GuiListView.au3>
#include <crypt.au3>
#Include <Timers.au3>
Global Const $szTitle = "Shokwave8"
Const $szProcessName = "TClient.exe"
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Test", 403, 142, 192, 124)
$chb_Invincible = GUICtrlCreateCheckbox("Invincible", 104, 40, 89, 17)
$chb_Speed = GUICtrlCreateCheckbox("Speed", 120, 50, 99, 37)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
#region Pointer
Const $dwBaseAddress = 0x006EFFFC
Const $nPlayer_Cast = 0xAA8
Const $nOffset_Invincile[2] = [$nPlayer_Cast, 0x44C] ; Updated 25.11.13
Const $nOffset_Speed1 [2] = [$nPlayer_Cast, 0x9BE] ; Updated 25.11.13
Const $nOffset_Speed2 [2] = [$nPlayer_Cast, 0x9CA] ; Updated 25.11.13
#endregion
$ProcessID = 0
$ProcessID = ProcessExists ("TClient.exe")
if $ProcessID = 0 then
MsgBox (48,"Error","Cannot open TClient.exe")
Else
$Handle = _MemoryOpen ($ProcessID)
if not IsArray ($Handle) Then
MsgBox (48,"Error","Cannot open memory")
EndIf
EndIf
While Sleep (10)
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $chb_Speed
if GUICtrlRead ($chb_Speed) == $GUI_CHECKED Then
if IsArray ($Handle) Then
_MemoryPointerWrite ($dwBaseAddress, $Handle, $nOffset_Speed1, 16700)
_MemoryPointerWrite ($dwBaseAddress, $Handle, $nOffset_Speed2, 16700)
EndIf
EndIf
Case $chb_Invincible
if GUICtrlRead ($chb_Invincible) == $GUI_CHECKED Then
if IsArray ($Handle) Then
_MemoryPointerWrite ($dwBaseAddress, $Handle, $nOffset_Invincile, 0)
EndIf
EndIf
EndSwitch
WEnd