vgstation13/code/modules/hydroponics/seed_datums.dm

var/global/list/seed_types = list()       // A list of all seed data.
var/global/list/gene_tag_masks = list()   // Gene obfuscation for delicious trial and error goodness.

/datum/plantgene
	var/genetype    // Label used when applying trait.
	var/list/values // Values to copy into the target seed datum.

/datum/seed

	//Tracking.
	var/uid                        // Unique identifier.
	var/name                       // Index for global list.
	var/seed_name                  // Plant name for seed packet.
	var/seed_noun = "seeds"        // Descriptor for packet.
	var/display_name               // Prettier name.
	var/roundstart                 // If set, seed will not display variety number.
	var/mysterious                 // Only used for the random seed packets.

	// Output.
	var/list/products              // Possible fruit/other product paths.
	var/list/mutants               // Possible predefined mutant varieties, if any.
	var/list/chems                 // Chemicals that plant produces in products/injects into victim in (Total units, Potency)
	var/list/consume_gasses=list() // The plant will absorb these gasses during its life.
	var/list/exude_gasses=list()   // The plant will exude these gasses during its life.

	//Tolerances.
	var/nutrient_consumption = 10	// Plant eats this much per tick.
	var/fluid_consumption = 3       // Plant drinks this much water or toxin per tick.
	var/ideal_heat = 293            // Preferred temperature in Kelvin.
	var/heat_tolerance = 20         // Departure from ideal that is survivable.
	var/ideal_light = 7             // Preferred light level in luminosity.
	var/light_tolerance = 5         // Departure from ideal that is survivable.
	var/toxin_affinity = 4          // Resistance to poison, either water or toxins
	var/lowkpa_tolerance = 25       // Low pressure capacity.
	var/highkpa_tolerance = 200     // High pressure capacity.
	var/pest_tolerance = 50          // Threshold for pests to impact health.
	var/weed_tolerance = 50          // Threshold for weeds to impact health.

	//General traits.
	var/endurance = 100             // Maximum plant HP when growing.
	var/yield = 0                   // Amount of product.
	var/lifespan = 0                // Time before the plant dies.
	var/maturation = 0              // Time taken before the plant is mature.
	var/production = 0              // Time before harvesting can be undertaken again.
	var/growth_stages = 6           // Number of stages the plant passes through before it is mature.
	var/harvest_repeat = 0          // If 1, this plant will fruit repeatedly. If 2, the plant will self-harvest.
	var/potency = 1                 // General purpose plant strength value.
	var/spread = 0                  // 0 limits plant to tray, 1 = creepers, 2 = vines.
	var/immutable = 0               // If set, plant will never mutate. If -1, plant is  highly mutable.
	var/alter_temp = 0              // If set, the plant will periodically alter local temp by this amount.
	var/voracious = 0             	// 0 = none, 1 = eat weeds and eat pests in tray, 2 = eat living things.
	var/hematophage = 0				// 0 = no, 1 = plant only gains nutriment from blood.
	var/thorny = 0					// If 1, does brute damage when touched without protection. Can't be held or harvested without gloves. Short for the Thorned Reaper.
	var/stinging = 0				// If 1, injects reagents when touched without protection.
	var/ligneous = 0				// If 1, requires sharp instrument to harvest. Kudzu with this trait resists sharp items better.
	var/teleporting = 0				// If 1, causes teleportation when thrown.
	var/juicy = 0					// 0 = no, 1 = splatters when thrown, 2 = slips
	var/noreact = 0					// If 1, chems do not react inside the plant.
	var/gas_absorb = 0              // If 1, absorbs the gasses from consume_gasses and turns them into reagents inside the fruit.

	// Cosmetics.
	var/plant_dmi = 'icons/obj/hydroponics/apple.dmi'// DMI  to use for the plant growing in the tray.
	var/plant_icon_state = "produce"                 // icon_state to use for the product
	var/packet_icon = "seed"        // Icon to use for physical seed packet item.
	var/biolum                      // Plant is bioluminescent.
	var/biolum_colour               // The colour of the plant's radiance.
	var/splat_type = /obj/effect/decal/cleanable/fruit_smudge //Decal to create if the fruit is splatter-able and subsequently splattered.

	var/mob_drop					// Seed type dropped by the mobs when it dies without an host

	var/large = 1					// Is the plant large? For clay pots.
	var/list/mutation_log = list() // Who did what

