shadow_cloak.dm

/datum/action/cooldown/spell/shadow_cloak
	name = "Cloak of Shadow"
	desc = "Completely conceals your identity, but does not make you invisible.  Can be activated early to disable it. \
		While cloaked, you move faster, but undergo actions much slower. \
		Taking damage while cloaked may cause it to lift suddenly, causing negative effects. "
	background_icon_state = "bg_heretic"
	overlay_icon_state = "bg_heretic_border"
	button_icon = 'icons/mob/actions/actions_minor_antag.dmi'
	button_icon_state = "ninja_cloak"
	sound = 'sound/effects/curse2.ogg'

	school = SCHOOL_FORBIDDEN
	cooldown_time = 6 SECONDS

	invocation_type = INVOCATION_NONE
	spell_requirements = NONE

	/// How long before we automatically uncloak?
	var/uncloak_time = 3 MINUTES
	/// A timer id, for the uncloak timer
	var/uncloak_timer
	/// The cloak currently active
	var/datum/status_effect/shadow_cloak/active_cloak

/datum/action/cooldown/spell/shadow_cloak/Remove(mob/living/remove_from)
	if(active_cloak)
		uncloak_mob(remove_from, show_message = FALSE)
	return ..()

/datum/action/cooldown/spell/shadow_cloak/is_valid_target(atom/cast_on)
	if(HAS_TRAIT(cast_on, TRAIT_HULK)) // Hulks are not stealthy. Need not apply
		cast_on.balloon_alert(cast_on, "cannot cast while hulk!")
		return FALSE
	return isliving(cast_on)

/datum/action/cooldown/spell/shadow_cloak/before_cast(mob/living/cast_on)
	. = ..()
	sound = pick(
		'sound/effects/curse1.ogg',
		'sound/effects/curse2.ogg',
		'sound/effects/curse3.ogg',
		'sound/effects/curse4.ogg',
		'sound/effects/curse5.ogg',
		'sound/effects/curse6.ogg',
	)
	// We handle the CD on our own
	return . | SPELL_NO_IMMEDIATE_COOLDOWN

/datum/action/cooldown/spell/shadow_cloak/cast(mob/living/cast_on)
	. = ..()
	if(active_cloak)
		var/new_cd = max((uncloak_time - timeleft(uncloak_timer)) / 3, cooldown_time)
		uncloak_mob(cast_on)
		StartCooldown(new_cd)

	else
		uncloak_timer = addtimer(CALLBACK(src, PROC_REF(timed_uncloak), cast_on), uncloak_time, TIMER_STOPPABLE)
		cloak_mob(cast_on)
		StartCooldown()

/datum/action/cooldown/spell/shadow_cloak/proc/timed_uncloak(mob/living/cast_on)
	if(QDELETED(src) || QDELETED(cast_on))
		return

	uncloak_mob(cast_on)
	StartCooldown(uncloak_timer / 3)

/datum/action/cooldown/spell/shadow_cloak/proc/cloak_mob(mob/living/cast_on)
	playsound(cast_on, 'sound/chemistry/ahaha.ogg', 50, TRUE, -1, extrarange = SILENCED_SOUND_EXTRARANGE, frequency = 0.5)
	cast_on.visible_message(
		span_warning("[cast_on] disappears into the shadows!"),
		span_notice("You disappear into the shadows, becoming unidentifiable."),
	)

	active_cloak = cast_on.apply_status_effect(/datum/status_effect/shadow_cloak)
	RegisterSignal(active_cloak, COMSIG_QDELETING, PROC_REF(on_early_cloak_loss))
	RegisterSignal(cast_on, SIGNAL_REMOVETRAIT(TRAIT_ALLOW_HERETIC_CASTING), PROC_REF(on_focus_lost))

