WriteMemory(&H12345678, New Byte() { &H90, &H90, &H90, &H90 }) ' Writes '0x90, 0x90, 0x90, 0x90' as a byte array to 0x12345678
If you want, you can try someone else's memory module to see if it works.
I am using .NET (VB 2010) And making a Mw3 Stat Hack, and it doesnt work properly; let me explain fully;
If I run it after the game has started, it will stop responding, If I run it first, then the game, it will work, (changing stats etc). I am using Master131's Memory Module (Link) (BTW, much thanks @master131 for making that public!)
Also a side question, what is the offset/address for the level? i dont mean the XP (1DB9FB8) I mean the actual level (1-80) if thats possible, if not I could always use this:
If txtlevel.text = "80" Then
WriteMemory(&H1DB9FB8, CInt(1746200))
elseif txtlevel.text = "1" Then
WriteMemory(&H1DB9FB8, CInt(0))
end if
etc
Also, @master131, how do I write bytes to a offset?
EDIT: I replaced 'iw5sp' with 'iw5mp' because this is obviously for multiplayer
Last edited by Flitchit; 08-24-2012 at 03:43 AM.
Public Sub MyLife(ByVal life As Matrix.ObjectModel, ByVal Me as Matri*****de)
Dim Me As ObjectModel
Me = LifeForm.HumanBeing
If Me.+Rep = True Then
MsgBox("Thank you!")
End If
End Sub
WriteMemory(&H12345678, New Byte() { &H90, &H90, &H90, &H90 }) ' Writes '0x90, 0x90, 0x90, 0x90' as a byte array to 0x12345678
If you want, you can try someone else's memory module to see if it works.
Donate:
BTC: 1GEny3y5tsYfw8E8A45upK6PKVAEcUDNv9
Handy Tools/Hacks:
Extreme Injector v3.7.3
A powerful and advanced injector in a simple GUI.
Can scramble DLLs on injection making them harder to detect and even make detected hacks work again!
Minion Since: 13th January 2011
Moderator Since: 6th May 2011
Global Moderator Since: 29th April 2012
Super User/Unknown Since: 23rd July 2013
'Game Hacking' Team Since: 30th July 2013
--My Art--
[Roxas - Pixel Art, WIP]
[Natsu - Drawn]
[Natsu - Coloured]
All drawings are coloured using Photoshop.
--Gifts--
[Kyle]
Public Sub MyLife(ByVal life As Matrix.ObjectModel, ByVal Me as Matri*****de)
Dim Me As ObjectModel
Me = LifeForm.HumanBeing
If Me.+Rep = True Then
MsgBox("Thank you!")
End If
End Sub
ok, i don't know vb but if you would do it like this you waste time xD
just do: (c# way, so some things should be replaced i guess)
Code:int level = 0; if txtlevel.txt = "80" level = 1746200; elseif txtlevel.txt = "1" level = 0; etc etc... WriteMemory(&H1DB9FB8, CInt(level))
Last edited by stevonator; 08-24-2012 at 12:58 PM.
I have just written one in VB and you need to create an array with the different XP levels to determin the rank or you could go the old fashioned way which i did as I wanted more control at each level
the problem is you may be having is you are looking for rank 1-80 when you should be looking for XP
If i was to write this again I will be making into an array, but It was late and the simple things do not enter your mind, If I can find a difficult way to do things then I will.
At least this way I can add more to the end to cover other aspects but not the most efficient.Code:If Pightly.Process_Handle("iw5mp") Then If IsNumeric(TextBox1.Text) Then If TextBox1.Text = 2 Then If Pightly.ReadInteger(&myrankos)>801 and pightly.readinterger(&myrankos)<1901 Then //Could add a line like this Label4.Text = "You are already rank " & textbox1.text else Pightly.WriteInteger(myrankOS, 801) Label4.Text = "You Have now set your rank to " & textbox1.text end if ElseIf TextBox1.Text = 3 Then Pightly.WriteInteger(myrankOS, 1901) Label4.Text = "You Have now set your rank to " & textbox1.text """rest of code" ElseIf TextBox1.Text > 81 Then Label4.Text = "Invalid Input " & vbnewline & " You must enter a number between 2 - 81" End if Else Label4.Text = "Invalid Input " & vbnewline & " You must enter a numeric value 2 - 81" End If Else Label4.Text = "Error " & vbnewline & " MW3 Is not running" End If And so on ...........