#include <GUIConstants.au3>
#include <NomadMemory.au3>
#RequireAdmin
$form1 = GUICreate("Free Hack (auser für Jonas.h)", 673, 173, 253, 178)
$Label1 = GUICtrlCreateLabel("Mage Damage:", 16, 8, 77, 17)
$dmgm = GUICtrlCreateInput("50000", 112, 8, 121, 21)
$setdmgm = GUICtrlCreateButton("Change !", 240, 8, 75, 25, 0)
$Label2 = GUICtrlCreateLabel("Normal Damage:", 16, 40, 83, 17)
$dmgn = GUICtrlCreateInput("50000", 112, 40, 121, 21)
$setdmgn = GUICtrlCreateButton("Change !", 240, 40, 75, 25, 0)
$label4 = GUICtrlCreateLabel("Speed:", 57, 97, 38, 17)
$speed = GUICtrlCreateInput("16230", 113, 97, 121, 21)
$setspeed = GUICtrlCreateButton("Change !", 241, 97, 75, 25, 0)
$label5 = GUICtrlCreateLabel("Unbesiegbar(65793):", 2, 128, 103, 17)
$god = GUICtrlCreateInput("1", 114, 128, 121, 21)
$setgod = GUICtrlCreateButton("Change !", 242, 128, 75, 25, 0)
$label6 = GUICtrlCreateLabel("Skill Hack:", 354, 16, 55, 17)
$skill = GUICtrlCreateInput("1", 434, 16, 121, 21)
$skillon = GUICtrlCreateButton("On !", 378, 48, 75, 25, 0)
$label3 = GUICtrlCreateLabel("No Miss:", 38, 70, 45, 17)
$nomiss = GUICtrlCreateInput("50000", 110, 70, 121, 21)
$setnomis = GUICtrlCreateButton("Change !", 238, 70, 75, 25, 0)
$skilloff = GUICtrlCreateButton("Off", 494, 46, 75, 25, 0)
$label7 = GUICtrlCreateLabel("TClient:", 408, 136, 40, 17)
$status = GUICtrlCreateLabel("Nicht Verbunden !", 456, 136, 90, 17)
$Label8 = GUICtrlCreateLabel("", 432, 88, 92, 28)
GUISetState(@SW_SHOW)
Global $Pointerdmgm = 0x00686D04
Global $Pointerdmgn = 0x00686D04
Global $Pointerspeed = 0x00686D04
Global $Pointergod = 0x00686D04
Global $Pointerskill = 0x00686D04
Global $Pointernomiss = 0x00686D04
Global $Open = _MemoryOpen(ProcessExists("TClient.exe"))
Global $Offsetdmgm[3] = [0, 0xa08, 0x480]
Global $Offsetdmgn[3] = [0, 0xa08, 0x484]
Global $Offsetspeed[3] = [0, 0xa08, 0x9F6]
Global $Offsetgod[3] = [0, 0xa08, 0x44E]
Global $Offsetskill[3] = [0, 0xa08, 0x474]
Global $Offsetnomiss[3] = [0, 0xa08, 0x476]
Global $Bedingung1 = 0
Global $Bedingung2 = 0
Global $Bedingung3 = 0
Global $Bedingung4 = 0
Global $Bedingung5 = 0
Global $Bedingung6 = 0
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $setdmgm
If $Bedingung1 = 0 Then
$Bedingung1 = 1
ElseIf $Bedingung1 = 1 Then
$Bedingung1 = 0
EndIf
Case $setdmgn
If $Bedingung2 = 0 Then
$Bedingung2 = 1
ElseIf $Bedingung2 = 1 Then
$Bedingung2 = 0
EndIf
Case $setspeed
If $Bedingung3 = 0 Then
$Bedingung3 = 1
ElseIf $Bedingung3 = 1 Then
$Bedingung3 = 0
EndIf
Case $setgod
If $Bedingung4 = 0 Then
$Bedingung4 = 1
ElseIf $Bedingung4 = 1 Then
$Bedingung4 = 0
EndIf
Case $setskill
If $Bedingung5 = 0 Then
$Bedingung5 = 1
ElseIf $Bedingung5 = 1 Then
$Bedingung5 = 0
EndIf
Case $setnomiss
If $Bedingung6 = 0 Then
$Bedingung6 = 1
ElseIf $Bedingung6 = 1 Then
$Bedingung6 = 0
EndIf
EndSwitch
SetDmgm()
WEnd
Func SetDmgm()
If $Bedingung1 = 1 Then _MemoryPointerWrite($Pointerdmgm, $Open, $Offsetdmgm, GUICtrlRead($dmgm),"dword")
EndFunc
Func SetDmgn()
If $Bedingung2 = 1 Then _MemoryPointerWrite($Pointerdmgn, $Open, $Offsetdmgn, GUICtrlRead($dmgn),"dword")
EndFunc
Func Setspeed()
If $Bedingung3 = 1 Then _MemoryPointerWrite($Pointerspeed, $Open, $Offsetspeed, GUICtrlRead($skill),"dword")
EndFunc
Func Setgod)
If $Bedingung4 = 1 Then _MemoryPointerWrite($Pointergod, $Open, $Offsetgod, GUICtrlRead($god),"dword")
EndFunc
Func Setskill()
If $Bedingung5 = 1 Then _MemoryPointerWrite($Pointerskill, $Open, $Offsetskill, GUICtrlRead($speed),"dword")
EndFunc
Func Setnomiss()
If $Bedingung6 = 1 Then _MemoryPointerWrite($Pointernomiss, $Open, $Offsetnomiss, GUICtrlRead($nomiss),"dword")
EndFunc
