Aurora.3/code/game/turfs/simulated.dm

/turf/simulated
	name = "station"
	var/wet_type = 0
	var/wet_amount = 0
	var/image/wet_overlay = null

	var/thermite = 0
	oxygen = MOLES_O2STANDARD
	nitrogen = MOLES_N2STANDARD
	var/to_be_destroyed = 0 //Used for fire, if a melting temperature was reached, it will be destroyed
	var/max_fire_temperature_sustained = 0 //The max temperature of the fire which it was subjected to
	var/dirt = 0

	var/unwet_timer	// Used to keep track of the unwet timer & delete it on turf change so we don't runtime if the new turf is not simulated.

	roof_type = /turf/simulated/floor/airless/ceiling

/turf/simulated/proc/wet_floor(var/apply_type = WET_TYPE_WATER, var/amount = 1)

	//Wet type:
	//WET_TYPE_WATER = water
	//WET_TYPE_LUBE = lube
	//WET_TYPE_ICE = ice

	if(!wet_type)
		wet_type = apply_type
	else if(apply_type != wet_type)
		if(apply_type == WET_TYPE_WATER && wet_type == WET_TYPE_LUBE)
			wet_type = WET_TYPE_WATER
		else if(apply_type == WET_TYPE_ICE && (wet_type == WET_TYPE_WATER || wet_type == WET_TYPE_LUBE))
			wet_type = apply_type

	if(wet_amount <= 0)
		wet_amount = 0 //Just in case

	if(!wet_overlay)
		wet_overlay = image('icons/effects/water.dmi',src,"wet_floor")
		add_overlay(wet_overlay, TRUE)

	wet_amount += amount

	unwet_timer = addtimer(CALLBACK(src, .proc/unwet_floor), 120 SECONDS, TIMER_UNIQUE | TIMER_OVERRIDE | TIMER_STOPPABLE)

/turf/simulated/proc/unwet_floor()
	wet_amount = 0
	wet_type = 0
	if(wet_overlay)
		cut_overlay(wet_overlay, TRUE)
		wet_overlay = null

/turf/simulated/clean_blood()
	for(var/obj/effect/decal/cleanable/blood/B in contents)
		B.clean_blood()
	..()

/turf/simulated/Initialize(mapload)
	if (mapload)
		if(istype(loc, /area/chapel))
			holy = 1

	. = ..()
	levelupdate(mapload)
	if (!mapload)
		updateVisibility(src)

/turf/simulated/proc/update_dirt()
	dirt = min(dirt+1, 101)
	var/obj/effect/decal/cleanable/dirt/dirtoverlay = locate(/obj/effect/decal/cleanable/dirt, src)
	if (dirt > 50)
		if (!dirtoverlay)
			dirtoverlay = new/obj/effect/decal/cleanable/dirt(src)
		dirtoverlay.alpha = min((dirt - 50) * 5, 255)

/turf/simulated/Entered(atom/A, atom/OL)
	if(movement_disabled && usr.ckey != movement_disabled_exception)
		to_chat(usr, SPAN_WARNING("Movement is admin-disabled.")) //This is to identify lag problems)
		return

	if(istype(A,/mob/living))
		var/mob/living/M = A
		if(src.wet_type && src.wet_amount)
			if(M.buckled || (src.wet_type == 1 && M.m_intent == "walk"))
				return

			//Water
			var/slip_dist = 1
			var/slip_stun = 6
			var/floor_type = "wet"

			switch(src.wet_type)
				if(WET_TYPE_LUBE) // Lube
					floor_type = "slippery"
					slip_dist = 4
					slip_stun = 10
				if(WET_TYPE_ICE) // Ice
					floor_type = "icy"
					slip_stun = 4

			if(M.slip("the [floor_type] floor",slip_stun) && slip_dist)
				for (var/i in 1 to slip_dist)
					sleep(1)
					step(M, M.dir)

		if(M.lying)
			return ..()

		// Ugly hack :c Should never have multiple plants in the same tile.
		var/obj/effect/plant/plant = locate() in contents
		if(plant) plant.trodden_on(M)

		// Dirt overlays.
		update_dirt()

		M.inertia_dir = 0

	..()

//returns 1 if made bloody, returns 0 otherwise
/turf/simulated/add_blood(mob/living/carbon/human/M as mob)
	if (!..())
		return 0

	if(istype(M))
		for(var/obj/effect/decal/cleanable/blood/B in contents)
			if(!B.blood_DNA)
				B.blood_DNA = list()
			if(!B.blood_DNA[M.dna.unique_enzymes])
				B.blood_DNA[M.dna.unique_enzymes] = M.dna.b_type
			return 1 //we bloodied the floor
		blood_splatter(src,M.get_blood(M.vessel),1)
		return 1 //we bloodied the floor
	return 0

// Only adds blood on the floor -- Skie
/turf/simulated/proc/add_blood_floor(mob/living/carbon/M as mob)
	if( istype(M, /mob/living/carbon/alien ))
		var/obj/effect/decal/cleanable/blood/xeno/this = new /obj/effect/decal/cleanable/blood/xeno(src)
		this.blood_DNA["UNKNOWN BLOOD"] = "X*"
	else if( istype(M, /mob/living/silicon/robot ))
		new /obj/effect/decal/cleanable/blood/oil(src)

/turf/simulated/Destroy()
	if (zone)
		// Try to remove it gracefully first.
		if (can_safely_remove_from_zone())
			c_copy_air()
			zone.remove(src)
		else	// Can't remove it safely, just rebuild the entire thing.
			zone.rebuild()

	// Letting this timer continue to exist can cause runtimes, so we delete it.
	if (unwet_timer)
		// deltimer will no-op if the timer is already deleted, so we don't need to check the timer still exists.
		deltimer(unwet_timer)

	return ..()