Post: How to make a Modding tool for ANY game!
Options
11-13-2013, 06:55 AM
#1
Ace
Former Staff Member
Since Enstone just released Cex/Dex CCAPI . There will be a lot of people making tools for Ghost, MW3 , ect.
STEP BY STEP Tutorial!
This tool is for Dead Rising 2.
Step 1.
Open Visual Studio and create a new form.
Step 2.
Add Package IO as a reference
You must login or register to view this content.
Step 3.
Add 2 labels, 2 Textboxes, And 2 Buttons
Make the text of label 1: Current Level
Make the text of label 2: Mod Level to
Make the text of button 1: Open
Make the text of button 2: Save
Now your form should look like this
You must login or register to view this content.
Ignore the dotnetbar
(For Connecting / Attaching just put " Connect & Attatch)
Step 4.
Import Package IO to your form.
-----
View More View even More View Less Select All View Plain
Imports Package IO
Step 5.
Now lets DIM some stuff.
------
View More View even More View Less Select All View Plain
Dim X As String
Dim projectdata As Object
Step 6.
Lets add the read function for Package IO
You must login or register to view this content.
View More View even More View Less Select All View Plain
Public Sub ReadFile(ByVal X As String)
Dim reader As New PackageIO.Reader(X, Endian.Big, 0)
reader.Position = &HEEC2
Me.TextBoxX1.Text = (reader.ReadInt32)
End Sub
*Notes* When reading or writing to an offset always put &H and then the offset.
In this case our offset is EEC2
Step 7.
Lets code the Open button
You must login or register to view this content.
View More View even More View Less Select All View Plain
Dim open As New OpenFileDialog
open.Filter = "All Files (*.*)|*.*"
If open.ShowDialog = Windows.Forms.DialogResult.OK Then
Try
X = open.FileName
ReadFile(X)
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error")
End Try
End If
Step 8.
Now lets code the write function for Package IO
You must login or register to view this content.
View More View even More View Less Select All View Plain
Public Sub WriteFile(ByVal X As String)
Dim writer As New PackageIO.Writer(X, Endian.Big, 0)
writer.Position = &HEEC2
writer.WriteInt32(Me.TextBoxX2.Text)
End Sub
Step 9.
Now lets code the save button.
-----
View More View even More View Less Select All View Plain
Try
Me.ReadFile(Me.X)
Me.WriteFile(Me.X)
Interaction.MsgBox("File Saved!", MsgBoxStyle.Information, "")
Catch ex As Exception
projectdata.SetProjectError(ex)
Dim exception As Exception = ex
Interaction.MsgBox("Error", MsgBoxStyle.Critical, "")
projectdata.ClearProjectError()
End Try
End Sub
>You must login or register to view this content.
Step 10.
Make a nice GUI and test it.
all done! (This is the easiest way to make a tool, easy example to follow!)
Credits: Sega, FMT Enstone , an me
STEP BY STEP Tutorial!
This tool is for Dead Rising 2.
Step 1.
Open Visual Studio and create a new form.
Step 2.
Add Package IO as a reference
You must login or register to view this content.
Step 3.
Add 2 labels, 2 Textboxes, And 2 Buttons
Make the text of label 1: Current Level
Make the text of label 2: Mod Level to
Make the text of button 1: Open
Make the text of button 2: Save
Now your form should look like this
You must login or register to view this content.
Ignore the dotnetbar
(For Connecting / Attaching just put " Connect & Attatch)
Step 4.
Import Package IO to your form.
-----
View More View even More View Less Select All View Plain
Imports Package IO
Step 5.
Now lets DIM some stuff.
------
View More View even More View Less Select All View Plain
Dim X As String
Dim projectdata As Object
Step 6.
Lets add the read function for Package IO
You must login or register to view this content.
View More View even More View Less Select All View Plain
Public Sub ReadFile(ByVal X As String)
Dim reader As New PackageIO.Reader(X, Endian.Big, 0)
reader.Position = &HEEC2
Me.TextBoxX1.Text = (reader.ReadInt32)
End Sub
*Notes* When reading or writing to an offset always put &H and then the offset.
In this case our offset is EEC2
Step 7.
Lets code the Open button
You must login or register to view this content.
View More View even More View Less Select All View Plain
Dim open As New OpenFileDialog
open.Filter = "All Files (*.*)|*.*"
If open.ShowDialog = Windows.Forms.DialogResult.OK Then
Try
X = open.FileName
ReadFile(X)
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error")
End Try
End If
Step 8.
Now lets code the write function for Package IO
You must login or register to view this content.
View More View even More View Less Select All View Plain
Public Sub WriteFile(ByVal X As String)
Dim writer As New PackageIO.Writer(X, Endian.Big, 0)
writer.Position = &HEEC2
writer.WriteInt32(Me.TextBoxX2.Text)
End Sub
Step 9.
Now lets code the save button.
-----
View More View even More View Less Select All View Plain
Try
Me.ReadFile(Me.X)
Me.WriteFile(Me.X)
Interaction.MsgBox("File Saved!", MsgBoxStyle.Information, "")
Catch ex As Exception
projectdata.SetProjectError(ex)
Dim exception As Exception = ex
Interaction.MsgBox("Error", MsgBoxStyle.Critical, "")
projectdata.ClearProjectError()
End Try
End Sub
>You must login or register to view this content.
Step 10.
Make a nice GUI and test it.
all done! (This is the easiest way to make a tool, easy example to follow!)Credits: Sega, FMT Enstone , an me
The following 13 users say thank you to Ace for this useful post:
Copyright © 2026, NextGenUpdate.
All Rights Reserved.
