Hallo liebe Community,
ich war hier jetzt schon seit einiger Zeit nicht mehr online, bin mal meine alten Projekte durchgegangen und auf was gestoßen, was ich in meiner Ausbildung als Zeitvertreib in der Berufsschule gemacht habe.
Damals wollte ich ein Backup-Programm für Minecraft schreiben, das damals noch ziemlich instabil war..
Die Funktionsweise war einfach mit einem Timer die Ordner in ein Backup-Verzeichnis zu kopieren, nur wollte ich auch die Namen der Welt auslesen - nicht nur die Ordnernamen. Und diese sind in einer Meta-Datei der Spielstände im NBT-Format gespeichert.
Also habe ich mir die Doku von Notch angesehen und eine Weile daran gesessen, eine Library für NBT-Files zu schreiben.
Jetzt habe ich das wieder entdeckt und gedacht es kann vielleicht jemand brauchen, weiß leider nicht ob sich seit dem etwas am Dateiformat getan hat..
Der Sourcecode ist von mir und hier und da aus dem Internet inspiriert - auf jeden Fall frei.
Da ich eigentlich PHP-Entwickler bin und die Art der Programmierung dort anders ist als in VB, ist es natürlich auch nicht die sauberste Arbeit, also sicherlich Refactoring-Bedürftig.
Ich habe außerdem eine kleine Demo-Klasse geschrieben, wie man Werte auslesen kann, um mir abgesehen von den übermäßigen Kommentaren, eine Dokumentation zu ersparen:
Hierfür fehlt natürlich der Designer-Code, aber ich denke man sieht gut, wie die Library funktioniert.
Im Anhang findet ihr den Sourcecode und die kompilierte dll-Datei, hoffe jemand kann es brauchen und würde mich über Feedback freuen
ich war hier jetzt schon seit einiger Zeit nicht mehr online, bin mal meine alten Projekte durchgegangen und auf was gestoßen, was ich in meiner Ausbildung als Zeitvertreib in der Berufsschule gemacht habe.
Damals wollte ich ein Backup-Programm für Minecraft schreiben, das damals noch ziemlich instabil war..
Die Funktionsweise war einfach mit einem Timer die Ordner in ein Backup-Verzeichnis zu kopieren, nur wollte ich auch die Namen der Welt auslesen - nicht nur die Ordnernamen. Und diese sind in einer Meta-Datei der Spielstände im NBT-Format gespeichert.
Also habe ich mir die Doku von Notch angesehen und eine Weile daran gesessen, eine Library für NBT-Files zu schreiben.
Jetzt habe ich das wieder entdeckt und gedacht es kann vielleicht jemand brauchen, weiß leider nicht ob sich seit dem etwas am Dateiformat getan hat..
Der Sourcecode ist von mir und hier und da aus dem Internet inspiriert - auf jeden Fall frei.
Da ich eigentlich PHP-Entwickler bin und die Art der Programmierung dort anders ist als in VB, ist es natürlich auch nicht die sauberste Arbeit, also sicherlich Refactoring-Bedürftig.
Ich habe außerdem eine kleine Demo-Klasse geschrieben, wie man Werte auslesen kann, um mir abgesehen von den übermäßigen Kommentaren, eine Dokumentation zu ersparen:
VB.NET-Quellcode
-
- Imports NBTLib
- Public Class Demo
- Private _oNBT As NBTFile
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim ofd As New OpenFileDialog()
- If ofd.ShowDialog() = Windows.Forms.DialogResult.OK Then
- 'creating nbt-file
- Me._oNBT = New NBTFile(ofd.FileName)
- 'getting the data
- Dim oTags As NBTTag = Me._oNBT.getData()
- Dim oFileInfo As New IO.FileInfo(ofd.FileName)
- 'creating root-node with filename
- Dim oRootNode As New TreeNode(oFileInfo.Name)
- 'push the nbt-tags to view
- TreeView1.Nodes.Clear()
- oRootNode.Nodes.Add(Me._tagToNode(oTags))
- TreeView1.Nodes.Add(oRootNode)
- 'enable reading
- Button2.Enabled = True
- End If
- End Sub
- Private Function _tagToNode(ByVal oTag As NBTTag) As TreeNode
- Dim oNode As New TreeNode(oTag.getTagType().ToString & ": """ & oTag.getName() & """")
- If oTag.getTagType() <> NBTTag.TagType.Empty And oTag.getTagType() <> NBTTag.TagType.TAG_Compound And oTag.getTagType() <> NBTTag.TagType.TAG_List And oTag.getTagType() <> NBTTag.TagType.TAG_Byte_Array And oTag.getTagType() <> NBTTag.TagType.TAG_Int_Array Then
- oNode.Text &= ": " & oTag.getValue().ToString()
- Else
- oNode.Text &= " [" & oTag.getChildren().Count & " children]"
- End If
- Dim oChildren As List(Of TreeNode) = Me._getChildren(oTag)
- For Each oChild As TreeNode In oChildren
- oNode.Nodes.Add(oChild)
- Next
- Return oNode
- End Function
- Private Function _getChildren(ByVal oTag As NBTTag) As List(Of TreeNode)
- Dim oTree As New List(Of TreeNode)
- Dim iTreeIndex As Integer = 0
- For Each oChildTag As NBTTag In oTag.getChildren()
- Dim oCurNode As TreeNode = Me._tagToNode(oChildTag)
- oTree.Add(oCurNode)
- Next
- Return oTree
- End Function
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
- Dim sPath As String = InputBox("Pfad zum Tag eingeben, getrennt durch ""/"", beginnend 1 Ebene unter dem ersten Tag", "Pfad eingeben", "Data/LevelName")
- MsgBox(Me._oNBT.read(sPath))
- End Sub
- End Class
Hierfür fehlt natürlich der Designer-Code, aber ich denke man sieht gut, wie die Library funktioniert.
Im Anhang findet ihr den Sourcecode und die kompilierte dll-Datei, hoffe jemand kann es brauchen und würde mich über Feedback freuen
LG
Merio
Merio