/datum/seed/New()
	..()

//Creates a random seed. MAKE SURE THE LINE HAS DIVERGED BEFORE THIS IS CALLED.
/datum/seed/proc/randomize()
	roundstart = 0
	seed_name = "strange plant"     // TODO: name generator.
	display_name = "strange plants" // TODO: name generator.
	mysterious = 1

	seed_noun = pick("spores","nodes","cuttings","seeds")
	products = list(pick(subtypesof(/obj/item/weapon/reagent_containers/food/snacks/grown/) - strange_seed_product_blacklist)) //The product can be any subtype of /food/snacks/grown, except those in strange_seed_product_blacklist.
	potency = rand(5,30)

	randomize_icon()

	if(prob(40))
		harvest_repeat = 1

	if(prob(5))
		consume_gasses = list()
		var/gas = pick(GAS_OXYGEN, GAS_NITROGEN, GAS_PLASMA, GAS_CARBON)
		consume_gasses[gas] = rand(3,9)
		if(prob(10))
			gas_absorb = 1

	if(prob(5))
		exude_gasses = list()
		var/gas = pick(GAS_OXYGEN, GAS_NITROGEN, GAS_PLASMA, GAS_CARBON)
		exude_gasses[gas] = rand(3,9)

	chems = list()
	if(prob(80))
		chems[NUTRIMENT] = list(rand(1,5),rand(5,10))

	var/additional_chems = rand(0,5)
	for(var/x=1;x<=additional_chems;x++)
		if(!add_random_chemical())
			break

	nutrient_consumption = rand(28)/10
	fluid_consumption = rand(9)

	ideal_heat =       rand(273,313)
	heat_tolerance =   rand(10,30)
	ideal_light =      rand(2,10)
	light_tolerance =  rand(2,7)
	toxin_affinity =  rand(1,10)
	pest_tolerance =   rand(20,70)
	weed_tolerance =   rand(20,70)
	lowkpa_tolerance = rand(10,50)
	highkpa_tolerance = rand(100,300)

	if(prob(5))
		alter_temp = 1
	if(prob(5))
		voracious = 2
	else if(prob(5))
		voracious = 1
	if(prob(5))
		spread = 2
	else if(prob(5))
		spread = 1
	if(prob(10))
		biolum = 1
		biolum_colour = "#[get_random_colour(1)]"
	if(prob(5))
		hematophage = 1
	if(prob(5))
		thorny = 1
	if(prob(5))
		stinging = 1
	if(prob(5))
		ligneous = 1
	if(prob(5))
		juicy = 2
	else if(prob(5))
		juicy = 1

	if(prob(5))
		noreact = 1

	endurance = rand(60,100)
	yield = rand(2,15)
	maturation = rand(3,15)
	production = rand(3,10)
	lifespan = rand(4,15)*5

