 |
Cheat Engine The Official Site of Cheat Engine
|
View previous topic :: View next topic |
Author |
Message |
aoa3005 How do I cheat?
Reputation: 0
Joined: 14 Jun 2011 Posts: 1
|
Posted: Tue Jun 14, 2011 7:59 am Post subject: [Vb.net]I need make trainer edit Aray of byte [Game Online] |
|
|
my code make
Code: | Public Class Form1
Private Declare Function ReadProcessMemory Lib "KERNEL32" (ByVal Handle As Integer, ByVal Address As Integer, ByRef Value As Long, ByVal Size As Long, ByRef BytesWritten As Long) As Long
Private Declare Function WriteProcessMemory Lib "KERNEL32" (ByVal Handle As Integer, ByVal Address As Integer, ByRef Value As Long, ByVal Size As Long, ByRef BytesWritten As Long) As Long
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim name As String = "PointBlank"
Dim hprocess As Process() = Process.GetProcessesByName(name)
Dim address As Integer = {&H20 &H00 &H00 &H00 &H02 &H00 &H00 &H00 &H00 &H00 &H00 &H00 &H00 &H00 &H05 &H00}
Dim address As Integer = {&H20 &H00 &H00 &H00 &H05 &H05 &H00 &H00 &H00 &H00 &H00 &H00 &H00 &H00 &H05 &H00}
WriteProcessMemory(hprocess(0).Handle, address, address, 4, 0)
End Sub
End Class |
Not Work
I am a fool
i use vb.net 2 day
Edit Code me Please
I am from thailand
|
|
Back to top |
|
 |
Krähne Expert Cheater
Reputation: 0
Joined: 06 Jun 2010 Posts: 108 Location: Inside of my Kernel
|
Posted: Tue Jun 14, 2011 6:40 pm Post subject: |
|
|
First learn a simple "Hello World!".
After that, you can declare array variables by the right way.
AFTER ALL THAT, you may can learn cheating and programming.
Edit: I think you will not learn nothing, by that reason here's the snippet:
Code: | Imports System.Runtime.InteropServices
Module Module1
<DllImport("kernel32.dll", SetLastError:=True)> _
Public Function WriteProcessMemory(ByVal hProcess As IntPtr, ByVal lpBaseAddress As IntPtr, ByVal lpBuffer As Byte(), ByVal nSize As System.UInt32, <Out()> ByRef lpNumberOfBytesWritten As IntPtr) As Boolean
End Function
Sub Main()
Dim hProcess As Process() = Process.GetProcessesByName("notepad") 'Process Name
Dim NewValue As Byte() = {&HFF, &HFF, &HFF, &HFF, &HFF, &HFF, &HFF, &HFF, &HFF, &HFF, &HFF, &HFF, &HFF, &HFF, &HFF, &HFF} 'New AoB Value
Dim Address As IntPtr = &H1008F00 'Address to modify the value
WriteProcessMemory(hProcess(0).Handle, Address, NewValue, 16, IntPtr.Zero) ' Modifiyng the value
End Sub
End Module |
Please, first learn the basic stuffs.
Description: |
After execute the program... |
|
Filesize: |
3.37 KB |
Viewed: |
4970 Time(s) |

|
Description: |
Before edit the memory... |
|
Filesize: |
3.87 KB |
Viewed: |
4970 Time(s) |

|
_________________
Excuse me if you don't understand what I just said, but "english" isn't my native language. |
|
Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum You cannot attach files in this forum You can download files in this forum
|
|