Merge pull request #4019 from tigercat2000/disease1

-tg- disease1

code/modules/reagents/Chemistry-Colours.dm

@@ -12,7 +12,7 @@
 	var/vol_temp
 	// see libs/IconProcs/IconProcs.dm
 	for(var/datum/reagent/reagent in reagent_list)
-		if(reagent.id == "blood" && reagent.data["blood_colour"])
+		if(reagent.id == "blood" && reagent.data && reagent.data["blood_colour"])
 			reagent_color = reagent.data["blood_colour"]
 		else
 			reagent_color = reagent.color

code/modules/reagents/Chemistry-Holder.dm

@@ -304,13 +304,6 @@ var/const/INGEST = 2
 						if(!C.no_message)
 							M << "\blue \icon[my_atom] [C.mix_message]"
 
-				/*	if(istype(my_atom, /obj/item/slime_core))
-						var/obj/item/slime_core/ME = my_atom
-						ME.Uses--
-						if(ME.Uses <= 0) // give the notification that the slime core is dead
-							for(var/mob/M in viewers(4, get_turf(my_atom)) )
-								M << "\blue \icon[my_atom] The innards begin to boil!"
-					*/
 					if(istype(my_atom, /obj/item/slime_extract))
 						var/obj/item/slime_extract/ME2 = my_atom
 						ME2.Uses--
@@ -435,6 +428,11 @@ var/const/INGEST = 2
 						else R.reaction_obj(A, R.volume+volume_modifier)
 	return
 
+/datum/reagents/proc/add_reagent_list(list/list_reagents, list/data=null) // Like add_reagent but you can enter a list. Format it like this: list("toxin" = 10, "beer" = 15)
+	for(var/r_id in list_reagents)
+		var/amt = list_reagents[r_id]
+		add_reagent(r_id, amt, data)
+
 /datum/reagents/proc/add_reagent(var/reagent, var/amount, var/list/data=null, var/reagtemp = 300)
 	if(!isnum(amount)) return 1
 	update_total()
@@ -449,33 +447,7 @@ var/const/INGEST = 2
 			R.volume += amount
 			update_total()
 			my_atom.on_reagent_change()
-/*
-			// mix dem viruses
-			if(R.id == "blood" && reagent == "blood")
-				if(R.data && data)
-
-					if(R.data["viruses"] || data["viruses"])
-
-						var/list/mix1 = R.data["viruses"]
-						var/list/mix2 = data["viruses"]
-
-						// Stop issues with the list changing during mixing.
-						var/list/to_mix = list()
-
-						for(var/datum/disease/advance/AD in mix1)
-							to_mix += AD
-						for(var/datum/disease/advance/AD in mix2)
-							to_mix += AD
-
-						var/datum/disease/advance/AD = Advance_Mix(to_mix)
-						if(AD)
-							var/list/preserve = list(AD)
-							for(var/D in R.data["viruses"])
-								if(!istype(D, /datum/disease/advance))
-									preserve += D
-							R.data["viruses"] = preserve
-*/
-
+			R.on_merge(data)
 			handle_reactions()
 			return 0
 
@@ -486,13 +458,10 @@ var/const/INGEST = 2
 		reagent_list += R
 		R.holder = src
 		R.volume = amount
-//					SetViruses(R, data) // Includes setting data
-		if(data) R.data = data
-		//debug
-		//world << "Adding data"
-		//for(var/D in R.data)
-		//	world << "Container data: [D] = [R.data[D]]"
-		//debug
+		if(data)
+			R.data = data
+			R.on_new(data)
+
 		update_total()
 		my_atom.on_reagent_change()
 		handle_reactions()
@@ -605,9 +574,9 @@ var/const/INGEST = 2
 	// Technically we should probably copy all data lists, but
 	// that could possibly eat up a lot of memory needlessly
 	// if most data lists are read-only.
-	if (trans_data["virus2"])
-		var/list/v = trans_data["virus2"]
-		trans_data["virus2"] = v.Copy()
+	if(trans_data["viruses"])
+		var/list/v = trans_data["viruses"]
+		trans_data["viruses"] = v.Copy()
 
 	return trans_data
 

code/modules/reagents/newchem/disease.dm

@@ -5,10 +5,188 @@
 	reagent_state = SOLID
 	color = "#FFFFFF"
 
-/datum/reagent/spider_eggs/on_mob_life(var/mob/living/M as mob)
-	if(!M) M = holder.my_atom
+/datum/reagent/spider_eggs/on_mob_life(mob/living/M)
 	if(volume > 2.5)
 		if(iscarbon(M))
 			if(!M.get_int_organ(/obj/item/organ/internal/body_egg))
 				new/obj/item/organ/internal/body_egg/spider_eggs(M) //Yes, even Xenos can fall victim to the plague that is spider infestation.
