EndlessHostRoles/Roles/Standard/Neutral/Evil/Gaslighter.cs

using System;
using System.Collections.Generic;
using System.Linq;
using EHR.Modules;
using EHR.Patches;
using Hazel;

namespace EHR.Roles;

public class Gaslighter : RoleBase
{
    public static bool On;
    private static List<Gaslighter> Instances = [];

    private static OptionItem KillCooldown;
    public static OptionItem WinCondition;
    private static OptionItem CycleRepeats;

    private static readonly string[] WinConditionOptions =
    [
        "GaslighterWinCondition.CrewLoses",
        "GaslighterWinCondition.IfAlive",
        "GaslighterWinCondition.LastStanding"
    ];

    private Round CurrentRound;
    private HashSet<byte> CursedPlayers;
    private bool CycleFinished;

    private byte GaslighterId;
    private HashSet<byte> ShieldedPlayers;
    private static readonly StringBuilder Suffix = new();

    public override bool IsEnable => On;

    public override void SetupCustomOption()
    {
        StartSetup(648350)
            .AutoSetupOption(ref KillCooldown, 22.5f, new FloatValueRule(0f, 120f, 0.5f), OptionFormat.Seconds)
            .AutoSetupOption(ref WinCondition, 0, WinConditionOptions)
            .AutoSetupOption(ref CycleRepeats, false);
    }

    public override void Init()
    {
        On = false;
        Instances = [];
    }

    public override void Add(byte playerId)
    {
        On = true;
        Instances.Add(this);
        GaslighterId = playerId;
        CurrentRound = default(Round);
        CursedPlayers = [];
        ShieldedPlayers = [];
        CycleFinished = false;
    }

    public override void Remove(byte playerId)
    {
        Instances.Remove(this);
    }

    public override bool CanUseKillButton(PlayerControl pc)
    {
        return true;
    }

    public override void SetKillCooldown(byte id)
    {
        Main.AllPlayerKillCooldown[id] = CurrentRound switch
        {
            Round.Kill => KillCooldown.GetFloat(),
            Round.Knight => Monarch.KnightCooldown.GetFloat(),
            Round.Curse => Options.AdjustedDefaultKillCooldown,
            Round.Shield => Medic.CD.GetFloat(),
            _ => Options.AdjustedDefaultKillCooldown
        };
    }

    public override void SetButtonTexts(HudManager hud, byte id)
    {
        switch (CurrentRound)
        {
            case Round.Knight:
                hud.KillButton?.OverrideText(Translator.GetString("MonarchKillButtonText"));
                break;
            case Round.Curse:
                hud.KillButton?.OverrideText(Translator.GetString("WarlockCurseButtonText"));
                break;
            case Round.Shield:
                hud.KillButton?.OverrideText(Translator.GetString("MedicalerButtonText"));
                break;
        }
    }

    public static void OnExile(byte[] exileIds)
    {
        try
        {
            foreach (Gaslighter instance in Instances)
            {
                foreach (byte id in exileIds)
                {
                    if (id == instance.GaslighterId)
                    {
                        instance.CursedPlayers.Clear();
                        Utils.SendRPC(CustomRPC.SyncRoleData, id, 2);
                    }
                }
            }

            List<byte> curseDeathList = [];

            foreach (PlayerControl pc in Main.CachedAlivePlayerControls())
            {
                foreach (Gaslighter instance in Instances)
                {
                    if (Main.AfterMeetingDeathPlayers.ContainsKey(pc.PlayerId)) continue;

                    PlayerControl gaslighter = instance.GaslighterId.GetPlayer();

                    if (instance.CursedPlayers.Contains(pc.PlayerId) && gaslighter != null && gaslighter.IsAlive())
                    {
                        pc.SetRealKiller(gaslighter);
                        curseDeathList.Add(pc.PlayerId);
                    }
                }
            }

            CheckForEndVotingPatch.TryAddAfterMeetingDeathPlayers(PlayerState.DeathReason.Spell, [.. curseDeathList]);
        }
        catch (Exception e) { Utils.ThrowException(e); }
    }

    public override void AfterMeetingTasks()
    {
        ShieldedPlayers.Clear();
        CursedPlayers.Clear();
        Utils.SendRPC(CustomRPC.SyncRoleData, GaslighterId, 2);

        if (Main.PlayerStates[GaslighterId].IsDead) return;

        if (CurrentRound == Round.Shield)
        {
            CycleFinished = true;
            CurrentRound = Round.Kill;
        }
        else if (!CycleFinished || CycleRepeats.GetBool()) CurrentRound++;

        float limit = CurrentRound switch
        {
            Round.Knight => Monarch.KnightMax.GetFloat(),
            Round.Shield => Medic.SkillLimit,
            _ => 0
        };

        GaslighterId.SetAbilityUseLimit(limit);

        PlayerControl pc = GaslighterId.GetPlayer();
        pc?.ResetKillCooldown();
        pc?.Notify(Translator.GetString($"Gaslighter.{CurrentRound}"));

        LateTask.New(() => pc?.SetKillCooldown(), 1.5f, log: false);
    }