//Gives the plant a new, random icon from a list, with matching growth stages number.
/datum/seed/proc/add_random_chemical()
	var/list/possible_chems = list(
		// Important Medicines
		REZADONE = 200,
		PERIDAXON = 200,
		// Items of Botany Importance
		CRYOXADONE = 100,
		RADIUM = 100,
		PLASTICIDE = 100,
		// Items of Botanist Importance
		COCAINE = 100,
		THERMITE = 100,
		NICOTINE = 100,
		LEPORAZINE = 100,
		POTASSIUM = 100,
		// Misc Medicines
		OPIUM = 100,
		INAPROVALINE = 100,
		RYETALYN = 100,
		ALKYSINE = 100,
		KATHALAI = 100,
		THYMOL = 100,
		DEXALINP = 75,
		HYRONALIN = 100,
		BLOOD = 100,
		PHYTOSINE = 100,
		PHYTOCARISOL = 100,
		// Misc Poisons
		PHYSOSTIGMINE = 100,
		MERCURY = 100,
		HYOSCYAMINE = 100,
		VALERENIC_ACID = 100,
		CYANIDE = 100,
		CURARE = 100,
		SOLANINE = 100,
		SLIMEJELLY = 75,
		// Fun Things
		MUTATIONTOXIN = 50,
		AMUTATIONTOXIN = 10,
		MESCALINE = 100,
		METHYLIN = 100,
		CARPPHEROMONES = 40,
		NOTHING = 50,
		MINDBREAKER = 100,
		MINTTOXIN = 60,
		DEFALEXORIN = 100,
		// Things of Dubious Use
		SUGAR = 100,
		ETHYLREDOXRAZINE = 100,
		PAROXETINE = 100,
		TRAMADOL = 100,
	)

	for(var/rid in chems)
		possible_chems -= rid
	if(!possible_chems.len)
		return 0
	var/new_chem = pickweight(possible_chems)
	chems[new_chem] = list(rand(1,5),rand(10,15))
	return 1

/datum/seed/proc/remove_random_chemical()
	if(length(chems))
		chems -= pick(chems)
		return TRUE
	return FALSE

/datum/seed/proc/randomize_icon()
	var/random = rand(1, SSplant.roundstart_seeds)
	var/random_key = SSplant.seeds[random]
	var/datum/seed/random_seed = SSplant.seeds[random_key]
	set_icon(random_seed)

/datum/seed/proc/set_icon(datum/seed/seed)
	plant_dmi = seed.plant_dmi
	plant_icon_state = "produce"
	growth_stages = seed.growth_stages

//Random mutations moved to hydroponics_mutations.dm!

//Mutates a specific trait/set of traits. Used by the Bioballistic Delivery System.
/datum/seed/proc/apply_gene(var/datum/plantgene/gene, var/mode, var/mob/user)
	if(!gene)
		return
	if(!gene.values)
		return
	if(immutable > 0)
		return

	switch(gene.genetype)
		if(GENE_PHYTOCHEMISTRY)
			if(!chems || mode == GENEGUN_MODE_PURGE)
				chems = list()
			var/list/chems_to_splice = gene.values[1]
			for(var/chem in chems_to_splice)
				chems[chem] = chems_to_splice[chem]


