Port over drop on slip files

Content.Server/SimpleStation14/Slippery/DropOnSlipComponent.cs

@@ -0,0 +1,16 @@
+namespace Content.Server.SimpleStation14.Slippery;
+
+/// <summary>
+///     Uses provided chance to try and drop the item when slipped, if equipped.
+/// </summary>
+[RegisterComponent]
+public sealed partial class DropOnSlipComponent : Component
+{
+    [DataField("chance")]
+    [ViewVariables(VVAccess.ReadWrite)]
+    public int Chance = 20;
+
+    [DataField("chanceToThrow")]
+    [ViewVariables(VVAccess.ReadWrite)]
+    public int ChanceToThrow = 40;
+}

Content.Server/SimpleStation14/Slippery/DropOnSlipSystem.cs

@@ -0,0 +1,98 @@
+using System.Numerics;
+using Content.Shared.Administration.Logs;
+using Content.Shared.Database;
+using Content.Shared.Inventory;
+using Robust.Shared.Random;
+using Content.Server.Popups;
+using Content.Shared.Popups;
+using Content.Shared.Slippery;
+using Content.Shared.Interaction.Components;
+using Robust.Shared.Physics.Systems;
+using Robust.Shared.Physics.Components;
+using Content.Shared.Throwing;
+
+namespace Content.Server.SimpleStation14.Slippery;
+
+public sealed class DropOnSlipSystem : EntitySystem
+{
+    [Dependency] private readonly ISharedAdminLogManager _adminLogger = default!;
+    [Dependency] private readonly PopupSystem _popup = default!;
+    [Dependency] private readonly IRobustRandom _random = default!;
+    [Dependency] private readonly InventorySystem _invSystem = default!;
+    [Dependency] private readonly SharedPhysicsSystem _physics = default!;
+    [Dependency] private readonly ThrowingSystem _throwing = default!;
+
+    private static readonly float PocketDropChance = 10f;
+    private static readonly float PocketThrowChance = 5f;
+
+    private static readonly float ClumsyDropChance = 5f;
+    private static readonly float ClumsyThrowChance = 90f;
+
+    public override void Initialize()
+    {
+        base.Initialize();
+
+        SubscribeLocalEvent<InventoryComponent, ParkSlipEvent>(HandleSlip);
+    }
+
+
+    private void HandleSlip(EntityUid entity, InventoryComponent invComp, ParkSlipEvent args)
+    {
+        if (!_invSystem.TryGetSlots(entity, out var slotDefinitions))
+            return;
+
+        foreach (var slot in slotDefinitions)
+        {
+            if (!_invSystem.TryGetSlotEntity(entity, slot.Name, out var item))
+                continue;
+
+            // A check for DropOnSlipComponent.
+            if (slot.Name != "pocket1" && slot.Name != "pocket2" && EntityManager.TryGetComponent<DropOnSlipComponent>(item, out var dropComp) && _random.NextFloat(0, 100) < dropComp.Chance)
+            {
+                var popupString = Loc.GetString("system-drop-on-slip-text-component", ("name", entity), ("item", item));
+
+                Drop(entity, item.Value, slot.Name, popupString);
+                continue;
+            }
+
+            // A check for any items in pockets.
+            if (slot.Name == "pocket1" | slot.Name == "pocket2" && _random.NextFloat(0, 100) < PocketDropChance)
+            {
+                var popupString = Loc.GetString("system-drop-on-slip-text-pocket", ("name", entity), ("item", item));
+
+                Drop(entity, item.Value, slot.Name, popupString);
+                continue;
+            }
+
+            // A check for ClumsyComponent.
+            if (slot.Name != "jumpsuit" && _random.NextFloat(0, 100) < ClumsyDropChance && HasComp<ClumsyComponent>(entity))
+            {
+                var popupString = Loc.GetString("system-drop-on-slip-text-clumsy", ("name", entity), ("item", item));
+
+                Drop(entity, item.Value, slot.Name, popupString);
+                continue;
+            }
+        }
+    }
+
+    private void Drop(EntityUid entity, EntityUid item, string slot, string popupString)
+    {
+        if (!_invSystem.TryUnequip(entity, slot, false, true))
+            return;
+
+        EntityManager.TryGetComponent<PhysicsComponent>(entity, out var entPhysComp);
+
+        if (entPhysComp != null)
+        {
+            var strength = entPhysComp.LinearVelocity.Length() / 1.5f;
+            Vector2 direction = new Vector2(_random.Next(-8, 8), _random.Next(-8, 8));
+
+            _throwing.TryThrow(item, direction, strength, entity);
+        }
+
+        _popup.PopupEntity(popupString, item, PopupType.MediumCaution);
+
+        var logMessage = Loc.GetString("system-drop-on-slip-log", ("entity", ToPrettyString(entity)), ("item", ToPrettyString(item)));
+        _adminLogger.Add(LogType.Slip, LogImpact.Low, $"{logMessage}");
+    }
+}

