KancolleSniffer/Model/ShipStatus.cs

   1 // Copyright (C) 2017 Kazuhiro Fujieda <fujieda@users.osdn.me>\r
   2 //\r
   3 // Licensed under the Apache License, Version 2.0 (the "License");\r
   4 // you may not use this file except in compliance with the License.\r
   5 // You may obtain a copy of the License at\r
   6 //\r
   7 //    http://www.apache.org/licenses/LICENSE-2.0\r
   8 //\r
   9 // Unless required by applicable law or agreed to in writing, software\r
  10 // distributed under the License is distributed on an "AS IS" BASIS,\r
  11 // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.\r
  12 // See the License for the specific language governing permissions and\r
  13 // limitations under the License.\r
  14 \r
  15 using System;\r
  16 using System.Collections.Generic;\r
  17 using System.Linq;\r
  18 using static System.Math;\r
  19 \r
  20 namespace KancolleSniffer.Model\r
  21 {\r
  22     public class ShipStatus : ICloneable\r
  23     {\r
  24         public int Id { get; set; }\r
  25         public bool Empty => Id == -1;\r
  26         public Fleet Fleet { get; set; }\r
  27         public int DeckIndex { get; set; }\r
  28         public ShipSpec Spec { get; set; }\r
  29 \r
  30         public string Name => Spec.Name;\r
  31 \r
  32         public int Level { get; set; }\r
  33         public int ExpToNext { get; set; }\r
  34         public int MaxHp { get; set; }\r
  35         public int NowHp { get; set; }\r
  36         public int Speed { get; set; }\r
  37         public int Cond { get; set; }\r
  38         public int Fuel { get; set; }\r
  39         public int Bull { get; set; }\r
  40         public int[] OnSlot { get; set; }\r
  41         public int[] NdockItem { get; set; }\r
  42         public int LoS { get; set; }\r
  43         public int Firepower { get; set; }\r
  44         public int Torpedo { get; set; }\r
  45         public int AntiSubmarine { get; set; }\r
  46         public int AntiAir { get; set; }\r
  47         public int Lucky { get; set; }\r
  48         public bool Locked { get; set; }\r
  49         public bool Escaped { get; set; }\r
  50         public Attack SpecialAttack { get; set; }\r
  51 \r
  52         public enum Attack\r
  53         {\r
  54             // ReSharper disable once UnusedMember.Global\r
  55             None,\r
  56             Fire,\r
  57             Fired\r
  58         }\r
  59 \r
  60         public Damage DamageLevel => CalcDamage(NowHp, MaxHp);\r
  61 \r
  62         private IList<ItemStatus> _slot;\r
  63         private ItemStatus _slotEx;\r
  64         public Func<ItemStatus, ItemStatus> GetItem { get; set; } = item => item;\r
  65 \r
  66         public IReadOnlyList<ItemStatus> Slot\r
  67         {\r
  68             get => _slot.Select(item => GetItem(item)).ToArray();\r
  69             set => _slot = value.ToArray();\r
  70         }\r
  71 \r
  72         public ItemStatus SlotEx\r
  73         {\r
  74             get => GetItem(_slotEx);\r
  75             set => _slotEx = value;\r
  76         }\r
  77 \r
  78         public void FreeSlot(int idx) => _slot[idx] = new ItemStatus();\r
  79 \r
  80         public IEnumerable<ItemStatus> AllSlot => SlotEx.Id == 0 ? Slot : Slot.Concat(new[] {SlotEx});\r
  81 \r
  82         public ShipStatus()\r
  83         {\r
  84             Id = -1;\r
  85             Spec = new ShipSpec();\r
  86             OnSlot = new int[0];\r
  87             Slot = new ItemStatus[0];\r
  88             SlotEx = new ItemStatus();\r
  89         }\r
  90 \r
  91         public enum Damage\r
  92         {\r
  93             Minor,\r
  94             Small,\r
  95             Half,\r
  96             Badly,\r
  97             Sunk\r
  98         }\r
  99 \r
 100         public void RepairShip()\r
 101         {\r
 102             NowHp = MaxHp;\r
 103             Cond = Max(40, Cond);\r
 104         }\r
 105 \r
 106         public static Damage CalcDamage(int now, int max)\r
 107         {\r
 108             if (now == 0 && max > 0)\r
 109                 return Damage.Sunk;\r
 110             var ratio = max == 0 ? 1 : (double)now / max;\r
 111             return ratio > 0.75 ? Damage.Minor :\r
 112                 ratio > 0.5 ? Damage.Small :\r
 113                 ratio > 0.25 ? Damage.Half : Damage.Badly;\r
 114         }\r
 115 \r
 116         public TimeSpan RepairTime => TimeSpan.FromSeconds((int)(RepairTimePerHp.TotalSeconds * (MaxHp - NowHp)) + 30);\r
 117 \r
 118         public TimeSpan RepairTimePerHp =>\r
 119             TimeSpan.FromSeconds(Spec.RepairWeight *\r
 120                                  (Level < 12\r
 121                                      ? Level * 10\r
 122                                      : Level * 5 + Floor(Sqrt(Level - 11)) * 10 + 50));\r
 123 \r
 124         public double EffectiveFirepower\r
 125         {\r
 126             get\r
 127             {\r
 128                 if (Spec.IsSubmarine)\r
 129                     return 0;\r
 130                 var isRyuseiAttack = Spec.Id == 352 && // 速吸改\r
 131                                      Slot.Any(item => item.Spec.Type == 8); // 艦攻装備\r
 132                 var levelBonus = AllSlot.Sum(item => item.FirepowerLevelBonus);\r
 133                 if (!Spec.IsAircraftCarrier && !isRyuseiAttack)\r
 134                     return Firepower + levelBonus + Fleet.CombinedFirepowerBonus + 5;\r
 135                 var specs = (from item in Slot where item.Spec.IsAircraft select item.Spec).ToArray();\r
 136                 var torpedo = specs.Sum(s => s.Torpedo);\r
 137                 var bomber = specs.Sum(s => s.Bomber);\r
 138                 if (torpedo == 0 && bomber == 0)\r
 139                     return 0;\r
 140                 return (int)((Firepower + torpedo + levelBonus +\r
 141                               (int)(bomber * 1.3) + Fleet.CombinedFirepowerBonus) * 1.5) + 55;\r
 142             }\r
 143         }\r
 144 \r
 145         public double EffectiveTorpedo\r
 146         {\r
 147             get\r
 148             {\r
 149                 if (Spec.IsAircraftCarrier || Torpedo == 0)\r
 150                     return 0;\r
 151                 return Torpedo + AllSlot.Sum(item => item.TorpedoLevelBonus) + Fleet.CombinedTorpedoPenalty + 5;\r
 152             }\r
 153         }\r
 154 \r
 155         public double EffectiveAntiSubmarine\r
 156         {\r
 157             get\r
 158             {\r
 159                 if (!Spec.IsAntiSubmarine)\r
 160                     return 0;\r
 161                 // ReSharper disable once CompareOfFloatsByEqualityOperator\r
 162                 if (Spec.IsAircraftCarrier && EffectiveFirepower == 0 && !CanOpeningAntiSubmarineAttack)\r
 163                     return 0;\r
 164                 var check = new AntiSubmarineChecker(Slot);\r
 165                 var vanilla = ShipAntiSubmarine;\r
 166                 if (vanilla == 0 && !check.Aircraft) // 素対潜0で航空機なしは対潜攻撃なし\r
 167                     return 0;\r
 168                 var bonus = 1.0;\r
 169                 if (check.DCT && check.DC)\r
 170                     bonus = 1.1;\r
 171                 if (check.Sonar && (check.DCT || check.DC || check.SpecialDCT))\r
 172                     bonus = 1.15;\r
 173                 if (check.Sonar && check.DCT && check.DC)\r
 174                     bonus = 1.15 * 1.25;\r
 175                 var levelBonus = Slot.Sum(item => item.AntiSubmarineLevelBonus);\r
 176                 return bonus * (Sqrt(vanilla) * 2 + check.All * 1.5 + levelBonus + (check.Aircraft ? 8 : 13));\r
 177             }\r
 178         }\r
 179 \r
 180         private class AntiSubmarineChecker\r
 181         {\r
 182             public readonly bool Sonar;\r
 183             public readonly bool DCT;\r
 184             public readonly bool DC;\r
 185             public readonly bool SpecialDCT;\r
 186             public readonly bool Aircraft;\r
 187             public readonly double All;\r
 188 \r
 189             public AntiSubmarineChecker(IEnumerable<ItemStatus> items)\r
 190             {\r
 191                 foreach (var spec in items.Select(item => item.Spec))\r
 192                 {\r
 193                     if (spec.IsSonar)\r
 194                     {\r
 195                         Sonar = true;\r
 196                     }\r
 197                     else if (spec.IsDCT)\r
 198                     {\r
 199                         DCT = true;\r
 200                     }\r
 201                     else if (spec.IsDC)\r
 202                     {\r
 203                         DC = true;\r
 204                     }\r
 205                     else if (spec.IsSpecialDCT)\r
 206                     {\r
 207                         SpecialDCT = true;\r
 208                     }\r
 209                     else if (spec.IsAircraft)\r
 210                     {\r
 211                         Aircraft = true;\r
 212                     }\r
 213                     All += spec.EffectiveAntiSubmarine;\r
 214                 }\r
 215             }\r
 216         }\r
 217 \r
 218         public int ShipAntiSubmarine => AntiSubmarine - Slot.Sum(item => item.Spec.AntiSubmarine + AntiSubmarineBonus(item.Spec));\r
 219 \r
 220         private int AntiSubmarineBonus(ItemSpec spec)\r
 221         {\r
 222             switch (spec.Name)\r
 223             {\r
 224                 case "四式水中聴音機":\r
 225                     if (Spec.ShipClass == 54) // 秋月型\r
 226                         return 1;\r
 227                     if (new[] {"五十鈴改二", "那珂改二", "由良改二", "夕張改二", "夕張改二特"}.Any(name => Spec.Name == name))\r
 228                         return 1;\r
 229                     if (Spec.Name == "夕張改二丁")\r
 230                         return 3;\r
 231                     break;\r
 232                 case "三式水中探信儀":\r
 233                     if (new[] {"神風", "春風", "時雨", "山風", "舞風", "朝霜"}.Any(Spec.Name.StartsWith))\r
 234                         return 3;\r
 235                     if (new[] {"潮", "雷", "山雲", "磯風", "浜風", "岸波"}.Any(Spec.Name.StartsWith))\r
 236                         return 2;\r
 237                     break;\r
 238                 case "三式爆雷投射機 集中配備":\r
 239                     if (new[] {"五十鈴改二", "那珂改二", "由良改二"}.Any(name => Spec.Name == name))\r
 240                         return 1;\r
 241                     break;\r
 242                 case "試製15cm9連装対潜噴進砲":\r
 243                     if (new[] {"五十鈴改二", "那珂改二", "由良改二", "夕張改二"}.Any(name => Spec.Name == name))\r
 244                         return 2;\r
 245                     if (Spec.Name == "夕張改二丁")\r
 246                         return 3;\r
 247                     break;\r
 248             }\r
 249             return 0;\r
 250         }\r
 251 \r
 252         public bool CanOpeningAntiSubmarineAttack\r
 253         {\r
 254             get\r
 255             {\r
 256                 var specs = Slot.Select(item => item.Spec).ToArray();\r
 257                 switch (Name)\r
 258                 {\r
 259                     case "五十鈴改二":\r
 260                     case "龍田改二":\r
 261                     case "Jervis改":\r
 262                     case "Janus改":\r
 263                     case "Samuel B.Roberts改":\r
 264                     case "Johnston":\r
 265                     case "Johnston改":\r
 266                     case "Fletcher":\r
 267                     case "Fletcher改":\r
 268                         return true;\r
 269                     case "大鷹改":\r
 270                     case "大鷹改二":\r
 271                     case "神鷹改":\r
 272                     case "神鷹改二":\r
 273                         return specs.Any(spec => spec.IsTorpedoBomber && spec.AntiSubmarine >= 1 ||\r
 274                                                  spec.IsArmyAircraft || spec.IsDiveBomber);\r
 275                     case "大鷹":\r
 276                     case "Gambier Bay":\r
 277                     case "Gambier Bay改":\r
 278                     case "瑞鳳改二乙":\r
 279                     case "神鷹":\r
 280                         if (AntiSubmarine < 50)\r
 281                             return false;\r
 282                         if (AntiSubmarine >= 50 && AntiSubmarine < 100)\r
 283                             return (AntiSubmarine >= 65 || HaveSonar) &&\r
 284                                    specs.Any(spec => spec.IsTorpedoBomber && spec.AntiSubmarine >= 7 ||\r
 285                                                      spec.IsArmyAircraft);\r
 286                         return HaveSonar &&\r
 287                                specs.Any(spec => spec.IsTorpedoBomber && spec.AntiSubmarine >= 1 ||\r
 288                                                  spec.IsDiveBomber);\r
 289                     case "瑞鳳改二":\r
 290                         if (AntiSubmarine < 50)\r
 291                             return false;\r
 292                         return HaveSonar &&\r
 293                                specs.Any(spec => spec.IsTorpedoBomber && spec.AntiSubmarine >= 7 ||\r
 294                                                  spec.IsArmyAircraft);\r
 295                     default:\r
 296                         if (HaveSonar && AntiSubmarine >= 100)\r
 297                             return true;\r
 298                         if (Spec.ShipType != 1)\r
 299                             return false;\r
 300                         return Slot.Sum(item => item.Spec.AntiSubmarine) >= 4 && AntiSubmarine >= 75 ||\r
 301                                HaveSonar && AntiSubmarine >= 60;\r
 302                 }\r
 303             }\r
 304         }\r
 305 \r
 306         public int MissionAntiSubmarine => AntiSubmarine - AllSlot.Sum(item =>\r
 307         {\r
 308             switch (item.Spec.Type)\r
 309             {\r
 310                 case 10: // 水偵\r
 311                 case 11: // 水爆\r
 312                 case 41: // 大艇\r
 313                     return item.Spec.AntiSubmarine;\r
 314                 default:\r
 315                     return 0;\r
 316             }\r
 317         });\r
 318 \r
 319         private bool HaveSonar => Slot.Any(item => item.Spec.IsSonar);\r
 320 \r
 321         public double NightBattlePower\r
 322         {\r
 323             get\r
 324             {\r
 325                 if (!Spec.IsAircraftCarrier)\r
 326                     return Firepower + Torpedo + Slot.Sum(item => item.NightBattleLevelBonus);\r
 327 \r
 328                 if (Slot.Any(item => item.Spec.IconType == 45 || item.Spec.IconType == 46) && // 夜戦か夜攻\r
 329                     (Spec.Id == 545 || // Saratoga Mk.II\r
 330                      Spec.Id == 599 || // 赤城改二戊\r
 331                      Slot.Any(item => item.Spec.Id == 258 || item.Spec.Id == 259))) // 夜間作戦航空要員\r
 332                 {\r
 333                     return Firepower + Slot.Zip(OnSlot, (item, onSlot) =>\r
 334                     {\r
 335                         double a, b;\r
 336                         var spec = item.Spec;\r
 337                         switch (spec.Id)\r
 338                         {\r
 339                             case 154: // 零戦62型(爆戦/岩井隊)\r
 340                             case 242: // Swordfish\r
 341                             case 243: // Swordfish Mk.II(熟練)\r
 342                             case 244: // Swordfish Mk.III(熟練)\r
 343                             case 320: // 彗星一二型(三一号光電管爆弾搭載機)\r
 344                                 a = 0.0;\r
 345                                 b = 0.3;\r
 346                                 break;\r
 347                             case 254: // F6F-3N\r
 348                             case 255: // F6F-5N\r
 349                             case 257: // TBD-3D\r
 350                                 a = 3.0;\r
 351                                 b = 0.45;\r
 352                                 break;\r
 353                             default:\r
 354                                 return -spec.Firepower;\r
 355                         }\r
 356                         return spec.Torpedo + a * onSlot +\r
 357                                b * (spec.Firepower + spec.Torpedo + spec.Bomber + spec.AntiSubmarine) *\r
 358                                Sqrt(onSlot) + Sqrt(item.Level);\r
 359                     }).Sum();\r
 360                 }\r
 361                 switch (Spec.Id)\r
 362                 {\r
 363                     case 353: // Graf Zeppelin改\r
 364                     case 432: // Graf Zeppelin\r
 365                     case 433: // Saratoga\r
 366                         break;\r
 367                     case 393: // Ark Royal改\r
 368                     case 515: // Ark Royal\r
 369                         if (Slot.Any(item => new[] {242, 243, 244}.Contains(item.Spec.Id)))\r
 370                             break;\r
 371                         return 0;\r
 372                     default:\r
 373                         return 0;\r
 374                 }\r
 375                 return Firepower + Torpedo + Slot.Sum(item => item.NightBattleLevelBonus);\r
 376             }\r
 377         }\r
 378 \r
 379         public int PreparedDamageControl =>\r
 380             DamageLevel != Damage.Badly\r
 381                 ? -1\r
 382                 : SlotEx.Spec.Id == 42 || SlotEx.Spec.Id == 43\r
 383                     ? SlotEx.Spec.Id\r
 384                     : Slot.FirstOrDefault(item => item.Spec.Id == 42 || item.Spec.Id == 43)?.Spec.Id ?? -1;\r
 385 \r
 386         public double TransportPoint\r
 387             => Spec.TransportPoint + AllSlot.Sum(item => item.Spec.TransportPoint);\r
 388 \r
 389         public int EffectiveAntiAirForShip\r
 390         {\r
 391             get\r
 392             {\r
 393                 if (AllSlot.All(item => item.Empty || item.Unimplemented))\r
 394                     return AntiAir;\r
 395                 var vanilla = AntiAir - AllSlot.Sum(item => item.Spec.AntiAir);\r
 396                 var x = vanilla + AllSlot.Sum(item => item.EffectiveAntiAirForShip);\r
 397                 return (int)(x / 2) * 2;\r
 398             }\r
 399         }\r
 400 \r
 401         public int EffectiveAntiAirForFleet => (int)AllSlot.Sum(item => item.EffectiveAntiAirForFleet);\r
 402 \r
 403         public double AntiAirPropellantBarrageChance\r
 404         {\r
 405             get\r
 406             {\r
 407                 var launcherCount = AllSlot.Count(item => item.Spec.Id == 274);\r
 408                 if (launcherCount == 0)\r
 409                     return 0;\r
 410                 var iseClass = Spec.ShipClass == 2;\r
 411                 var baseChance = (EffectiveAntiAirForShip + 0.9 * Lucky) / 281.0;\r
 412                 return (baseChance + 0.15 * (launcherCount - 1) + (iseClass ? 0.25 : 0)) * 100;\r
 413             }\r
 414         }\r
 415 \r
 416         public int EffectiveFuelMax => Max((int)(Spec.FuelMax * (Level >= 100 ? 0.85 : 1.0)), 1);\r
 417 \r
 418         public int EffectiveBullMax => Max((int)(Spec.BullMax * (Level >= 100 ? 0.85 : 1.0)), 1);\r
 419 \r
 420         public object Clone()\r
 421         {\r
 422             var r = (ShipStatus)MemberwiseClone();\r
 423             r.Slot = r.Slot.ToArray(); // 戦闘中のダメコンの消費が見えないように複製する\r
 424             return r;\r
 425         }\r
 426     }\r
 427 }