GTA IV / Tools / Creating your own mods

Handling Editor

  • Paul Jay (Paulo Barca)
  • 07/02/2012
  • 33122 Downloads

Ratings:

Please sign in first.

Favorites:

Download
160.30Kb
Report this mod
Handling Editor

Videos

No videos added yet.
You need to be signed in to add videos to this mod.

Description

With this Handling Editor now is super easy to change value's on your GTA IV car's.

You are free to make a Donation for my work.

I can send the VB.NET Source with a simple Donation.

Contact me on my mail: [email protected]

Comments

Your name:

Message:
BBCodes:
[b]bold[/b] | [i]italics[/i] | [u]underline[/u]
Emoticons:
😀 😄 😊 😉 😍 🤩 😎 😂 🤣 😅 😆 😋 😮 😳 🥺 😢 😭 😱 😴 🤯 😕 🙄 🤔 😐 😏 😬 😤 😡 🤬 😈 💀 🤡 👍 👎 👏 🙌 🙏 👌 🤝 🤞 🤘 👊 ✌️ 👋 💪 👀 ❤️ 🔥 💯 🎮 🕹️ 🚗 🏎️ 🚓 🚨 🚁 ✈️ 🏍️ 🚤 💣 💥 💰 💵 💎 🏆 🎯 👾 🤖 👻 👽 🛠️ 🔧 ⚙️

Submit:

There are 10 comments posted yet.

Ardian89 2
Profile
02/16/2013 14:13

and pw is : gtainside.com

Quote | Reply
Ardian89 2
Profile
02/16/2013 14:12