Content.Shared/Slippery/SlipperySystem.cs

@@ -87,6 +87,8 @@ private void TrySlip(EntityUid uid, SlipperyComponent component, EntityUid other
 
         _stun.TryParalyze(other, TimeSpan.FromSeconds(component.ParalyzeTime), true);
 
+        RaiseLocalEvent(other, new ParkSlipEvent(uid)); // Parkstation-DropOnSlip
+
         // Preventing from playing the slip sound when you are already knocked down.
         if (playSound)
         {
@@ -111,3 +113,10 @@ public sealed class SlipAttemptEvent : CancellableEntityEventArgs, IInventoryRel
 /// </summary>
 [ByRefEvent]
 public readonly record struct SlipEvent(EntityUid Slipped);
+
+// Parkstation-DropOnSlip-Start
+/// <summary>
+///     This is an event raised on an entity after they slip. Duh.
+/// </summary>
+public readonly record struct ParkSlipEvent(EntityUid Tripper);
+// Parkstation-DropOnSlip-End

Resources/Locale/en-US/simplestation14/Content/Slippery/dropOnSlip.ftl

@@ -0,0 +1,5 @@
+system-drop-on-slip-text-component = {$name}'s {$item} slips off!
+system-drop-on-slip-text-pocket = Something falls out of {$name}'s pocket!
+system-drop-on-slip-text-clumsy = The {$item} tumbles off of {$name}!
+
+system-drop-on-slip-log = {$entity} dropped {$item} when slipping.

Resources/Prototypes/Entities/Clothing/Ears/headsets.yml

@@ -26,6 +26,8 @@
   - type: GuideHelp
     guides:
     - Radio
+  - type: DropOnSlip
+    chance: 5
 
 - type: entity
   parent: ClothingHeadset

Resources/Prototypes/Entities/Clothing/Ears/headsets_alt.yml

@@ -9,6 +9,8 @@
     state: icon_alt
   - type: Clothing
     equippedPrefix: alt
+  - type: DropOnSlip
+    chance: 0
 
 - type: entity
   parent: ClothingHeadsetAlt

Resources/Prototypes/Entities/Clothing/Eyes/glasses.yml

@@ -66,6 +66,8 @@
   - type: Tag
     tags:
     - SecDogWearable # DeltaV - let Laika wear meson goggles
+  - type: DropOnSlip
+    chance: 30
 
 - type: entity
   parent: ClothingEyesBase
@@ -83,6 +85,8 @@
     - HamsterWearable
     - WhitelistChameleon
     - GlassesNearsight # SimpleStation14 NearsightedTrait
+  - type: DropOnSlip
+    chance: 30
 
 - type: entity
   parent: ClothingEyesBase
@@ -147,6 +151,8 @@
     - SecDogWearable # DeltaV - let Laika wear sunglasses
   - type: IdentityBlocker
     coverage: EYES
+  - type: DropOnSlip
+    chance: 30
 
 - type: entity
   parent: ClothingEyesBase
@@ -203,6 +209,8 @@
       coefficients:
         Heat: 0.95
   - type: GroupExamine
+  - type: DropOnSlip
+    chance: 30
 
 - type: entity
   parent: ClothingEyesBase

Resources/Prototypes/Entities/Clothing/Eyes/hud.yml

@@ -12,6 +12,8 @@
     damageContainers:
     - Inorganic
     - Silicon
+  - type: DropOnSlip
+    chance: 25
 
 - type: entity
   parent: ClothingEyesBase
@@ -32,6 +34,8 @@
   - type: Tag
     tags:
     - HudMedical
+  - type: DropOnSlip
+    chance: 25
 
 - type: entity
   parent: ClothingEyesBase
@@ -47,6 +51,8 @@
   - type: Tag
     tags:
     - HudSecurity
+  - type: DropOnSlip
+    chance: 25
 
 - type: entity
   parent: ClothingEyesBase

Resources/Prototypes/Entities/Clothing/Head/hardhats.yml

@@ -62,6 +62,8 @@
   - type: ContainerContainer
     containers:
       cell_slot: !type:ContainerSlot
+  - type: DropOnSlip
+    chance: 15
 
 - type: entity
   parent: ClothingHeadHatHardhatBase