Minecraft Version Changer

Discussion in 'War-Lords Productions' started by PaSS, Apr 5, 2012.

  1. Dre@m$ Active Member

    like last time it wont update it .o. idk if its that i dont have the jar files yet but what ever i cant get on the computer with it now
  2. PaSS Active Member

    Minecraft Version changed Has Been Updated To 12w32a and 1.3.2 :)

    i have also done a complete over haul of the gui as well as cleaning up the code getting ready to release it to the public

    ive done minors changes to the way you actually go about changing your game version but i find it pretty easy to understand
  3. Dre@m$ Active Member

    why the hell do you have the text coloring o.o i mean it would look 10x without...
  4. PaSS Active Member

    i plan on ahve it so u can customize the program its self but its there just incase u dont like white on black :\
  5. Dre@m$ Active Member

    rofl nice... you should add Tekkit Updates and Single player commands and World edit versions and mod loader
  6. PaSS Active Member

    i would but when i install mod loader to my jars it seems to fail but if i install mods not including modloader it works fine :\

    any ways theres a new update coming out today

    complete over haul of the gui and a bunch of new features have been added

    also added v12w34a :)
  7. Dre@m$ Active Member

    rofl ok xP i wounder who acly uses this xP
  8. PaSS Active Member

    well i get around 50+ downloads each update so ya :\

    sense i started i have over 600 downloads all together :)

    just finished coding the new dos version as well as the exe version im currently uploading them to media fire the post should be modifed shortly
  9. Dre@m$ Active Member

    rofl k xP
  10. PaSS Active Member

    and everything is now completely up to date :)
    --- Double Post Merged, Sep 10, 2012, Original Post Date: Sep 7, 2012 ---
    enjoy the latest update :)
    --- Double Post Merged, Oct 25, 2012 ---
    This has been updated to use 1.4.2 :)
    --- Double Post Merged, Oct 26, 2012 ---
    Hey guys be sure to check this out its pretty bad ass :)
    --- Double Post Merged, Oct 30, 2012 ---
    i just updated the download link and have started uploading all my files to a webhost instaead of file hosts this will be better as i can make a website :) and just add links and put a view counter which is all done :)

    hope you guys are enjoying the newest version :)
  11. Dre@m$ Active Member

    jesus Double post on Crack
  12. PaSS Active Member

    LOL you better belive it :)
    --- Double Post Merged, Dec 20, 2012, Original Post Date: Nov 13, 2012 ---
    Code was re done completely as i am now using vb.net :)

    The Code
    Code:
     
    Public Class Form1
        Dim minecraft As String = "C:\Users\" & System.Environment.UserName & "\AppData\Roaming\.minecraft\bin\"
        Dim apppath = New System.IO.FileInfo(Application.ExecutablePath).DirectoryName
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
     
            If ComboBox1.Text = "1.0" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.0.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.0.jar", minecraft & "minecraft1.0.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.0.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.1" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.1.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.1.jar", minecraft & "minecraft1.1.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.1.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.2" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.2.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.2.jar", minecraft & "minecraft1.2.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.2.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.2.2" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.2.2.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.2.2.jar", minecraft & "minecraft1.2.2.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.2.2.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.2.3" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.2.3.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.2.3.jar", minecraft & "minecraft1.2.3.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.2.3.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.2.4" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.2.4.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.2.4.jar", minecraft & "minecraft1.2.4.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.2.4.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.2.5" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.2.5.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.2.5.jar", minecraft & "minecraft1.2.5.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.2.5.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.3" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.3.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.3.jar", minecraft & "minecraft1.3.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.3.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.3.1" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.3.1.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.3.1.jar", minecraft & "minecraft1.3.1.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.3.1.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.3.2" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.3.2.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.3.2.jar", minecraft & "minecraft1.3.2.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.3.2.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.4.2" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.4.2.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.4.2.jar", minecraft & "minecraft1.4.2.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.4.2.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.4.5" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.4.5.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.4.5.jar", minecraft & "minecraft1.4.5.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.4.5.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
            If ComboBox1.Text = "1.4.6" Then
                System.IO.File.Delete(minecraft & "minecraft.jar")
                System.IO.File.Delete(minecraft & "minecraft1.4.6.jar")
                System.IO.File.Copy(apppath & "\files\Minecraft_Jar_Files\minecraft1.4.3.jar", minecraft & "minecraft1.4.6.jar")
                My.Computer.FileSystem.RenameFile(minecraft & "minecraft1.4.6.jar", "minecraft.jar")
                MsgBox("Version Changed", , "Changed")
            End If
     
        End Sub
     
        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
     
            ComboBox1.Items.Add("1.0")
            ComboBox1.Items.Add("1.1")
            ComboBox1.Items.Add("1.2")
            ComboBox1.Items.Add("1.2.2")
            ComboBox1.Items.Add("1.2.3")
            ComboBox1.Items.Add("1.2.4")
            ComboBox1.Items.Add("1.2.5")
            ComboBox1.Items.Add("1.3")
            ComboBox1.Items.Add("1.3.1")
            ComboBox1.Items.Add("1.3.2")
            ComboBox1.Items.Add("1.4.2")
            ComboBox1.Items.Add("1.4.5")
            ComboBox1.Items.Add("1.4.6")
     
        End Sub
     
        Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
            Process.Start(apppath & "\Files\Free.exe")
        End Sub
     
        Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
            Process.Start(apppath & "\Files\Premium.exe")
        End Sub
     
        Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
            Process.Start(apppath & "\Files\Magic.exe")
        End Sub
    End Class
     
    

Share This Page


Click here to affiliate us!

Nibbits