Tutorials Navigation

Tutorials :: New :: Popular :: Top Rated

Tutorials: 18,326 Categories: 12

Total Tutorial Views: 41,455,022

How to make a simple mod tool.

Tutorial Name: How to make a simple mod tool.  

Category: PC Tutorials

Submitted By: Sega

Date Added:

Comments: 0

Views: 4,914

Related Forum: PC Building Forum

Share:

Okay,

Today I will be teaching you how to make a simple modding tool using PackageIO.dll in VB.NET(Made by Fuedale Nate).

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
[ Register or Signin to view external links. ]




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
[ Register or Signin to view external links. ]
Ignore the dotnetbar




Step 4.
Import Package IO to your form.
[ Register or Signin to view external links. ]
Imports Package IO





Step 5.
Now lets Dim some stuff.
[ Register or Signin to view external links. ]
Dim X As String
   Dim projectdata As Object





Step 6.
Lets add the read function for Package IO
[ Register or Signin to view external links. ]
 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
[ Register or Signin to view external links. ]
 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
[ Register or Signin to view external links. ]
 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.
[ Register or Signin to view external links. ]
 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





Step 10.
Make a nice GUI and test it.

Ratings

Current rating: 3.14 by 7 users
Please take one second and rate this tutorial...

Not a Chance
1
2
3
4
5
6
7
8
9
10
Absolutely

Comments

"How to make a simple mod tool." :: Login/Create an Account :: 0 comments

If you would like to post a comment please signin to your account or register for an account.