Overwrite

Complete Overwrite of the Folder with the free shard. ServUO 57.3 has been added.

Scripts/Commands/AccountGoldCheck.cs

@@ -0,0 +1,44 @@
+using System;
+using Server;
+using Server.Mobiles;
+using Server.Commands;
+using System.Linq;
+using System.Collections.Generic;
+using Server.SkillHandlers;
+using Server.Accounting;
+using System.IO;
+
+namespace Server.Items
+{
+    public static class AccountGoldCheck
+    {
+        public static void Initialize()
+        {
+            CommandSystem.Register("CheckAccountGold", AccessLevel.Administrator, e =>
+                {
+                    double currency = 0.0;
+
+                    var table = new Dictionary<string, long>();
+
+                    foreach (var account in Accounts.GetAccounts().OfType<Account>())
+                    {
+                        table[account.Username] = (long)(account.TotalCurrency * Account.CurrencyThreshold);
+                        currency += account.TotalCurrency;
+                    }
+
+                    using (StreamWriter op = new StreamWriter("TotalAccountGold.txt", true))
+                    {
+                        foreach (var kvp in table.OrderBy(k => -k.Value))
+                        {
+                            op.WriteLine(
+                                String.Format("{0} currency: {1}", kvp.Key, kvp.Value.ToString("N0", System.Globalization.CultureInfo.GetCultureInfo("en-US"))));
+                        }
+
+                        op.WriteLine("");
+                        op.WriteLine("Total Accounts: {0}", table.Count);
+                        op.WriteLine("Total Shard Gold: {0}", (currency * Account.CurrencyThreshold).ToString("N0", System.Globalization.CultureInfo.GetCultureInfo("en-US")));
+                    }
+                });
+        }
+    }
+}