/datum/action/cooldown/spell/shadow_cloak/proc/uncloak_mob(mob/living/cast_on, show_message = TRUE)
	if(!QDELETED(active_cloak))
		UnregisterSignal(active_cloak, COMSIG_QDELETING)
		qdel(active_cloak)
	active_cloak = null

	UnregisterSignal(cast_on, SIGNAL_REMOVETRAIT(TRAIT_ALLOW_HERETIC_CASTING))
	playsound(cast_on, 'sound/effects/curseattack.ogg', 50)
	if(show_message)
		cast_on.visible_message(
			span_warning("[cast_on] appears from the shadows!"),
			span_notice("You appear from the shadows, identifiable once more."),
		)

	// Clear up the timer
	deltimer(uncloak_timer)
	uncloak_timer = null

/// Signal proc for [COMSIG_QDELETING], if our cloak is deleted early, impart negative effects
/datum/action/cooldown/spell/shadow_cloak/proc/on_early_cloak_loss(datum/status_effect/source)
	SIGNAL_HANDLER

	var/mob/living/removed = source.owner
	uncloak_mob(removed, show_message = FALSE)
	removed.visible_message(
		span_warning("[removed] is pulled from the shadows!"),
		span_userdanger("You are pulled out of the shadows!"),
	)

	removed.Knockdown(0.5 SECONDS)
	removed.add_movespeed_modifier(/datum/movespeed_modifier/shadow_cloak/early_remove)
	addtimer(CALLBACK(removed, TYPE_PROC_REF(/mob, remove_movespeed_modifier), /datum/movespeed_modifier/shadow_cloak/early_remove), 2 MINUTES, TIMER_UNIQUE|TIMER_OVERRIDE)
	StartCooldown(uncloak_time * 2/3)

/// Signal proc for [SIGNAL_REMOVETRAIT] via [TRAIT_ALLOW_HERETIC_CASTING], losing our focus midcast will throw us out.
/datum/action/cooldown/spell/shadow_cloak/proc/on_focus_lost(mob/living/source)
	SIGNAL_HANDLER

	uncloak_mob(source, show_message = FALSE)
	source.visible_message(
		span_warning("[source] suddenly appears from the shadows!"),
		span_userdanger("As you lose your focus, you are pulled out of the shadows!"),
	)
	StartCooldown(uncloak_time / 3)

/// Shadow cloak effect. Conceals the owner in a cloud of purple smoke, making them unidentifiable.
/// Also comes with some other buffs and debuffs - faster movespeed, slower actionspeed, etc.
/datum/status_effect/shadow_cloak
	id = "shadow_cloak"
	alert_type = null
	tick_interval = -1
	/// How much damage we've been hit with
	var/damage_sustained = 0
	/// How much damage we can be hit with before it starts rolling reveal chances
	var/damage_before_reveal = 25
	/// The image we place over the owner
	var/image/cloak_image

/datum/status_effect/shadow_cloak/on_apply()
	cloak_image = image('icons/effects/effects.dmi', owner, "curse", dir = owner.dir)
	cloak_image.override = TRUE
	cloak_image.alpha = 0
	animate(cloak_image, alpha = 255, 0.2 SECONDS)
	owner.add_alt_appearance(/datum/atom_hud/alternate_appearance/basic/everyone, id, cloak_image)
	// Add the relevant traits and modifiers
	owner.add_traits(list(TRAIT_UNKNOWN, TRAIT_SILENT_FOOTSTEPS), id)
	owner.add_movespeed_modifier(/datum/movespeed_modifier/shadow_cloak)
	owner.add_actionspeed_modifier(/datum/actionspeed_modifier/shadow_cloak)
	// Register signals to cause effects
	RegisterSignal(owner, COMSIG_ATOM_DIR_CHANGE, PROC_REF(on_dir_change))
	RegisterSignal(owner, COMSIG_LIVING_SET_BODY_POSITION, PROC_REF(on_body_position_change))
	RegisterSignal(owner, COMSIG_MOB_STATCHANGE, PROC_REF(on_stat_change))
	RegisterSignal(owner, COMSIG_MOB_APPLY_DAMAGE, PROC_REF(on_damaged))
	RegisterSignal(owner, COMSIG_MOVABLE_MOVED, PROC_REF(on_move))
	return TRUE