-	..()
+	..()
+
+
+//virus food
+/datum/reagent/virus_food
+	name = "Virus Food"
+	id = "virusfood"
+	description = "A mixture of water, milk, and oxygen. Virus cells can use this mixture to reproduce."
+	reagent_state = LIQUID
+	nutriment_factor = 2 * REAGENTS_METABOLISM
+	color = "#899613" // rgb: 137, 150, 19
+
+/datum/reagent/virus_food/on_mob_life(mob/living/M)
+	M.nutrition += nutriment_factor * REAGENTS_EFFECT_MULTIPLIER
+	..()
+
+/datum/reagent/mutagen/mutagenvirusfood
+	name = "mutagenic agar"
+	id = "mutagenvirusfood"
+	description = "mutates blood"
+	color = "#A3C00F" // rgb: 163,192,15
+
+/datum/reagent/mutagen/mutagenvirusfood/sugar
+	name = "sucrose agar"
+	id = "sugarvirusfood"
+	color = "#41B0C0" // rgb: 65,176,192
+
+/datum/reagent/diphenhydramine/diphenhydraminevirusfood
+	name = "virus rations"
+	id = "diphenhydraminevirusfood"
+	description = "mutates blood"
+	color = "#D18AA5" // rgb: 209,138,165
+
+/datum/reagent/plasma/plasmavirusfood
+	name = "virus plasma"
+	id = "plasmavirusfood"
+	description = "mutates blood"
+	color = "#A69DA9" // rgb: 166,157,169
+
+/datum/reagent/plasma/plasmavirusfood/weak
+	name = "weakened virus plasma"
+	id = "weakplasmavirusfood"
+	color = "#CEC3C6" // rgb: 206,195,198
+
+//reactions
+/datum/chemical_reaction/virus_food
+	name = "Virus Food"
+	id = "virusfood"
+	result = "virusfood"
+	required_reagents = list("water" = 1, "milk" = 1, "oxygen" = 1)
+	result_amount = 3
+
+/datum/chemical_reaction/virus_food_mutagen
+	name = "mutagenic agar"
+	id = "mutagenvirusfood"
+	result = "mutagenvirusfood"
+	required_reagents = list("mutagen" = 1, "virusfood" = 1)
+	result_amount = 1
+
+/datum/chemical_reaction/virus_food_diphenhydramine
+	name = "virus rations"
+	id = "diphenhydraminevirusfood"
+	result = "diphenhydraminevirusfood"
+	required_reagents = list("diphenhydramine" = 1, "virusfood" = 1)
+	result_amount = 1
+
+/datum/chemical_reaction/virus_food_plasma
+	name = "virus plasma"
+	id = "plasmavirusfood"
+	result = "plasmavirusfood"
+	required_reagents = list("plasma" = 1, "virusfood" = 1)
+	result_amount = 1
+
+/datum/chemical_reaction/virus_food_plasma_diphenhydramine
+	name = "weakened virus plasma"
+	id = "weakplasmavirusfood"
+	result = "weakplasmavirusfood"
+	required_reagents = list("diphenhydramine" = 1, "plasmavirusfood" = 1)
+	result_amount = 2
+
+/datum/chemical_reaction/virus_food_mutagen_sugar
+	name = "sucrose agar"
+	id = "sugarvirusfood"
+	result = "sugarvirusfood"
+	required_reagents = list("sugar" = 1, "mutagenvirusfood" = 1)
+	result_amount = 2
+
+/datum/chemical_reaction/virus_food_mutagen_salineglucose
+	name = "sucrose agar"
+	id = "salineglucosevirusfood"
+	result = "sugarvirusfood"
+	required_reagents = list("salglu_solution" = 1, "mutagenvirusfood" = 1)
+	result_amount = 2
+
+
+//mix virus
+/datum/chemical_reaction/mix_virus
+	name = "Mix Virus"
+	id = "mixvirus"
+	required_reagents = list("virusfood" = 1)
+	required_catalysts = list("blood" = 1)
+	var/level_min = 0
+	var/level_max = 2
+
+/datum/chemical_reaction/mix_virus/on_reaction(datum/reagents/holder, created_volume)
+	var/datum/reagent/blood/B = locate(/datum/reagent/blood) in holder.reagent_list
+	if(B && B.data)
+		var/datum/disease/advance/D = locate(/datum/disease/advance) in B.data["viruses"]
+		if(D)
+			D.Evolve(level_min, level_max)
+
+
+/datum/chemical_reaction/mix_virus/mix_virus_2
+	name = "Mix Virus 2"
+	id = "mixvirus2"
+	required_reagents = list("mutagen" = 1)
+	level_min = 2
+	level_max = 4
+
+/datum/chemical_reaction/mix_virus/mix_virus_3
+	name = "Mix Virus 3"
+	id = "mixvirus3"
+	required_reagents = list("plasma" = 1)
+	level_min = 4
+	level_max = 6
+
+/datum/chemical_reaction/mix_virus/mix_virus_4
+	name = "Mix Virus 4"
+	id = "mixvirus4"
+	required_reagents = list("uranium" = 1)
+	level_min = 5
+	level_max = 6
+
+/datum/chemical_reaction/mix_virus/mix_virus_5
+	name = "Mix Virus 5"
+	id = "mixvirus5"
+	required_reagents = list("mutagenvirusfood" = 1)
+	level_min = 3
+	level_max = 3
+
+/datum/chemical_reaction/mix_virus/mix_virus_6
+	name = "Mix Virus 6"
+	id = "mixvirus6"
+	required_reagents = list("sugarvirusfood" = 1)
+	level_min = 4
+	level_max = 4
+
+/datum/chemical_reaction/mix_virus/mix_virus_7
+	name = "Mix Virus 7"
+	id = "mixvirus7"
+	required_reagents = list("weakplasmavirusfood" = 1)
+	level_min = 5
+	level_max = 5
+
+/datum/chemical_reaction/mix_virus/mix_virus_8
+	name = "Mix Virus 8"
+	id = "mixvirus8"
+	required_reagents = list("plasmavirusfood" = 1)
+	level_min = 6
+	level_max = 6
+
+/datum/chemical_reaction/mix_virus/mix_virus_9
+	name = "Mix Virus 9"
+	id = "mixvirus9"
+	required_reagents = list("diphenhydraminevirusfood" = 1)
+	level_min = 1
+	level_max = 1
+
+/datum/chemical_reaction/mix_virus/rem_virus
+	name = "Devolve Virus"
+	id = "remvirus"
+	required_reagents = list("diphenhydramine" = 1)
+	required_catalysts = list("blood" = 1)
+
+/datum/chemical_reaction/mix_virus/rem_virus/on_reaction(datum/reagents/holder, created_volume)
+	var/datum/reagent/blood/B = locate(/datum/reagent/blood) in holder.reagent_list
+	if(B && B.data)
+		var/datum/disease/advance/D = locate(/datum/disease/advance) in B.data["viruses"]
+		if(D)
+			D.Devolve()

