01-06-2017, 12:34 AM
Code:
medical/haloperidol // COGWERKS CHEM REVISION PROJECT. ought to be some sort of shitty illegal opiate or hypnotic drug
name = "haloperidol"
id = "haloperidol"
description = "Haloperidol is a powerful antipsychotic and sedative. Will help control psychiatric problems, but may cause brain damage."
reagent_state = LIQUID
fluid_r = 255
fluid_g = 220
fluid_b = 255
transparency = 255
var/remove_buff = 0
value = 8 // 2c + 3c + 1c + 1c + 1c
on_add()
if(istype(holder) && istype(holder.my_atom) && hascall(holder.my_atom,"add_stam_mod_regen"))
remove_buff = holder.my_atom:add_stam_mod_regen("consumable_bad", -5)
return
on_remove()
if(remove_buff)
if(istype(holder) && istype(holder.my_atom) && hascall(holder.my_atom,"remove_stam_mod_regen"))
holder.my_atom:remove_stam_mod_regen("consumable_bad")
return
on_mob_life(var/mob/living/M)
if(!M) M = holder.my_atom
M.jitteriness = max(M.jitteriness-50,0)
if (M.druggy > 0)
M.druggy -= 3
M.druggy = max(0, M.druggy)
if(holder.has_reagent("LSD"))
holder.remove_reagent("LSD", 5)
if(holder.has_reagent("psilocybin"))
holder.remove_reagent("psilocybin", 5)
if(holder.has_reagent("crank"))
holder.remove_reagent("crank", 5)
if(holder.has_reagent("bathsalts"))
holder.remove_reagent("bathsalts", 5)
if(holder.has_reagent("THC"))
holder.remove_reagent("THC", 5)
if(holder.has_reagent("space_drugs"))
holder.remove_reagent("space_drugs", 5)
if(holder.has_reagent("catdrugs"))
holder.remove_reagent("catdrugs", 5)
if(holder.has_reagent("methamphetamine"))
holder.remove_reagent("methamphetamine", 5)
if(holder.has_reagent("epinephrine"))
holder.remove_reagent("epinephrine", 5)
if(holder.has_reagent("ephedrine"))
holder.remove_reagent("ephedrine", 5)
if(holder.has_reagent("stimulants"))
holder.remove_reagent("stimulants", 3)
if(prob(5))
for(var/datum/ailment_data/disease/virus in M.ailments)
if(istype(virus.master,/datum/ailment/disease/space_madness) || istype(virus.master,/datum/ailment/disease/berserker))
M.cure_disease(virus)
if(prob(20)) M.take_brain_damage(1)
if(prob(50)) M.drowsyness = max(M.drowsyness, 3)
if(prob(10)) M.emote("drool")
..(M)
return