/datum/status_effect/shadow_cloak/on_remove()
	// Remove image
	owner.remove_alt_appearance(id)
	QDEL_NULL(cloak_image)
	// Remove traits and modifiers
	owner.remove_traits(list(TRAIT_UNKNOWN, TRAIT_SILENT_FOOTSTEPS), id)
	owner.remove_movespeed_modifier(/datum/movespeed_modifier/shadow_cloak)
	owner.remove_actionspeed_modifier(/datum/actionspeed_modifier/shadow_cloak)
	// Clear signals
	UnregisterSignal(owner, list(
		COMSIG_ATOM_DIR_CHANGE,
		COMSIG_LIVING_SET_BODY_POSITION,
		COMSIG_MOB_STATCHANGE,
		COMSIG_MOB_APPLY_DAMAGE,
		COMSIG_MOVABLE_MOVED,
	))

/// Signal proc for [COMSIG_ATOM_DIR_CHANGE], handles turning the effect as we turn
/datum/status_effect/shadow_cloak/proc/on_dir_change(datum/source, old_dir, new_dir)
	SIGNAL_HANDLER

	cloak_image.dir = new_dir

/// Signal proc for [COMSIG_LIVING_SET_BODY_POSITION], handles rotating the effect when we're downed
/datum/status_effect/shadow_cloak/proc/on_body_position_change(datum/source, new_value, old_value)
	SIGNAL_HANDLER

	if(new_value == LYING_DOWN)
		cloak_image.transform = turn(cloak_image.transform, 90)
	else
		cloak_image.transform = turn(cloak_image.transform, -90)

/// Signal proc for [COMSIG_MOB_STATCHANGE], going past soft crit will stop the effect
/datum/status_effect/shadow_cloak/proc/on_stat_change(datum/source, new_stat, old_stat)
	SIGNAL_HANDLER

	// Going above unconscious will self-delete
	if(new_stat >= UNCONSCIOUS)
		qdel(src)

/// Signal proc for [COMSIG_MOB_APPLY_DAMAGE], being damaged past a threshold will roll a chance to stop the effect
/datum/status_effect/shadow_cloak/proc/on_damaged(datum/source, damage, damagetype, ...)
	SIGNAL_HANDLER

	// Stam damage is generally bursty, so we'll half it
	if(damagetype == STAMINA)
		damage *= 0.5

	// Add incoming damage to the total damage sustained
	damage_sustained += damage
	// If we're not past the threshold, return
	if(damage_sustained < damage_before_reveal)
		return

	// Otherwise, we have a probability based on how much damage sustained to self delete
	if(prob(damage_sustained))
		qdel(src)

/// Signal proc for [COMSIG_MOVABLE_MOVED], leaves a cool looking trail behind us as we walk
/datum/status_effect/shadow_cloak/proc/on_move(datum/source, old_loc, movement_dir)
	SIGNAL_HANDLER

	if(owner.loc == old_loc)
		return

	// Only create an effect every other step, starting without one
	var/obj/effect/temp_visual/dir_setting/cloak_walk/trail = new (old_loc, movement_dir)
	if(owner.body_position == LYING_DOWN)
		trail.transform = turn(trail.transform, 90)

// Visual effect for the shadow cloak "trail"
/obj/effect/temp_visual/dir_setting/cloak_walk
	duration = 0.75 SECONDS
	icon_state = "curse"

/obj/effect/temp_visual/dir_setting/cloak_walk/Initialize(mapload, set_dir)
	. = ..()
	animate(src, alpha = 0, time = duration - 1)

// Movespeed modifiers for being in cloak
/datum/movespeed_modifier/shadow_cloak
	blacklisted_movetypes = FLYING
	// While cloaked, you move faster
	multiplicative_slowdown = -0.25

/datum/movespeed_modifier/shadow_cloak/early_remove
	// Being thrusted out of cloak from damage makes you move slower
	multiplicative_slowdown = 0.5

/datum/actionspeed_modifier/shadow_cloak
	// While cloaked, all actions are much slower
	multiplicative_slowdown = 3