code/modules/reagents/oldchem/chemical_reaction/chemical_reaction_med.dm

@@ -1,20 +1,18 @@
-/datum/chemical_reaction/
-
-	hydrocodone
+/datum/chemical_reaction/hydrocodone
 		name = "Hydrocodone"
 		id = "hydrocodone"
 		result = "hydrocodone"
 		required_reagents = list("morphine" = 1, "sacid" = 1, "water" = 1, "oil" = 1)
 		result_amount = 2
 
-	mitocholide
+/datum/chemical_reaction/mitocholide
 		name = "mitocholide"
 		id = "mitocholide"
 		result = "mitocholide"
 		required_reagents = list("synthflesh" = 1, "cryoxadone" = 1, "plasma" = 1)
 		result_amount = 3
 
-	cryoxadone
+/datum/chemical_reaction/cryoxadone
 		name = "Cryoxadone"
 		id = "cryoxadone"
 		result = "cryoxadone"
@@ -23,7 +21,7 @@
 		mix_message = "The solution bubbles softly."
 		mix_sound = 'sound/goonstation/misc/drinkfizz.ogg'
 
-	spaceacillin
+/datum/chemical_reaction/spaceacillin
 		name = "Spaceacillin"
 		id = "spaceacillin"
 		result = "spaceacillin"
@@ -31,62 +29,16 @@
 		result_amount = 2
 		mix_message = "The solvent extracts an antibiotic compound from the fungus."
 
-	rezadone
+/datum/chemical_reaction/rezadone
 		name = "Rezadone"
 		id = "rezadone"
 		result = "rezadone"
 		required_reagents = list("carpotoxin" = 1, "spaceacillin" = 1, "copper" = 1)
 		result_amount = 3
 
-	virus_food
-		name = "Virus Food"
-		id = "virusfood"
-		result = "virusfood"
-		required_reagents = list("water" = 1, "milk" = 1, "oxygen" = 1)
-		result_amount = 3
-/*
-	mix_virus
-		name = "Mix Virus"
-		id = "mixvirus"
-		result = "blood"
-		required_reagents = list("virusfood" = 5)
-		required_catalysts = list("blood")
-		var/level = 2
-
-		on_reaction(var/datum/reagents/holder, var/created_volume)
-
-			var/datum/reagent/blood/B = locate(/datum/reagent/blood) in holder.reagent_list
-			if(B && B.data)
-				var/datum/disease/advance/D = locate(/datum/disease/advance) in B.data["viruses"]
-				if(D)
-					D.Evolve(level - rand(0, 1))
-
-
-		mix_virus_2
-
-			name = "Mix Virus 2"
-			id = "mixvirus2"
-			required_reagents = list("mutagen" = 5)
-			level = 4
-
-		rem_virus
-
-			name = "Devolve Virus"
-			id = "remvirus"
-			required_reagents = list("synaptizine" = 5)
-
-			on_reaction(var/datum/reagents/holder, var/created_volume)
-
-				var/datum/reagent/blood/B = locate(/datum/reagent/blood) in holder.reagent_list
-				if(B && B.data)
-					var/datum/disease/advance/D = locate(/datum/disease/advance) in B.data["viruses"]
-					if(D)
-						D.Devolve()
-*/
-
-	sterilizine
+/datum/chemical_reaction/sterilizine
 		name = "Sterilizine"
 		id = "sterilizine"
 		result = "sterilizine"
 		required_reagents = list("antihol" = 2, "chlorine" = 1)
-		result_amount = 3
+		result_amount = 3

code/modules/reagents/oldchem/reagents/_reagent_base.dm

@@ -81,6 +81,10 @@
 /datum/reagent/proc/on_update(var/atom/A)
 	return
 
+// Called after add_reagents creates a new reagent.
+/datum/reagent/proc/on_new(data)
+	return
+
 /datum/reagent/Destroy()
 	. = ..()
 	holder = null

code/modules/reagents/oldchem/reagents/reagents_admin.dm

@@ -42,13 +42,9 @@
 	M.jitteriness = 0
 	if(istype(M,/mob/living/carbon)) // make sure to only use it on carbon mobs
 		var/mob/living/carbon/C = M
-		if(C.virus2.len)
-			for (var/ID in C.virus2)
-				var/datum/disease2/disease/V = C.virus2[ID]
-				C.antibodies |= V.antigen
+		for(var/datum/disease/D in C.viruses)
+			D.cure(0)
 	..()
-	return
-
 
 /datum/reagent/adminordrazine/nanites
 	name = "Nanites"

code/modules/reagents/oldchem/reagents/reagents_med.dm

@@ -16,20 +16,6 @@
 	..()
 	return
 
-/datum/reagent/virus_food
-	name = "Virus Food"
-	id = "virusfood"
-	description = "A mixture of water, milk, and oxygen. Virus cells can use this mixture to reproduce."
-	reagent_state = LIQUID
-	nutriment_factor = 2 * REAGENTS_METABOLISM
-	color = "#899613" // rgb: 137, 150, 19
-
-/datum/reagent/virus_food/on_mob_life(var/mob/living/M as mob)
-	if(!M) M = holder.my_atom
-	M.nutrition += nutriment_factor*REM
-	..()
-	return
-
 /datum/reagent/sterilizine
 	name = "Sterilizine"
 	id = "sterilizine"

