Trap grouping and caps after economy simulation

Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>

src/Decentralized.Domain/BmOrders.cs

@@ -63,6 +63,8 @@ namespace Decentralized.Domain
         public string Item;
         /// <summary>对应的订单（没收到货的订单不会被追查）；0 表示不挂订单（出售记录、落网）。</summary>
         public int OrderId;
+        /// <summary>同一次蜜罐 / 同一次落网的追查归为一组，累计记罪证有上限。</summary>
+        public int Group;
     }
 
     /// <summary>夜间发生的订单事件，供日志与新闻使用。</summary>
@@ -84,6 +86,9 @@ namespace Decentralized.Domain
         public int ClosedUntil = -1;
         /// <summary>执法接管平台的最后一天（含）；期间的交易之后会被追查。</summary>
         public int HoneypotUntil = -1;
+        public int HoneypotStart = -1;
+        /// <summary>每组追查已经记过的罪证。</summary>
+        public Dictionary<int, double> Charged = new Dictionary<int, double>();
         public List<BmTrap> Traps = new List<BmTrap>();
         public int NextOrderId = 1;
 
@@ -232,7 +237,7 @@ namespace Decentralized.Domain
             l.Qty -= count;
             if (l.Qty <= 0) Catalog.Remove(l);
             Orders.Add(o);
-            if (Honeypot(day)) Traps.Add(new BmTrap { Day = day + Tuning.BmTrapDelay, Amount = credits, Why = "honeypot", Item = l.Item, OrderId = o.Id });
+            if (Honeypot(day)) Traps.Add(new BmTrap { Day = day + Tuning.BmTrapDelay, Amount = credits, Why = "honeypot", Item = l.Item, OrderId = o.Id, Group = HoneypotStart });
             return o;
         }
 
@@ -246,7 +251,7 @@ namespace Decentralized.Domain
         public List<BmEvent> Night(int day, bool crackdown, Wallet w, Rng rng, int secRep = 0, Func<string, double> price = null)
         {
             var ev = new List<BmEvent>();
-            if (!Honeypot(day) && rng.Chance(HoneypotChance(secRep))) { HoneypotUntil = day + Tuning.BmHoneypotDays; if (!Forum.Contains("easy")) Forum.Add("easy"); }
+            if (!Honeypot(day) && rng.Chance(HoneypotChance(secRep))) { HoneypotUntil = day + Tuning.BmHoneypotDays; HoneypotStart = day; if (!Forum.Contains("easy")) Forum.Add("easy"); }
             if (ClosedUntil == day) ev.Add(new BmEvent { Kind = "reopen" });
             if (!Closed(day) && (Orders.Any(o => o.State == OrderState.Pending) || Sales.Any(x => x.State == SaleState.Listed || x.State == SaleState.Sold)) && rng.Chance(RugChance))
             {
@@ -289,14 +294,20 @@ namespace Decentralized.Domain
             {
                 if (!rng.Chance(Tuning.BmSellerBust)) continue;
                 foreach (var o in Orders.Where(x => x.State == OrderState.Done && x.Seller == name && day - x.DueDay <= 14))
-                    Traps.Add(new BmTrap { Day = day + Tuning.BmTrapDelay, Amount = o.Price, Why = "seller", Item = o.Item });
+                    Traps.Add(new BmTrap { Day = day + Tuning.BmTrapDelay, Amount = o.Price, Why = "seller", Item = o.Item, Group = -day });
                 Forum.Add("busted:" + name);
             }
-            foreach (var t in Traps.Where(x => day >= x.Day).ToList())
+            // 同一晚到期的追查按来源（同一次蜜罐 / 落网）合成一次事件；记入货款的一部分，同一次累计有上限
+            var due = Traps.Where(x => day >= x.Day).ToList();
+            foreach (var g in due.GroupBy(x => new { x.Why, x.Group }))
             {
-                Traps.Remove(t);
-                ev.Add(new BmEvent { Kind = "trap", Amount = t.Amount, Order = new BmOrder { Item = t.Item, Seller = t.Why } });
+                Charged.TryGetValue(g.Key.Group, out double done);
+                double amount = Math.Min(g.Sum(x => x.Amount) * Tuning.BmTrapShare, Tuning.BmTrapWindowCap - done);
+                if (amount < 1) continue;
+                Charged[g.Key.Group] = done + amount;
+                ev.Add(new BmEvent { Kind = "trap", Amount = amount, Order = new BmOrder { Item = g.First().Item, Seller = g.Key.Why } });
             }
+            Traps.RemoveAll(x => day >= x.Day);
             Orders.RemoveAll(o => o.State != OrderState.Pending && o.State != OrderState.Ready && day - o.DueDay > 14);
             return ev;
         }