Metempsychosis Returns

Content.Server/Cloning/CloningConsoleSystem.cs

@@ -32,7 +32,7 @@ public sealed class CloningConsoleSystem : EntitySystem
         [Dependency] private readonly MobStateSystem _mobStateSystem = default!;
         [Dependency] private readonly PowerReceiverSystem _powerReceiverSystem = default!;
         [Dependency] private readonly SharedMindSystem _mindSystem = default!;
-
+        
         public override void Initialize()
         {
             base.Initialize();
@@ -169,8 +169,8 @@ public void TryClone(EntityUid uid, EntityUid cloningPodUid, EntityUid scannerUi
 
             if (mind.UserId.HasValue == false || mind.Session == null)
                 return;
-
-            if (_cloningSystem.TryCloning(cloningPodUid, body.Value, (mindId, mind), cloningPod, scannerComp.CloningFailChanceMultiplier))
+            // Nyano: Adds scannerComp.MetemKarmaBonus
+            if (_cloningSystem.TryCloning(cloningPodUid, body.Value, (mindId, mind), cloningPod, scannerComp.CloningFailChanceMultiplier, scannerComp.MetemKarmaBonus))
                 _adminLogger.Add(LogType.Action, LogImpact.Medium, $"{ToPrettyString(uid)} successfully cloned {ToPrettyString(body.Value)}.");
         }
 

Content.Server/Cloning/CloningSystem.cs

@@ -33,8 +33,18 @@
 using Robust.Shared.Physics.Components;
 using Robust.Shared.Prototypes;
 using Robust.Shared.Random;
-using Content.Server.Psionics;
 using Content.Server.Traits.Assorted; //Nyano - Summary: allows the potential psionic ability to be written to the character.
+using Content.Server.Psionics; //DeltaV needed for Psionic Systems
+using Content.Shared.Speech; //DeltaV Start Metem Usings
+using Content.Shared.Tag;
+using Content.Shared.Preferences;
+using Content.Shared.Emoting;
+using Content.Server.Speech.Components;
+using Content.Server.StationEvents.Components;
+using Content.Server.Ghost.Roles.Components;
+using Content.Server.Nyanotrasen.Cloning;
+using Content.Shared.Humanoid.Prototypes;
+using Robust.Shared.GameObjects.Components.Localization; //DeltaV End Metem Usings
 
 namespace Content.Server.Cloning
 {
@@ -62,6 +72,8 @@ public sealed class CloningSystem : EntitySystem
         [Dependency] private readonly SharedMindSystem _mindSystem = default!;
         [Dependency] private readonly MetaDataSystem _metaSystem = default!;
         [Dependency] private readonly SharedJobSystem _jobs = default!;
+        [Dependency] private readonly MetempsychoticMachineSystem _metem = default!; //DeltaV
+        [Dependency] private readonly TagSystem _tag = default!; //DeltaV
 
         public readonly Dictionary<MindComponent, EntityUid> ClonesWaitingForMind = new();
         public const float EasyModeCloningCost = 0.7f;
@@ -136,8 +148,8 @@ private void OnExamined(EntityUid uid, CloningPodComponent component, ExaminedEv
 
             args.PushMarkup(Loc.GetString("cloning-pod-biomass", ("number", _material.GetMaterialAmount(uid, component.RequiredMaterial))));
         }
-
-        public bool TryCloning(EntityUid uid, EntityUid bodyToClone, Entity<MindComponent> mindEnt, CloningPodComponent? clonePod, float failChanceModifier = 1)
+        // Nyano: Adds float karmaBonus
+        public bool TryCloning(EntityUid uid, EntityUid bodyToClone, Entity<MindComponent> mindEnt, CloningPodComponent? clonePod, float failChanceModifier = 1, float karmaBonus = 0.25f)
         {
             if (!Resolve(uid, ref clonePod))
                 return false;
@@ -167,6 +179,13 @@ public bool TryCloning(EntityUid uid, EntityUid bodyToClone, Entity<MindComponen
             if (!TryComp<HumanoidAppearanceComponent>(bodyToClone, out var humanoid))
                 return false; // whatever body was to be cloned, was not a humanoid
 
+            // Begin Nyano-code: allow paradox anomalies to be cloned.
+            var pref = humanoid.LastProfileLoaded;
+            // End Nyano-code.
+
+            if (pref == null)
+                return false;
+
             if (!_prototype.TryIndex(humanoid.Species, out var speciesPrototype))
                 return false;
 
@@ -222,11 +241,11 @@ public bool TryCloning(EntityUid uid, EntityUid bodyToClone, Entity<MindComponen
                     AddComp<ActiveCloningPodComponent>(uid);
                     return true;
                 }
+                // End Nyano-code.
             }
             // end of genetic damage checks
 
-            var mob = Spawn(speciesPrototype.Prototype, Transform(uid).MapPosition);
-            _humanoidSystem.CloneAppearance(bodyToClone, mob);
+            var mob = FetchAndSpawnMob(clonePod, pref, speciesPrototype, humanoid, bodyToClone, karmaBonus); //DeltaV Replaces CloneAppearance with Metem/Clone via FetchAndSpawnMob 
 
             ///Nyano - Summary: adds the potential psionic trait to the reanimated mob.
             EnsureComp<PotentialPsionicComponent>(mob);
@@ -247,7 +266,7 @@ public bool TryCloning(EntityUid uid, EntityUid bodyToClone, Entity<MindComponen
 
             AddComp<ActiveCloningPodComponent>(uid);
 
-            // TODO: Ideally, components like this should be components on the mind entity so this isn't necessary.
+            // TODO: Ideally, components like this should be on a mind entity so this isn't neccesary.
             // Add on special job components to the mob.
             if (_jobs.MindTryGetJob(mindEnt, out _, out var prototype))
             {
@@ -326,7 +345,6 @@ private void EndFailedCloning(EntityUid uid, CloningPodComponent clonePod)
             var transform = Transform(uid);
             var indices = _transformSystem.GetGridTilePositionOrDefault((uid, transform));
             var tileMix = _atmosphereSystem.GetTileMixture(transform.GridUid, null, indices, true);
-
             if (HasComp<EmaggedComponent>(uid))
             {
                 _audio.PlayPvs(clonePod.ScreamSound, uid);
@@ -354,6 +372,83 @@ private void EndFailedCloning(EntityUid uid, CloningPodComponent clonePod)
             RemCompDeferred<ActiveCloningPodComponent>(uid);
         }
 
+        /// <summary>
+        /// Start Nyano Code: Handles fetching the mob and any appearance stuff...
+        /// </summary>
+        private EntityUid FetchAndSpawnMob(CloningPodComponent clonePod, HumanoidCharacterProfile pref, SpeciesPrototype speciesPrototype, HumanoidAppearanceComponent humanoid, EntityUid bodyToClone, float karmaBonus)
+        {
+            List<Sex> sexes = new();
+            bool switchingSpecies = false;
+            bool applyKarma = false;
+            var toSpawn = speciesPrototype.Prototype;
+            TryComp<MetempsychosisKarmaComponent>(bodyToClone, out var oldKarma);
+
+            if (TryComp<MetempsychoticMachineComponent>(clonePod.Owner, out var metem))
+            {
+                toSpawn = _metem.GetSpawnEntity(clonePod.Owner, karmaBonus, speciesPrototype, out var newSpecies, oldKarma?.Score, metem);
+                applyKarma = true;
+
+                if (newSpecies != null)
+                {
+                    sexes = newSpecies.Sexes;
+
+                    if (speciesPrototype.ID != newSpecies.ID)
+                    {
+                        switchingSpecies = true;
+                    }
+
+                    speciesPrototype = newSpecies;
+                }
+            }
+
+            var mob = Spawn(toSpawn, Transform(clonePod.Owner).MapPosition);
+            if (TryComp<HumanoidAppearanceComponent>(mob, out var newHumanoid))
+            {
+                if (switchingSpecies || HasComp<MetempsychosisKarmaComponent>(bodyToClone))
+                {
+                    pref = HumanoidCharacterProfile.RandomWithSpecies(newHumanoid.Species);
+                    if (sexes.Contains(humanoid.Sex))
+                        pref = pref.WithSex(humanoid.Sex);
+
+                    pref = pref.WithGender(humanoid.Gender);
+                    pref = pref.WithAge(humanoid.Age);
+
+                }
+                _humanoidSystem.LoadProfile(mob, pref);
+            }
+
+            if (applyKarma)
+            {
+                var karma = EnsureComp<MetempsychosisKarmaComponent>(mob);
+                karma.Score++;
+                if (oldKarma != null)
+                    karma.Score += oldKarma.Score;
+            }
+
+            var ev = new CloningEvent(bodyToClone, mob);
+            RaiseLocalEvent(bodyToClone, ref ev);
+
+            if (!ev.NameHandled)
+                _metaSystem.SetEntityName(mob, MetaData(bodyToClone).EntityName);
+
+            var grammar = EnsureComp<GrammarComponent>(mob);
+            grammar.ProperNoun = true;
+            grammar.Gender = humanoid.Gender;
+            Dirty(grammar);
+
+            EnsureComp<PotentialPsionicComponent>(mob);
+            EnsureComp<SpeechComponent>(mob);
+            EnsureComp<EmotingComponent>(mob);
+            RemComp<ReplacementAccentComponent>(mob);
+            RemComp<MonkeyAccentComponent>(mob);
+            RemComp<SentienceTargetComponent>(mob);
+            RemComp<GhostTakeoverAvailableComponent>(mob);
+
+            _tag.AddTag(mob, "DoorBumpOpener");
+
+            return mob;
+        }
+        //End Nyano Code
         public void Reset(RoundRestartCleanupEvent ev)
         {
             ClonesWaitingForMind.Clear();

Content.Server/Medical/Components/MedicalScannerComponent.cs

@@ -15,5 +15,14 @@ public sealed partial class MedicalScannerComponent : SharedMedicalScannerCompon
 
         [DataField, ViewVariables(VVAccess.ReadWrite)]
         public float CloningFailChanceMultiplier = 1f;
+
+        // Nyano, needed for Metem Machine.
+        public float MetemKarmaBonus = 0.25f; 
+
+        [DataField("machinePartCloningFailChance", customTypeSerializer: typeof(PrototypeIdSerializer<MachinePartPrototype>))]
+        public string MachinePartCloningFailChance = "Capacitor";
+
+        [DataField("partRatingCloningFailChanceMultiplier")]
+        public float PartRatingFailMultiplier = 0.75f;
     }
 }

Content.Server/Nyanotrasen/Cloning/MetempsychosisKarmaComponent.cs

@@ -0,0 +1,12 @@
+namespace Content.Server.Nyanotrasen.Cloning
+{
+    /// <summary>
+    /// This tracks how many times you have already been cloned and lowers your chance of getting a humanoid each time.
+    /// </summary>
+    [RegisterComponent]
+    public sealed partial class MetempsychosisKarmaComponent : Component
+    {
+        [DataField("score")]
+        public int Score = 0;
+    }
+}

Content.Server/Nyanotrasen/Cloning/MetempsychoticMachineComponent.cs

@@ -0,0 +1,12 @@
+namespace Content.Server.Nyanotrasen.Cloning
+{
+    [RegisterComponent]
+    public sealed partial class MetempsychoticMachineComponent : Component
+    {
+        /// <summary>
+        /// Chance you will spawn as a humanoid instead of a non humanoid.
+        /// </summary>
+        [DataField("humanoidBaseChance")]
+        public float HumanoidBaseChance = 0.75f;
+    }
+}

Content.Server/Nyanotrasen/Cloning/MetempsychoticMachineSystem.cs

@@ -0,0 +1,61 @@
+using Content.Shared.Humanoid.Prototypes;
+using Content.Shared.Random;
+using Content.Shared.Random.Helpers;
+using Robust.Shared.Random;
+using Robust.Shared.Prototypes;
+
+namespace Content.Server.Nyanotrasen.Cloning
+{
+    public sealed class MetempsychoticMachineSystem : EntitySystem
+    {
+        [ValidatePrototypeId<WeightedRandomPrototype>]
+        public const string MetempsychoticHumanoidPool = "MetempsychoticHumanoidPool";
+
+        [ValidatePrototypeId<WeightedRandomPrototype>]
+        public const string MetempsychoticNonHumanoidPool = "MetempsychoticNonhumanoidPool";
+
+        [Dependency] private readonly IRobustRandom _random = default!;
+        [Dependency] private readonly IPrototypeManager _prototypeManager = default!;
+
+        private ISawmill _sawmill = default!;
+
+        public string GetSpawnEntity(EntityUid uid, float karmaBonus, SpeciesPrototype oldSpecies, out SpeciesPrototype? species, int? karma = null, MetempsychoticMachineComponent? component = null)
+        {
+            if (!Resolve(uid, ref component))
+            {
+                Logger.Error("Tried to get a spawn target from someone that was not a metempsychotic machine...");
+                species = null;
+                return "MobHuman";
+            }
+
+            var chance = component.HumanoidBaseChance + karmaBonus;
+
+            if (karma != null)
+                chance -= ((1 - component.HumanoidBaseChance) * (float) karma);
+
+            if (chance > 1 && _random.Prob(chance - 1))
+            {
+                species = oldSpecies;
+                return oldSpecies.Prototype;
+            }
+            else
+                chance = 1;
+
+            chance = Math.Clamp(chance, 0, 1);
+
+            if (_random.Prob(chance) &&
+                _prototypeManager.TryIndex<WeightedRandomPrototype>(MetempsychoticHumanoidPool, out var humanoidPool) &&
+                _prototypeManager.TryIndex<SpeciesPrototype>(humanoidPool.Pick(), out var speciesPrototype))
+            {
+                species = speciesPrototype;
+                return speciesPrototype.Prototype;
+            }
+            else
+            {
+                species = null;
+                _sawmill.Error("Could not index species for metempsychotic machine...");
+                return "MobHuman";
+            }
+        }
+    }
+}

Content.Shared/Humanoid/HumanoidAppearanceComponent.cs

@@ -5,6 +5,7 @@
 using Robust.Shared.Prototypes;
 using Robust.Shared.Serialization;
 using Robust.Shared.Utility;
+using Content.Shared.Preferences; //DeltaV, used for Metempsychosis, Fugitive, and Paradox Anomaly
 
 namespace Content.Shared.Humanoid;
 
@@ -82,6 +83,14 @@ public sealed partial class HumanoidAppearanceComponent : Component
     /// </summary>
     [ViewVariables(VVAccess.ReadOnly)]
     public Color? CachedFacialHairColor;
+
+    // Begin Nyano-code: allow paradox anomalies to be cloned.
+    /// <summary>
+    ///     The last profile loaded onto this entity.
+    /// </summary>
+    [ViewVariables(VVAccess.ReadOnly)]
+    public HumanoidCharacterProfile? LastProfileLoaded;
+    // End Nyano-code.
 }
 
 [DataDefinition]

Content.Shared/Humanoid/SharedHumanoidAppearanceSystem.cs

@@ -329,6 +329,10 @@ public virtual void LoadProfile(EntityUid uid, HumanoidCharacterProfile profile,
 
         humanoid.Age = profile.Age;
 
+        // Begin Nyano-code: save the last profile for paradox anomalies.
+        humanoid.LastProfileLoaded = profile;
+        // End Nyano-code.
+
         Dirty(humanoid);
     }
 

Resources/Locale/en-US/nyanotrasen/research/technologies.ftl

@@ -1,2 +1,3 @@
 research-technology-psionic-countermeasures = Psionic Countermeasures
 research-technology-teleportation = Teleportation
+research-technology-metempsychosis = Metempsychosis

Resources/Prototypes/Entities/Structures/Machines/lathe.yml

@@ -467,7 +467,7 @@
       - MailingUnitElectronics
       - SalvageMagnetMachineCircuitboard
       - StationMapElectronics
-#      - MetempsychoticMachineCircuitboard
+      - MetempsychoticMachineCircuitboard
       - DeepFryerMachineCircuitboard
     # End Nyano additions
       - SalvageExpeditionsComputerCircuitboard # DeltaV

Resources/Prototypes/Nyanotrasen/Entities/Objects/Devices/CircuitBoards/production.yml

@@ -1,3 +1,24 @@
+- type: entity
+  id: MetempsychoticMachineCircuitboard
+  parent: BaseMachineCircuitboard
+  name: metempsychotic machine machine board
+  description: A machine printed circuit board for a cloning pod
+  components:
+    - type: Sprite
+      state: medical
+    - type: MachineBoard
+      prototype: MetempsychoticMachine
+      requirements:
+        Capacitor: 2
+        Manipulator: 2
+      materialRequirements:
+        Glass: 1
+        Cable: 1
+    - type: ReverseEngineering
+      difficulty: 3
+      recipes:
+        - MetempsychoticMachineCircuitboard
+
 - type: entity
   id: ReverseEngineeringMachineCircuitboard
   parent: BaseMachineCircuitboard

Resources/Prototypes/Nyanotrasen/Entities/Structures/Machines/metempsychoticMachine.yml

@@ -0,0 +1,25 @@
+- type: entity
+  parent: CloningPod
+  id: MetempsychoticMachine
+  name: metempsychotic machine
+  description: Speeds along the transmigration of a soul to its next vessel.
+  components:
+    - type: MetempsychoticMachine
+    - type: CloningPod
+    - type: Machine
+      board: MetempsychoticMachineCircuitboard
+    - type: Sprite
+      sprite: Nyanotrasen/Structures/Machines/metempsychotic.rsi
+      snapCardinals: true
+      layers:
+        - state: pod_0
+    - type: Appearance
+    - type: GenericVisualizer
+      visuals:
+        enum.CloningPodVisuals.Status:
+          base:
+            Cloning: { state: pod_1 }
+            NoMind: { state: pod_1 }
+            Gore: { state: pod_1 }
+            Idle: { state: pod_0 }
+    - type: Psionic