#Region ; * * ** Directives created by AutoIt3Wrapper_GUI * * **
#AutoIt3wrapper_If_Run
#Autoit3Wrapper_If_Compile
#AutoIt3Wrapper_Icon=ICO/XK.ico
#AutoIt3Wrapper_Outfile=AKTrainer.exe
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_UPX_Parameters=--best --lzma
#AutoIt3Wrapper_Res_Fileversion=0.3.0.0
#AutoIt3Wrapper_Res_LegalCopyright=XK17© 2012-2013
#AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator
#AutoIt3Wrapper_Run_Au3Stripper=y
;~ #Au3Stripper_Ignore_Funcs=_ULAnim
;~ #Au3Stripper_Ignore_Funcs=_ULRetn
;~ #Au3Stripper_Ignore_Funcs=_ULTele
;~ #Au3Stripper_Ignore_Funcs=_ULJump
;~ #Au3Stripper_Ignore_Funcs=_ULGM
;~ #Au3Stripper_Ignore_Funcs=_ULLoot
#Au3Stripper_Parameters=/SO /RM
#AutoIt3Wrapper_Run_AU3Check=n
#AutoIt3Wrapper_Run_After=del /f /q "%scriptdir%\%scriptfile%_stripped.au3"
#AutoIt3Wrapper_EndIf
#EndRegion ; * * ** Directives created by AutoIt3Wrapper_GUI * * **
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <_DLLInjection.au3>
#include <NamedPipes.au3>
Global $hPipe
Global Const $AKModule = @ScriptDir & "\Module\AKModule.dll"
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("AK Private Server", 242, 127, 25, 25)
$chkFly = GUICtrlCreateCheckbox("Infinite Fly Hack", 8, 8, 97, 17)
GUICtrlSetState(-1, $GUI_DISABLE)
$chkTele = GUICtrlCreateCheckbox("Teleport Farming", 8, 24, 97, 17)
GUICtrlSetState(-1, $GUI_DISABLE)
$chkPortal = GUICtrlCreateCheckbox("Portal Interface", 8, 40, 97, 17)
GUICtrlSetState(-1, $GUI_DISABLE)
$chkFishLock = GUICtrlCreateCheckbox("Fishing Lock Hack", 128, 8, 113, 17)
GUICtrlSetState(-1, $GUI_DISABLE)
$chkReviveHack = GUICtrlCreateCheckbox("Full Health Revive", 128, 24, 113, 17)
GUICtrlSetState(-1, $GUI_DISABLE)
$LaunchAK = GUICtrlCreateButton("Start AuraKingdom", 8, 64, 227, 33)
GUICtrlCreateLabel("Created By: XKhen0017", 120, 104, 118, 17)
; * Context menus * ;
$hMenu = GUICtrlCreateContextMenu()
$hMenuItem = GUICtrlCreateMenuItem("Inject AKTrainer", $hMenu)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $chkFly
If GUICtrlRead($chkFly) == $GUI_CHECKED Then
SendRPC("FlyHack;1")
Else
SendRPC("FlyHack;0")
EndIf
Case $chkTele
If GUICtrlRead($chkTele) == $GUI_CHECKED Then
SendRPC("TeleFarm;1")
Else
SendRPC("TeleFarm;0")
EndIf
Case $chkFishLock
If GUICtrlRead($chkFishLock) == $GUI_CHECKED Then
SendRPC("Fishing;1")
Else
SendRPC("Fishing;0")
EndIf
Case $chkReviveHack
If GUICtrlRead($chkReviveHack) == $GUI_CHECKED Then
SendRPC("Revive;1")
Else
SendRPC("Revive;0")
EndIf
Case $chkPortal
If GUICtrlRead($chkPortal) == $GUI_CHECKED Then
SendRPC("PortalWnd;1")
Else
SendRPC("PortalWnd;0")
EndIf
Case $LaunchAK
LaunchAK()
GUICtrlSetState($LaunchAK, $GUI_DISABLE)
Case $hMenuItem
If ProcessExists("game.bin") Then
LaunchAK(True)
EndIf
EndSwitch
WEnd
Func LaunchAK($fInject = False)
If Not $fInject Then
$iPID = Run(@ScriptDir & "\game.bin EasyFun", @ScriptDir)
ProcessWait("game.bin")
Else
$iPID = ProcessExists("game.bin")
EndIf
$hPipe = _NamedPipes_CreateNamedPipe("\\.\pipe\AKModule-OUT-" & $iPID, 2, 2, 0, 1, 1, 0, 1)
_DLLInject($iPID, $AKModule)
If @error Then
MsgBox(64, "Error", "Please try launching the trainer again..")
Exit
EndIf
_NamedPipes_ConnectNamedPipe($hPipe)
GUICtrlSetState($chkFly, $GUI_ENABLE)
GUICtrlSetState($chkTele, $GUI_ENABLE)
GUICtrlSetState($chkFishLock, $GUI_ENABLE)
GUICtrlSetState($chkReviveHack, $GUI_ENABLE)
GUICtrlSetState($chkPortal, $GUI_ENABLE)
EndFunc ;==>LaunchAK
Func SendRPC($vBuffer, $fMulti = False)
Local $nBytes = 0, $GetPID
Local $tBuffer = DllStructCreate('wchar[4096]')
Local $pBuffer = DllStructGetPtr($tBuffer)
DllStructSetData($tBuffer, 1, $vBuffer)
_WinAPI_WriteFile($hPipe, $pBuffer, 4096, $nBytes)
EndFunc ;==>SendRPC
nice khen i have faith in u :DQuote:
Sorry I lost my source codes and notes, what remains is the MainGUI. Too bad I forgot to back them up.. >.<
Code:#Region ; * * ** Directives created by AutoIt3Wrapper_GUI * * ** #AutoIt3wrapper_If_Run #Autoit3Wrapper_If_Compile #AutoIt3Wrapper_Icon=ICO/XK.ico #AutoIt3Wrapper_Outfile=AKTrainer.exe #AutoIt3Wrapper_UseUpx=n #AutoIt3Wrapper_UPX_Parameters=--best --lzma #AutoIt3Wrapper_Res_Fileversion=0.3.0.0 #AutoIt3Wrapper_Res_LegalCopyright=XK17© 2012-2013 #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator #AutoIt3Wrapper_Run_Au3Stripper=y ;~ #Au3Stripper_Ignore_Funcs=_ULAnim ;~ #Au3Stripper_Ignore_Funcs=_ULRetn ;~ #Au3Stripper_Ignore_Funcs=_ULTele ;~ #Au3Stripper_Ignore_Funcs=_ULJump ;~ #Au3Stripper_Ignore_Funcs=_ULGM ;~ #Au3Stripper_Ignore_Funcs=_ULLoot #Au3Stripper_Parameters=/SO /RM #AutoIt3Wrapper_Run_AU3Check=n #AutoIt3Wrapper_Run_After=del /f /q "%scriptdir%\%scriptfile%_stripped.au3" #AutoIt3Wrapper_EndIf #EndRegion ; * * ** Directives created by AutoIt3Wrapper_GUI * * ** #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <_DLLInjection.au3> #include <NamedPipes.au3> Global $hPipe Global Const $AKModule = @ScriptDir & "\Module\AKModule.dll" #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("AK Private Server", 242, 127, 25, 25) $chkFly = GUICtrlCreateCheckbox("Infinite Fly Hack", 8, 8, 97, 17) GUICtrlSetState(-1, $GUI_DISABLE) $chkTele = GUICtrlCreateCheckbox("Teleport Farming", 8, 24, 97, 17) GUICtrlSetState(-1, $GUI_DISABLE) $chkPortal = GUICtrlCreateCheckbox("Portal Interface", 8, 40, 97, 17) GUICtrlSetState(-1, $GUI_DISABLE) $chkFishLock = GUICtrlCreateCheckbox("Fishing Lock Hack", 128, 8, 113, 17) GUICtrlSetState(-1, $GUI_DISABLE) $chkReviveHack = GUICtrlCreateCheckbox("Full Health Revive", 128, 24, 113, 17) GUICtrlSetState(-1, $GUI_DISABLE) $LaunchAK = GUICtrlCreateButton("Start AuraKingdom", 8, 64, 227, 33) GUICtrlCreateLabel("Created By: XKhen0017", 120, 104, 118, 17) ; * Context menus * ; $hMenu = GUICtrlCreateContextMenu() $hMenuItem = GUICtrlCreateMenuItem("Inject AKTrainer", $hMenu) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $chkFly If GUICtrlRead($chkFly) == $GUI_CHECKED Then SendRPC("FlyHack;1") Else SendRPC("FlyHack;0") EndIf Case $chkTele If GUICtrlRead($chkTele) == $GUI_CHECKED Then SendRPC("TeleFarm;1") Else SendRPC("TeleFarm;0") EndIf Case $chkFishLock If GUICtrlRead($chkFishLock) == $GUI_CHECKED Then SendRPC("Fishing;1") Else SendRPC("Fishing;0") EndIf Case $chkReviveHack If GUICtrlRead($chkReviveHack) == $GUI_CHECKED Then SendRPC("Revive;1") Else SendRPC("Revive;0") EndIf Case $chkPortal If GUICtrlRead($chkPortal) == $GUI_CHECKED Then SendRPC("PortalWnd;1") Else SendRPC("PortalWnd;0") EndIf Case $LaunchAK LaunchAK() GUICtrlSetState($LaunchAK, $GUI_DISABLE) Case $hMenuItem If ProcessExists("game.bin") Then LaunchAK(True) EndIf EndSwitch WEnd Func LaunchAK($fInject = False) If Not $fInject Then $iPID = Run(@ScriptDir & "\game.bin EasyFun", @ScriptDir) ProcessWait("game.bin") Else $iPID = ProcessExists("game.bin") EndIf $hPipe = _NamedPipes_CreateNamedPipe("\\.\pipe\AKModule-OUT-" & $iPID, 2, 2, 0, 1, 1, 0, 1) _DLLInject($iPID, $AKModule) If @error Then MsgBox(64, "Error", "Please try launching the trainer again..") Exit EndIf _NamedPipes_ConnectNamedPipe($hPipe) GUICtrlSetState($chkFly, $GUI_ENABLE) GUICtrlSetState($chkTele, $GUI_ENABLE) GUICtrlSetState($chkFishLock, $GUI_ENABLE) GUICtrlSetState($chkReviveHack, $GUI_ENABLE) GUICtrlSetState($chkPortal, $GUI_ENABLE) EndFunc ;==>LaunchAK Func SendRPC($vBuffer, $fMulti = False) Local $nBytes = 0, $GetPID Local $tBuffer = DllStructCreate('wchar[4096]') Local $pBuffer = DllStructGetPtr($tBuffer) DllStructSetData($tBuffer, 1, $vBuffer) _WinAPI_WriteFile($hPipe, $pBuffer, 4096, $nBytes) EndFunc ;==>SendRPC
ken12 can u make hack manual cooking ?Quote:
Sorry I lost my source codes and notes, what remains is the MainGUI. Too bad I forgot to back them up.. >.<
Code:#Region ; * * ** Directives created by AutoIt3Wrapper_GUI * * ** #AutoIt3wrapper_If_Run #Autoit3Wrapper_If_Compile #AutoIt3Wrapper_Icon=ICO/XK.ico #AutoIt3Wrapper_Outfile=AKTrainer.exe #AutoIt3Wrapper_UseUpx=n #AutoIt3Wrapper_UPX_Parameters=--best --lzma #AutoIt3Wrapper_Res_Fileversion=0.3.0.0 #AutoIt3Wrapper_Res_LegalCopyright=XK17© 2012-2013 #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator #AutoIt3Wrapper_Run_Au3Stripper=y ;~ #Au3Stripper_Ignore_Funcs=_ULAnim ;~ #Au3Stripper_Ignore_Funcs=_ULRetn ;~ #Au3Stripper_Ignore_Funcs=_ULTele ;~ #Au3Stripper_Ignore_Funcs=_ULJump ;~ #Au3Stripper_Ignore_Funcs=_ULGM ;~ #Au3Stripper_Ignore_Funcs=_ULLoot #Au3Stripper_Parameters=/SO /RM #AutoIt3Wrapper_Run_AU3Check=n #AutoIt3Wrapper_Run_After=del /f /q "%scriptdir%\%scriptfile%_stripped.au3" #AutoIt3Wrapper_EndIf #EndRegion ; * * ** Directives created by AutoIt3Wrapper_GUI * * ** #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <_DLLInjection.au3> #include <NamedPipes.au3> Global $hPipe Global Const $AKModule = @ScriptDir & "\Module\AKModule.dll" #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("AK Private Server", 242, 127, 25, 25) $chkFly = GUICtrlCreateCheckbox("Infinite Fly Hack", 8, 8, 97, 17) GUICtrlSetState(-1, $GUI_DISABLE) $chkTele = GUICtrlCreateCheckbox("Teleport Farming", 8, 24, 97, 17) GUICtrlSetState(-1, $GUI_DISABLE) $chkPortal = GUICtrlCreateCheckbox("Portal Interface", 8, 40, 97, 17) GUICtrlSetState(-1, $GUI_DISABLE) $chkFishLock = GUICtrlCreateCheckbox("Fishing Lock Hack", 128, 8, 113, 17) GUICtrlSetState(-1, $GUI_DISABLE) $chkReviveHack = GUICtrlCreateCheckbox("Full Health Revive", 128, 24, 113, 17) GUICtrlSetState(-1, $GUI_DISABLE) $LaunchAK = GUICtrlCreateButton("Start AuraKingdom", 8, 64, 227, 33) GUICtrlCreateLabel("Created By: XKhen0017", 120, 104, 118, 17) ; * Context menus * ; $hMenu = GUICtrlCreateContextMenu() $hMenuItem = GUICtrlCreateMenuItem("Inject AKTrainer", $hMenu) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $chkFly If GUICtrlRead($chkFly) == $GUI_CHECKED Then SendRPC("FlyHack;1") Else SendRPC("FlyHack;0") EndIf Case $chkTele If GUICtrlRead($chkTele) == $GUI_CHECKED Then SendRPC("TeleFarm;1") Else SendRPC("TeleFarm;0") EndIf Case $chkFishLock If GUICtrlRead($chkFishLock) == $GUI_CHECKED Then SendRPC("Fishing;1") Else SendRPC("Fishing;0") EndIf Case $chkReviveHack If GUICtrlRead($chkReviveHack) == $GUI_CHECKED Then SendRPC("Revive;1") Else SendRPC("Revive;0") EndIf Case $chkPortal If GUICtrlRead($chkPortal) == $GUI_CHECKED Then SendRPC("PortalWnd;1") Else SendRPC("PortalWnd;0") EndIf Case $LaunchAK LaunchAK() GUICtrlSetState($LaunchAK, $GUI_DISABLE) Case $hMenuItem If ProcessExists("game.bin") Then LaunchAK(True) EndIf EndSwitch WEnd Func LaunchAK($fInject = False) If Not $fInject Then $iPID = Run(@ScriptDir & "\game.bin EasyFun", @ScriptDir) ProcessWait("game.bin") Else $iPID = ProcessExists("game.bin") EndIf $hPipe = _NamedPipes_CreateNamedPipe("\\.\pipe\AKModule-OUT-" & $iPID, 2, 2, 0, 1, 1, 0, 1) _DLLInject($iPID, $AKModule) If @error Then MsgBox(64, "Error", "Please try launching the trainer again..") Exit EndIf _NamedPipes_ConnectNamedPipe($hPipe) GUICtrlSetState($chkFly, $GUI_ENABLE) GUICtrlSetState($chkTele, $GUI_ENABLE) GUICtrlSetState($chkFishLock, $GUI_ENABLE) GUICtrlSetState($chkReviveHack, $GUI_ENABLE) GUICtrlSetState($chkPortal, $GUI_ENABLE) EndFunc ;==>LaunchAK Func SendRPC($vBuffer, $fMulti = False) Local $nBytes = 0, $GetPID Local $tBuffer = DllStructCreate('wchar[4096]') Local $pBuffer = DllStructGetPtr($tBuffer) DllStructSetData($tBuffer, 1, $vBuffer) _WinAPI_WriteFile($hPipe, $pBuffer, 4096, $nBytes) EndFunc ;==>SendRPC
link broken bro :confused:Quote:
Haha okie wait i'll reupload this time the whole trainer.
EDIT
new download link
[Only registered and activated users can see links. Click Here To Register...]
please dont forget to install visual studio c++ redistribute 2013
[Only registered and activated users can see links. Click Here To Register...]