Files
CHOMPStation2/code/modules/virus2/effect.dm
2024-12-12 02:11:06 +01:00

523 lines
16 KiB
Plaintext

/datum/disease2/effectholder
var/name = "Holder"
var/datum/disease2/effect/effect
var/chance = 0 //Chance in percentage each tick
var/cure = "" //Type of cure it requires
var/happensonce = 0
var/multiplier = 1 //The chance the effects are WORSE
var/stage = 0
/datum/disease2/effectholder/proc/runeffect(var/mob/living/carbon/human/mob,var/stage)
if(happensonce > -1 && effect.stage <= stage && prob(chance))
effect.activate(mob, multiplier)
if(happensonce == 1)
happensonce = -1
/datum/disease2/effectholder/proc/getrandomeffect(var/badness = 1, exclude_types=list())
var/list/datum/disease2/effect/list = list()
for(var/datum/disease2/effect/f as anything in subtypesof(/datum/disease2/effect))
if(f in exclude_types)
continue
if(initial(f.badness) > badness) //we don't want such strong effects
continue
if(initial(f.stage) <= src.stage)
list += f
var/type = pick(list)
effect = new type()
effect.generate()
chance = rand(0,effect.chance_maxm)
multiplier = rand(1,effect.maxm)
/datum/disease2/effectholder/proc/minormutate()
switch(pick(1,2,3,4,5))
if(1)
chance = rand(0,effect.chance_maxm)
if(2)
multiplier = rand(1,effect.maxm)
/datum/disease2/effectholder/proc/majormutate(exclude_types=list())
getrandomeffect(3, exclude_types)
////////////////////////////////////////////////////////////////
////////////////////////EFFECTS/////////////////////////////////
////////////////////////////////////////////////////////////////
/datum/disease2/effect
var/chance_maxm = 50 //note that disease effects only proc once every 3 ticks for humans
var/name = "Blanking effect"
var/stage = 4
var/maxm = 1
var/badness = 1
var/data = null // For semi-procedural effects; this should be generated in generate() if used
/datum/disease2/effect/proc/activate(var/mob/living/carbon/mob,var/multiplier)
/datum/disease2/effect/proc/deactivate(var/mob/living/carbon/mob)
/datum/disease2/effect/proc/generate(copy_data) // copy_data will be non-null if this is a copy; it should be used to initialise the data for this effect if present
/datum/disease2/effect/invisible
name = "Waiting Syndrome"
stage = 1
badness = 3
/datum/disease2/effect/invisible/activate(var/mob/living/carbon/mob,var/multiplier)
return
////////////////////////STAGE 4/////////////////////////////////
/datum/disease2/effect/nothing
name = "Nil Syndrome"
stage = 4
badness = 1
chance_maxm = 0
/datum/disease2/effect/gibbingtons
name = "Gibbington's Syndrome"
stage = 4
badness = 3
/datum/disease2/effect/gibbingtons/activate(var/mob/living/carbon/mob,var/multiplier)
// Probabilities have been tweaked to kill in ~2-3 minutes, giving 5-10 messages.
// Probably needs more balancing, but it's better than LOL U GIBBED NOW, especially now that viruses can potentially have no signs up until Gibbingtons.
mob.adjustBruteLoss(10*multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
var/obj/item/organ/external/O = pick(H.organs)
if(prob(25))
to_chat(mob, span_warning("Your [O.name] feels as if it might burst!"))
if(prob(10))
spawn(50)
if(O)
O.droplimb(0,DROPLIMB_BLUNT)
else
if(prob(75))
to_chat(mob, span_warning("Your whole body feels like it might fall apart!"))
if(prob(10))
mob.adjustBruteLoss(25*multiplier)
/datum/disease2/effect/radian
name = "Radian's Syndrome"
stage = 4
maxm = 3
badness = 2
/datum/disease2/effect/radian/activate(var/mob/living/carbon/mob,var/multiplier)
mob.apply_effect(2*multiplier, IRRADIATE, check_protection = 0)
/datum/disease2/effect/deaf
name = "Deafness"
stage = 4
badness = 2
/datum/disease2/effect/deaf/activate(var/mob/living/carbon/mob,var/multiplier)
mob.ear_deaf += 20
mob.deaf_loop.start(skip_start_sound = TRUE) // CHOMPStation Add: Ear Ringing/Deafness
/datum/disease2/effect/monkey
name = "Genome Regression"
stage = 4
badness = 3
/datum/disease2/effect/monkey/activate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob,/mob/living/carbon/human))
var/mob/living/carbon/human/h = mob
h.monkeyize()
/datum/disease2/effect/killertoxins
name = "Autoimmune Response"
stage = 4
badness = 2
/datum/disease2/effect/killertoxins/activate(var/mob/living/carbon/mob,var/multiplier)
mob.adjustToxLoss(15*multiplier)
/datum/disease2/effect/dna
name = "Catastrophic DNA Degeneration"
stage = 4
badness = 2
/datum/disease2/effect/dna/activate(var/mob/living/carbon/mob,var/multiplier)
mob.bodytemperature = max(mob.bodytemperature, 350)
scramble(0,mob,10)
mob.apply_damage(10, CLONE)
/datum/disease2/effect/organs
name = "Limb Paralysis"
stage = 4
badness = 2
/datum/disease2/effect/organs/activate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
var/organ = pick(list("r_arm","l_arm","r_leg","l_leg"))
var/obj/item/organ/external/E = H.organs_by_name[organ]
if (!(E.status & ORGAN_DEAD))
E.status |= ORGAN_DEAD
to_chat(H, span_notice("You can't feel your [E.name] anymore..."))
for (var/obj/item/organ/external/C in E.children)
C.status |= ORGAN_DEAD
H.update_icons_body()
mob.adjustToxLoss(15*multiplier)
/datum/disease2/effect/organs/deactivate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
for (var/obj/item/organ/external/E in H.organs)
E.status &= ~ORGAN_DEAD
for (var/obj/item/organ/external/C in E.children)
C.status &= ~ORGAN_DEAD
H.update_icons_body()
/datum/disease2/effect/internalorgan
name = "Organ Shutdown"
stage = 4
badness = 2
/datum/disease2/effect/internalorgan/activate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
var/organ = pick(list("heart","kidney","liver", "lungs"))
var/obj/item/organ/internal/O = H.organs_by_name[organ]
if (O.robotic != ORGAN_ROBOT)
O.damage += (5*multiplier)
to_chat(H, span_notice("You feel a cramp in your guts."))
/datum/disease2/effect/immortal
name = "Hyperaccelerated Aging"
stage = 4
badness = 2
/datum/disease2/effect/immortal/activate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
for (var/obj/item/organ/external/E in H.organs)
if (E.status & ORGAN_BROKEN && prob(30))
E.status ^= ORGAN_BROKEN
var/heal_amt = -5*multiplier
mob.apply_damages(heal_amt,heal_amt,heal_amt,heal_amt)
/datum/disease2/effect/immortal/deactivate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
to_chat(H, span_notice("You suddenly feel hurt and old..."))
H.age += 8
var/backlash_amt = 5*multiplier
mob.apply_damages(backlash_amt,backlash_amt,backlash_amt,backlash_amt)
/datum/disease2/effect/bones
name = "Brittle Bones"
stage = 4
badness = 2
/datum/disease2/effect/bones/activate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
for (var/obj/item/organ/external/E in H.organs)
E.min_broken_damage = max(5, E.min_broken_damage - 30)
/datum/disease2/effect/bones/deactivate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
for (var/obj/item/organ/external/E in H.organs)
E.min_broken_damage = initial(E.min_broken_damage)
/datum/disease2/effect/combustion
name = "Organic Ignition"
stage = 4
badness = 3
/datum/disease2/effect/combustion/activate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
var/obj/item/organ/external/O = pick(H.organs)
if(prob(25))
to_chat(mob, span_warning("It feels like your [O.name] is on fire and your blood is boiling!"))
H.adjust_fire_stacks(1)
if(prob(10))
to_chat(mob, span_warning("Flames erupt from your skin, your entire body is burning!"))
H.adjust_fire_stacks(2)
H.IgniteMob()
////////////////////////STAGE 3/////////////////////////////////
/datum/disease2/effect/toxins
name = "Hyperacidity"
stage = 3
maxm = 3
/datum/disease2/effect/toxins/activate(var/mob/living/carbon/mob,var/multiplier)
mob.adjustToxLoss((2*multiplier))
/datum/disease2/effect/shakey
name = "Nervous Motor Instability"
stage = 3
maxm = 3
/datum/disease2/effect/shakey/activate(var/mob/living/carbon/mob,var/multiplier)
shake_camera(mob,5*multiplier)
/datum/disease2/effect/telepathic
name = "Pineal Gland Decalcification"
stage = 3
/datum/disease2/effect/telepathic/activate(var/mob/living/carbon/mob,var/multiplier)
mob.dna.SetSEState(REMOTETALKBLOCK,1)
domutcheck(mob, null, MUTCHK_FORCED)
/datum/disease2/effect/mind
name = "Neurodegeneration"
stage = 3
/datum/disease2/effect/mind/activate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
var/obj/item/organ/internal/brain/B = H.internal_organs_by_name["brain"]
if (B && B.damage < B.min_broken_damage)
B.take_damage(5)
else
mob.setBrainLoss(10)
/datum/disease2/effect/hallucinations
name = "Hallucination"
stage = 3
/datum/disease2/effect/hallucinations/activate(var/mob/living/carbon/mob,var/multiplier)
mob.hallucination += 25
/datum/disease2/effect/minordeaf
name = "Hearing Loss"
stage = 3
/datum/disease2/effect/minordeaf/activate(var/mob/living/carbon/mob,var/multiplier)
mob.ear_deaf = 5
mob.deaf_loop.start(skip_start_sound = TRUE) // CHOMPStation Add: Ear Ringing/Deafness
/datum/disease2/effect/giggle
name = "Uncontrolled Laughter"
stage = 3
chance_maxm = 20
/datum/disease2/effect/giggle/activate(var/mob/living/carbon/mob,var/multiplier)
if(prob(66))
mob.say("*giggle")
else
to_chat(mob, span_notice("What's so funny?"))
/datum/disease2/effect/confusion
name = "Topographical Cretinism"
stage = 3
/datum/disease2/effect/confusion/activate(var/mob/living/carbon/mob,var/multiplier)
to_chat(mob, span_notice("You have trouble telling right and left apart all of a sudden."))
mob.Confuse(10)
/datum/disease2/effect/mutation
name = "DNA Degradation"
stage = 3
/datum/disease2/effect/mutation/activate(var/mob/living/carbon/mob,var/multiplier)
mob.apply_damage(2, CLONE)
/datum/disease2/effect/groan
name = "Phantom Aches"
stage = 3
chance_maxm = 20
/datum/disease2/effect/groan/activate(var/mob/living/carbon/mob,var/multiplier)
if(prob(66))
mob.say("*groan")
else if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
var/obj/item/organ/external/E = pick(H.organs)
to_chat(mob, span_warning("Your [E] aches."))
/datum/disease2/effect/chem_synthesis
name = "Chemical Synthesis"
stage = 3
chance_maxm = 25
/datum/disease2/effect/chem_synthesis/generate(c_data)
if(c_data)
data = c_data
else
data = pick(REAGENT_ID_BICARIDINE, REAGENT_ID_KELOTANE, REAGENT_ID_ANTITOXIN, REAGENT_ID_INAPROVALINE, REAGENT_ID_BINMANBLISS, REAGENT_ID_SUGAR,
REAGENT_ID_TRAMADOL, REAGENT_ID_DEXALIN, REAGENT_ID_CRYPTOBIOLIN, REAGENT_ID_IMPEDREZENE, REAGENT_ID_HYPERZINE, REAGENT_ID_ETHYLREDOXRAZINE,
REAGENT_ID_MINDBREAKER, REAGENT_ID_GLUCOSE)
var/datum/reagent/R = SSchemistry.chemical_reagents[data]
name = "[initial(name)] ([initial(R.name)])"
/datum/disease2/effect/chem_synthesis/activate(var/mob/living/carbon/mob,var/multiplier)
if (mob.reagents.get_reagent_amount(data) < 5)
mob.reagents.add_reagent(data, 2)
/datum/disease2/effect/nonrejection
name = "Genetic Chameleonism"
stage = 3
/datum/disease2/effect/nonrejection/activate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
var/obj/item/organ/internal/O = H.organs_by_name
for (var/organ in H.organs_by_name)
if (O.robotic != ORGAN_ROBOT)
O.rejecting = 0
////////////////////////STAGE 2/////////////////////////////////
/datum/disease2/effect/scream
name = "Involuntary Vocalization"
stage = 2
chance_maxm = 10
/datum/disease2/effect/scream/activate(var/mob/living/carbon/mob,var/multiplier)
mob.say("*scream")
/datum/disease2/effect/drowsness
name = "Excessive Sleepiness"
stage = 2
/datum/disease2/effect/drowsness/activate(var/mob/living/carbon/mob,var/multiplier)
mob.drowsyness += 10
/datum/disease2/effect/sleepy
name = "Narcolepsy"
stage = 2
chance_maxm = 15
/datum/disease2/effect/sleepy/activate(var/mob/living/carbon/mob,var/multiplier)
mob.say("*collapse")
/datum/disease2/effect/blind
name = "Vision Loss"
stage = 2
/datum/disease2/effect/blind/activate(var/mob/living/carbon/mob,var/multiplier)
mob.SetBlinded(4)
/datum/disease2/effect/cough
name = "Severe Cough"
stage = 2
chance_maxm = 20
/datum/disease2/effect/cough/activate(var/mob/living/carbon/mob,var/multiplier)
if(prob(60))
mob.say("*cough")
for(var/mob/living/carbon/M in oview(2,mob))
mob.spread_disease_to(M)
else
to_chat(mob, span_warning("Something gets caught in your throat."))
/datum/disease2/effect/hungry
name = "Digestive Inefficiency"
stage = 2
/datum/disease2/effect/hungry/activate(var/mob/living/carbon/mob,var/multiplier)
mob.adjust_nutrition(-200)
/datum/disease2/effect/fridge
name = "Reduced Circulation"
stage = 2
chance_maxm = 25
/datum/disease2/effect/fridge/activate(var/mob/living/carbon/mob,var/multiplier)
mob.say("*shiver")
/datum/disease2/effect/hair
name = "Hair Loss"
stage = 2
/datum/disease2/effect/hair/activate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
if(H.species.name == SPECIES_HUMAN && !(H.h_style == "Bald") && !(H.h_style == "Balding Hair"))
to_chat(H, span_danger("Your hair starts to fall out in clumps..."))
spawn(50)
H.h_style = "Balding Hair"
H.update_hair()
/datum/disease2/effect/stimulant
name = "Overactive Adrenal Gland"
stage = 2
/datum/disease2/effect/stimulant/activate(var/mob/living/carbon/mob,var/multiplier)
to_chat(mob, span_notice("You feel a rush of energy inside you!"))
if (mob.reagents.get_reagent_amount(REAGENT_ID_HYPERZINE) < 10)
mob.reagents.add_reagent(REAGENT_ID_HYPERZINE, 4)
if (prob(30))
mob.jitteriness += 10
/datum/disease2/effect/ringing
name = "Tinnitus"
stage = 2
chance_maxm = 25
/datum/disease2/effect/ringing/activate(var/mob/living/carbon/mob,var/multiplier)
if(istype(mob, /mob/living/carbon/human))
var/mob/living/carbon/human/H = mob
to_chat(H, span_notice("You hear an awful ringing in your ears."))
H << 'sound/weapons/flash.ogg'
/datum/disease2/effect/vomiting
name = "Vomiting"
stage = 2
chance_maxm = 15
/datum/disease2/effect/vomiting/activate(var/mob/living/carbon/mob,var/multiplier)
to_chat(mob, span_notice("Your stomach churns!"))
if (prob(50))
mob.say("*vomit")
////////////////////////STAGE 1/////////////////////////////////
/datum/disease2/effect/sneeze
name = "Sneezing"
stage = 1
chance_maxm = 20
/datum/disease2/effect/sneeze/activate(var/mob/living/carbon/mob,var/multiplier)
if(prob(20))
to_chat(mob, span_warning("You go to sneeze, but it gets caught in your sinuses!"))
else if(prob(80))
if(prob(30))
to_chat(mob, span_warning("You feel like you are about to sneeze!"))
spawn(5) //Sleep may have been hanging Mob controller.
mob.say("*sneeze")
for(var/mob/living/carbon/M in get_step(mob,mob.dir))
mob.spread_disease_to(M)
if (prob(50))
var/obj/effect/decal/cleanable/mucus/M = new(get_turf(mob))
M.virus2 = virus_copylist(mob.virus2)
/datum/disease2/effect/gunck
name = "Mucus Buildup"
stage = 1
/datum/disease2/effect/gunck/activate(var/mob/living/carbon/mob,var/multiplier)
to_chat(mob, span_warning("Mucous runs down the back of your throat."))
/datum/disease2/effect/drool
name = "Salivary Gland Stimulation"
stage = 1
chance_maxm = 15
/datum/disease2/effect/drool/activate(var/mob/living/carbon/mob,var/multiplier)
mob.say("*drool")
if (prob(30))
var/obj/effect/decal/cleanable/mucus/M = new(get_turf(mob))
M.virus2 = virus_copylist(mob.virus2)
/datum/disease2/effect/twitch
name = "Involuntary Twitching"
stage = 1
chance_maxm = 15
/datum/disease2/effect/twitch/activate(var/mob/living/carbon/mob,var/multiplier)
mob.say("*twitch")
/datum/disease2/effect/headache
name = "Headache"
stage = 1
/datum/disease2/effect/headache/activate(var/mob/living/carbon/mob,var/multiplier)
to_chat(mob, span_warning("Your head hurts a bit."))