R
rebelxpower
Enthusiast
Well thanks for checking out this thread anyways, I know VB.Net well. However I am almost a Beginner to HEX and HEX topics. about the only experience I've done with hex/hex-editing is cracking software HWID's anti leak protection.
Please someone help me understand this. I'm making a Fallout New Vegas mod tool, I know there are tools already out there for this, but I wanted to make my own to start understanding Hex and making my own game saves to contribute to the community.
So I got source code from various threads. Everything works except the most important part. The hex part.
"Money = ScanForString(FilePath, "4A44", 62, 0, 0)"
Ultimately I want it to find the caps in the gamesave, and put the amount in textbox1.text.
I do not understand the code below.
"4A44" is supposed to be the HEX value of "money" at least I think even so it shows up 0 in textbox1.text no matter what I put for the "4A44".
"62" is a mystery to me.
Money += 20 Is also a mystery to me.
If someone could download the game save and tell me what I need to change for,
I would be so pleased.
Gamesave:http://www.2shared.com/file/9IupAYqM/Save_12___JD__Mojave_Wasteland.html
Basic stats:
Please someone help me understand this. I'm making a Fallout New Vegas mod tool, I know there are tools already out there for this, but I wanted to make my own to start understanding Hex and making my own game saves to contribute to the community.
So I got source code from various threads. Everything works except the most important part. The hex part.
"Money = ScanForString(FilePath, "4A44", 62, 0, 0)"
Ultimately I want it to find the caps in the gamesave, and put the amount in textbox1.text.
Code:
Private Sub ReadFile(ByVal FilePath As String)
Try
Dim reader As New PackageIO.Reader(FilePath, PackageIO.Endian.Big)
Money = ScanForString(FilePath, "4A44", 62, 0, 0)
Money += 20
reader.Position = Money
reader.ReadString(4)
UseWaitCursor = False
reader.Close()
textbox1.text = reader.readint32
Catch ex As Exception
MsgBox("Error", MsgBoxStyle.Critical)
End Try
End Sub
I do not understand the code below.
Code:
Money = ScanForString(FilePath, "4A44", 62, 0, 0)
Money += 20
"4A44" is supposed to be the HEX value of "money" at least I think even so it shows up 0 in textbox1.text no matter what I put for the "4A44".
"62" is a mystery to me.
Money += 20 Is also a mystery to me.
If someone could download the game save and tell me what I need to change for,
Code:
Private Sub ReadFile(ByVal FilePath As String)
Try
Dim reader As New PackageIO.Reader(FilePath, PackageIO.Endian.Big)
Money = ScanForString(FilePath, "4A44", 62, 0, 0)
Money += 20
reader.Position = Money
reader.ReadString(4)
UseWaitCursor = False
reader.Close()
textbox1.text = reader.readint32
Catch ex As Exception
MsgBox("Error", MsgBoxStyle.Critical)
End Try
End Sub
I would be so pleased.
Gamesave:http://www.2shared.com/file/9IupAYqM/Save_12___JD__Mojave_Wasteland.html
Basic stats:
Code:
Level 10
Caps 3249
EXP 7325/8750
AP 92/92
HP 160/245
WG 198/250