Como ago mi propio hack ??? =)

adriih

para ke kieres acer un hac con todos los ke ai aki, si no saves ni como acerlo seguro ke tendria menos opciones ke los ke ai aki

saske400

porfa me podriar ayudar mr podrian dar una guia o algo cualquiercosa seles agradese ok grax ( D ;;) bienvenido x >) -s B-)

Rakenow

Lo primero tendrás que decir que tipo de hack no? Como no hay hacks y bots...

gunit

yo te puedo ayudar a hacer 1 para los privados, que no necesita fix y es mas facil

jack013

Preguntale a mikiller el save xd

Anghios

Lo primero si quieres aprender rápido te aconsejo que bajes el CheatEngine. Y que de ahí, saques los offSets y los pointers fijos del juego. Luego crear módules en el VB2008 / .NET
(este te puede servir)
Modul1.vb

Module Module1
    Public Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Long, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Integer
    Public Declare Function ReadProcessMemory Lib "kernel32" Alias "ReadProcessMemory" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Integer, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Integer
    Public Declare Function ReadSingle Lib "kernel32" Alias "ReadProcessMemory" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Single, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Boolean
    'Teletransporte
    Public Declare Function WriteSingle Lib "kernel32" Alias "WriteProcessMemory" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Single, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Boolean
    Public Declare Function WriteByte Lib "kernel32" Alias "WriteProcessMemory" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Byte, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Integer
    Public Processo As Process() = Process.GetProcessesByName("metin2client.bin")
    Public Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Integer, ByVal bInheritHandle As Integer, ByVal dwProcessId As Integer) As Integer
    Public AtkMode As Boolean = False
    Public rgatkkMode As Boolean = False
    Public hitmode As Boolean = False

    Public InviMode As Boolean = False
    Public MovMode As Boolean = False


    Public Function ReturnAddy(ByVal Addybase As String, ByVal Off1 As Integer, ByVal Off2 As Integer) As String
        Dim addy As String
        ReadProcessMemory(processHandle, "&H" & Addybase, value, 4, Nothing)
        addy = "&H" & Conversion.Hex(value + Off1)
        ReadProcessMemory(processHandle, addy, value, 4, Nothing)
        addy = "&H" & Conversion.Hex(value + Off2)
        Return addy
    End Function


    Public processHandle As IntPtr
    Public value As String
End Module

Y hacerlo funcionar, es complicado pero no está mal para el vb2008.
Suerte!
@jack013 said:

Preguntale a mikiller el save xd

Not Real.

jack013

Xd ok aganle caso a Anghios Xd Is Not Real XD. Anghios Buena explicacion esa