/*
			var/list/gene_value = gene.values[1]
			for(var/rid in gene_value)
				var/list/gene_chem = gene_value[rid]
				if(!(rid in chems) || !chems[rid])
					chems[rid] = gene_chem.Copy()
					continue
				for(var/i=1 to gene_chem.len)
					if(isnull(gene_chem[i]))
						chems[rid][i] = 0
						gene_chem[i] = 0
					if(!chems[rid][i])
						continue
					if(chems[rid][i])
						chems[rid][i] = max(1,round((gene_chem[i] + chems[rid][i])/2))
					else
						chems[rid][i] = gene_chem[i]
*/
			switch(mode)
				if(GENEGUN_MODE_PURGE)
					potency 			= gene.values[2]
				if(GENEGUN_MODE_SPLICE)
					potency 			= round(mix(gene.values[2], potency, rand(40, 60)/100), 0.1)

		if(GENE_MORPHOLOGY)
			if(gene.values[1])
				if(!products || mode == GENEGUN_MODE_PURGE)
					products = list()
				products |= gene.values[1]
			switch(mode)
				if(GENEGUN_MODE_PURGE)
					thorny 				= gene.values[2]
					stinging 			= gene.values[3]
					ligneous 			= gene.values[4]
					juicy 				= gene.values[5]
				if(GENEGUN_MODE_SPLICE)
					thorny 				= max(gene.values[2], thorny)
					stinging 			= max(gene.values[3], stinging)
					ligneous 			= max(gene.values[4], ligneous)
					juicy 				= max(gene.values[5], juicy)

		if(GENE_BIOLUMINESCENCE)
			switch(mode)
				if(GENEGUN_MODE_PURGE)
					biolum 				= gene.values[1]
					biolum_colour 		= gene.values[2]
				if(GENEGUN_MODE_SPLICE)
					biolum 				= max(gene.values[1], biolum)
					biolum_colour 		= BlendRGB(gene.values[2], biolum_colour, rand(40, 60)/100)

		if(GENE_ECOLOGY)
			switch(mode)
				if(GENEGUN_MODE_PURGE)
					ideal_heat 			= gene.values[1]
					heat_tolerance 		= gene.values[2]
					ideal_light 		= gene.values[3]
					light_tolerance 	= gene.values[4]
					lowkpa_tolerance	= gene.values[5]
					highkpa_tolerance	= gene.values[6]
				if(GENEGUN_MODE_SPLICE)
					ideal_heat 			= Ceiling(mix(gene.values[1], ideal_heat, 		rand(40, 60)/100))
					heat_tolerance 		= Ceiling(mix(gene.values[2], heat_tolerance, 	rand(40, 60)/100))
					ideal_light 		= Ceiling(mix(gene.values[3], ideal_light,		rand(40, 60)/100))
					light_tolerance 	= Ceiling(mix(gene.values[4], light_tolerance, 	rand(40, 60)/100))
					lowkpa_tolerance	= Ceiling(mix(gene.values[5], lowkpa_tolerance, rand(40, 60)/100))
					highkpa_tolerance	= Ceiling(mix(gene.values[6], highkpa_tolerance,rand(40, 60)/100))

		if(GENE_ECOPHYSIOLOGY)
			switch(mode)
				if(GENEGUN_MODE_PURGE)
					toxin_affinity		= gene.values[1]
					pest_tolerance		= gene.values[2]
					weed_tolerance		= gene.values[3]
					lifespan			= gene.values[4]
					endurance			= gene.values[5]
				if(GENEGUN_MODE_SPLICE)
					toxin_affinity 	= round(mix(gene.values[1], toxin_affinity,			rand(40, 60)/100), 0.1)
					pest_tolerance		= round(mix(gene.values[2], pest_tolerance, 	rand(40, 60)/100), 0.1)
					weed_tolerance 		= round(mix(gene.values[3], weed_tolerance, 	rand(40, 60)/100), 0.1)
					lifespan 			= round(mix(gene.values[4], lifespan, 			rand(40, 60)/100), 0.1)
					endurance			= round(mix(gene.values[5], endurance, 			rand(40, 60)/100), 0.1)

		if(GENE_METABOLISM)
			switch(mode)
				if(GENEGUN_MODE_PURGE)
					nutrient_consumption	= gene.values[1]
					fluid_consumption 		= gene.values[2]
					voracious				= gene.values[3]
					hematophage 			= gene.values[4]
				if(GENEGUN_MODE_SPLICE)
					nutrient_consumption	= mix(gene.values[1], nutrient_consumption,	rand(40, 60)/100)
					fluid_consumption 		= mix(gene.values[2], fluid_consumption,	rand(40, 60)/100)
					voracious 				= max(gene.values[3], voracious)
					hematophage 			= max(gene.values[4], hematophage)

		if(GENE_DEVELOPMENT)
			switch(mode)
				if(GENEGUN_MODE_PURGE)
					production 			= gene.values[1]
					maturation 			= gene.values[2]
					spread 				= gene.values[3]
					harvest_repeat 		= gene.values[4]
					yield				= gene.values[5]
				if(GENEGUN_MODE_SPLICE)
					production 			= round(mix(gene.values[1], production,	rand(40, 60)/100), 0.1)
					maturation 			= round(mix(gene.values[2], maturation,	rand(40, 60)/100), 0.1)
					spread 				= max(gene.values[3], spread)
					harvest_repeat 		= max(gene.values[4], harvest_repeat)
					yield				= round(mix(gene.values[5], yield,		rand(40, 60)/100), 0.1)
		if(GENE_XENOPHYSIOLOGY)
			switch(mode)
				if(GENEGUN_MODE_PURGE)
					teleporting 		= gene.values[1]
					alter_temp 			= gene.values[2]
					noreact 			= gene.values[3]
					gas_absorb          = gene.values[6]
				if(GENEGUN_MODE_SPLICE)
					teleporting 		= max(gene.values[1], teleporting)
					alter_temp 			= max(gene.values[2], alter_temp)
					noreact 			= max(gene.values[3], noreact)
					gas_absorb          = max(gene.values[6], gas_absorb)
			var/list/new_gasses = gene.values[4]
			if(islist(new_gasses))
				if(!exude_gasses || mode == GENEGUN_MODE_PURGE)
					exude_gasses = list()
				exude_gasses |= new_gasses
			new_gasses.len = 0
			new_gasses = gene.values[5]
			if(islist(new_gasses))
				if(!consume_gasses || mode == GENEGUN_MODE_PURGE)
					consume_gasses = list()
				consume_gasses |= new_gasses

	var/text = "([timestamp()]) Plant engineered by [key_name(usr)], mode: [mode] (cf __DEFINES/hydroponics.dm). |"
	text += " Plant is now [voracious ? "voracious" : "NO LONGER carnivorous."] |"
	text += " Plant is now [thorny ? "thorny" : "NO LONGER thorny."] |"
	text += " Plant chems: "
	for (var/chemical in chems)
		text += "[chemical], vol: [chems[chemical][1]], potency: [chems[chemical][2]]."

	mutation_log += text

