Valentines flowers - Admin spawn only

brap cum plant.

code/modules/hydroponics/grown/misc.dm

@@ -64,6 +64,42 @@
 	T.assume_air(stank)
 	T.air_update_turf()
 
+
+// Valentines flower
+/obj/item/seeds/starthistle/valentines
+	name = "pack of valentines flower seeds"
+	desc = "A species of plant that emits a arousing odor. The odor stops being produced in difficult atmospheric conditions."
+	icon_state = "valentines"
+	species = "valentines"
+	plantname = "Valentines Flower"
+	production = 2
+	growing_icon = 'icons/obj/hydroponics/growing_flowers.dmi'
+	genes = list()
+	mutatelist = list()
+
+/obj/item/seeds/starthistle/valentines/pre_attack(obj/machinery/hydroponics/I)
+	if(istype(I, /obj/machinery/hydroponics))
+		if(!I.myseed)
+			START_PROCESSING(SSobj, src)
+	return ..()
+
+/obj/item/seeds/starthistle/valentines/process()
+	var/obj/machinery/hydroponics/parent = loc
+	if(parent.age < maturation || parent.dead) // Start a little before it blooms
+		return
+
+	var/turf/open/T = get_turf(parent)
+	if(abs(ONE_ATMOSPHERE - T.return_air().return_pressure()) > (potency/10 + 10))
+		return
+
+	var/datum/gas_mixture/scent = new
+	var/list/cached_gases = scent.gases
+
+	cached_gases[/datum/gas/pheromone] += (yield + 5)*7*0.1
+	scent.temperature = T20C
+	T.assume_air(scent)
+	T.air_update_turf()
+
 //Galaxy Thistle
 /obj/item/seeds/galaxythistle
 	name = "pack of galaxythistle seeds"