Lets people light cigarettes in lava. (#67587)

* god what a badass

* what a clumsy guy

* melbert changes

code/game/turfs/open/lava.dm

@@ -118,6 +118,20 @@
 		else
 			to_chat(user, span_warning("You need one rod to build a heatproof lattice."))
 		return
+	// Light a cigarette in the lava
+	if(istype(C, /obj/item/clothing/mask/cigarette))
+		var/obj/item/clothing/mask/cigarette/ciggie = C
+		if(ciggie.lit)
+			to_chat(user, span_warning("The [ciggie.name] is already lit!"))
+			return TRUE
+		var/clumsy_modifier = HAS_TRAIT(user, TRAIT_CLUMSY) ? 2 : 1
+		if(prob(25 * clumsy_modifier ))
+			ciggie.light(span_warning("[user] expertly dips \the [ciggie.name] into [src], along with the rest of [user.p_their()] arm. What a dumbass."))
+			var/obj/item/bodypart/affecting = user.get_active_hand()
+			affecting?.receive_damage(burn = 90)
+		else
+			ciggie.light(span_rose("[user] expertly dips \the [ciggie.name] into [src], lighting it with the scorching heat of the planet. Witnessing such a feat is almost enough to make you cry."))
+		return TRUE
 
 /turf/open/lava/proc/is_safe()
 	//if anything matching this typecache is found in the lava, we don't burn things