I've seen you code it's simpe... nobodys want buy your gaycode here is it : Dim str6 As String = Conversions.ToString(Registry.LocalMachine.OpenSubKey("SOFTWARE\Rockstar Games\Grand Theft Auto IV").GetValue("InstallFolder"))
Me.Button3.Enabled = False
Me.ComboBox1.Enabled = False
Me.TabControl1.Enabled = True
Dim reader As New StreamReader((str6 & "\common\data\handling.dat"))
Me.TextBox1.Text = ""
Do While (reader.Peek <> -1)
Dim str2 As String = reader.ReadLine
If str2.Contains(Me.ComboBox1.Text) Then
Me.TextoOriginal.Text = str2
Exit Do
End If
Loop
Me.TextBox.Text = ""
Dim str As String = ""
Me.TextBox0.Text = str
Me.TextBox1.Text = str
Me.TextBox2.Text = str
Me.TextBox3.Text = str
Me.TextBox4.Text = str
Me.TextBox5.Text = str
Me.TextBox6.Text = str
Me.TextBox7.Text = str
Me.TextBox8.Text = str
Me.TextBox9.Text = str
Me.TextBox10.Text = str
Me.TextBox11.Text = str
Me.TextBox12.Text = str
Me.TextBox13.Text = str
Me.TextBox14.Text = str
Me.TextBox15.Text = str
Me.TextBox16.Text = str
Me.TextBox17.Text = str
Me.TextBox18.Text = str
Me.TextBox19.Text = str
Me.TextBox20.Text = str
Me.TextBox21.Text = str
Me.TextBox22.Text = str
Me.TextBox23.Text = str
Me.TextBox24.Text = str
Me.TextBox25.Text = str
Me.TextBox26.Text = str
Me.TextBox27.Text = str
Me.TextBox28.Text = str
Me.TextBox29.Text = str
Me.TextBox30.Text = str
Me.TextBox31.Text = str
Me.TextBox32.Text = str
Me.TextBox33.Text = str
Me.TextBox34.Text = str
Me.TextBox35.Text = str
Me.TextBox36.Text = str
Me.ExportTXT.Text = str
Dim array As String() = Me.TextoOriginal.Text.Split(New Char() { ChrW(9) })
Dim num3 As Integer = Information.UBound(array, 1)
Dim i As Integer = 0
Do While (i <= num3)
Me.TextBox.Text = (Me.TextBox.Text & array(i) & " ")
i += 1
Loop
Dim text As String = Me.TextBox.Text
Do While [text].Contains(" ")
If [text].Contains(" ") Then
Do While [text].Contains(" ")
[text] = [text].Replace(" ", " ")
Loop
End If
If [text].Contains(" ") Then
Do While [text].Contains(" ")
[text] = [text].Replace(" ", " ")
Loop
End If
If [text].Contains(" ") Then
Do While [text].Contains(" ")
[text] = [text].Replace(" ", " ")
Loop
End If
If [text].Contains(" ") Then
Do While [text].Contains(" ")
[text] = [text].Replace(" ", " ")
Loop
End If
Loop
Me.TextBox.Text = Strings.Trim([text])
Dim strArray As String() = Me.TextBox.Text.Split(New Char() { " "c })
Dim num4 As Integer = Information.UBound(strArray, 1)
Dim j As Integer = 0
Do While (j <= num4)
Me.TextBox0.Text = strArray(0)
Me.TextBox1.Text = strArray(1)
Me.TextBox2.Text = strArray(2)
Me.TextBox3.Text = strArray(3)
Me.TextBox4.Text = strArray(4)
Me.TextBox5.Text = strArray(5)
Me.TextBox6.Text = strArray(6)
Me.TextBox7.Text = strArray(7)
Me.TextBox8.Text = strArray(8)
Me.TextBox9.Text = strArray(9)
Me.TextBox10.Text = strArray(10)
Me.TextBox11.Text = strArray(11)
Me.TextBox12.Text = strArray(12)
Me.TextBox13.Text = strArray(13)
Me.TextBox14.Text = strArray(14)
Me.TextBox15.Text = strArray(15)
Me.TextBox16.Text = strArray(&H10)
Me.TextBox17.Text = strArray(&H11)
Me.TextBox18.Text = strArray(&H12)
Me.TextBox19.Text = strArray(&H13)
Me.TextBox20.Text = strArray(20)
Me.TextBox21.Text = strArray(&H15)
Me.TextBox22.Text = strArray(&H16)
Me.TextBox23.Text = strArray(&H17)
Me.TextBox24.Text = strArray(&H18)
Me.TextBox25.Text = strArray(&H19)
Me.TextBox26.Text = strArray(&H1A)
Me.TextBox27.Text = strArray(&H1B)
Me.TextBox28.Text = strArray(&H1C)
Me.TextBox29.Text = strArray(&H1D)
Me.TextBox30.Text = strArray(30)
Me.TextBox31.Text = strArray(&H1F)
Me.TextBox32.Text = strArray(&H20)
Me.TextBox33.Text = strArray(&H21)
Me.TextBox34.Text = strArray(&H22)
Me.TextBox35.Text = strArray(&H23)
Me.TextBox36.Text = strArray(&H24)
j += 1
Loop
Me.Label2.Text = "Data Loaded"
Me.Timer1.Enabled = True
End Sub


Quote | Reply
jb183 2
Profile
01/20/2013 06:03

DOES NOT WORK


Quote | Reply
spacekees 2
Profile
09/14/2012 15:46

lol i got it didnt know the pasword is in rar file :)

Quote | Reply
spacekees 2
Profile
09/14/2012 15:41

where is the password???

may i have the pasword plz?

Quote | Reply
RequiemKarga 4
Profile
07/12/2012 08:13

gtainside.com &#351;ifreymi&#351; fotodan gördüm .d


Quote | Reply
RequiemKarga 4
Profile
07/12/2012 08:12

gtainside.com &#351;ifreymi&#351; fotodan gördüm .d


Quote | Reply
RequiemKarga 4
Profile
07/12/2012 08:11

&#351;ifreeeeeeeeeeeeeeee

Quote | Reply
RequiemKarga 4
Profile
07/12/2012 08:11

&#351;ifreeeeeeeeeeeeeeee

Quote | Reply
bobby111wwr 3
Profile
07/07/2012 09:25

password plz................

Quote | Reply