    public override void OnReportDeadBody()
    {
        HashSet<byte> spelledPlayers = [];

        foreach (Gaslighter instance in Instances)
        {
            PlayerControl pc = instance.GaslighterId.GetPlayer();

            if (pc == null || !pc.IsAlive())
            {
                instance.CursedPlayers.Clear();
                Utils.SendRPC(CustomRPC.SyncRoleData, instance.GaslighterId, 2);
            }

            spelledPlayers.UnionWith(instance.CursedPlayers);
        }

        if (spelledPlayers.Count > 0)
        {
            LateTask.New(() =>
            {
                string cursed = spelledPlayers.Join(", ", x => x.ColoredPlayerName());
                string role = IRandom.Instance.Next(2) == 0 ? CustomRoles.HexMaster.ToColoredString() : CustomRoles.Witch.ToColoredString();
                string text = string.Format(Translator.GetString("WitchCursedPlayersMessage"), cursed, role);
                Utils.SendMessage(text, title: Translator.GetString("MessageTitle.Attention"), importance: MessageImportance.High);
            }, 10f, "Gaslighter Cursed Players Notify");
        }
    }

    public override bool OnCheckMurder(PlayerControl killer, PlayerControl target)
    {
        switch (CurrentRound)
        {
            case Round.Kill:
                return true;
            case Round.Knight when killer.GetAbilityUseLimit() > 0 && !target.Is(CustomRoles.Knighted):
                target.RpcSetCustomRole(CustomRoles.Knighted);
                target.RpcGuardAndKill(killer);
                target.RpcGuardAndKill(target);
                target.Notify(CustomRoles.Monarch.ColoredTextByRole(Translator.GetString("KnightedByMonarch")));
                killer.RpcRemoveAbilityUse(notify: false);
                killer.SetKillCooldown();
                Utils.NotifyRoles(SpecifySeer: killer, SpecifyTarget: target);
                break;
            case Round.Curse:
                killer.RPCPlayCustomSound("Curse");
                CursedPlayers.Add(target.PlayerId);
                Utils.SendRPC(CustomRPC.SyncRoleData, GaslighterId, 1, target.PlayerId);
                Utils.NotifyRoles(SpecifySeer: killer, SpecifyTarget: target);
                killer.SetKillCooldown();
                break;
            case Round.Shield when killer.GetAbilityUseLimit() > 0:
                killer.RPCPlayCustomSound("Shield");
                target.RPCPlayCustomSound("Shield");
                ShieldedPlayers.Add(target.PlayerId);
                killer.RpcRemoveAbilityUse(notify: false);
                killer.SetKillCooldown();
                Utils.NotifyRoles(SpecifySeer: killer, SpecifyTarget: target);
                Utils.NotifyRoles(SpecifySeer: target, SpecifyTarget: target);
                break;
        }

        return false;
    }

    public static bool IsShielded(PlayerControl target)
    {
        return On && Instances.Exists(i => i.ShieldedPlayers.Contains(target.PlayerId));
    }

    private static bool IsCursed(PlayerControl target)
    {
        return On && Instances.Exists(i => i.CursedPlayers.Contains(target.PlayerId));
    }

    public override void GetProgressText(byte playerId, bool comms, StringBuilder resultText)
    {
        if (CurrentRound is Round.Knight or Round.Shield) base.GetProgressText(playerId, comms, resultText);
        else resultText.Append(Utils.GetTaskCount(playerId, comms));
    }

    public static string GetMark(PlayerControl seer, PlayerControl target, bool meeting = false)
    {
        bool seerIsGaslighter = seer.Is(CustomRoles.Gaslighter);
        Suffix.Clear();

        if (IsShielded(target) && (seerIsGaslighter || seer.PlayerId == target.PlayerId))
            Suffix.Append(CustomRoles.Medic.ColoredTextByRole(" ●"));

        if (IsCursed(target) && (meeting || seerIsGaslighter))
            Suffix.Append(Utils.ColorString(Palette.ImpostorRed, "†"));

        return Suffix.ToString();
    }

    public bool AddAsAdditionalWinner()
    {
        return WinCondition.GetValue() switch
        {
            0 => CustomWinnerHolder.WinnerTeam != CustomWinner.Crewmate,
            1 => GaslighterId.GetPlayer()?.IsAlive() == true,
            _ => false
        };
    }

    public void ReceiveRPC(MessageReader reader)
    {
        switch (reader.ReadPackedInt32())
        {
            case 1:
                CursedPlayers.Add(reader.ReadByte());
                break;
            case 2:
                CursedPlayers.Clear();
                break;
        }
    }

    private enum Round
    {
        Kill,
        Knight,
        Curse,
        Shield
    }
}