//Returns a list of the desired trait values.
/datum/seed/proc/get_gene(var/genetype)
	if(!genetype)
		return 0

	var/datum/plantgene/P = new()
	P.genetype = genetype

	switch(genetype)
		if(GENE_PHYTOCHEMISTRY)
			P.values = list(
				(chems                	? chems                	: 0),
				(potency				? potency 				: 0),
			)
		if(GENE_MORPHOLOGY)
			P.values = list(
				(products           	? products            	: 0),
				(thorny           	 	? thorny           		: 0),
				(stinging            	? stinging            	: 0),
				(ligneous             	? ligneous            	: 0),
				(juicy             		? juicy             	: 0)
			)
		if(GENE_BIOLUMINESCENCE)
			P.values = list(
				(biolum               	? biolum              	: 0),
				(biolum_colour        	? biolum_colour      	: 0)
			)
		if(GENE_ECOLOGY)
			P.values = list(
				(ideal_heat           	? ideal_heat          	: 0),
				(heat_tolerance      	? heat_tolerance     	: 0),
				(ideal_light         	? ideal_light         	: 0),
				(light_tolerance      	? light_tolerance     	: 0),
				(lowkpa_tolerance     	? lowkpa_tolerance    	: 0),
				(highkpa_tolerance   	? highkpa_tolerance   	: 0)
			)
		if(GENE_ECOPHYSIOLOGY)
			P.values = list(
				(toxin_affinity     	? toxin_affinity    	: 0),
				(pest_tolerance       	? pest_tolerance      	: 0),
				(weed_tolerance       	? weed_tolerance      	: 0),
				(lifespan      			? lifespan				: 0),
				(endurance       		? endurance       		: 0)
			)
		if(GENE_METABOLISM)
			P.values = list(
				(nutrient_consumption 	? nutrient_consumption	: 0),
				(fluid_consumption    	? fluid_consumption   	: 0),
				(voracious				? voracious 			: 0),
				(hematophage    		? hematophage    		: 0)
			)
		if(GENE_DEVELOPMENT)
			P.values = list(
				(production           	? production          	: 0),
				(maturation           	? maturation          	: 0),
				(spread         		? spread         		: 0),
				(harvest_repeat       	? harvest_repeat      	: 0),
				(yield              	? yield              	: 0)
			)
		if(GENE_XENOPHYSIOLOGY)
			P.values = list(
				(teleporting          	? teleporting          	: 0),
				(alter_temp    			? alter_temp    		: 0),
				(noreact				? noreact				: 0),
				(exude_gasses    		? exude_gasses    		: 0),
				(consume_gasses    		? consume_gasses    	: 0),
				(gas_absorb             ? gas_absorb            : 0)
			)
	return (P ? P : 0)

