i come up with 0 everytime.
Code:
Public Class Form1
Dim BaseAddress As Integer
Dim GBaseAddress As Integer
Dim MyProcess As Process() = Process.GetProcessesByName("AION.bin") ' Replace that with the games window text
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'write to the address
WriteInt((BaseAddress + 5350952), TextBox1.Text)
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim MyProcess As Process() = Process.GetProcessesByName("AION.bin")
Dim mainModule As ProcessModule
mainModule = MyProcess(0).MainModule
BaseAddress = CInt(mainModule.BaseAddress)
TextBox1.Text = BaseAddress
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
'Get the value of the address and display it in label1
Label1.Text = ReadInt((BaseAddress + &H8EEEB8))
End Sub
End Class
i use autoit now for this
it seems that in autoit the baseAddress is obtained from Game.dll and not AION.bin, i am really new to memory reading so i could be wrong.
*** This is the AutoIT Code ***
Code:
Func MemReadDLL($offset)
$StaticOffset = Dec($offset)
Global $pid
Global $CUROffset[1]
$CUROffset[0] = 0
$baseADDR = _MemoryModuleGetBaseAddress($pid, "Game.dll")
$finalADDR = "0x" & Hex($baseADDR + $StaticOffset)
$MemTest = _MemoryRead($finaladdr,$openmem)
Return $MemTest
EndFunc