code/modules/reagents/oldchem/reagents/reagents_toxin.dm

@@ -98,33 +98,9 @@
 	reagent_state = LIQUID
 	color = "#13BC5E" // rgb: 19, 188, 94
 
-/datum/reagent/aslimetoxin/on_mob_life(var/mob/living/M as mob)
-	if(!M) M = holder.my_atom
-	if(istype(M, /mob/living/carbon) && M.stat != DEAD)
-		M << "\red Your flesh rapidly mutates!"
-		if(M.notransform)	return
-		M.notransform = 1
-		M.canmove = 0
-		M.icon = null
-		M.overlays.Cut()
-		M.invisibility = 101
-		for(var/obj/item/W in M)
-			if(istype(W, /obj/item/weapon/implant))	//TODO: Carn. give implants a dropped() or something
-				qdel(W)
-				continue
-			W.layer = initial(W.layer)
-			W.loc = M.loc
-			W.dropped(M)
-		var/mob/living/carbon/slime/new_mob = new /mob/living/carbon/slime(M.loc)
-		new_mob.a_intent = I_HARM
-		new_mob.universal_speak = 1
-		if(M.mind)
-			M.mind.transfer_to(new_mob)
-		else
-			new_mob.key = M.key
-		qdel(M)
-	..()
-	return
+/datum/reagent/aslimetoxin/reaction_mob(mob/M, method=TOUCH, reac_volume)
+	if(method != TOUCH)
+		M.ForceContractDisease(new /datum/disease/transformation/slime(0))
 
 
 /datum/reagent/mercury
@@ -189,19 +165,7 @@
 	if(!M) M = holder.my_atom
 	if(M.radiation < 80)
 		M.apply_effect(4, IRRADIATE, negate_armor = 1)
-	// radium may increase your chances to cure a disease
-	if(istype(M,/mob/living/carbon)) // make sure to only use it on carbon mobs
-		var/mob/living/carbon/C = M
-		if(C.virus2.len)
-			for (var/ID in C.virus2)
-				var/datum/disease2/disease/V = C.virus2[ID]
-				if(prob(5))
-					if(prob(50))
-						M.apply_effect(50, IRRADIATE, negate_armor = 1) // curing it that way may kill you instead
-						M.adjustToxLoss(100)
-					C.antibodies |= V.antigen
 	..()
-	return
 
 /datum/reagent/radium/reaction_turf(var/turf/T, var/volume)
 	src = null

code/modules/reagents/oldchem/reagents/reagents_water.dm

@@ -145,65 +145,103 @@
 
 
 /datum/reagent/blood
-	data = new/list("donor"=null,"viruses"=null,"blood_DNA"=null,"blood_type"=null,"blood_colour"= "#A10808","resistances"=null,"trace_chem"=null, "antibodies" = null)
+	data = list("donor"=null,"viruses"=null,"blood_DNA"=null,"blood_type"=null,"blood_colour"="#A10808","resistances"=null,"trace_chem"=null, "antibodies" = null)
 	name = "Blood"
 	id = "blood"
 	reagent_state = LIQUID
 	color = "#C80000" // rgb: 200, 0, 0
 
-/datum/reagent/blood/reaction_mob(var/mob/M, var/method=TOUCH, var/volume)
-	var/datum/reagent/blood/self = src
-	src = null
-	if(self.data && self.data["virus2"] && istype(M, /mob/living/carbon))//infecting...
-		var/list/vlist = self.data["virus2"]
-		if (vlist.len)
-			for (var/ID in vlist)
-				var/datum/disease2/disease/V = vlist[ID]
+/datum/reagent/blood/reaction_mob(mob/M, method=TOUCH, reac_volume)
+	if(data && data["viruses"])
+		for(var/datum/disease/D in data["viruses"])
 
-				if(method == TOUCH)
-					infect_virus2(M,V.getcopy())
-				else
-					infect_virus2(M,V.getcopy(),1) //injected, force infection!
-	if(self.data && self.data["antibodies"] && istype(M, /mob/living/carbon))//... and curing
-		var/mob/living/carbon/C = M
-		C.antibodies |= self.data["antibodies"]
+			if(D.spread_flags & SPECIAL || D.spread_flags & NON_CONTAGIOUS)
+				continue
 
-/datum/reagent/blood/on_merge(var/data)
-	if(data["blood_colour"])
-		color = data["blood_colour"]
-	return ..()
+			if(method == TOUCH)
+				M.ContractDisease(D)
+			else //ingest, patch or inject
+				M.ForceContractDisease(D)
+
+/datum/reagent/blood/on_new(list/data)
+	if(istype(data))
+		SetViruses(src, data)
+
+/datum/reagent/blood/on_merge(list/mix_data)
+	if(data && mix_data)
+		if(data["viruses"] || mix_data["viruses"])
+
+			var/list/mix1 = data["viruses"]
+			var/list/mix2 = mix_data["viruses"]
+
+			// Stop issues with the list changing during mixing.
+			var/list/to_mix = list()
+
+			for(var/datum/disease/advance/AD in mix1)
+				to_mix += AD
+			for(var/datum/disease/advance/AD in mix2)
+				to_mix += AD
+
+			var/datum/disease/advance/AD = Advance_Mix(to_mix)
+			if(AD)
+				var/list/preserve = list(AD)
+				for(var/D in data["viruses"])
+					if(!istype(D, /datum/disease/advance))
+						preserve += D
+				data["viruses"] = preserve
+
+		if(mix_data["blood_colour"])
+			color = mix_data["blood_colour"]
+	return 1
 
 /datum/reagent/blood/on_update(var/atom/A)
 	if(data["blood_colour"])
 		color = data["blood_colour"]
 	return ..()
 
