 |
Cheat Engine
The Official Site of Cheat Engine
|
| View previous topic :: View next topic |
| Author |
Message |
luvaddict411
Advanced Cheater
 Reputation: 0
Joined: 22 Nov 2007
Posts: 54
|
 Posted: Sun Dec 02, 2007 1:11 pm Post subject: does anyone have a tut for making a trainer using vb8? |
 |
|
if so could you post it here?
And i hope this is the right forum for this lol.
_________________
Learning c# and java.
 |
|
| Back to top |
|
 |
Blader
I post too much
 Reputation: 2
Joined: 19 Jan 2007
Posts: 2049
|
| Posted: Sun Dec 02, 2007 1:54 pm Post subject: |
|
|
I don't think there are any tutorials for vb8, but jsut look at the vb6 tutorial and convert it to vb8, it's similar coding
_________________
|
|
| Back to top |
|
|
dnsi0
I post too much
![]() Reputation: 0
Joined: 04 Jan 2007
Posts: 2674
|
| Posted: Sun Dec 02, 2007 3:08 pm Post subject: |
|
|
| Whats VB 8??? And visual basic 8 is out??? is that .NET???
|
|
| Back to top |
|
|
Blader
I post too much
Reputation: 2
Joined: 19 Jan 2007
Posts: 2049
|
| Posted: Sun Dec 02, 2007 3:13 pm Post subject: |
|
|
VB8 is visual basic 8 and yes, it's out
_________________
|
|
| Back to top |
|
|
killersamurai
Expert Cheater
![]() Reputation: 0
Joined: 10 Sep 2007
Posts: 197
Location: Colorado
|
| Posted: Sun Dec 02, 2007 3:20 pm Post subject: |
|
|
Create a new project.
Double click My Project (in Solution Explorer)
Go to References.
In imported namespaces, make sure System.Runtime.InteropServices and System.Diagnostics are checked.
Right click on form1.vb -> view code (in Solution Explorer).
Under Public Class Form1 enter this
| Code: |
<DllImport("kernel32")> _
Public Shared Function OpenProcess(ByVal dwDesiredAccess As UInteger, _
ByVal bInheriteHandle As Integer, _
ByVal dwProcessId As UInteger) As IntPtr
End Function
<DllImport("kernel32")> _
Public Shared Function CloseHandle(ByVal hWnd As IntPtr) As Integer
End Function
<DllImport("kernel32")> _
Public Shared Function WriteProcessMemory(ByVal hProcess As IntPtr, _
ByVal lpBassAddress As UInteger, _
ByVal lpBuffer As Byte(), _
ByVal nSize As UInteger, _
ByRef lpNumberOfBytesWritten As IntPtr) As Integer
End Function
<DllImport("kernel32")> _
Public Shared Function ReadProcessMemory(ByVal hProcess As IntPtr, _
ByVal lpBaseAddress As UInteger, _
ByRef lpBuff As Byte(), _
ByVal nSize As UInteger, _
ByRef lpNumberOfBytesRead As UInteger) As Integer
End Function
|
Add a button and double click it.
In the Click event enter this
| Code: |
Dim proc As Process() = Process.GetProcessesByName("PINBALL")
Dim handle As IntPtr = OpenProcess(&H8 Or &H20, 0, proc(0).Id)
Dim value As Byte() = {&HFF, &HFF, &HFF, &HFF}
Dim address As UInteger = &HC90C62;
WriteProcessMemory(handle, address, value, 4, 0)
CloseHandle(handle)
|
For WriteProcessMemory, you need to have PROCESS_VM_WRITE (0x20) and PROCESS_VM_OPERATION(0x8) access. Which will be used in OpenProcess. If you are going to use this, add some error checking.
|
|
| Back to top |
|
|
Blader
I post too much
Reputation: 2
Joined: 19 Jan 2007
Posts: 2049
|
| Posted: Sun Dec 02, 2007 3:22 pm Post subject: |
|
|
| killersamurai wrote: | Create a new project.
Double click My Project (in Solution Explorer)
Go to References.
In imported namespaces, make sure System.Runtime.InteropServices and System.Diagnostics are checked.
Right click on form1.vb -> view code (in Solution Explorer).
Under Public Class Form1 enter this
| Code: |
<DllImport("kernel32")> _
Public Shared Function OpenProcess(ByVal dwDesiredAccess As UInteger, _
ByVal bInheriteHandle As Integer, _
ByVal dwProcessId As UInteger) As IntPtr
End Function
<DllImport("kernel32")> _
Public Shared Function CloseHandle(ByVal hWnd As IntPtr) As Integer
End Function
<DllImport("kernel32")> _
Public Shared Function WriteProcessMemory(ByVal hProcess As IntPtr, _
ByVal lpBassAddress As UInteger, _
ByVal lpBuffer As Byte(), _
ByVal nSize As UInteger, _
ByRef lpNumberOfBytesWritten As IntPtr) As Integer
End Function
<DllImport("kernel32")> _
Public Shared Function ReadProcessMemory(ByVal hProcess As IntPtr, _
ByVal lpBaseAddress As UInteger, _
ByRef lpBuff As Byte(), _
ByVal nSize As UInteger, _
ByRef lpNumberOfBytesRead As UInteger) As Integer
End Function
|
Add a button and double click it.
In the Click event enter this
| Code: |
Dim proc As Process() = Process.GetProcessesByName("PINBALL")
Dim handle As IntPtr = OpenProcess(&H8 Or &H20, 0, proc(0).Id)
Dim value As Byte() = {&HFF, &HFF, &HFF, &HFF}
Dim address As UInteger = &HC90C62;
WriteProcessMemory(handle, address, value, 4, 0)
CloseHandle(handle)
|
For WriteProcessMemory, you need to have PROCESS_VM_WRITE (0x20) and PROCESS_VM_OPERATION(0x8) access. Which will be used in OpenProcess. If you are going to use this, add some error checking. |
That doesn't look like visual basic 8 code
And I think he wants a tutorial on making a flash trainer, not an .exe trainer 
_________________
|
|
| Back to top |
|
|
killersamurai
Expert Cheater
![]() Reputation: 0
Joined: 10 Sep 2007
Posts: 197
Location: Colorado
|
| Posted: Sun Dec 02, 2007 3:40 pm Post subject: |
|
|
vb 7 = .NET Framework 1.1
vb 8 = .NET Framework 2.0
vb 9 = .NET Framework 3.0
This is the same for c#
c# 1.0 = .NET Framework 1.0
c# 2.0 = .NET Framework 2.0
c# 3.0 = .NET Framework 3.0
c# 3.5 = .NET Framework 3.5
|
|
| 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
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