//This may be a new line. Update the global if it is.
/datum/seed/proc/add_newline_to_controller()
	if(name == "new line" || !(name in SSplant.seeds))
		uid = SSplant.seeds.len + 1
		name = "[uid]"
		SSplant.seeds[name] = src

//Place the plant products at the feet of the user.
/datum/seed/proc/harvest(var/mob/user)
	if(!user)
		return
	if(isnull(products) || !products.len || yield <= 0)
		to_chat(user, "<span class='warning'>You fail to harvest anything useful.</span>")
	else
		to_chat(user, "You harvest from the [display_name].")
		generate_product(get_turf(user), user)

/datum/seed/proc/generate_product(var/turf/T, mob/harvester)
	add_newline_to_controller()

	if(yield < 1)
		return

	currently_querying = list()
	for(var/i = 0;i<yield;i++)
		var/product_type = pick(products)
		var/obj/item/product

		if(ispath(product_type, /obj/item/stack))
			product = drop_stack(product_type, T, 1, null)
		else if(ispath(product_type, /obj/item/weapon/reagent_containers/food/snacks/grown))
			product = new product_type(T, custom_plantname = name, harvester = harvester)
		else if(ispath(product_type, /obj/item/weapon/grown))
			product = new product_type(T, custom_plantname = name)
		else
			product = new product_type(T)

		score.stuffharvested += 1 //One point per product unit

		if(mysterious)
			product.name += "?"
			product.desc += " On second thought, something about this one looks strange."

		if(biolum)
			if(biolum_colour)
				product.light_color = biolum_colour
			//product.set_light(1+round(potency/50))
			product.set_light(2)

		//Handle spawning in living, mobile products (like dionaea).
		if(istype(product,/mob/living))
			product.visible_message("<span class='notice'>The pod disgorges [product]!</span>")
			handle_living_product(product)

//Harvest without concern for the user
/datum/seed/proc/autoharvest(var/turf/T, var/yield_mod = 1)
	if(!T)
		return
	if(!length(products))
		return
	var/tile_objects = 0
	for(var/obj/O in T)
		tile_objects++
	//prevent the server or players from crashing
	if(tile_objects > 50)
		return
	if(yield > 0)
		generate_product(T, yield_mod)

/datum/seed/proc/check_harvest(var/mob/user, var/obj/machinery/portable_atmospherics/hydroponics/tray)
	var/success = 1
	var/stung = 0
	if(thorny || stinging)
		var/mob/living/carbon/human/H = user
		if(istype(H))
			if(!H.check_body_part_coverage(HANDS))
				for(var/assblast in list(LIMB_RIGHT_HAND, LIMB_LEFT_HAND))
					if(stung)
						continue
					var/datum/organ/external/affecting = H.get_organ(assblast)
					if(affecting && affecting.is_existing() && affecting.is_usable() && affecting.is_organic())
						stung = 1
						if(thorny)
							if(affecting.take_damage(5+voracious*5, 0))
								H.UpdateDamageIcon()
								H.updatehealth()
							else
								H.adjustBruteLoss(5+voracious*5)
							to_chat(H, "<span class='danger'>You are prickled by the sharp thorns on \the [seed_name]!</span>")
							if(H.feels_pain())
								success = 0
						if(stinging)
							if(chems && chems.len)
								for(var/rid in chems)
									H.reagents.add_reagent(rid, clamp(1, 5, potency/10))
								to_chat(H, "<span class='danger'>You are stung by \the [seed_name]!</span>")
								if(hematophage)
									if(tray && H.species && !(H.species.anatomy_flags & NO_BLOOD)) //the indentation gap doesn't stop from getting wider
										var/drawing = min(15, H.vessel.get_reagent_amount(BLOOD))
										H.vessel.remove_reagent(BLOOD, drawing)
										tray.reagents.add_reagent(BLOOD, drawing)
	if(ligneous && success)
		success = 0
		if(istype(user, /mob/living/carbon))
			var/mob/living/carbon/M = user
			for(var/obj/item/I in M.held_items)
				if(I.sharpness_flags & (SHARP_BLADE|SERRATED_BLADE))
					success = 1
					break

			if(!success)
				to_chat(M, "<span class='warning'>The stems on this plant are too tough to cut by hand, you'll need something sharp in one of your hands to harvest it.</span>")

	return success