-
-
-/datum/reagent/blood/reaction_turf(var/turf/simulated/T, var/volume)//splash the blood all over the place
-	if(!istype(T)) return
-	var/datum/reagent/blood/self = src
-	src = null
-	var/big_splash = 1
-	if(volume < 3)
-		big_splash = 0
-	//var/datum/disease/D = self.data["virus"]
-	if(!self.data["donor"] || istype(self.data["donor"], /mob/living/carbon/human))
-		blood_splatter(T, src, big_splash)
+/datum/reagent/blood/reaction_turf(turf/simulated/T, reac_volume)//splash the blood all over the place
+	if(!istype(T))
+		return
+	if(reac_volume < 3)
+		return
+	if(!data["donor"] || istype(data["donor"], /mob/living/carbon/human))
 		var/obj/effect/decal/cleanable/blood/blood_prop = locate() in T //find some blood here
+		if(!blood_prop) //first blood!
+			blood_prop = new(T)
+			blood_prop.blood_DNA[data["blood_DNA"]] = data["blood_type"]
 
-		if(blood_prop)
-			blood_prop.blood_DNA[self.data["blood_DNA"]] = self.data["blood_type"]
-			if(self.data["virus2"])
-				blood_prop.virus2 = virus_copylist(self.data["virus2"])
+		for(var/datum/disease/D in data["viruses"])
+			var/datum/disease/newVirus = D.Copy(1)
+			blood_prop.viruses += newVirus
+			newVirus.holder = blood_prop
 
-	else if(istype(self.data["donor"], /mob/living/carbon/alien))
+	else if(istype(data["donor"], /mob/living/carbon/alien))
 		var/obj/effect/decal/cleanable/blood/xeno/blood_prop = locate() in T
 		if(!blood_prop)
 			blood_prop = new(T)
 			blood_prop.blood_DNA["UNKNOWN DNA STRUCTURE"] = "X*"
-	return
 
+		for(var/datum/disease/D in data["viruses"])
+			var/datum/disease/newVirus = D.Copy(1)
+			blood_prop.viruses += newVirus
+			newVirus.holder = blood_prop
+
+/datum/reagent/vaccine
+	//data must contain virus type
+	name = "Vaccine"
+	id = "vaccine"
+	color = "#C81040" // rgb: 200, 16, 64
+
+/datum/reagent/vaccine/reaction_mob(mob/M, method=TOUCH, reac_volume)
+	if(islist(data) && (method == INGEST))
+		for(var/datum/disease/D in M.viruses)
+			if(D.GetDiseaseID() in data)
+				D.cure()
+		M.resistances |= data
+
+/datum/reagent/vaccine/on_merge(list/data)
+	if(istype(data))
+		src.data |= data.Copy()
 
 /datum/reagent/fishwater
 	name = "Fish Water"
@@ -350,28 +388,3 @@
 		var/t_loc = get_turf(O)
 		qdel(O)
 		new /obj/item/clothing/shoes/galoshes/dry(t_loc)
-
-/*
-/datum/reagent/vaccine
-	//data must contain virus type
-	name = "Vaccine"
-	id = "vaccine"
-	reagent_state = LIQUID
-	color = "#C81040" // rgb: 200, 16, 64
-
-/datum/reagent/vaccine/reaction_mob(var/mob/M, var/method=TOUCH, var/volume)
-	var/datum/reagent/vaccine/self = src
-	src = null
-	if(self.data&&method == INGEST)
-		for(var/datum/disease/D in M.viruses)
-			if(istype(D, /datum/disease/advance))
-				var/datum/disease/advance/A = D
-				if(A.GetDiseaseID() == self.data)
-					D.cure()
-			else
-				if(D.type == self.data)
-					D.cure()
-
-		M.resistances += self.data
-	return
-*/

code/modules/reagents/pandemic.dm

