Added Clear Count to Statistics tab

Author: Wulf2k

DeS-SaveEdit/DeS-SaveEdit.vbproj

@@ -10,7 +10,7 @@
     <OutputType>WinExe</OutputType>
     <StartupObject>DeSEditor.My.MyApplication</StartupObject>
     <RootNamespace>DeSEditor</RootNamespace>
-    <AssemblyName>DeSEditor</AssemblyName>
+    <AssemblyName>DeS-SaveEdit</AssemblyName>
     <FileAlignment>512</FileAlignment>
     <MyType>WindowsForms</MyType>
     <TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
@@ -41,7 +41,7 @@
     <DefineDebug>true</DefineDebug>
     <DefineTrace>true</DefineTrace>
     <OutputPath>bin\Debug\</OutputPath>
-    <DocumentationFile>DeSEditor.xml</DocumentationFile>
+    <DocumentationFile>DeS-SaveEdit.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
     <Prefer32Bit>false</Prefer32Bit>
   </PropertyGroup>
@@ -52,7 +52,7 @@
     <DefineTrace>true</DefineTrace>
     <Optimize>true</Optimize>
     <OutputPath>bin\Release\</OutputPath>
-    <DocumentationFile>DeSEditor.xml</DocumentationFile>
+    <DocumentationFile>DeS-SaveEdit.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
     <Prefer32Bit>false</Prefer32Bit>
   </PropertyGroup>

DeS-SaveEdit/DeS.Designer.vb

@@ -299,6 +299,8 @@ Public Class DeS
             txtW4Tendency.Text = RSingle(&H1EC08)
             txtW5Tendency.Text = RSingle(&H1EC18)
 
+            txtClearCount.Text = bytes(&H1EC58)
+
             chkArchSealed.Checked = Not OneByteAnd(&H1F965, &H40)
 
         Catch ex As Exception
@@ -492,6 +494,8 @@ Public Class DeS
             WSingle(&H1EC20, Val(txtW2Tendency.Text))
             WSingle(&H1EC24, Val(txtW2Tendency.Text))
 
+            bytes(&H1EC58) = Val(txtClearCount.Text)
+
             bytes(&H1F965) = (bytes(&H1F965) And &HBF) Or &H40 * ((Not chkArchSealed.Checked) * -1)
 
             BytesToFile(filename, bytes)