|
|
|
@@ -167,14 +167,17 @@
|
|
|
|
|
var/enthrallTally = 1 //Keeps track of the enthralling process
|
|
|
|
|
var/resistanceTally = 0 //Keeps track of the resistance
|
|
|
|
|
var/deltaResist //The total resistance added per resist click
|
|
|
|
|
var/deltaEnthrall //currently unused (i think)
|
|
|
|
|
//var/deltaEnthrall //currently unused (i think)
|
|
|
|
|
var/phase = 1 //-1: resisted state, due to be removed.0: sleeper agent, no effects unless triggered 1: initial, 2: 2nd stage - more commands, 3rd: fully enthralled, 4th Mindbroken
|
|
|
|
|
var/status = null //status effects
|
|
|
|
|
var/statusStrength = 0 //strength of status effect
|
|
|
|
|
var/enthrallID //Enchanter's name/ID
|
|
|
|
|
var/mob/living/master //Enchanter's person
|
|
|
|
|
var/enthrallID //Enchanter's ckey
|
|
|
|
|
var/enthrallGender //Use master or mistress
|
|
|
|
|
//var/mob/living/master == null
|
|
|
|
|
var/mental_capacity //Higher it is, lower the cooldown on commands, capacity reduces with resistance.
|
|
|
|
|
var/mental_cost //Current cost of custom triggers
|
|
|
|
|
var/mindbroken = FALSE //Not sure I use this, replaced with phase 4
|
|
|
|
|
//var/mental_cost //Current cost of custom triggers
|
|
|
|
|
//var/mindbroken = FALSE //Not sure I use this, replaced with phase 4
|
|
|
|
|
var/datum/weakref/redirect_component1 //resistance
|
|
|
|
|
var/datum/weakref/redirect_component2 //say
|
|
|
|
|
var/distancelist = list(4,3,2,1.5,1,0.8,0.6,0.4,0.2) //Distance multipliers
|
|
|
|
@@ -184,7 +187,7 @@
|
|
|
|
|
var/cooldown = 0
|
|
|
|
|
|
|
|
|
|
/datum/status_effect/chem/enthrall/on_apply(mob/living/carbon/M)
|
|
|
|
|
if(M.ID == enthrallID)
|
|
|
|
|
if(M.key == enthrallID)
|
|
|
|
|
owner.remove_status_effect(src)//This shouldn't happen, but just in case
|
|
|
|
|
redirect_component1 = WEAKREF(owner.AddComponent(/datum/component/redirect, list(COMSIG_LIVING_RESIST = CALLBACK(src, .proc/owner_resist)))) //Do resistance calc if resist is pressed#
|
|
|
|
|
redirect_component2 = WEAKREF(owner.AddComponent(/datum/component/redirect, list(COMSIG_LIVING_SAY = CALLBACK(src, .proc/owner_say)))) //Do resistance calc if resist is pressed
|
|
|
|
@@ -194,10 +197,27 @@
|
|
|
|
|
SEND_SIGNAL(M, COMSIG_ADD_MOOD_EVENT, "enthrall", /datum/mood_event/enthrall)
|
|
|
|
|
|
|
|
|
|
/datum/status_effect/chem/enthrall/tick(mob/living/carbon/M)
|
|
|
|
|
|
|
|
|
|
//chem calculations
|
|
|
|
|
if (owner.reagents.has_reagent("MKUltra"))
|
|
|
|
|
if (phase >= 2)
|
|
|
|
|
enthrallTally += phase
|
|
|
|
|
else
|
|
|
|
|
if (phase < 3)
|
|
|
|
|
deltaResist += 5//If you've no chem, then you break out quickly
|
|
|
|
|
if(prob(20))
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>Your mind starts to restore some of it's clarity as you feel the effects of the drug wain.</i></span>")
|
|
|
|
|
if (mental_capacity <= 500 || phase == 4)
|
|
|
|
|
if (owner.reagents.has_reagent("mannitol"))
|
|
|
|
|
mental_capacity += 1
|
|
|
|
|
if (owner.reagents.has_reagent("neurine"))
|
|
|
|
|
mental_capacity += 2
|
|
|
|
|
|
|
|
|
|
//mindshield check
|
|
|
|
|
if(M.has_trait(TRAIT_MINDSHIELD))
|
|
|
|
|
resistanceTally += 5
|
|
|
|
|
if(prob(20))
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>You feel lucidity returning to your mind as the mindshield attempts to return your brain to normal function.</i></span>")
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>You feel lucidity returning to your mind as the mindshield buzzes, attempting to return your brain to normal function.</i></span>")
|
|
|
|
|
|
|
|
|
|
//phase specific events
|
|
|
|
|
switch(phase)
|
|
|
|
@@ -212,42 +232,38 @@
|
|
|
|
|
mental_capacity -= resistanceTally//leftover resistance per step is taken away from mental_capacity.
|
|
|
|
|
enthrallTally = 0
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>Your conciousness slips, as you sink deeper into trance.</i></span>")
|
|
|
|
|
continue
|
|
|
|
|
if (resistanceTally > 100)
|
|
|
|
|
else if (resistanceTally > 100)
|
|
|
|
|
enthrallTally *= 0.5
|
|
|
|
|
phase = -1
|
|
|
|
|
resistanceTally = 0
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>You break free of the influence in your mind, your thoughts suddenly turning lucid!</i></span>")
|
|
|
|
|
owner.remove_status_effect(src) //If resisted in phase 1, effect is removed.
|
|
|
|
|
continue
|
|
|
|
|
if(prob(10))
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>[pick("It feels so good to listen to [enthrallID.name].", "You can't keep your eyes off [enthrallID.name].", "[enthrallID.name]'s voice is making you feel so sleepy.", "You feel so comfortable with [enthrallID.name]", "[enthrallID.name] is so sexy and dominant, it feels right to obey them.")].</i></span>")
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>[pick("It feels so good to listen to [master.name].", "You can't keep your eyes off [master.name].", "[master.name]'s voice is making you feel so sleepy.", "You feel so comfortable with [master.name]", "[master.name] is so sexy and dominant, it feels right to obey them.")].</i></span>")
|
|
|
|
|
else if (2) //partially enthralled
|
|
|
|
|
if (enthrallTally > 150)
|
|
|
|
|
phase += 1
|
|
|
|
|
mental_capacity -= resistanceTally//leftover resistance per step is taken away from mental_capacity.
|
|
|
|
|
enthrallTally = 0
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>Your mind gives, eagerly obeying and serving [enthrallID.name].</i></span>")
|
|
|
|
|
to_chat(owner, "<span class='warning'><i>You are now fully enthralled to [enthrallID.name], and eager to follow their commands. However you find that in your intoxicated state you are much less likely to resort to violence, unless it is to defend your master. Equally you are unable to commit suicide, even if ordered to, as you cannot server your Master in death. </i></span>")//If people start using this as an excuse to be violent I'll just make them all pacifists so it's not OP.
|
|
|
|
|
continue
|
|
|
|
|
if (resistanceTally > 150)
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>Your mind gives, eagerly obeying and serving [master.name].</i></span>")
|
|
|
|
|
to_chat(owner, "<span class='warning'><i>You are now fully enthralled to [master.name], and eager to follow their commands. However you find that in your intoxicated state you are much less likely to resort to violence, unless it is to defend your [enthrallGender]. Equally you are unable to commit suicide, even if ordered to, as you cannot server your [enthrallGender] in death. </i></span>")//If people start using this as an excuse to be violent I'll just make them all pacifists so it's not OP.
|
|
|
|
|
else if (resistanceTally > 150)
|
|
|
|
|
enthrallTally *= 0.5
|
|
|
|
|
phase -= 1
|
|
|
|
|
resistanceTally = 0
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>You manage to shake some of the entrancement from your addled mind, however you can still feel yourself drawn towards [enthrallID.name].</i></span>")
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>You manage to shake some of the entrancement from your addled mind, however you can still feel yourself drawn towards [master.name].</i></span>")
|
|
|
|
|
//owner.remove_status_effect(src) //If resisted in phase 1, effect is removed. Not at the moment,
|
|
|
|
|
continue
|
|
|
|
|
else if (3)//fully entranced
|
|
|
|
|
if (resistanceTally >= 250 && withdrawalTick >= 150)
|
|
|
|
|
enthrallTally = 0
|
|
|
|
|
phase -= 1
|
|
|
|
|
resistanceTally = 0
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>The separation from you master sparks a small flame of resistance in yourself, as your mind slowly starts to return to normal.</i></span>")
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>The separation from you [enthrallGender] sparks a small flame of resistance in yourself, as your mind slowly starts to return to normal.</i></span>")
|
|
|
|
|
else if (4) //mindbroken
|
|
|
|
|
if (mental_capacity >= 499 || owner.getBrainLoss() >=20 || !M.has_reagent("MKUltra"))
|
|
|
|
|
if (mental_capacity >= 499 || owner.getBrainLoss() >=20 || !owner.reagents.has_reagent("MKUltra"))
|
|
|
|
|
phase = 2
|
|
|
|
|
mental_capacity = 500
|
|
|
|
|
E.customTriggers = list()
|
|
|
|
|
customTriggers = list()
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>Your mind starts to heal, fixing the damage caused by the massive ammounts of chem injected into your system earlier, .</i></span>")
|
|
|
|
|
M.slurring = 0
|
|
|
|
|
M.confused = 0
|
|
|
|
@@ -256,38 +272,24 @@
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
//distance calculations
|
|
|
|
|
switch(get_dist(enthrallID, owner))
|
|
|
|
|
switch(get_dist(master, owner))
|
|
|
|
|
if(0 to 8)//If the enchanter is within range, increase enthrallTally, remove withdrawal subproc and undo withdrawal effects.
|
|
|
|
|
enthrallTally += distancelist[get_dist(enthrallID, owner)+1]
|
|
|
|
|
var/withdrawal = FALSE
|
|
|
|
|
enthrallTally += distancelist[get_dist(master, owner)+1]
|
|
|
|
|
withdrawal = FALSE
|
|
|
|
|
if(withdrawalTick > 0)
|
|
|
|
|
withdrawalTick -= 2
|
|
|
|
|
M.hallucination = max(0, M.hallucination - 2)
|
|
|
|
|
M.stuttering = max(0, M.stuttering - 2)
|
|
|
|
|
M.jitteriness = max(0, M.jitteriness - 2)
|
|
|
|
|
if(9 to INFINITY)//If
|
|
|
|
|
var/withdrawal = TRUE
|
|
|
|
|
|
|
|
|
|
//chem calculations
|
|
|
|
|
if (M.has_reagent("MKUltra"))
|
|
|
|
|
if (phase >= 2)
|
|
|
|
|
enthrallTally += phase
|
|
|
|
|
else
|
|
|
|
|
if (phase < 3)
|
|
|
|
|
deltaResist += 10//If you've no chem, then you break out quickly
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>You're starting to miss your Master/Mistress.</i></span>")
|
|
|
|
|
if (mental_capacity <= 500 || phase == 4)
|
|
|
|
|
if (owner.has_reagent("mannitol"))
|
|
|
|
|
mental_capacity += 1
|
|
|
|
|
if (owner.has_reagent("neurine"))
|
|
|
|
|
mental_capacity += 2
|
|
|
|
|
withdrawal = TRUE
|
|
|
|
|
|
|
|
|
|
//Withdrawal subproc:
|
|
|
|
|
if (withdrawal == TRUE)//Your minions are really REALLY needy.
|
|
|
|
|
switch(withdrawalTick)//denial
|
|
|
|
|
if(20 to 40)//Gives wiggle room, so you're not SUPER needy
|
|
|
|
|
if(prob(10))
|
|
|
|
|
to_chat(owner, "You're starting to miss your Master/Mistress.")
|
|
|
|
|
to_chat(owner, "You're starting to miss your [enthrallGender].")
|
|
|
|
|
if(prob(10))
|
|
|
|
|
owner.adjustBrainLoss(0.5)
|
|
|
|
|
to_chat(owner, "They'll surely be back soon") //denial
|
|
|
|
@@ -298,7 +300,7 @@
|
|
|
|
|
to_chat(owner, "They are coming back, right...?")
|
|
|
|
|
owner.adjustBrainLoss(1)
|
|
|
|
|
if(prob(20))
|
|
|
|
|
to_chat(owner, "I just need to be a good pet for Master, they'll surely return if I'm a good pet.")
|
|
|
|
|
to_chat(owner, "I just need to be a good pet for [enthrallGender], they'll surely return if I'm a good pet.")
|
|
|
|
|
owner.adjustBrainLoss(-2)
|
|
|
|
|
if(66)
|
|
|
|
|
SEND_SIGNAL(M, COMSIG_CLEAR_MOOD_EVENT, "EnthMissing1") //Why does this not work?
|
|
|
|
@@ -309,11 +311,11 @@
|
|
|
|
|
if(prob(30))
|
|
|
|
|
addtimer(CALLBACK(M, /mob/verb/a_intent_change, INTENT_HARM), 2)
|
|
|
|
|
addtimer(CALLBACK(M, /mob/proc/click_random_mob), 2)
|
|
|
|
|
to_chat(owner, "You suddenly lash out at the station in anger for it keeping you away from your Master.")
|
|
|
|
|
to_chat(owner, "You suddenly lash out at the station in anger for it keeping you away from your [enthrallGender].")
|
|
|
|
|
if(90)
|
|
|
|
|
SEND_SIGNAL(M, COMSIG_CLEAR_MOOD_EVENT, "EnthMissing2") //Why does this not work?
|
|
|
|
|
SEND_SIGNAL(M, COMSIG_ADD_MOOD_EVENT, "EnthMissing3", /datum/mood_event/enthrallmissing3)
|
|
|
|
|
to_chat(owner, "<span class='warning'><i>You need to find your Master at all costs, you can't hold yourself back anymore.</i></span>")
|
|
|
|
|
to_chat(owner, "<span class='warning'><i>You need to find your [enthrallGender] at all costs, you can't hold yourself back anymore.</i></span>")
|
|
|
|
|
if(91 to 120)//depression
|
|
|
|
|
if(prob(20))
|
|
|
|
|
owner.adjustBrainLoss(1)
|
|
|
|
@@ -324,12 +326,12 @@
|
|
|
|
|
if(121)
|
|
|
|
|
SEND_SIGNAL(M, COMSIG_CLEAR_MOOD_EVENT, "EnthMissing3")
|
|
|
|
|
SEND_SIGNAL(M, COMSIG_ADD_MOOD_EVENT, "EnthMissing4", /datum/mood_event/enthrallmissing4)
|
|
|
|
|
to_chat(owner, "<span class='warning'><i>You can hardly find the strength to continue without your Master.</i></span>")
|
|
|
|
|
to_chat(owner, "<span class='warning'><i>You can hardly find the strength to continue without your [enthrallGender].</i></span>")
|
|
|
|
|
if(120 to 140) //depression
|
|
|
|
|
if(prob(25))
|
|
|
|
|
owner.SetStun(20, 0)
|
|
|
|
|
owner.emote("cry")//does this exist?
|
|
|
|
|
to_chat(owner, "You're unable to hold back your tears, suddenly sobbing as the desire to see your Master oncemore overwhelms you.")
|
|
|
|
|
to_chat(owner, "You're unable to hold back your tears, suddenly sobbing as the desire to see your [enthrallGender] oncemore overwhelms you.")
|
|
|
|
|
owner.adjustBrainLoss(2)
|
|
|
|
|
owner.stuttering += 2
|
|
|
|
|
owner.jitteriness += 2
|
|
|
|
@@ -339,7 +341,7 @@
|
|
|
|
|
if(prob(20))
|
|
|
|
|
deltaResist += 5
|
|
|
|
|
if(prob(20))
|
|
|
|
|
to_chat(owner, "Maybe you'll be okay without your Master.")
|
|
|
|
|
to_chat(owner, "Maybe you'll be okay without your [enthrallGender].")
|
|
|
|
|
if(prob(10))
|
|
|
|
|
owner.adjustBrainLoss(1)
|
|
|
|
|
M.hallucination += 5
|
|
|
|
@@ -370,7 +372,7 @@
|
|
|
|
|
else if("charge")
|
|
|
|
|
owner.add_trait(TRAIT_GOTTAGOFAST, "MKUltra")
|
|
|
|
|
status = "charged"
|
|
|
|
|
to_chat(owner, "Your Master's order fills you with a burst of speed!")
|
|
|
|
|
to_chat(owner, "Your [enthrallGender]'s order fills you with a burst of speed!")
|
|
|
|
|
|
|
|
|
|
else if ("charged")
|
|
|
|
|
if (statusStrength == 0)
|
|
|
|
@@ -397,7 +399,7 @@
|
|
|
|
|
if (cooldown > 0)
|
|
|
|
|
cooldown -= (1 + (mental_capacity/1000 ))
|
|
|
|
|
else
|
|
|
|
|
to_chat(enthrallID, "<span class='notice'><i>Your pet [owner.name] appears to have finished internalising your last command.</i></span>")
|
|
|
|
|
to_chat(master, "<span class='notice'><i>Your pet [owner.name] appears to have finished internalising your last command.</i></span>")
|
|
|
|
|
|
|
|
|
|
//Check for proximity of master DONE
|
|
|
|
|
//Place triggerreacts here - create a dictionary of triggerword and effect.
|
|
|
|
@@ -479,11 +481,11 @@
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>Your mind is too far gone to even entertain the thought of resisting.</i></span>")
|
|
|
|
|
return
|
|
|
|
|
else if (phase == 3 || withdrawal == FALSE)
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>The presence of your Master fully captures the horizon of your mind, removing any thoughts of resistance.</i></span>")
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>The presence of your [enthrallGender] fully captures the horizon of your mind, removing any thoughts of resistance.</i></span>")
|
|
|
|
|
return
|
|
|
|
|
else if (status == "Antiresist")//If ordered to not resist; resisting while ordered to not makes it last longer, and increases the rate in which you are enthralled.
|
|
|
|
|
if (statusStrength > 0)
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>The order from your Master to give in is conflicting with your attempt to resist, drawing you deeper into trance.</i></span>")
|
|
|
|
|
to_chat(owner, "<span class='notice'><i>The order from your [enthrallGender] to give in is conflicting with your attempt to resist, drawing you deeper into trance.</i></span>")
|
|
|
|
|
statusStrength += 1
|
|
|
|
|
enthrallTally += 1
|
|
|
|
|
return
|
|
|
|
@@ -502,18 +504,18 @@
|
|
|
|
|
else
|
|
|
|
|
deltaResist *= 0.2
|
|
|
|
|
//chemical resistance, brain and annaphros are the key to undoing, but the subject has to to be willing to resist.
|
|
|
|
|
if (M.has_reagent("mannitol"))
|
|
|
|
|
if (owner.reagents.has_reagent("mannitol"))
|
|
|
|
|
deltaResist *= 1.25
|
|
|
|
|
if (M.has_reagent("neurine"))
|
|
|
|
|
if (owner.reagents.has_reagent("neurine"))
|
|
|
|
|
deltaResist *= 1.5
|
|
|
|
|
if (!owner.has_trait(TRAIT_CROCRIN_IMMUNE) && M.canbearoused)
|
|
|
|
|
if (owner.has_reagent("anaphro"))
|
|
|
|
|
if (owner.reagents.has_reagent("anaphro"))
|
|
|
|
|
deltaResist *= 1.5
|
|
|
|
|
if (owner.has_reagent("anaphro+"))
|
|
|
|
|
if (owner.reagents.has_reagent("anaphro+"))
|
|
|
|
|
deltaResist *= 2
|
|
|
|
|
if (owner.has_reagent("aphro"))
|
|
|
|
|
if (owner.reagents.has_reagent("aphro"))
|
|
|
|
|
deltaResist *= 0.75
|
|
|
|
|
if (owner.has_reagent("aphro+"))
|
|
|
|
|
if (owner.reagents.has_reagent("aphro+"))
|
|
|
|
|
deltaResist *= 0.5
|
|
|
|
|
|
|
|
|
|
//Antag resistance
|
|
|
|
@@ -548,7 +550,7 @@
|
|
|
|
|
//Mental health could play a role too in the other direction
|
|
|
|
|
|
|
|
|
|
//If master gives you a collar, you get a sense of pride
|
|
|
|
|
if(istype(owner.neck, /obj/item/clothing/neck/petcollar))
|
|
|
|
|
if(istype(M.wear_neck, /obj/item/clothing/neck/petcollar))
|
|
|
|
|
deltaResist *= 0.5
|
|
|
|
|
|
|
|
|
|
if(owner.has_trait(TRAIT_CROCRIN_IMMUNE) || !owner.canbearoused)
|
|
|
|
@@ -558,14 +560,10 @@
|
|
|
|
|
deltaResist /= phase//later phases require more resistance
|
|
|
|
|
|
|
|
|
|
/datum/status_effect/chem/enthrall/proc/owner_say(message) //I can only hope this works
|
|
|
|
|
var/static/regex/owner_words = regex("[enthrallID.real_name]|[enthrallID.first_name()]")
|
|
|
|
|
var/static/regex/owner_words = regex("[master.real_name]|[master.first_name()]")
|
|
|
|
|
if(findtext(message, owner_words))
|
|
|
|
|
if(enthrallID.gender == FEMALE)
|
|
|
|
|
message = replacetext(lowertext(message), lowertext(enthrallID.real_name), "Mistress")
|
|
|
|
|
message = replacetext(lowertext(message), lowertext(enthrallID.first_name), "Mistress")
|
|
|
|
|
else
|
|
|
|
|
message = replacetext(lowertext(message), lowertext(enthrallID.real_name), "Master")
|
|
|
|
|
message = replacetext(lowertext(message), lowertext(enthrallID.first_name), "Master")
|
|
|
|
|
message = replacetext(lowertext(message), lowertext(master.real_name), "[enthrallGender]")
|
|
|
|
|
message = replacetext(lowertext(message), lowertext(master.name), "[enthrallGender]")
|
|
|
|
|
return message
|
|
|
|
|
/*
|
|
|
|
|
/datum/status_effect/chem/OwO
|
|
|
|
|