Released SYNTAX'S Mod Maker

Discussion in 'Released Mods' started by >:SYNTAX, Dec 11, 2012.

?

did you fined this program helpfull

yesssssss 10 vote(s) 43.5%
nooooooo 5 vote(s) 21.7%
a little 8 vote(s) 34.8%
  1. >:SYNTAX Mouse

    i have remade my mod maker pics and more info coming soon a bit short on time atm


    your items will be saved into this path

    "C:\Users\" & user & "\My Documents\My Games\Terraria\ModPacks\New Mod\Item\"

    may not work for Windows Xp Users.

    you will still need to compile you mod the traditional way.


    To Do List (open)

    make weapons tab more fool proof

    get picture viewer working right

    add some cool graphics to background

    make more tabs
    Ranged weapons
    projectiles
    custom blocks

    make custom errors (current ones crash the program D: )

    make the path easer to use


    DOWNLOAD LINK

    Attached Files:

  2. Jecht Cursed Man

    Great work! Im still a newbie but this is great for making OP weapons. Keep it up Syntax
  3. Wingzero007 Green Slime

    Hey man if you completed this that would be seriously awesome! Could you make one for npc design too? That's my weak point.
  4. rangerofthewest Raincoat Zombie

    I like this, but it needs NPC design, boss design, and a couple other additions (tile design, item design, etc.). However, it looks fantastic, and I will be watching it. Good work, and keep it up!
  5. Obsidian54 Blazing Wheel

    Awesome dude ! I though of making something similar some times ago but were too lazy... :p
    In which language is it written ?
    Do you plan making projectile/npc/tile... panels ?
    Do you plan making some easy-making .cs creation ? This one could be great !
  6. rangerofthewest Raincoat Zombie

    Amen to that, Obsidian!
  7. >:SYNTAX Mouse

    it is writen in vb i think i just downloaded it and taught myself how to wright the code

    there will be a tab on everything in Terraria when i get the time to figure out how it works such as world generation .

    i think ive fixed the bug so the download should be avalabe again, im just trying to make it fool proof.
    Bullseye55 likes this.
  8. >:SYNTAX Mouse

    npc design might be a while away as i was trying to do npc in my mod and they dident turn out very well i might need some experience in c# or c++
  9. Obsidian54 Blazing Wheel

    Can i access the sourcecode? I may have some time thèse weeks to help, and i'm quite good in coding, or at least i should, as it's my work x(
  10. >:SYNTAX Mouse


    ok so the program is writen in vb what i mean by somone who knows about c# is for things like the npc part i might have a selection of settings on how you want it to spawn and other things and what you want it to sell, but i dont know how to wright code for a npc or anything to do with it so il need somone to wright the code and give samples of all the wayes they might spawn, so when the user selects spawn when: hardmode is enables or somthing i can make the program creat a .cs file and wright out the code to make an npc spawn when hard mode it enables,and so on

    but if you want the sorce code for my program im currently working on the Items tab to its currently not working

    this is the meat of it
    Code:
     
    Imports System.IO
    Public Class Form1
     
        Private Sub Money_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Money.CheckedChanged
            If Money.Checked = True Then
     
                Moneylable1.Visible = True
                Moneylable2.Visible = True
                Moneylable3.Visible = True
                Moneylable4.Visible = True
                Moneyvalue1.Visible = True
                Moneyvalue2.Visible = True
                Moneyvalue3.Visible = True
                Moneyvalue4.Visible = True
            Else
                Moneylable1.Visible = False
                Moneylable2.Visible = False
                Moneylable3.Visible = False
                Moneylable4.Visible = False
                Moneyvalue1.Visible = False
                Moneyvalue2.Visible = False
                Moneyvalue3.Visible = False
                Moneyvalue4.Visible = False
            End If
        End Sub
     
        Private Sub Moneyvalue1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Moneyvalue1.ValueChanged
     
            If Moneyvalue1.Value > 99 Then
     
                Moneyvalue1.Value = 99
     
     
            End If
     
        End Sub
     
        Private Sub Moneyvalue2_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Moneyvalue2.ValueChanged
     
            If Moneyvalue2.Value > 99 Then
     
                Moneyvalue2.Value = 99
     
            End If
        End Sub
     
        Private Sub Moneyvalue3_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Moneyvalue3.ValueChanged
     
            If Moneyvalue3.Value > 99 Then
     
                Moneyvalue3.Value = 99
     
            End If
     
     
        End Sub
     
        Private Sub Moneyvalue4_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Moneyvalue4.ValueChanged
     
            If Moneyvalue4.Value > 99 Then
     
                Moneyvalue4.Value = 99
     
            End If
     
        End Sub
     
        Private Sub Damage_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Damage.CheckedChanged
     
            If Damage.Checked = True Then
     
                Value1.Visible = True
     
            Else
     
                Value1.Visible = False
     
            End If
     
     
        End Sub
     
        Private Sub Knockback_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Knockback.CheckedChanged
     
            If Knockback.Checked = True Then
     
                Value2.Visible = True
     
            Else
     
                Value2.Visible = False
     
            End If
     
     
     
        End Sub
     
        Private Sub Usesound_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Usesound.CheckedChanged
     
            If Usesound.Checked = True Then
     
                Value7.Visible = True
     
            Else
     
                Value7.Visible = False
     
     
            End If
     
     
        End Sub
     
        Private Sub Value3_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
     
            Value3.Width = i.Width
     
        End Sub
     
        Private Sub Value4_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
     
            Value4.Width = i.Width
     
        End Sub
     
     
        Public Sub Create_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Create.Click
     
     
            Dim user As String
            user = Environment.UserName
     
            Dim file As System.IO.FileStream
     
            file = System.IO.File.Create(path1.Text & path2.Text & user & "\" & path4.Text & path5.Text & path6.Text & path7.Text & "Default.ini")
     
     
            FileOpen(1, (path1.Text & path2.Text & user & "\" & path4.Text & path5.Text & path6.Text & path7.Text & weaponname.Text & ".ini"), OpenMode.Output)
     
            Print(1, "[Stats]" & vbCrLf)
     
            If Damage.Checked = True Then
     
                Print(1, "damage=")
                Print(1, Value1.Text & vbCrLf)
     
            End If
     
            If Damage.Checked = True Then
     
                Print(1, "knockback=")
                Print(1, Value2.Text & vbCrLf)
     
            End If
     
            Print(1, "width=")
            Print(1, Value3.Text & vbCrLf)
            Print(1, "height=")
            Print(1, Value4.Text & vbCrLf)
            Print(1, "type=")
            Print(1, Value5.Text & vbCrLf)
            Print(1, "melee=")
            Print(1, Value6.Text & vbCrLf)
     
            If Usesound.Checked = True Then
     
                Print(1, "useSound=")
                Print(1, Value7.Text & vbCrLf)
     
            End If
     
            Print(1, "maxStack=")
            Print(1, Value8.Text & vbCrLf)
            Print(1, "scale=")
            Print(1, Value9.Text & vbCrLf)
     
            If usetime.Checked = True Then
     
                Print(1, "useTime=")
                Print(1, Value10.Text & vbCrLf)
     
            End If
     
            If useanimation.Checked = True Then
     
                Print(1, "useAnimation=")
                Print(1, Value11.Text & vbCrLf)
     
            End If
     
            If usestyle.Checked = True Then
     
                Print(1, "useStyle=")
                Print(1, Value12.Text & vbCrLf)
     
            End If
     
            If Money.Checked = True Then
     
                Print(1, "value=")
                Print(1, Moneyvalue1.Text)
                Print(1, Moneyvalue2.Text)
                Print(1, Moneyvalue3.Text)
                Print(1, Moneyvalue4.Text & vbCrLf)
     
            End If
     
            Print(1, "[recipe]" & vbCrLf)
     
            If amount.Checked = True Then
     
                Print(1, "amount=")
                Print(1, Value13.Text & vbCrLf)
     
            End If
     
     
            Print(1, "needWater=")
            Print(1, Value14.Text & vbCrLf)
     
            If items.Checked = True Then
     
                Print(1, "items=")
                Print(1, Value15.Text & vbCrLf)
     
            End If
     
     
     
            If tile.Checked = True Then
     
                Print(1, "tile=")
                Print(1, Value16.Text & vbCrLf)
     
            End If
     
            FileClose(1)
     
        End Sub
     
        Private Sub usetime_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles usetime.CheckedChanged
     
            If usetime.Checked = True Then
     
                Value10.Visible = True
     
            Else
     
                Value10.Visible = False
     
            End If
     
        End Sub
     
        Private Sub useanimation_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles useanimation.CheckedChanged
     
            If useanimation.Checked = True Then
     
                Value11.Visible = True
     
            Else
     
                Value11.Visible = False
     
            End If
     
        End Sub
     
        Private Sub usestyle_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles usestyle.CheckedChanged
     
            If usestyle.Checked = True Then
     
                Value12.Visible = True
     
            Else
     
                Value12.Visible = False
     
            End If
     
        End Sub
     
        Private Sub amount_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles amount.CheckedChanged
     
            If amount.Checked = True Then
     
                Value13.Visible = True
     
            Else
     
                Value13.Visible = False
     
            End If
     
        End Sub
     
        Private Sub items_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles items.CheckedChanged
     
            If items.Checked = True Then
     
                Value15.Visible = True
     
            Else
     
                Value15.Visible = False
     
            End If
     
        End Sub
     
        Private Sub tile_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tile.CheckedChanged
     
            If tile.Checked = True Then
     
                Value16.Visible = True
     
            Else
     
                Value16.Visible = False
     
            End If
     
        End Sub
     
        Private Sub itemmoney_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles itemmoney.CheckedChanged
            If itemmoney.Checked = True Then
     
                itemmoneylable1.Visible = True
                itemmoneylable2.Visible = True
                itemmoneylable3.Visible = True
                itemmoneylable4.Visible = True
                itemmoneyvalue1.Visible = True
                itemmoneyvalue2.Visible = True
                itemmoneyvalue3.Visible = True
                itemmoneyvalue4.Visible = True
            Else
                itemmoneylable1.Visible = False
                itemmoneylable2.Visible = False
                itemmoneylable3.Visible = False
                itemmoneylable4.Visible = False
                itemmoneyvalue1.Visible = False
                itemmoneyvalue2.Visible = False
                itemmoneyvalue3.Visible = False
                itemmoneyvalue4.Visible = False
            End If
     
     
     
        End Sub
    End Class



    and this is the shell and what mekes it look good :)
    Code:
    <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
    Partial Class Form1
        Inherits System.Windows.Forms.Form
     
        'Form overrides dispose to clean up the component list.
        <System.Diagnostics.DebuggerNonUserCode()> _
        Protected Overrides Sub Dispose(ByVal disposing As Boolean)
            Try
                If disposing AndAlso components IsNot Nothing Then
                    components.Dispose()
                End If
            Finally
                MyBase.Dispose(disposing)
            End Try
        End Sub
     
        'Required by the Windows Form Designer
        Private components As System.ComponentModel.IContainer
     
        'NOTE: The following procedure is required by the Windows Form Designer
        'It can be modified using the Windows Form Designer. 
        'Do not modify it using the code editor.
        <System.Diagnostics.DebuggerStepThrough()> _
        Private Sub InitializeComponent()
            Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
            Me.TabPage4 = New System.Windows.Forms.TabPage
            Me.TabPage3 = New System.Windows.Forms.TabPage
            Me.itemvalue7 = New System.Windows.Forms.TabPage
            Me.itemmoneyvalue4 = New System.Windows.Forms.NumericUpDown
            Me.itemmoneyvalue3 = New System.Windows.Forms.NumericUpDown
            Me.itemmoneyvalue2 = New System.Windows.Forms.NumericUpDown
            Me.itemmoneyvalue1 = New System.Windows.Forms.NumericUpDown
            Me.itemmoneylable4 = New System.Windows.Forms.Label
            Me.itemmoneylable3 = New System.Windows.Forms.Label
            Me.itemmoneylable2 = New System.Windows.Forms.Label
            Me.itemmoneylable1 = New System.Windows.Forms.Label
            Me.itemmoney = New System.Windows.Forms.CheckBox
            Me.itemscale = New System.Windows.Forms.Label
            Me.itemuseturn = New System.Windows.Forms.Label
            Me.itemautoreuse = New System.Windows.Forms.Label
            Me.ComboBox1 = New System.Windows.Forms.ComboBox
            Me.itemmaxstack = New System.Windows.Forms.CheckBox
            Me.itemusetime = New System.Windows.Forms.CheckBox
            Me.itemuseanimation = New System.Windows.Forms.CheckBox
            Me.itemusestyle = New System.Windows.Forms.CheckBox
            Me.itemtype = New System.Windows.Forms.Label
            Me.itemheight = New System.Windows.Forms.Label
            Me.itemwidth = New System.Windows.Forms.Label
            Me.itemvalue10 = New System.Windows.Forms.ComboBox
            Me.itemvalue9 = New System.Windows.Forms.ComboBox
            Me.itemvalue11 = New System.Windows.Forms.TextBox
            Me.itemvalue8 = New System.Windows.Forms.TextBox
            Me.TextBox1 = New System.Windows.Forms.TextBox
            Me.itemvalue6 = New System.Windows.Forms.TextBox
            Me.itemvalue4 = New System.Windows.Forms.TextBox
            Me.itemvalue3 = New System.Windows.Forms.TextBox
            Me.itemvalue2 = New System.Windows.Forms.TextBox
            Me.itemvalue1 = New System.Windows.Forms.TextBox
            Me.itemname = New System.Windows.Forms.Label
            Me.item = New System.Windows.Forms.Label
            Me.WeaponsTab = New System.Windows.Forms.TabPage
            Me.needwater = New System.Windows.Forms.Label
            Me.userlable = New System.Windows.Forms.Label
            Me.hugh = New System.Windows.Forms.Label
            Me.path7 = New System.Windows.Forms.TextBox
            Me.path6 = New System.Windows.Forms.TextBox
            Me.path5 = New System.Windows.Forms.TextBox
            Me.path4 = New System.Windows.Forms.TextBox
            Me.path2 = New System.Windows.Forms.TextBox
            Me.path1 = New System.Windows.Forms.TextBox
            Me.path = New System.Windows.Forms.Label
            Me.scale = New System.Windows.Forms.Label
            Me.maxstack = New System.Windows.Forms.Label
            Me.melee = New System.Windows.Forms.Label
            Me.type = New System.Windows.Forms.Label
            Me.height = New System.Windows.Forms.Label
            Me.width = New System.Windows.Forms.Label
            Me.Value16 = New System.Windows.Forms.TextBox
            Me.tile = New System.Windows.Forms.CheckBox
            Me.Value14 = New System.Windows.Forms.ComboBox
            Me.Value13 = New System.Windows.Forms.TextBox
            Me.Value15 = New System.Windows.Forms.TextBox
            Me.items = New System.Windows.Forms.CheckBox
            Me.amount = New System.Windows.Forms.CheckBox
            Me.recipe = New System.Windows.Forms.Label
            Me.Value9 = New System.Windows.Forms.TextBox
            Me.weaponname = New System.Windows.Forms.TextBox
            Me.wepname = New System.Windows.Forms.Label
            Me.Value12 = New System.Windows.Forms.ComboBox
            Me.Value11 = New System.Windows.Forms.TextBox
            Me.Value10 = New System.Windows.Forms.TextBox
            Me.usestyle = New System.Windows.Forms.CheckBox
            Me.useanimation = New System.Windows.Forms.CheckBox
            Me.usetime = New System.Windows.Forms.CheckBox
            Me.Value8 = New System.Windows.Forms.TextBox
            Me.Value7 = New System.Windows.Forms.TextBox
            Me.Value4 = New System.Windows.Forms.TextBox
            Me.Value3 = New System.Windows.Forms.TextBox
            Me.Value2 = New System.Windows.Forms.TextBox
            Me.Value1 = New System.Windows.Forms.TextBox
            Me.Value5 = New System.Windows.Forms.TextBox
            Me.Moneyvalue4 = New System.Windows.Forms.NumericUpDown
            Me.Moneylable4 = New System.Windows.Forms.Label
            Me.Moneyvalue3 = New System.Windows.Forms.NumericUpDown
            Me.Moneylable3 = New System.Windows.Forms.Label
            Me.Moneyvalue2 = New System.Windows.Forms.NumericUpDown
            Me.Moneylable2 = New System.Windows.Forms.Label
            Me.Moneylable1 = New System.Windows.Forms.Label
            Me.Moneyvalue1 = New System.Windows.Forms.NumericUpDown
            Me.Money = New System.Windows.Forms.CheckBox
            Me.Usesound = New System.Windows.Forms.CheckBox
            Me.Value6 = New System.Windows.Forms.ComboBox
            Me.choose = New System.Windows.Forms.Button
            Me.i = New System.Windows.Forms.PictureBox
            Me.Create = New System.Windows.Forms.Button
            Me.Knockback = New System.Windows.Forms.CheckBox
            Me.Label1 = New System.Windows.Forms.Label
            Me.Damage = New System.Windows.Forms.CheckBox
            Me.Menu = New System.Windows.Forms.TabControl
            Me.CheckBox1 = New System.Windows.Forms.CheckBox
            Me.TextBox2 = New System.Windows.Forms.TextBox
            Me.itemvalue7.SuspendLayout()
            CType(Me.itemmoneyvalue4, System.ComponentModel.ISupportInitialize).BeginInit()
            CType(Me.itemmoneyvalue3, System.ComponentModel.ISupportInitialize).BeginInit()
            CType(Me.itemmoneyvalue2, System.ComponentModel.ISupportInitialize).BeginInit()
            CType(Me.itemmoneyvalue1, System.ComponentModel.ISupportInitialize).BeginInit()
            Me.WeaponsTab.SuspendLayout()
            CType(Me.Moneyvalue4, System.ComponentModel.ISupportInitialize).BeginInit()
            CType(Me.Moneyvalue3, System.ComponentModel.ISupportInitialize).BeginInit()
            CType(Me.Moneyvalue2, System.ComponentModel.ISupportInitialize).BeginInit()
            CType(Me.Moneyvalue1, System.ComponentModel.ISupportInitialize).BeginInit()
            CType(Me.i, System.ComponentModel.ISupportInitialize).BeginInit()
            Me.Menu.SuspendLayout()
            Me.SuspendLayout()
            '
            'TabPage4
            '
            Me.TabPage4.BackColor = System.Drawing.Color.Honeydew
            Me.TabPage4.Location = New System.Drawing.Point(4, 22)
            Me.TabPage4.Name = "TabPage4"
            Me.TabPage4.Padding = New System.Windows.Forms.Padding(3)
            Me.TabPage4.Size = New System.Drawing.Size(1095, 649)
            Me.TabPage4.TabIndex = 3
            Me.TabPage4.Text = "Vanity"
            '
            'TabPage3
            '
            Me.TabPage3.BackColor = System.Drawing.Color.PeachPuff
            Me.TabPage3.Location = New System.Drawing.Point(4, 22)
            Me.TabPage3.Name = "TabPage3"
            Me.TabPage3.Padding = New System.Windows.Forms.Padding(3)
            Me.TabPage3.Size = New System.Drawing.Size(1095, 649)
            Me.TabPage3.TabIndex = 2
            Me.TabPage3.Text = "Amour"
            '
            'itemvalue7
            '
            Me.itemvalue7.BackColor = System.Drawing.Color.MistyRose
            Me.itemvalue7.Controls.Add(Me.TextBox2)
            Me.itemvalue7.Controls.Add(Me.CheckBox1)
            Me.itemvalue7.Controls.Add(Me.itemmoneyvalue4)
            Me.itemvalue7.Controls.Add(Me.itemmoneyvalue3)
            Me.itemvalue7.Controls.Add(Me.itemmoneyvalue2)
            Me.itemvalue7.Controls.Add(Me.itemmoneyvalue1)
            Me.itemvalue7.Controls.Add(Me.itemmoneylable4)
            Me.itemvalue7.Controls.Add(Me.itemmoneylable3)
            Me.itemvalue7.Controls.Add(Me.itemmoneylable2)
            Me.itemvalue7.Controls.Add(Me.itemmoneylable1)
            Me.itemvalue7.Controls.Add(Me.itemmoney)
            Me.itemvalue7.Controls.Add(Me.itemscale)
            Me.itemvalue7.Controls.Add(Me.itemuseturn)
            Me.itemvalue7.Controls.Add(Me.itemautoreuse)
            Me.itemvalue7.Controls.Add(Me.ComboBox1)
            Me.itemvalue7.Controls.Add(Me.itemmaxstack)
            Me.itemvalue7.Controls.Add(Me.itemusetime)
            Me.itemvalue7.Controls.Add(Me.itemuseanimation)
            Me.itemvalue7.Controls.Add(Me.itemusestyle)
            Me.itemvalue7.Controls.Add(Me.itemtype)
            Me.itemvalue7.Controls.Add(Me.itemheight)
            Me.itemvalue7.Controls.Add(Me.itemwidth)
            Me.itemvalue7.Controls.Add(Me.itemvalue10)
            Me.itemvalue7.Controls.Add(Me.itemvalue9)
            Me.itemvalue7.Controls.Add(Me.itemvalue11)
            Me.itemvalue7.Controls.Add(Me.itemvalue8)
            Me.itemvalue7.Controls.Add(Me.TextBox1)
            Me.itemvalue7.Controls.Add(Me.itemvalue6)
            Me.itemvalue7.Controls.Add(Me.itemvalue4)
            Me.itemvalue7.Controls.Add(Me.itemvalue3)
            Me.itemvalue7.Controls.Add(Me.itemvalue2)
            Me.itemvalue7.Controls.Add(Me.itemvalue1)
            Me.itemvalue7.Controls.Add(Me.itemname)
            Me.itemvalue7.Controls.Add(Me.item)
            Me.itemvalue7.Location = New System.Drawing.Point(4, 22)
            Me.itemvalue7.Name = "itemvalue7"
            Me.itemvalue7.Padding = New System.Windows.Forms.Padding(3)
            Me.itemvalue7.Size = New System.Drawing.Size(1095, 649)
            Me.itemvalue7.TabIndex = 1
            Me.itemvalue7.Text = "Item"
            '
            'itemmoneyvalue4
            '
            Me.itemmoneyvalue4.Location = New System.Drawing.Point(369, 358)
            Me.itemmoneyvalue4.Name = "itemmoneyvalue4"
            Me.itemmoneyvalue4.Size = New System.Drawing.Size(37, 20)
            Me.itemmoneyvalue4.TabIndex = 33
            '
            'itemmoneyvalue3
            '
            Me.itemmoneyvalue3.Location = New System.Drawing.Point(295, 360)
            Me.itemmoneyvalue3.Name = "itemmoneyvalue3"
            Me.itemmoneyvalue3.Size = New System.Drawing.Size(33, 20)
            Me.itemmoneyvalue3.TabIndex = 32
            '
            'itemmoneyvalue2
            '
            Me.itemmoneyvalue2.Location = New System.Drawing.Point(230, 358)
            Me.itemmoneyvalue2.Name = "itemmoneyvalue2"
            Me.itemmoneyvalue2.Size = New System.Drawing.Size(32, 20)
            Me.itemmoneyvalue2.TabIndex = 31
            '
            'itemmoneyvalue1
            '
            Me.itemmoneyvalue1.Location = New System.Drawing.Point(164, 355)
            Me.itemmoneyvalue1.Name = "itemmoneyvalue1"
            Me.itemmoneyvalue1.Size = New System.Drawing.Size(31, 20)
            Me.itemmoneyvalue1.TabIndex = 30
            '
            'itemmoneylable4
            '
            Me.itemmoneylable4.AutoSize = True
            Me.itemmoneylable4.Location = New System.Drawing.Point(346, 362)
            Me.itemmoneylable4.Name = "itemmoneylable4"
            Me.itemmoneylable4.Size = New System.Drawing.Size(21, 13)
            Me.itemmoneylable4.TabIndex = 29
            Me.itemmoneylable4.Text = "CC"
            '
            'itemmoneylable3
            '
            Me.itemmoneylable3.AutoSize = True
            Me.itemmoneylable3.Location = New System.Drawing.Point(268, 362)
            Me.itemmoneylable3.Name = "itemmoneylable3"
            Me.itemmoneylable3.Size = New System.Drawing.Size(21, 13)
            Me.itemmoneylable3.TabIndex = 28
            Me.itemmoneylable3.Text = "SS"
            '
            'itemmoneylable2
            '
            Me.itemmoneylable2.AutoSize = True
            Me.itemmoneylable2.Location = New System.Drawing.Point(201, 362)
            Me.itemmoneylable2.Name = "itemmoneylable2"
            Me.itemmoneylable2.Size = New System.Drawing.Size(23, 13)
            Me.itemmoneylable2.TabIndex = 27
            Me.itemmoneylable2.Text = "GG"
            '
            'itemmoneylable1
            '
            Me.itemmoneylable1.AutoSize = True
            Me.itemmoneylable1.Location = New System.Drawing.Point(135, 362)
            Me.itemmoneylable1.Name = "itemmoneylable1"
            Me.itemmoneylable1.Size = New System.Drawing.Size(21, 13)
            Me.itemmoneylable1.TabIndex = 26
            Me.itemmoneylable1.Text = "PP"
            '
            'itemmoney
            '
            Me.itemmoney.AutoSize = True
            Me.itemmoney.Checked = True
            Me.itemmoney.CheckState = System.Windows.Forms.CheckState.Checked
            Me.itemmoney.Location = New System.Drawing.Point(48, 361)
            Me.itemmoney.Name = "itemmoney"
            Me.itemmoney.Size = New System.Drawing.Size(58, 17)
            Me.itemmoney.TabIndex = 25
            Me.itemmoney.Text = "Money"
            Me.itemmoney.UseVisualStyleBackColor = True
            '
            'itemscale
            '
            Me.itemscale.AutoSize = True
            Me.itemscale.Location = New System.Drawing.Point(72, 336)
            Me.itemscale.Name = "itemscale"
            Me.itemscale.Size = New System.Drawing.Size(34, 13)
            Me.itemscale.TabIndex = 24
            Me.itemscale.Text = "Scale"
            '
            'itemuseturn
            '
            Me.itemuseturn.AutoSize = True
            Me.itemuseturn.Location = New System.Drawing.Point(55, 310)
            Me.itemuseturn.Name = "itemuseturn"
            Me.itemuseturn.Size = New System.Drawing.Size(51, 13)
            Me.itemuseturn.TabIndex = 23
            Me.itemuseturn.Text = "Use Turn"
            '
            'itemautoreuse
            '
            Me.itemautoreuse.AutoSize = True
            Me.itemautoreuse.Location = New System.Drawing.Point(43, 283)
            Me.itemautoreuse.Name = "itemautoreuse"
            Me.itemautoreuse.Size = New System.Drawing.Size(63, 13)
            Me.itemautoreuse.TabIndex = 22
            Me.itemautoreuse.Text = "Auto Reuse"
            '
            'ComboBox1
            '
            Me.ComboBox1.FormattingEnabled = True
            Me.ComboBox1.Items.AddRange(New Object() {"1", "2", "3", "4", "5"})
            Me.ComboBox1.Location = New System.Drawing.Point(132, 171)
            Me.ComboBox1.Name = "ComboBox1"
            Me.ComboBox1.Size = New System.Drawing.Size(106, 21)
            Me.ComboBox1.TabIndex = 21
            Me.ComboBox1.Text = "1"
            '
            'itemmaxstack
            '
            Me.itemmaxstack.AutoSize = True
            Me.itemmaxstack.Checked = True
            Me.itemmaxstack.CheckState = System.Windows.Forms.CheckState.Checked
            Me.itemmaxstack.Location = New System.Drawing.Point(26, 253)
            Me.itemmaxstack.Name = "itemmaxstack"
            Me.itemmaxstack.Size = New System.Drawing.Size(80, 17)
            Me.itemmaxstack.TabIndex = 19
            Me.itemmaxstack.Text = "Max Stack "
            Me.itemmaxstack.UseVisualStyleBackColor = True
            '
            'itemusetime
            '
            Me.itemusetime.AutoSize = True
            Me.itemusetime.Checked = True
            Me.itemusetime.CheckState = System.Windows.Forms.CheckState.Checked
            Me.itemusetime.Location = New System.Drawing.Point(35, 227)
            Me.itemusetime.Name = "itemusetime"
            Me.itemusetime.Size = New System.Drawing.Size(71, 17)
            Me.itemusetime.TabIndex = 18
            Me.itemusetime.Text = "Use Time"
            Me.itemusetime.UseVisualStyleBackColor = True
            '
            'itemuseanimation
            '
            Me.itemuseanimation.AutoSize = True
            Me.itemuseanimation.Checked = True
            Me.itemuseanimation.CheckState = System.Windows.Forms.CheckState.Checked
            Me.itemuseanimation.Location = New System.Drawing.Point(12, 201)
            Me.itemuseanimation.Name = "itemuseanimation"
            Me.itemuseanimation.Size = New System.Drawing.Size(94, 17)
            Me.itemuseanimation.TabIndex = 17
            Me.itemuseanimation.Text = "Use Animation"
            Me.itemuseanimation.UseVisualStyleBackColor = True
            '
            'itemusestyle
            '
            Me.itemusestyle.AutoSize = True
            Me.itemusestyle.Checked = True
            Me.itemusestyle.CheckState = System.Windows.Forms.CheckState.Checked
            Me.itemusestyle.Location = New System.Drawing.Point(35, 175)
            Me.itemusestyle.Name = "itemusestyle"
            Me.itemusestyle.Size = New System.Drawing.Size(71, 17)
            Me.itemusestyle.TabIndex = 16
            Me.itemusestyle.Text = "Use Style"
            Me.itemusestyle.UseVisualStyleBackColor = True
            '
            'itemtype
            '
            Me.itemtype.AutoSize = True
            Me.itemtype.Location = New System.Drawing.Point(75, 146)
            Me.itemtype.Name = "itemtype"
            Me.itemtype.Size = New System.Drawing.Size(31, 13)
            Me.itemtype.TabIndex = 15
            Me.itemtype.Text = "Type"
            '
            'itemheight
            '
            Me.itemheight.AutoSize = True
            Me.itemheight.Location = New System.Drawing.Point(68, 123)
            Me.itemheight.Name = "itemheight"
            Me.itemheight.Size = New System.Drawing.Size(38, 13)
            Me.itemheight.TabIndex = 14
            Me.itemheight.Text = "Height"
            '
            'itemwidth
            '
            Me.itemwidth.AutoSize = True
            Me.itemwidth.Location = New System.Drawing.Point(71, 97)
            Me.itemwidth.Name = "itemwidth"
            Me.itemwidth.Size = New System.Drawing.Size(35, 13)
            Me.itemwidth.TabIndex = 13
            Me.itemwidth.Text = "Width"
            '
            'itemvalue10
            '
            Me.itemvalue10.FormattingEnabled = True
            Me.itemvalue10.Items.AddRange(New Object() {"True", "False"})
            Me.itemvalue10.Location = New System.Drawing.Point(133, 302)
            Me.itemvalue10.Name = "itemvalue10"
            Me.itemvalue10.Size = New System.Drawing.Size(107, 21)
            Me.itemvalue10.TabIndex = 12
            Me.itemvalue10.Text = "True"
            '
            'itemvalue9
            '
            Me.itemvalue9.FormattingEnabled = True
            Me.itemvalue9.Items.AddRange(New Object() {"True", "False"})
            Me.itemvalue9.Location = New System.Drawing.Point(132, 275)
            Me.itemvalue9.Name = "itemvalue9"
            Me.itemvalue9.Size = New System.Drawing.Size(107, 21)
            Me.itemvalue9.TabIndex = 11
            Me.itemvalue9.Text = "True"
            '
            'itemvalue11
            '
            Me.itemvalue11.Location = New System.Drawing.Point(134, 329)
            Me.itemvalue11.Name = "itemvalue11"
            Me.itemvalue11.Size = New System.Drawing.Size(104, 20)
            Me.itemvalue11.TabIndex = 10
            '
            'itemvalue8
            '
            Me.itemvalue8.Location = New System.Drawing.Point(133, 250)
            Me.itemvalue8.Name = "itemvalue8"
            Me.itemvalue8.Size = New System.Drawing.Size(107, 20)
            Me.itemvalue8.TabIndex = 9
            '
            'TextBox1
            '
            Me.TextBox1.Location = New System.Drawing.Point(133, 224)
            Me.TextBox1.Name = "TextBox1"
            Me.TextBox1.Size = New System.Drawing.Size(105, 20)
            Me.TextBox1.TabIndex = 8
            '
            'itemvalue6
            '
            Me.itemvalue6.Location = New System.Drawing.Point(133, 198)
            Me.itemvalue6.Name = "itemvalue6"
            Me.itemvalue6.Size = New System.Drawing.Size(105, 20)
            Me.itemvalue6.TabIndex = 7
            '
            'itemvalue4
            '
            Me.itemvalue4.Enabled = False
            Me.itemvalue4.Location = New System.Drawing.Point(134, 146)
            Me.itemvalue4.Name = "itemvalue4"
            Me.itemvalue4.Size = New System.Drawing.Size(22, 20)
            Me.itemvalue4.TabIndex = 5
            Me.itemvalue4.Text = "-1"
            '
            'itemvalue3
            '
            Me.itemvalue3.Location = New System.Drawing.Point(133, 116)
            Me.itemvalue3.Name = "itemvalue3"
            Me.itemvalue3.Size = New System.Drawing.Size(107, 20)
            Me.itemvalue3.TabIndex = 4
            '
            'itemvalue2
            '
            Me.itemvalue2.Location = New System.Drawing.Point(133, 90)
            Me.itemvalue2.Name = "itemvalue2"
            Me.itemvalue2.Size = New System.Drawing.Size(107, 20)
            Me.itemvalue2.TabIndex = 3
            '
            'itemvalue1
            '
            Me.itemvalue1.Location = New System.Drawing.Point(133, 64)
            Me.itemvalue1.Name = "itemvalue1"
            Me.itemvalue1.Size = New System.Drawing.Size(107, 20)
            Me.itemvalue1.TabIndex = 2
            Me.itemvalue1.Text = "Default Item"
            '
            'itemname
            '
            Me.itemname.AutoSize = True
            Me.itemname.Location = New System.Drawing.Point(48, 71)
            Me.itemname.Name = "itemname"
            Me.itemname.Size = New System.Drawing.Size(58, 13)
            Me.itemname.TabIndex = 1
            Me.itemname.Text = "Item Name"
            '
            'item
            '
            Me.item.AutoSize = True
            Me.item.Font = New System.Drawing.Font("Microsoft Sans Serif", 32.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
            Me.item.Location = New System.Drawing.Point(19, 13)
            Me.item.Name = "item"
            Me.item.Size = New System.Drawing.Size(110, 51)
            Me.item.TabIndex = 0
            Me.item.Text = "Item"
            '
            'WeaponsTab
            '
            Me.WeaponsTab.BackColor = System.Drawing.Color.Beige
            Me.WeaponsTab.Controls.Add(Me.needwater)
            Me.WeaponsTab.Controls.Add(Me.userlable)
            Me.WeaponsTab.Controls.Add(Me.hugh)
            Me.WeaponsTab.Controls.Add(Me.path7)
            Me.WeaponsTab.Controls.Add(Me.path6)
            Me.WeaponsTab.Controls.Add(Me.path5)
            Me.WeaponsTab.Controls.Add(Me.path4)
            Me.WeaponsTab.Controls.Add(Me.path2)
            Me.WeaponsTab.Controls.Add(Me.path1)
            Me.WeaponsTab.Controls.Add(Me.path)
            Me.WeaponsTab.Controls.Add(Me.scale)
            Me.WeaponsTab.Controls.Add(Me.maxstack)
            Me.WeaponsTab.Controls.Add(Me.melee)
            Me.WeaponsTab.Controls.Add(Me.type)
            Me.WeaponsTab.Controls.Add(Me.height)
            Me.WeaponsTab.Controls.Add(Me.width)
            Me.WeaponsTab.Controls.Add(Me.Value16)
            Me.WeaponsTab.Controls.Add(Me.tile)
            Me.WeaponsTab.Controls.Add(Me.Value14)
            Me.WeaponsTab.Controls.Add(Me.Value13)
            Me.WeaponsTab.Controls.Add(Me.Value15)
            Me.WeaponsTab.Controls.Add(Me.items)
            Me.WeaponsTab.Controls.Add(Me.amount)
            Me.WeaponsTab.Controls.Add(Me.recipe)
            Me.WeaponsTab.Controls.Add(Me.Value9)
            Me.WeaponsTab.Controls.Add(Me.weaponname)
            Me.WeaponsTab.Controls.Add(Me.wepname)
            Me.WeaponsTab.Controls.Add(Me.Value12)
            Me.WeaponsTab.Controls.Add(Me.Value11)
            Me.WeaponsTab.Controls.Add(Me.Value10)
            Me.WeaponsTab.Controls.Add(Me.usestyle)
            Me.WeaponsTab.Controls.Add(Me.useanimation)
            Me.WeaponsTab.Controls.Add(Me.usetime)
            Me.WeaponsTab.Controls.Add(Me.Value8)
            Me.WeaponsTab.Controls.Add(Me.Value7)
            Me.WeaponsTab.Controls.Add(Me.Value4)
            Me.WeaponsTab.Controls.Add(Me.Value3)
            Me.WeaponsTab.Controls.Add(Me.Value2)
            Me.WeaponsTab.Controls.Add(Me.Value1)
            Me.WeaponsTab.Controls.Add(Me.Value5)
            Me.WeaponsTab.Controls.Add(Me.Moneyvalue4)
            Me.WeaponsTab.Controls.Add(Me.Moneylable4)
            Me.WeaponsTab.Controls.Add(Me.Moneyvalue3)
            Me.WeaponsTab.Controls.Add(Me.Moneylable3)
            Me.WeaponsTab.Controls.Add(Me.Moneyvalue2)
            Me.WeaponsTab.Controls.Add(Me.Moneylable2)
            Me.WeaponsTab.Controls.Add(Me.Moneylable1)
            Me.WeaponsTab.Controls.Add(Me.Moneyvalue1)
            Me.WeaponsTab.Controls.Add(Me.Money)
            Me.WeaponsTab.Controls.Add(Me.Usesound)
            Me.WeaponsTab.Controls.Add(Me.Value6)
            Me.WeaponsTab.Controls.Add(Me.choose)
            Me.WeaponsTab.Controls.Add(Me.i)
            Me.WeaponsTab.Controls.Add(Me.Create)
            Me.WeaponsTab.Controls.Add(Me.Knockback)
            Me.WeaponsTab.Controls.Add(Me.Label1)
            Me.WeaponsTab.Controls.Add(Me.Damage)
            Me.WeaponsTab.Location = New System.Drawing.Point(4, 22)
            Me.WeaponsTab.Name = "WeaponsTab"
            Me.WeaponsTab.Padding = New System.Windows.Forms.Padding(3)
            Me.WeaponsTab.Size = New System.Drawing.Size(1095, 649)
            Me.WeaponsTab.TabIndex = 0
            Me.WeaponsTab.Text = "Weapon"
            '
            'needwater
            '
            Me.needwater.AutoSize = True
            Me.needwater.Location = New System.Drawing.Point(40, 489)
            Me.needwater.Name = "needwater"
            Me.needwater.Size = New System.Drawing.Size(65, 13)
            Me.needwater.TabIndex = 87
            Me.needwater.Text = "Need Water"
            '
            'userlable
            '
            Me.userlable.AutoSize = True
            Me.userlable.Location = New System.Drawing.Point(375, 67)
            Me.userlable.Name = "userlable"
            Me.userlable.Size = New System.Drawing.Size(72, 13)
            Me.userlable.TabIndex = 86
            Me.userlable.Text = "<User Name>"
            '
            'hugh
            '
            Me.hugh.AutoSize = True
            Me.hugh.ForeColor = System.Drawing.SystemColors.ControlText
            Me.hugh.Location = New System.Drawing.Point(45, 597)
            Me.hugh.Name = "hugh"
            Me.hugh.Size = New System.Drawing.Size(160, 13)
            Me.hugh.TabIndex = 85
            Me.hugh.Text = "BY HUGH BARROW (SYNTAX)"
            '
            'path7
            '
            Me.path7.Location = New System.Drawing.Point(699, 64)
            Me.path7.Name = "path7"
            Me.path7.Size = New System.Drawing.Size(77, 20)
            Me.path7.TabIndex = 84
            Me.path7.Text = "ModPacks\"
            '
            'path6
            '
            Me.path6.Location = New System.Drawing.Point(636, 64)
            Me.path6.Name = "path6"
            Me.path6.Size = New System.Drawing.Size(57, 20)
            Me.path6.TabIndex = 83
            Me.path6.Text = "Terraria\"
            '
            'path5
            '
            Me.path5.Location = New System.Drawing.Point(568, 64)
            Me.path5.Name = "path5"
            Me.path5.Size = New System.Drawing.Size(62, 20)
            Me.path5.TabIndex = 82
            Me.path5.Text = "My Games\"
            '
            'path4
            '
            Me.path4.Location = New System.Drawing.Point(466, 64)
            Me.path4.Name = "path4"
            Me.path4.Size = New System.Drawing.Size(96, 20)
            Me.path4.TabIndex = 81
            Me.path4.Text = "My Documents\"
            '
            'path2
            '
            Me.path2.Location = New System.Drawing.Point(313, 64)
            Me.path2.Name = "path2"
            Me.path2.Size = New System.Drawing.Size(45, 20)
            Me.path2.TabIndex = 79
            Me.path2.Text = "Users\"
            '
            'path1
            '
            Me.path1.Location = New System.Drawing.Point(273, 64)
            Me.path1.Name = "path1"
            Me.path1.Size = New System.Drawing.Size(34, 20)
            Me.path1.TabIndex = 78
            Me.path1.Text = "c:\"
            '
            'path
            '
            Me.path.AutoSize = True
            Me.path.Location = New System.Drawing.Point(289, 37)
            Me.path.Name = "path"
            Me.path.Size = New System.Drawing.Size(29, 13)
            Me.path.TabIndex = 77
            Me.path.Text = "Path"
            '
            'scale
            '
            Me.scale.AutoSize = True
            Me.scale.Location = New System.Drawing.Point(40, 302)
            Me.scale.Name = "scale"
            Me.scale.Size = New System.Drawing.Size(34, 13)
            Me.scale.TabIndex = 75
            Me.scale.Text = "Scale"
            '
            'maxstack
            '
            Me.maxstack.AutoSize = True
            Me.maxstack.Location = New System.Drawing.Point(40, 278)
            Me.maxstack.Name = "maxstack"
            Me.maxstack.Size = New System.Drawing.Size(58, 13)
            Me.maxstack.TabIndex = 74
            Me.maxstack.Text = "Max Stack"
            '
            'melee
            '
            Me.melee.AutoSize = True
            Me.melee.Location = New System.Drawing.Point(40, 223)
            Me.melee.Name = "melee"
            Me.melee.Size = New System.Drawing.Size(36, 13)
            Me.melee.TabIndex = 73
            Me.melee.Text = "Melee"
            '
            'type
            '
            Me.type.AutoSize = True
            Me.type.Location = New System.Drawing.Point(40, 196)
            Me.type.Name = "type"
            Me.type.Size = New System.Drawing.Size(31, 13)
            Me.type.TabIndex = 72
            Me.type.Text = "Type"
            '
            'height
            '
            Me.height.AutoSize = True
            Me.height.Location = New System.Drawing.Point(40, 170)
            Me.height.Name = "height"
            Me.height.Size = New System.Drawing.Size(38, 13)
            Me.height.TabIndex = 71
            Me.height.Text = "Height"
            '
            'width
            '
            Me.width.AutoSize = True
            Me.width.Location = New System.Drawing.Point(40, 146)
            Me.width.Name = "width"
            Me.width.Size = New System.Drawing.Size(35, 13)
            Me.width.TabIndex = 70
            Me.width.Text = "Width"
            '
            'Value16
            '
            Me.Value16.Location = New System.Drawing.Point(122, 535)
            Me.Value16.Name = "Value16"
            Me.Value16.Size = New System.Drawing.Size(100, 20)
            Me.Value16.TabIndex = 69
            '
            'tile
            '
            Me.tile.AutoSize = True
            Me.tile.Checked = True
            Me.tile.CheckState = System.Windows.Forms.CheckState.Checked
            Me.tile.Location = New System.Drawing.Point(25, 535)
            Me.tile.Name = "tile"
            Me.tile.Size = New System.Drawing.Size(43, 17)
            Me.tile.TabIndex = 68
            Me.tile.Text = "Tile"
            Me.tile.UseVisualStyleBackColor = True
            '
            'Value14
            '
            Me.Value14.FormattingEnabled = True
            Me.Value14.Items.AddRange(New Object() {"False", "True"})
            Me.Value14.Location = New System.Drawing.Point(122, 481)
            Me.Value14.Name = "Value14"
            Me.Value14.Size = New System.Drawing.Size(57, 21)
            Me.Value14.TabIndex = 67
            Me.Value14.Text = "False"
            '
            'Value13
            '
            Me.Value13.Location = New System.Drawing.Point(121, 455)
            Me.Value13.Name = "Value13"
            Me.Value13.Size = New System.Drawing.Size(100, 20)
            Me.Value13.TabIndex = 66
            '
            'Value15
            '
            Me.Value15.Location = New System.Drawing.Point(122, 508)
            Me.Value15.Name = "Value15"
            Me.Value15.Size = New System.Drawing.Size(829, 20)
            Me.Value15.TabIndex = 65
            '
            'items
            '
            Me.items.AutoSize = True
            Me.items.Checked = True
            Me.items.CheckState = System.Windows.Forms.CheckState.Checked
            Me.items.Location = New System.Drawing.Point(25, 511)
            Me.items.Name = "items"
            Me.items.Size = New System.Drawing.Size(51, 17)
            Me.items.TabIndex = 64
            Me.items.Text = "Items"
            Me.items.UseVisualStyleBackColor = True
            '
            'amount
            '
            Me.amount.AutoSize = True
            Me.amount.Checked = True
            Me.amount.CheckState = System.Windows.Forms.CheckState.Checked
            Me.amount.Location = New System.Drawing.Point(26, 458)
            Me.amount.Name = "amount"
            Me.amount.Size = New System.Drawing.Size(62, 17)
            Me.amount.TabIndex = 62
            Me.amount.Text = "Amount"
            Me.amount.UseVisualStyleBackColor = True
            '
            'recipe
            '
            Me.recipe.AutoSize = True
            Me.recipe.Location = New System.Drawing.Point(43, 439)
            Me.recipe.Name = "recipe"
            Me.recipe.Size = New System.Drawing.Size(41, 13)
            Me.recipe.TabIndex = 61
            Me.recipe.Text = "Recipe"
            '
            'Value9
            '
            Me.Value9.Location = New System.Drawing.Point(122, 295)
            Me.Value9.Name = "Value9"
            Me.Value9.Size = New System.Drawing.Size(100, 20)
            Me.Value9.TabIndex = 0
            '
            'weaponname
            '
            Me.weaponname.Location = New System.Drawing.Point(122, 64)
            Me.weaponname.Name = "weaponname"
            Me.weaponname.Size = New System.Drawing.Size(100, 20)
            Me.weaponname.TabIndex = 0
            Me.weaponname.Text = "Default weapon"
            '
            'wepname
            '
            Me.wepname.AutoSize = True
            Me.wepname.Location = New System.Drawing.Point(40, 64)
            Me.wepname.Name = "wepname"
            Me.wepname.Size = New System.Drawing.Size(79, 13)
            Me.wepname.TabIndex = 57
            Me.wepname.Text = "Weapon Name"
            '
            'Value12
            '
            Me.Value12.FormattingEnabled = True
            Me.Value12.Items.AddRange(New Object() {"1", "2", "3", "4", "5"})
            Me.Value12.Location = New System.Drawing.Point(122, 374)
            Me.Value12.Name = "Value12"
            Me.Value12.Size = New System.Drawing.Size(97, 21)
            Me.Value12.TabIndex = 56
            Me.Value12.Text = "1"
            '
            'Value11
            '
            Me.Value11.Location = New System.Drawing.Point(122, 346)
            Me.Value11.Name = "Value11"
            Me.Value11.Size = New System.Drawing.Size(100, 20)
            Me.Value11.TabIndex = 55
            '
            'Value10
            '
            Me.Value10.Location = New System.Drawing.Point(122, 320)
            Me.Value10.Name = "Value10"
            Me.Value10.Size = New System.Drawing.Size(100, 20)
            Me.Value10.TabIndex = 54
            '
            'usestyle
            '
            Me.usestyle.AutoSize = True
            Me.usestyle.Checked = True
            Me.usestyle.CheckState = System.Windows.Forms.CheckState.Checked
            Me.usestyle.Location = New System.Drawing.Point(26, 378)
            Me.usestyle.Name = "usestyle"
            Me.usestyle.Size = New System.Drawing.Size(71, 17)
            Me.usestyle.TabIndex = 53
            Me.usestyle.Text = "Use Style"
            Me.usestyle.UseVisualStyleBackColor = True
            '
            'useanimation
            '
            Me.useanimation.AutoSize = True
            Me.useanimation.Checked = True
            Me.useanimation.CheckState = System.Windows.Forms.CheckState.Checked
            Me.useanimation.Location = New System.Drawing.Point(25, 350)
            Me.useanimation.Name = "useanimation"
            Me.useanimation.Size = New System.Drawing.Size(94, 17)
            Me.useanimation.TabIndex = 52
            Me.useanimation.Text = "Use Animation"
            Me.useanimation.UseVisualStyleBackColor = True
            '
            'usetime
            '
            Me.usetime.AutoSize = True
            Me.usetime.Checked = True
            Me.usetime.CheckState = System.Windows.Forms.CheckState.Checked
            Me.usetime.Location = New System.Drawing.Point(26, 323)
            Me.usetime.Name = "usetime"
            Me.usetime.Size = New System.Drawing.Size(71, 17)
            Me.usetime.TabIndex = 51
            Me.usetime.Text = "Use Time"
            Me.usetime.UseVisualStyleBackColor = True
            '
            'Value8
            '
            Me.Value8.Location = New System.Drawing.Point(122, 269)
            Me.Value8.Name = "Value8"
            Me.Value8.Size = New System.Drawing.Size(100, 20)
            Me.Value8.TabIndex = 47
            '
            'Value7
            '
            Me.Value7.Location = New System.Drawing.Point(122, 242)
            Me.Value7.Name = "Value7"
            Me.Value7.Size = New System.Drawing.Size(100, 20)
            Me.Value7.TabIndex = 42
            '
            'Value4
            '
            Me.Value4.Location = New System.Drawing.Point(121, 163)
            Me.Value4.Name = "Value4"
            Me.Value4.Size = New System.Drawing.Size(100, 20)
            Me.Value4.TabIndex = 41
            '
            'Value3
            '
            Me.Value3.Location = New System.Drawing.Point(121, 139)
            Me.Value3.Name = "Value3"
            Me.Value3.Size = New System.Drawing.Size(100, 20)
            Me.Value3.TabIndex = 40
            '
            'Value2
            '
            Me.Value2.Location = New System.Drawing.Point(121, 113)
            Me.Value2.Name = "Value2"
            Me.Value2.Size = New System.Drawing.Size(100, 20)
            Me.Value2.TabIndex = 39
            '
            'Value1
            '
            Me.Value1.Location = New System.Drawing.Point(122, 87)
            Me.Value1.Name = "Value1"
            Me.Value1.Size = New System.Drawing.Size(100, 20)
            Me.Value1.TabIndex = 38
            '
            'Value5
            '
            Me.Value5.Enabled = False
            Me.Value5.Location = New System.Drawing.Point(121, 189)
            Me.Value5.Name = "Value5"
            Me.Value5.Size = New System.Drawing.Size(19, 20)
            Me.Value5.TabIndex = 37
            Me.Value5.Text = "-1"
            '
            'Moneyvalue4
            '
            Me.Moneyvalue4.Location = New System.Drawing.Point(389, 403)
            Me.Moneyvalue4.Name = "Moneyvalue4"
            Me.Moneyvalue4.Size = New System.Drawing.Size(45, 20)
            Me.Moneyvalue4.TabIndex = 32
            '
            'Moneylable4
            '
            Me.Moneylable4.AutoSize = True
            Me.Moneylable4.Location = New System.Drawing.Point(364, 410)
            Me.Moneylable4.Name = "Moneylable4"
            Me.Moneylable4.Size = New System.Drawing.Size(21, 13)
            Me.Moneylable4.TabIndex = 31
            Me.Moneylable4.Text = "CC"
            '
            'Moneyvalue3
            '
            Me.Moneyvalue3.Location = New System.Drawing.Point(313, 403)
            Me.Moneyvalue3.Name = "Moneyvalue3"
            Me.Moneyvalue3.Size = New System.Drawing.Size(45, 20)
            Me.Moneyvalue3.TabIndex = 30
            '
            'Moneylable3
            '
            Me.Moneylable3.AutoSize = True
            Me.Moneylable3.Location = New System.Drawing.Point(286, 410)
            Me.Moneylable3.Name = "Moneylable3"
            Me.Moneylable3.Size = New System.Drawing.Size(21, 13)
            Me.Moneylable3.TabIndex = 29
            Me.Moneylable3.Text = "SS"
            '
            'Moneyvalue2
            '
            Me.Moneyvalue2.Location = New System.Drawing.Point(235, 403)
            Me.Moneyvalue2.Name = "Moneyvalue2"
            Me.Moneyvalue2.Size = New System.Drawing.Size(45, 20)
            Me.Moneyvalue2.TabIndex = 28
            '
            'Moneylable2
            '
            Me.Moneylable2.AutoSize = True
            Me.Moneylable2.Location = New System.Drawing.Point(206, 410)
            Me.Moneylable2.Name = "Moneylable2"
            Me.Moneylable2.Size = New System.Drawing.Size(23, 13)
            Me.Moneylable2.TabIndex = 27
            Me.Moneylable2.Text = "GG"
            '
            'Moneylable1
            '
            Me.Moneylable1.AutoSize = True
            Me.Moneylable1.Location = New System.Drawing.Point(124, 410)
            Me.Moneylable1.Name = "Moneylable1"
            Me.Moneylable1.Size = New System.Drawing.Size(21, 13)
            Me.Moneylable1.TabIndex = 26
            Me.Moneylable1.Text = "PP"
            '
            'Moneyvalue1
            '
            Me.Moneyvalue1.Location = New System.Drawing.Point(151, 403)
            Me.Moneyvalue1.Name = "Moneyvalue1"
            Me.Moneyvalue1.Size = New System.Drawing.Size(49, 20)
            Me.Moneyvalue1.TabIndex = 25
            '
            'Money
            '
            Me.Money.Anchor = System.Windows.Forms.AnchorStyles.Left
            Me.Money.AutoSize = True
            Me.Money.Checked = True
            Me.Money.CheckState = System.Windows.Forms.CheckState.Checked
            Me.Money.Location = New System.Drawing.Point(26, 406)
            Me.Money.Name = "Money"
            Me.Money.Size = New System.Drawing.Size(58, 17)
            Me.Money.TabIndex = 24
            Me.Money.Text = "Money"
            Me.Money.UseVisualStyleBackColor = True
            '
            'Usesound
            '
            Me.Usesound.Anchor = System.Windows.Forms.AnchorStyles.Left
            Me.Usesound.AutoSize = True
            Me.Usesound.Checked = True
            Me.Usesound.CheckState = System.Windows.Forms.CheckState.Checked
            Me.Usesound.Location = New System.Drawing.Point(25, 245)
            Me.Usesound.Name = "Usesound"
            Me.Usesound.Size = New System.Drawing.Size(79, 17)
            Me.Usesound.TabIndex = 22
            Me.Usesound.Text = "Use Sound"
            Me.Usesound.UseVisualStyleBackColor = True
            '
            'Value6
            '
            Me.Value6.FormattingEnabled = True
            Me.Value6.Items.AddRange(New Object() {"True", "False"})
            Me.Value6.Location = New System.Drawing.Point(121, 215)
            Me.Value6.Name = "Value6"
            Me.Value6.Size = New System.Drawing.Size(58, 21)
            Me.Value6.TabIndex = 20
            Me.Value6.Text = "True"
            '
            'choose
            '
            Me.choose.Anchor = System.Windows.Forms.AnchorStyles.Right
            Me.choose.Location = New System.Drawing.Point(817, 245)
            Me.choose.Name = "choose"
            Me.choose.Size = New System.Drawing.Size(247, 47)
            Me.choose.TabIndex = 12
            Me.choose.Text = "Open Picture"
            Me.choose.UseVisualStyleBackColor = True
            '
            'i
            '
            Me.i.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
            Me.i.Location = New System.Drawing.Point(817, 14)
            Me.i.Name = "i"
            Me.i.Size = New System.Drawing.Size(247, 223)
            Me.i.TabIndex = 11
            Me.i.TabStop = False
            '
            'Create
            '
            Me.Create.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
            Me.Create.Location = New System.Drawing.Point(817, 588)
            Me.Create.Name = "Create"
            Me.Create.Size = New System.Drawing.Size(247, 37)
            Me.Create.TabIndex = 10
            Me.Create.Text = "Create"
            Me.Create.UseVisualStyleBackColor = True
            '
            'Knockback
            '
            Me.Knockback.Anchor = System.Windows.Forms.AnchorStyles.Left
            Me.Knockback.AutoSize = True
            Me.Knockback.Checked = True
            Me.Knockback.CheckState = System.Windows.Forms.CheckState.Checked
            Me.Knockback.Location = New System.Drawing.Point(25, 113)
            Me.Knockback.Name = "Knockback"
            Me.Knockback.Size = New System.Drawing.Size(85, 17)
            Me.Knockback.TabIndex = 3
            Me.Knockback.Text = "Knock Back"
            Me.Knockback.UseVisualStyleBackColor = True
            '
            'Label1
            '
            Me.Label1.AutoSize = True
            Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
            Me.Label1.Location = New System.Drawing.Point(18, 14)
            Me.Label1.Name = "Label1"
            Me.Label1.Size = New System.Drawing.Size(167, 37)
            Me.Label1.TabIndex = 1
            Me.Label1.Text = "WEAPON"
            '
            'Damage
            '
            Me.Damage.Anchor = System.Windows.Forms.AnchorStyles.Left
            Me.Damage.AutoSize = True
            Me.Damage.Checked = True
            Me.Damage.CheckState = System.Windows.Forms.CheckState.Checked
            Me.Damage.Location = New System.Drawing.Point(25, 87)
            Me.Damage.Name = "Damage"
            Me.Damage.Size = New System.Drawing.Size(66, 17)
            Me.Damage.TabIndex = 0
            Me.Damage.Text = "Damage"
            Me.Damage.UseVisualStyleBackColor = True
            '
            'Menu
            '
            Me.Menu.Controls.Add(Me.WeaponsTab)
            Me.Menu.Controls.Add(Me.itemvalue7)
            Me.Menu.Controls.Add(Me.TabPage3)
            Me.Menu.Controls.Add(Me.TabPage4)
            Me.Menu.Location = New System.Drawing.Point(35, 12)
            Me.Menu.Name = "Menu"
            Me.Menu.SelectedIndex = 0
            Me.Menu.Size = New System.Drawing.Size(1103, 675)
            Me.Menu.TabIndex = 0
            '
            'CheckBox1
            '
            Me.CheckBox1.AutoSize = True
            Me.CheckBox1.Location = New System.Drawing.Point(21, 400)
            Me.CheckBox1.Name = "CheckBox1"
            Me.CheckBox1.Size = New System.Drawing.Size(81, 17)
            Me.CheckBox1.TabIndex = 34
            Me.CheckBox1.Text = "CheckBox1"
            Me.CheckBox1.UseVisualStyleBackColor = True
            '
            'TextBox2
            '
            Me.TextBox2.Location = New System.Drawing.Point(132, 398)
            Me.TextBox2.Name = "TextBox2"
            Me.TextBox2.Size = New System.Drawing.Size(107, 20)
            Me.TextBox2.TabIndex = 35
            '
            'Form1
            '
            Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
            Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
            Me.ClientSize = New System.Drawing.Size(1186, 681)
            Me.Controls.Add(Me.Menu)
            Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
            Me.Name = "Form1"
            Me.Text = "Terraria Mod Maker"
            Me.itemvalue7.ResumeLayout(False)
            Me.itemvalue7.PerformLayout()
            CType(Me.itemmoneyvalue4, System.ComponentModel.ISupportInitialize).EndInit()
            CType(Me.itemmoneyvalue3, System.ComponentModel.ISupportInitialize).EndInit()
            CType(Me.itemmoneyvalue2, System.ComponentModel.ISupportInitialize).EndInit()
            CType(Me.itemmoneyvalue1, System.ComponentModel.ISupportInitialize).EndInit()
            Me.WeaponsTab.ResumeLayout(False)
            Me.WeaponsTab.PerformLayout()
            CType(Me.Moneyvalue4, System.ComponentModel.ISupportInitialize).EndInit()
            CType(Me.Moneyvalue3, System.ComponentModel.ISupportInitialize).EndInit()
            CType(Me.Moneyvalue2, System.ComponentModel.ISupportInitialize).EndInit()
            CType(Me.Moneyvalue1, System.ComponentModel.ISupportInitialize).EndInit()
            CType(Me.i, System.ComponentModel.ISupportInitialize).EndInit()
            Me.Menu.ResumeLayout(False)
            Me.ResumeLayout(False)
     
        End Sub
        Friend WithEvents TabPage4 As System.Windows.Forms.TabPage
        Friend WithEvents TabPage3 As System.Windows.Forms.TabPage
        Friend WithEvents itemvalue7 As System.Windows.Forms.TabPage
        Friend WithEvents WeaponsTab As System.Windows.Forms.TabPage
        Friend WithEvents Value12 As System.Windows.Forms.ComboBox
        Friend WithEvents Value11 As System.Windows.Forms.TextBox
        Friend WithEvents Value10 As System.Windows.Forms.TextBox
        Friend WithEvents usestyle As System.Windows.Forms.CheckBox
        Friend WithEvents useanimation As System.Windows.Forms.CheckBox
        Friend WithEvents usetime As System.Windows.Forms.CheckBox
        Friend WithEvents Value8 As System.Windows.Forms.TextBox
        Friend WithEvents Value7 As System.Windows.Forms.TextBox
        Friend WithEvents Value4 As System.Windows.Forms.TextBox
        Friend WithEvents Value3 As System.Windows.Forms.TextBox
        Friend WithEvents Value2 As System.Windows.Forms.TextBox
        Friend WithEvents Value1 As System.Windows.Forms.TextBox
        Friend WithEvents Value5 As System.Windows.Forms.TextBox
        Friend WithEvents Moneyvalue4 As System.Windows.Forms.NumericUpDown
        Friend WithEvents Moneylable4 As System.Windows.Forms.Label
        Friend WithEvents Moneyvalue3 As System.Windows.Forms.NumericUpDown
        Friend WithEvents Moneylable3 As System.Windows.Forms.Label
        Friend WithEvents Moneyvalue2 As System.Windows.Forms.NumericUpDown
        Friend WithEvents Moneylable2 As System.Windows.Forms.Label
        Friend WithEvents Moneylable1 As System.Windows.Forms.Label
        Friend WithEvents Moneyvalue1 As System.Windows.Forms.NumericUpDown
        Friend WithEvents Money As System.Windows.Forms.CheckBox
        Friend WithEvents Usesound As System.Windows.Forms.CheckBox
        Friend WithEvents Value6 As System.Windows.Forms.ComboBox
        Friend WithEvents choose As System.Windows.Forms.Button
        Friend WithEvents i As System.Windows.Forms.PictureBox
        Friend WithEvents Create As System.Windows.Forms.Button
        Friend WithEvents Knockback As System.Windows.Forms.CheckBox
        Friend WithEvents Label1 As System.Windows.Forms.Label
        Friend WithEvents Damage As System.Windows.Forms.CheckBox
        Friend WithEvents Menu As System.Windows.Forms.TabControl
        Friend WithEvents amount As System.Windows.Forms.CheckBox
        Friend WithEvents recipe As System.Windows.Forms.Label
        Friend WithEvents Value9 As System.Windows.Forms.TextBox
        Friend WithEvents weaponname As System.Windows.Forms.TextBox
        Friend WithEvents wepname As System.Windows.Forms.Label
        Friend WithEvents items As System.Windows.Forms.CheckBox
        Friend WithEvents Value15 As System.Windows.Forms.TextBox
        Friend WithEvents height As System.Windows.Forms.Label
        Friend WithEvents width As System.Windows.Forms.Label
        Friend WithEvents Value16 As System.Windows.Forms.TextBox
        Friend WithEvents tile As System.Windows.Forms.CheckBox
        Friend WithEvents Value14 As System.Windows.Forms.ComboBox
        Friend WithEvents Value13 As System.Windows.Forms.TextBox
        Friend WithEvents melee As System.Windows.Forms.Label
        Friend WithEvents type As System.Windows.Forms.Label
        Friend WithEvents scale As System.Windows.Forms.Label
        Friend WithEvents maxstack As System.Windows.Forms.Label
        Friend WithEvents path As System.Windows.Forms.Label
        Friend WithEvents path4 As System.Windows.Forms.TextBox
        Friend WithEvents path2 As System.Windows.Forms.TextBox
        Friend WithEvents path1 As System.Windows.Forms.TextBox
        Friend WithEvents path5 As System.Windows.Forms.TextBox
        Friend WithEvents path6 As System.Windows.Forms.TextBox
        Friend WithEvents path7 As System.Windows.Forms.TextBox
        Friend WithEvents hugh As System.Windows.Forms.Label
        Friend WithEvents userlable As System.Windows.Forms.Label
        Friend WithEvents needwater As System.Windows.Forms.Label
        Friend WithEvents itemvalue4 As System.Windows.Forms.TextBox
        Friend WithEvents itemvalue3 As System.Windows.Forms.TextBox
        Friend WithEvents itemvalue2 As System.Windows.Forms.TextBox
        Friend WithEvents itemvalue1 As System.Windows.Forms.TextBox
        Friend WithEvents itemname As System.Windows.Forms.Label
        Friend WithEvents item As System.Windows.Forms.Label
        Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
        Friend WithEvents itemvalue6 As System.Windows.Forms.TextBox
        Friend WithEvents itemvalue10 As System.Windows.Forms.ComboBox
        Friend WithEvents itemvalue9 As System.Windows.Forms.ComboBox
        Friend WithEvents itemvalue11 As System.Windows.Forms.TextBox
        Friend WithEvents itemvalue8 As System.Windows.Forms.TextBox
        Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
        Friend WithEvents itemmaxstack As System.Windows.Forms.CheckBox
        Friend WithEvents itemusetime As System.Windows.Forms.CheckBox
        Friend WithEvents itemuseanimation As System.Windows.Forms.CheckBox
        Friend WithEvents itemusestyle As System.Windows.Forms.CheckBox
        Friend WithEvents itemtype As System.Windows.Forms.Label
        Friend WithEvents itemheight As System.Windows.Forms.Label
        Friend WithEvents itemwidth As System.Windows.Forms.Label
        Friend WithEvents itemuseturn As System.Windows.Forms.Label
        Friend WithEvents itemautoreuse As System.Windows.Forms.Label
        Friend WithEvents itemscale As System.Windows.Forms.Label
        Friend WithEvents itemmoneyvalue1 As System.Windows.Forms.NumericUpDown
        Friend WithEvents itemmoneylable4 As System.Windows.Forms.Label
        Friend WithEvents itemmoneylable3 As System.Windows.Forms.Label
        Friend WithEvents itemmoneylable2 As System.Windows.Forms.Label
        Friend WithEvents itemmoneylable1 As System.Windows.Forms.Label
        Friend WithEvents itemmoney As System.Windows.Forms.CheckBox
        Friend WithEvents itemmoneyvalue4 As System.Windows.Forms.NumericUpDown
        Friend WithEvents itemmoneyvalue3 As System.Windows.Forms.NumericUpDown
        Friend WithEvents itemmoneyvalue2 As System.Windows.Forms.NumericUpDown
        Friend WithEvents TextBox2 As System.Windows.Forms.TextBox
        Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox
     
    End Class
    
  11. Obsidian54 Blazing Wheel

    Duh.
    What kind of IDE are you using to make your program ? It looks like auto-generated code. It's fine i guess, but you may be very limitated at some point, in terms of .cs generation for example.
    Anyway, i guess i'm gonna do my own stuff in java or C# to write exactly what i think about, but i can help in your project if you need something ;)
    Yoraiz0r likes this.
  12. rangerofthewest Raincoat Zombie

    Hey, if you need testers, Obsidian, I'd love to help! I love projects like this one!
  13. Obsidian54 Blazing Wheel

    I'll probably need more than testers ^^, but you help will be welcomed !
    I won't start this project until late December/early January though but i'll let you know ;)

    Moreover, i don't wanna be seen as someone who steals others' work, so i wanna be sure my "Terraria's IDE" could add more options and features than this one. Anyway, we'll see ^^ (But i'll definitely made it in Java rather than VB).
  14. >:SYNTAX Mouse


    it would probably be better if you made it with c# or java, because your c# and java knowledge is a lot better than my vb knowledge. i taught my self the basics but it starting to get a bit harder where tutorials as such can not teach me.
  15. nsogge Demon Eye

    Hey do you have to have tConfig installed to use this? because Im mostly intrested in this because tConfig will not instal;l correctly after I had to wipe my hard drive, and I would still like to make mods, even if I dont get to code.
  16. Bullseye55 Possessed Armor

    Good work Syntax. :)

    I've been trying to find one of these for a while. Been talking to my developers about coding one. :p

    Once it gets a bit more developed, I'll be using it. :p


    Enjoy the follow. You have earned it!
  17. >:SYNTAX Mouse

    it dose use t config this simply makes the .ini files and its just a bit easer to organise.
  18. nsogge Demon Eye

    cool well I got tConfig working, I think I will try this out, looks really cool, you have a new follower
  19. >:SYNTAX Mouse


    thanks :D but the program is not quite fool proof yet its quite easy to brake make sure you have the path specified in the path box(s) and the money i sugest making 2 diget for each because currently i cant get it to display 00 by default to if you want 10 silver just make it 10 silver and 10 copper make sure you have the items set out correctly it has to be number Item,number Item and so on the item has to have a capital leter at start and if its 2 words that aswell.
    nsogge likes this.
  20. Obsidian54 Blazing Wheel

    Hey over there, any progress ?
    This evening i had some spare time, so i tried something Java based (using Swing framework for the UI).
    I got something really similar to your tool, and i'm currently adding some advanced features, like checkboxes to add FX, vampiric effect, life/mana regen, etc... to items. It's going pretty well.

    TerrariaEasyMod.png

    Top tabs are here to select which kind of stuff you wanna create, and lower ones are for more precise selection. Note that you can lower tabs are only there for visibility purposes, you can ofcourse make a weapon that is also an accessory, or use armor-base stats (def for example) for weapons.
    Bullseye55 likes this.

Share This Page