// Create a seed packet directly from the plant.
/datum/seed/proc/spawn_seed_packet(turf/target)
	add_newline_to_controller()
	var/obj/item/seeds/seeds = new(target)
	seeds.seed_type = src.name
	seeds.update_seed()
	return seeds

// When the seed in this machine mutates/is modified, the tray seed value
// is set to a new datum copied from the original. This datum won't actually
// be put into the global datum list until the product is harvested, though.
/datum/seed/proc/diverge(var/modified)
	if(immutable > 0)
		return

	//Set up some basic information.
	var/datum/seed/new_seed = new /datum/seed()
	new_seed.name = "new line"
	new_seed.uid = 0
	new_seed.roundstart = 0
	new_seed.large = large

	//Copy over everything else.
	if(products)
		new_seed.products = products.Copy()
	if(mutants)
		new_seed.mutants = mutants.Copy()
	if(chems)
		new_seed.chems = chems.Copy()
	if(consume_gasses)
		new_seed.consume_gasses = consume_gasses.Copy()
	if(exude_gasses)
		new_seed.exude_gasses = exude_gasses.Copy()

	if(modified != -1)
		new_seed.seed_name = "[(roundstart ? "[(modified ? "modified" : "mutant")] " : "")][seed_name]"
		new_seed.display_name = "[(roundstart ? "[(modified ? "modified" : "mutant")] " : "")][display_name]"
	else
		new_seed.seed_name = "[seed_name]"
		new_seed.display_name = "[display_name]"

	new_seed.nutrient_consumption = nutrient_consumption
	new_seed.fluid_consumption =	fluid_consumption
	new_seed.ideal_heat =			ideal_heat
	new_seed.heat_tolerance =		heat_tolerance
	new_seed.ideal_light =			ideal_light
	new_seed.light_tolerance =		light_tolerance
	new_seed.toxin_affinity =		toxin_affinity
	new_seed.lowkpa_tolerance =		lowkpa_tolerance
	new_seed.highkpa_tolerance =	highkpa_tolerance
	new_seed.pest_tolerance =		pest_tolerance
	new_seed.weed_tolerance =		weed_tolerance
	new_seed.endurance =			endurance
	new_seed.yield =				yield
	new_seed.lifespan =				lifespan
	new_seed.maturation =			maturation
	new_seed.production =			production
	new_seed.growth_stages =		growth_stages
	new_seed.harvest_repeat =		harvest_repeat
	new_seed.potency =				potency
	new_seed.spread =				spread
	new_seed.voracious =			voracious
	new_seed.hematophage =			hematophage
	new_seed.thorny =				thorny
	new_seed.stinging =				stinging
	new_seed.ligneous =				ligneous
	new_seed.teleporting =			teleporting
	new_seed.juicy =				juicy
	new_seed.plant_icon_state =		plant_icon_state
	new_seed.splat_type =			splat_type
	new_seed.packet_icon =			packet_icon
	new_seed.biolum =				biolum
	new_seed.biolum_colour =		biolum_colour
	new_seed.alter_temp =			alter_temp
	new_seed.gas_absorb =           gas_absorb
	new_seed.noreact =              noreact
	new_seed.plant_dmi =			plant_dmi
	new_seed.mutation_log =			mutation_log
	new_seed.mutation_log += "([timestamp()]) Diverged from seed with uid: [uid]."

	ASSERT(istype(new_seed)) //something happened... oh no...
	return new_seed

/datum/seed/proc/get_reagent_names()
	var/list/reagent_names = list()

	var/datum/reagent/R
	for (var/rid in chems)
		R = chemical_reagents_list[rid]
		reagent_names += R.name
	return reagent_names