Renamed data.xml to pepperdata.xml.

Added examples to doc/

PepperBet/PepperBet.vb

@@ -17,6 +17,7 @@
     Const version As String = "1.9.12"
     Const downloadurl As String = "https://long-cat.net/projects/pepperbet/pepperbet.exe?v=" & version
     Const versionurl As String = "https://long-cat.net/projects/pepperbet/version.txt?v=" & version
+    Const dbfilename As String = "pepperdata.xml"
     Dim TheList As New List(Of Glicko)
     Dim match As Long = 0
     Dim names As New List(Of String)
@@ -111,7 +112,7 @@
             If autoupdate Then
                 CheckForUpdates()
             End If
-            Console.WriteLine("{0} fighters loaded from data.xml.", TheList.Count)
+            Console.WriteLine("{0} fighters loaded from " & dbfilename & ".", TheList.Count)
             If names.Count > 0 Then
                 Console.Write("Watching: ")
                 For Each x In names
@@ -1141,15 +1142,15 @@
         Next
         xd.Add(New XElement("watching", watching.ToString))
         xd.Add(New XElement("autoupdate", autoupdate.ToString))
-        xd.Save("data.xml")
+        xd.Save(dbfilename)
     End Sub
 
     Private Sub Load()
-        If Not FileIO.FileSystem.FileExists("data.xml") Then
+        If Not FileIO.FileSystem.FileExists(dbfilename) Then
             Exit Sub
         End If
         Dim xd As New XDocument
-        xd = XDocument.Load("data.xml")
+        xd = XDocument.Load(dbfilename)
         match = CLng(xd.<PepperBet>.<count>.First.Value)
 
         For Each x In xd.<PepperBet>.<name>