@@ -0,0 +1,295 @@
+/obj/machinery/computer/pandemic
+	name = "PanD.E.M.I.C 2200"
+	desc = "Used to work with viruses."
+	density = 1
+	anchored = 1
+	icon = 'icons/obj/chemical.dmi'
+	icon_state = "mixer0"
+	circuit = /obj/item/weapon/circuitboard/pandemic
+	use_power = 1
+	idle_power_usage = 20
+	var/temp_html = ""
+	var/wait = null
+	var/obj/item/weapon/reagent_containers/beaker = null
+
+/obj/machinery/computer/pandemic/New()
+	..()
+	update_icon()
+
+/obj/machinery/computer/pandemic/set_broken()
+	icon_state = (beaker ? "mixer1_b" : "mixer0_b")
+	overlays.Cut()
+	stat |= BROKEN
+
+/obj/machinery/computer/pandemic/proc/GetVirusByIndex(index)
+	if(beaker && beaker.reagents)
+		if(beaker.reagents.reagent_list.len)
+			var/datum/reagent/blood/BL = locate() in beaker.reagents.reagent_list
+			if(BL)
+				if(BL.data && BL.data["viruses"])
+					var/list/viruses = BL.data["viruses"]
+					return viruses[index]
+	return null
+
+/obj/machinery/computer/pandemic/proc/GetResistancesByIndex(index)
+	if(beaker && beaker.reagents)
+		if(beaker.reagents.reagent_list.len)
+			var/datum/reagent/blood/BL = locate() in beaker.reagents.reagent_list
+			if(BL)
+				if(BL.data && BL.data["resistances"])
+					var/list/resistances = BL.data["resistances"]
+					return resistances[index]
+	return null
+
+/obj/machinery/computer/pandemic/proc/GetVirusTypeByIndex(index)
+	var/datum/disease/D = GetVirusByIndex(index)
+	if(D)
+		return D.GetDiseaseID()
+	return null
+
+/obj/machinery/computer/pandemic/proc/replicator_cooldown(waittime)
+	wait = 1
+	update_icon()
+	spawn(waittime)
+		src.wait = null
+		update_icon()
+		playsound(src.loc, 'sound/machines/ping.ogg', 30, 1)
+
+/obj/machinery/computer/pandemic/update_icon()
+	if(stat & BROKEN)
+		icon_state = (beaker ? "mixer1_b" : "mixer0_b")
+		return
+
+	icon_state = "mixer[(beaker)?"1":"0"][(powered()) ? "" : "_nopower"]"
+
+	if(wait)
+		overlays.Cut()
+	else
+		overlays += "waitlight"
+
+/obj/machinery/computer/pandemic/Topic(href, href_list)
+	if(..())
+		return
+
+	usr.set_machine(src)
+	if(!beaker) return
+
+	if (href_list["create_vaccine"])
+		if(!src.wait)
+			var/obj/item/weapon/reagent_containers/glass/bottle/B = new/obj/item/weapon/reagent_containers/glass/bottle(src.loc)
+			if(B)
+				B.pixel_x = rand(-3, 3)
+				B.pixel_y = rand(-3, 3)
+				var/path = GetResistancesByIndex(text2num(href_list["create_vaccine"]))
+				var/vaccine_type = path
+				var/vaccine_name = "Unknown"
+
+				if(!ispath(vaccine_type))
+					if(archive_diseases[path])
+						var/datum/disease/D = archive_diseases[path]
+						if(D)
+							vaccine_name = D.name
+							vaccine_type = path
+				else if(vaccine_type)
+					var/datum/disease/D = new vaccine_type(0, null)
+					if(D)
+						vaccine_name = D.name
+
+				if(vaccine_type)
+
+					B.name = "[vaccine_name] vaccine bottle"
+					B.reagents.add_reagent("vaccine", 15, list(vaccine_type))
+					replicator_cooldown(200)
+		else
+			src.temp_html = "The replicator is not ready yet."
+		src.updateUsrDialog()
+		return
+	else if (href_list["create_virus_culture"])
+		if(!wait)
+			var/type = GetVirusTypeByIndex(text2num(href_list["create_virus_culture"]))//the path is received as string - converting
+			var/datum/disease/D = null
+			if(!ispath(type))
+				D = GetVirusByIndex(text2num(href_list["create_virus_culture"]))
+				var/datum/disease/advance/A = archive_diseases[D.GetDiseaseID()]
+				if(A)
+					D = new A.type(0, A)
+			else if(type)
+				if(type in diseases) // Make sure this is a disease
+					D = new type(0, null)
+			if(!D)
+				return
+			var/name = stripped_input(usr,"Name:","Name the culture",D.name,MAX_NAME_LEN)
+			if(name == null || wait)
+				return
+			var/obj/item/weapon/reagent_containers/glass/bottle/B = new/obj/item/weapon/reagent_containers/glass/bottle(src.loc)
+			B.icon_state = "bottle3"
+			B.pixel_x = rand(-3, 3)
+			B.pixel_y = rand(-3, 3)
+			replicator_cooldown(50)
+			var/list/data = list("viruses"=list(D))
+			B.name = "[name] culture bottle"
+			B.desc = "A small bottle. Contains [D.agent] culture in synthblood medium."
+			B.reagents.add_reagent("blood",20,data)
+			src.updateUsrDialog()
+		else
+			src.temp_html = "The replicator is not ready yet."
+		src.updateUsrDialog()
+		return
+	else if (href_list["empty_beaker"])
+		beaker.reagents.clear_reagents()
+		src.updateUsrDialog()
+		return
+	else if (href_list["eject"])
+		beaker:loc = src.loc
+		beaker = null
+		icon_state = "mixer0"
+		src.updateUsrDialog()
+		return
+	else if(href_list["clear"])
+		src.temp_html = ""
+		src.updateUsrDialog()
+		return
+	else if(href_list["name_disease"])
+		var/new_name = stripped_input(usr, "Name the Disease", "New Name", "", MAX_NAME_LEN)
+		if(!new_name)
+			return
+		if(..())
+			return
+		var/id = GetVirusTypeByIndex(text2num(href_list["name_disease"]))
+		if(archive_diseases[id])
+			var/datum/disease/advance/A = archive_diseases[id]
+			A.AssignName(new_name)
+			for(var/datum/disease/advance/AD in disease_master.processing)
+				AD.Refresh()
+		src.updateUsrDialog()
+
+
+	else
+		usr << browse(null, "window=pandemic")
+		src.updateUsrDialog()
+		return
+
+	src.add_fingerprint(usr)
+	return
+
+/obj/machinery/computer/pandemic/attack_hand(mob/user)
+	if(..())
+		return
+	user.set_machine(src)
+	var/dat = ""
+	if(src.temp_html)
+		dat = "[src.temp_html]<BR><BR><A href='?src=\ref[src];clear=1'>Main Menu</A>"
+	else if(!beaker)
+		dat += "Please insert beaker.<BR>"
+		dat += "<A href='?src=\ref[user];mach_close=pandemic'>Close</A>"
+	else
+		var/datum/reagents/R = beaker.reagents
+		var/datum/reagent/blood/Blood = null
+		for(var/datum/reagent/blood/B in R.reagent_list)
+			if(B)
+				Blood = B
+				break
+		if(!R.total_volume||!R.reagent_list.len)
+			dat += "The beaker is empty<BR>"
+		else if(!Blood)
+			dat += "No blood sample found in beaker."
+		else if(!Blood.data)
+			dat += "No blood data found in beaker."
+		else
+			dat += "<h3>Blood sample data:</h3>"
+			dat += "<b>Blood DNA:</b> [(Blood.data["blood_DNA"]||"none")]<BR>"
+			dat += "<b>Blood Type:</b> [(Blood.data["blood_type"]||"none")]<BR>"
+
+
+			if(Blood.data["viruses"])
+				var/list/vir = Blood.data["viruses"]
+				if(vir.len)
+					var/i = 0
+					for(var/datum/disease/D in Blood.data["viruses"])
+						i++
+						if(!(D.visibility_flags & HIDDEN_PANDEMIC))
+
+							if(istype(D, /datum/disease/advance))
+
+								var/datum/disease/advance/A = D
+								D = archive_diseases[A.GetDiseaseID()]
+								if(D && D.name == "Unknown")
+									dat += "<b><a href='?src=\ref[src];name_disease=[i]'>Name Disease</a></b><BR>"
+
+							if(!D)
+								CRASH("We weren't able to get the advance disease from the archive.")
+
+							dat += "<b>Disease Agent:</b> [D?"[D.agent] - <A href='?src=\ref[src];create_virus_culture=[i]'>Create virus culture bottle</A>":"none"]<BR>"
+							dat += "<b>Common name:</b> [(D.name||"none")]<BR>"
+							dat += "<b>Description: </b> [(D.desc||"none")]<BR>"
+							dat += "<b>Spread:</b> [(D.spread_text||"none")]<BR>"
+							dat += "<b>Possible cure:</b> [(D.cure_text||"none")]<BR><BR>"
+
+							if(istype(D, /datum/disease/advance))
+								var/datum/disease/advance/A = D
+								dat += "<b>Symptoms:</b> "
+								var/english_symptoms = list()
+								for(var/datum/symptom/S in A.symptoms)
+									english_symptoms += S.name
+								dat += english_list(english_symptoms)
+
+						else
+							dat += "No detectable virus in the sample."
+			else
+				dat += "No detectable virus in the sample."
+
+			dat += "<BR><b>Contains antibodies to:</b> "
+			if(Blood.data["resistances"])
+				var/list/res = Blood.data["resistances"]
+				if(res.len)
+					dat += "<ul>"
+					var/i = 0
+					for(var/type in Blood.data["resistances"])
+						i++
+						var/disease_name = "Unknown"
+
+						if(!ispath(type))
+							var/datum/disease/advance/A = archive_diseases[type]
+							if(A)
+								disease_name = A.name
+						else
+							var/datum/disease/D = new type(0, null)
+							disease_name = D.name
+
+						dat += "<li>[disease_name] - <A href='?src=\ref[src];create_vaccine=[i]'>Create vaccine bottle</A></li>"
+					dat += "</ul><BR>"
+				else
+					dat += "nothing<BR>"
+			else
+				dat += "nothing<BR>"
+		dat += "<BR><A href='?src=\ref[src];eject=1'>Eject beaker</A>[((R.total_volume&&R.reagent_list.len) ? "-- <A href='?src=\ref[src];empty_beaker=1'>Empty beaker</A>":"")]<BR>"
+		dat += "<A href='?src=\ref[user];mach_close=pandemic'>Close</A>"
+
+	user << browse("<TITLE>[src.name]</TITLE><BR>[dat]", "window=pandemic;size=575x400")
+	onclose(user, "pandemic")
+	return
+
+
+/obj/machinery/computer/pandemic/attackby(obj/item/I, mob/user, params)
+	if(istype(I, /obj/item/weapon/reagent_containers) && (I.flags & OPENCONTAINER))
+		if(stat & (NOPOWER|BROKEN)) return
+		if(beaker)
+			user << "<span class='warning'>A beaker is already loaded into the machine!</span>"
+			return
+		if(!user.drop_item())
+			return
+
+		beaker =  I
+		beaker.loc = src
+		user << "<span class='notice'>You add the beaker to the machine.</span>"
+		src.updateUsrDialog()
+		icon_state = "mixer1"
+
+	else if(istype(I, /obj/item/weapon/screwdriver))
+		if(src.beaker)
+			beaker.loc = get_turf(src)
+		..()
+		return
+	else
+		..()
+	return

code/modules/reagents/reagent_containers.dm

@@ -7,6 +7,9 @@
 	var/amount_per_transfer_from_this = 5
 	var/possible_transfer_amounts = list(5,10,15,25,30)
 	var/volume = 30
+	var/list/list_reagents = null
+	var/spawned_disease = null
+	var/disease_amount = 20
 
 /obj/item/weapon/reagent_containers/verb/set_APTFT() //set amount_per_transfer_from_this
 	set name = "Set transfer amount"
@@ -30,6 +33,12 @@
 	reagents = R
 	R.my_atom = src
 	processing_objects.Add(src)
+	if(spawned_disease)
+		var/datum/disease/F = new spawned_disease(0)
+		var/list/data = list("viruses" = list(F), "blood_colour" = "#A10808")
+		reagents.add_reagent("blood", disease_amount, data)
+	if(list_reagents)
+		reagents.add_reagent_list(list_reagents)
 
 /obj/item/weapon/reagent_containers/process()
 	if(reagents)

code/modules/reagents/reagent_containers/glass/bottle.dm

@@ -299,4 +299,120 @@
 
 	New()
 		..()
-		reagents.add_reagent(pick("polonium","initropidril","concentrated_initro","pancuronium","sodium_thiopental","ketamine","sulfonal","amanitin","coniine","curare","sarin","histamine","venom","cyanide","spidereggs"), 40)
+		reagents.add_reagent(pick("polonium","initropidril","concentrated_initro","pancuronium","sodium_thiopental","ketamine","sulfonal","amanitin","coniine","curare","sarin","histamine","venom","cyanide","spidereggs"), 40)
+
+
+/obj/item/weapon/reagent_containers/glass/bottle/plasma
+	name = "liquid plasma bottle"
+	desc = "A small bottle of liquid plasma. Extremely toxic and reacts with micro-organisms inside blood."
+	icon_state = "bottle8"
+	list_reagents = list("plasma" = 30)
+
+/obj/item/weapon/reagent_containers/glass/bottle/diphenhydramine
+	name = "diphenhydramine bottle"
+	desc = "A small bottle of diphenhydramine."
+	icon_state = "bottle20"
+	list_reagents = list("diphenhydramine" = 30)
+
+/obj/item/weapon/reagent_containers/glass/bottle/flu_virion
+	name = "Flu virion culture bottle"
+	desc = "A small bottle. Contains H13N1 flu virion culture in synthblood medium."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/advance/flu
+
+/obj/item/weapon/reagent_containers/glass/bottle/epiglottis_virion
+	name = "Epiglottis virion culture bottle"
+	desc = "A small bottle. Contains Epiglottis virion culture in synthblood medium."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/advance/voice_change
+
+/obj/item/weapon/reagent_containers/glass/bottle/liver_enhance_virion
+	name = "Liver enhancement virion culture bottle"
+	desc = "A small bottle. Contains liver enhancement virion culture in synthblood medium."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/advance/heal
+
+/obj/item/weapon/reagent_containers/glass/bottle/hullucigen_virion
+	name = "Hullucigen virion culture bottle"
+	desc = "A small bottle. Contains hullucigen virion culture in synthblood medium."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/advance/hullucigen
+
+/obj/item/weapon/reagent_containers/glass/bottle/pierrot_throat
+	name = "Pierrot's Throat culture bottle"
+	desc = "A small bottle. Contains H0NI<42 virion culture in synthblood medium."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/pierrot_throat
+
+/obj/item/weapon/reagent_containers/glass/bottle/cold
+	name = "Rhinovirus culture bottle"
+	desc = "A small bottle. Contains XY-rhinovirus culture in synthblood medium."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/advance/cold
+
+/obj/item/weapon/reagent_containers/glass/bottle/retrovirus
+	name = "Retrovirus culture bottle"
+	desc = "A small bottle. Contains a retrovirus culture in a synthblood medium."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/dna_retrovirus
+
+/obj/item/weapon/reagent_containers/glass/bottle/gbs
+	name = "GBS culture bottle"
+	desc = "A small bottle. Contains Gravitokinetic Bipotential SADS+ culture in synthblood medium."//Or simply - General BullShit
+	icon_state = "bottle3"
+	amount_per_transfer_from_this = 5
+	spawned_disease = /datum/disease/gbs
+
+/obj/item/weapon/reagent_containers/glass/bottle/fake_gbs
+	name = "GBS culture bottle"
+	desc = "A small bottle. Contains Gravitokinetic Bipotential SADS- culture in synthblood medium."//Or simply - General BullShit
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/fake_gbs
+
+/obj/item/weapon/reagent_containers/glass/bottle/brainrot
+	name = "Brainrot culture bottle"
+	desc = "A small bottle. Contains Cryptococcus Cosmosis culture in synthblood medium."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/brainrot
+
+/obj/item/weapon/reagent_containers/glass/bottle/magnitis
+	name = "Magnitis culture bottle"
+	desc = "A small bottle. Contains a small dosage of Fukkos Miracos."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/magnitis
+
+/obj/item/weapon/reagent_containers/glass/bottle/wizarditis
+	name = "Wizarditis culture bottle"
+	desc = "A small bottle. Contains a sample of Rincewindus Vulgaris."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/wizarditis
+
+/obj/item/weapon/reagent_containers/glass/bottle/anxiety
+	name = "Severe Anxiety culture bottle"
+	desc = "A small bottle. Contains a sample of Lepidopticides."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/anxiety
+
+/obj/item/weapon/reagent_containers/glass/bottle/beesease
+	name = "Beesease culture bottle"
+	desc = "A small bottle. Contains a sample of invasive Apidae."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/beesease
+
+/obj/item/weapon/reagent_containers/glass/bottle/fluspanish
+	name = "Spanish flu culture bottle"
+	desc = "A small bottle. Contains a sample of Inquisitius."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/fluspanish
+
+/obj/item/weapon/reagent_containers/glass/bottle/tuberculosis
+	name = "Fungal Tuberculosis culture bottle"
+	desc = "A small bottle. Contains a sample of Fungal Tubercle bacillus."
+	icon_state = "bottle3"
+	spawned_disease = /datum/disease/tuberculosis
+
+/obj/item/weapon/reagent_containers/glass/bottle/tuberculosiscure
+	name = "BVAK bottle"
+	desc = "A small bottle containing Bio Virus Antidote Kit."
+	icon_state = "bottle5"
+	list_reagents = list("atropine" = 5, "epinephrine" = 5, "salbutamol" = 10, "spaceacillin" = 10)

code/modules/reagents/reagent_containers/glass_containers.dm

@@ -31,12 +31,11 @@
 		/obj/machinery/bot/medbot,
 		/obj/item/weapon/storage/secure/safe,
 		/obj/machinery/iv_drip,
-		/obj/machinery/disease2/incubator,
+		/obj/machinery/computer/pandemic,
 		/obj/machinery/disposal,
 		/obj/machinery/apiary,
 		/mob/living/simple_animal/cow,
 		/mob/living/simple_animal/hostile/retaliate/goat,
-		/obj/machinery/computer/centrifuge,
 		/obj/machinery/sleeper,
 		/obj/machinery/smartfridge/,
 		/obj/machinery/biogenerator,