Stethoscopes and penlights - An attempt on usefulness (Also, flashlight flashing fixed)

code/__DEFINES/mobs.dm

@@ -166,8 +166,9 @@
 #define ORGAN_ROBOT 2
 
 #define ORGAN_HEALTHY 0
-#define ORGAN_BRUISED 1
-#define ORGAN_BROKEN 2
+#define ORGAN_LITTLE_BRUISED 1 //used by stethoscopes and penlights
+#define ORGAN_BRUISED 2
+#define ORGAN_BROKEN 3
 
 //=================================================
 

code/game/machinery/vending/vendor_types/crew/medical.dm

@@ -245,6 +245,9 @@ GLOBAL_LIST_INIT(cm_vending_clothing_researcher, list(
 		/obj/item/tool/surgery/synthgraft,
 		/obj/item/storage/syringe_case,
 		/obj/item/storage/surgical_case/regular,
+		/obj/item/clothing/accessory/stethoscope,
+		/obj/item/device/flashlight/pen,
+
 
 	)
 

code/game/machinery/vending/vendor_types/squad_prep/squad_medic.dm

@@ -237,4 +237,6 @@ GLOBAL_LIST_INIT(cm_vending_clothing_medic, list(
 		/obj/item/storage/surgical_case/regular,
 		/obj/item/reagent_container/blood/OMinus,
 		/obj/item/reagent_container/blood/OMinus,
+		/obj/item/device/flashlight/pen,
+		/obj/item/clothing/accessory/stethoscope,
 	)

code/game/objects/items/devices/flashlight.dm

@@ -100,37 +100,40 @@
 	else
 		..()
 
-/obj/item/device/flashlight/attack(mob/living/M as mob, mob/living/user as mob)
+/obj/item/device/flashlight/attack(mob/living/carbon/human/M as mob, mob/living/user as mob)
 	add_fingerprint(user)
 	if(on && user.zone_selected == "eyes")
 
 		if((user.getBrainLoss() >= 60) && prob(50)) //too dumb to use flashlight properly
 			return ..() //just hit them in the head
 
-		if((!ishuman(user) || SSticker) && SSticker.mode.name != "monkey") //don't have dexterity
+		if (!(istype(user, /mob/living/carbon/human) || SSticker) && SSticker.mode.name != "monkey") //don't have dexterity
 			to_chat(user, SPAN_NOTICE("You don't have the dexterity to do this!"))
 			return
 
 		var/mob/living/carbon/human/H = M //mob has protective eyewear
 		if(ishuman(H) && ((H.head && H.head.flags_inventory & COVEREYES) || (H.wear_mask && H.wear_mask.flags_inventory & COVEREYES) || (H.glasses && H.glasses.flags_inventory & COVEREYES)))
-			to_chat(user, SPAN_NOTICE("You're going to need to remove that [(H.head && H.head.flags_inventory & COVEREYES) ? "helmet" : (H.wear_mask && H.wear_mask.flags_inventory & COVEREYES) ? "mask": "glasses"] first."))
+			to_chat(user, SPAN_NOTICE("You're going to need to remove [(H.head && H.head.flags_inventory & COVEREYES) ? "that helmet" : (H.wear_mask && H.wear_mask.flags_inventory & COVEREYES) ? "that mask": "those glasses"] first."))
 			return
 
 		if(M == user) //they're using it on themselves
 			M.flash_eyes()
-			M.visible_message(SPAN_NOTICE("[M] directs [src] to \his eyes."), \
-							SPAN_NOTICE("You wave the light in front of your eyes! Trippy!"))
+			M.visible_message(SPAN_NOTICE("[M] directs [src] to [M.p_their()] eyes."), \
+							SPAN_NOTICE("You wave the light in front of your eyes! Wow, that's trippy!"))
 			return
 
 		user.visible_message(SPAN_NOTICE("[user] directs [src] to [M]'s eyes."), \
 							SPAN_NOTICE("You direct [src] to [M]'s eyes."))
 
 		if(istype(M, /mob/living/carbon/human)) //robots and aliens are unaffected
-			if(M.stat == DEAD || M.sdisabilities & DISABILITY_BLIND) //mob is dead or fully blind
-				to_chat(user, SPAN_NOTICE("[M] pupils does not react to the light!"))
+			var/datum/internal_organ/eyes/eyes = M.internal_organs_by_name["eyes"]
+			var/datum/internal_organ/brain/brain = M.internal_organs_by_name["brain"]
+			if(M.stat == DEAD || M.sdisabilities & DISABILITY_BLIND || eyes.organ_status == ORGAN_BROKEN || brain.organ_status == ORGAN_BROKEN) //mob is dead, fully blind, or their eyes are
+				to_chat(user, SPAN_NOTICE("[M]'s pupils do not react to the light!"))
 			else //they're okay!
 				M.flash_eyes()
 				to_chat(user, SPAN_NOTICE("[M]'s pupils narrow."))
+				return
 	else
 		return ..()
 
@@ -147,14 +150,85 @@
 
 /obj/item/device/flashlight/pen
 	name = "penlight"
-	desc = "A pen-sized light, used by medical staff."
+	desc = "A pen-sized light, used by medical staff to check the condition of eyes, brain, and the overall awareness of patients."
 	icon_state = "penlight"
 	item_state = ""
+	flags_equip_slot = SLOT_WAIST|SLOT_EAR|SLOT_SUIT_STORE
 	flags_atom = FPRINT|CONDUCT
 	light_range = 2
 	w_class = SIZE_TINY
+	throw_speed = SPEED_VERY_FAST
+	throw_range = 15
+	matter = list("metal" = 10,"glass" = 5)
 	raillight_compatible = 0
 
+/obj/item/device/flashlight/pen/attack(mob/living/carbon/human/M as mob, mob/living/user as mob)
+	add_fingerprint(user)
+	if(user.a_intent == INTENT_HELP)
+		if(on && user.zone_selected == "eyes")
+			if(istype(M, /mob/living/carbon/human)) //robots and aliens are unaffected
+				var/datum/internal_organ/eyes/eyes = M.internal_organs_by_name["eyes"]
+				var/datum/internal_organ/brain/brain = M.internal_organs_by_name["brain"]
+				var/reaction = "try to watch closely, but you see no difference in [M.p_their()] eyes' reactions" //Shouldn't never happen anyways
+				if(isnull(M.internal_organs_by_name))
+					reaction = "discover that indeed [M.p_they()] have nothing to be checked"
+					return // they have no organs somehow
+				if(M == user) //they're using it on themselves
+					M.flash_eyes()
+					M.visible_message(SPAN_NOTICE("[M] directs [src] to [M.p_their()] eyes."), \
+								SPAN_NOTICE("You wave the light in front of your eyes! Wow, that's trippy!"))
+					return
+				if(M.stat == DEAD || (M.status_flags&FAKEDEATH))
+					reaction = "conclude that [M.p_their()] eyes are completely lifeless, [M.p_they()] must have passed away"
+				else
+					if(skillcheck(user, SKILL_MEDICAL, SKILL_MEDICAL_MEDIC))
+						if(eyes)
+							switch(eyes.organ_status)
+								if(ORGAN_LITTLE_BRUISED)
+									M.flash_eyes()
+									reaction = "notice that [M.p_their()] eyes are <font color='yellow'>reacting to the light</font>, but [M.p_their()] pupils seen to <font color='yellow'>react sluggishly and with small delays</font>, [M.p_their()] vision is probably <font color='yellow'>a little impaired</font>"
+								if(ORGAN_BRUISED)
+									M.flash_eyes()
+									reaction = "observe that [M.p_their()] eyes are <font color='orange'>unrealiably reacting to the light</font>, with [M.p_their()] pupils <font color='orange'>reacting very sluggishly and with noticeable delays</font>, it is probable that [M.p_their()] vision is <font color='orange'>remarkably impaired</font>"
+								if(ORGAN_BROKEN)
+									reaction = "notice that [M.p_their()] eyes are <font color='red'>not reacting to the light</font>, and the pupils of both eyes are <font color='red'>not constricting with the light</font> shine at all, [M.p_they()] is probably <font color='red'>blind</font>"
+								else
+									M.flash_eyes()
+									reaction = "perceive that [M.p_their()] eyes and pupils are <font color='green'>normally reacting to the light</font>, [M.p_they()] is probably<font color='green'> seeing without problems</font>"
+						if(brain)
+							switch(brain.organ_status)
+								if(ORGAN_LITTLE_BRUISED)
+									M.flash_eyes()
+									if(reaction)
+										reaction += ". You also notice that the pupils are <font color='yellow'>consensually constricting with a significant delay</font> when light is separately applied to each eye, meaning that [M.p_they()] possibly have <font color='yellow'>subtle brain damage</font>"
+									else
+										reaction += "notice that the pupils are <font color='yellow'>consensually constricting with a significant delay</font> when light is separately applied to each eye, meaning that [M.p_they()] possibly have <font color='yellow'>subtle brain damage</font>"
+								if(ORGAN_BRUISED)
+									M.flash_eyes()
+									if(reaction)
+										reaction += ". You also notice that the pupils are <font color='orange'>not consensually constricting</font> when light is separately applied to each eye, meaning possible <font color='orange'>brain damage</font>"
+									else
+										reaction += "notice that the pupils are <font color='orange'>not consensually constricting</font> when light is separately applied to each eye, meaning possible <font color='orange'>brain damage</font>"
+								if(ORGAN_BROKEN)
+									if(reaction)
+										reaction += ". You also notice that the pupils <font color='red'>have different sizes and are assymmetric</font>, [M.p_they()] possibly have <font color='red'>severe brain damage</font>"
+									else
+										reaction += "notice that the pupils have <font color='red'>different sizes and are assymmetric</font>, [M.p_they()] possibly have <font color='red'>severe brain damage</font>"
+								else
+									M.flash_eyes()
+									if(reaction)
+										reaction += ". You also notice that the pupils are <font color='green'>consensually and normally constricting</font> when light is separately applied to each eye, [M.p_their()] brain is <font color='green'>probably fine</font>"
+									else
+										reaction += "notice that the pupils are <font color='greeen'>consensually and normally constricting</font> when light is separately applied to each eye, [M.p_their()] brain is <font color='green'>probably fine</font>"
+						else
+							reaction = "can't see anything at all, weirdly enough"
+					else
+						M.flash_eyes()
+						reaction = "don't really know what you are looking for, you don't know anything about medicine"
+				user.visible_message("[user] directs [src] to [M]'s eyes.", "You point [src] to [M.p_their()] eyes to begin analysing them further and... you [reaction].")
+			return
+	return ..()
+
 /obj/item/device/flashlight/drone
 	name = "low-power flashlight"
 	desc = "A miniature lamp, that might be used by small robots."

code/modules/clothing/under/ties.dm

@@ -102,43 +102,69 @@
 
 /obj/item/clothing/accessory/stethoscope
 	name = "stethoscope"
-	desc = "An outdated medical apparatus for listening to the sounds of the human body. It also makes you look like you know what you're doing."
+	desc = "An outdated, but still useful, medical apparatus for listening to the sounds of the human body. It also makes you look like you know what you're doing."
 	icon_state = "stethoscope"
 
 /obj/item/clothing/accessory/stethoscope/attack(mob/living/carbon/human/M, mob/living/user)
 	if(ishuman(M) && isliving(user))
 		if(user.a_intent == INTENT_HELP)
 			var/body_part = parse_zone(user.zone_selected)
 			if(body_part)
-				var/their = "their"
-				switch(M.gender)
-					if(MALE) their = "his"
-					if(FEMALE) their = "her"
-
-				var/sound = "pulse"
-				var/sound_strength
-
+				var/sound = "try to listen closely, but you are unable to hear any useful sounds"
 				if(M.stat == DEAD || (M.status_flags&FAKEDEATH))
-					sound_strength = "cannot hear"
-					sound = "anything"
+					sound = "can't hear anything at all, they must have kicked the bucket"
 				else
-					sound_strength = "hear a weak"
 					switch(body_part)
 						if("chest")
-							if(M.oxyloss < 50)
-								sound_strength = "hear a healthy"
-							sound = "pulse and respiration"
+							if(skillcheck(user, SKILL_MEDICAL, SKILL_MEDICAL_MEDIC)) // only medical personnel can take advantage of it
+								if(!ishuman(M))
+									return // not a human; only humans have the variable internal_organs_by_name // "cast" it a human type since we confirmed it is one
+								if(isnull(M.internal_organs_by_name))
+									return // they have no organs somehow
+								var/datum/internal_organ/heart/heart = M.internal_organs_by_name["heart"]
+								if(heart)
+									switch(heart.organ_status)
+										if(ORGAN_LITTLE_BRUISED)
+											sound = "hear <font color='yellow'>small murmurs with each heart beat</font>, it is posisble that [M.p_their()] heart is <font color='yellow'>subtly damaged</font>"
+										if(ORGAN_BRUISED)
+											sound = "hear <font color='orange'>deviant heart beating patterns</font>, result of probable <font color='orange'>heart damage</font>"
+										if(ORGAN_BROKEN)
+											sound = "hear <font color='red'>irregular and additional heart beating patterns</font>, probably caused by impaired blood pumping, [M.p_their()] heart is certainly <font color='red'>failing</font>"
+										else
+											sound = "hear <font color='green'>normal heart beating patterns</font>, [M.p_their()] heart is surely <font color='green'>healthy</font>"
+								var/datum/internal_organ/lungs/lungs = M.internal_organs_by_name["lungs"]
+								if(lungs)
+									switch(lungs.organ_status)
+										if(ORGAN_LITTLE_BRUISED)
+											if(sound)
+												sound += ". You also hear <font color='yellow'>some crackles when they breath</font>, they are possibly suffering from <font color='yellow'>a small damage to the lungs</font>"
+											else
+												sound += "hear <font color='yellow'>some crackles when they breath</font>, they are possibly suffering from a <font color='yellow'>small damage to the lungs</font>"
+										if(ORGAN_BRUISED)
+											if(sound)
+												sound += ". You also hear <font color='orange'>unusual respiration sounds</font> and noticeable difficulty to breath, possibly signalling <font color='orange'>ruptured lungs</font>"
+											else
+												sound +=  "hear <font color='orange'>unusual respiration sounds</font> and a difficulty to breath, possibly signalling <font color='orange'>ruptured lungs</font>"
+										if(ORGAN_BROKEN)
+											if(sound)
+												sound += ". You also <font color='red'>barely hear any respiration sounds</font> and a lot of difficulty to breath, [M.p_their()] lungs are <font color='red'>heavily failing</font>"
+											else
+												sound += "<font color='red'>barely hear respiration sounds</font>,  [M.p_their()] lungs are probably <font color='red'>failing</font>"
+										else
+											if(sound)
+												sound += ". You hear <font color='green'>normal respiration sounds</font> aswell, that means [M.p_their()] lungs are <font color='green'>healthy</font>, probably"
+											else
+												sound += "hear <font color='green'>normal respiration sounds</font> aswell, that means [M.p_their()] lungs are <font color='green'>healthy</font>, probably"
+								else
+									sound = "can't hear. Really, anything at all, how weird"
+							else
+								sound = "hear a lot of sounds... it's quite hard to distinguish, really"
 						if("eyes","mouth")
-							sound_strength = "cannot hear"
-							sound = "anything"
-						else
-							sound_strength = "hear a weak"
-
-				user.visible_message("[user] places [src] against [M]'s [body_part] and listens attentively.", "You place [src] against [their] [body_part]. You [sound_strength] [sound].")
+							sound = "can't hear anything. Maybe that isn't the smartest idea"
+				user.visible_message("[user] places [src] against [M]'s [body_part] and listens attentively.", "You place [src] against [M.p_their()] [body_part] and... you [sound].")
 				return
 	return ..(M,user)
 
-
 //Medals
 /obj/item/clothing/accessory/medal
 	name = "medal"

code/modules/organs/organ_internal.dm

@@ -10,6 +10,7 @@
 	var/mob/living/carbon/human/owner = null
 	var/vital //Lose a vital limb, die immediately.
 	var/damage = 0 // amount of damage to the organ
+	var/min_little_bruised_damage = 1 //to make sure the stethoscope/penlight will not lie to the player
 	var/min_bruised_damage = 10
 	var/min_broken_damage = 30
 	var/parent_limb = "chest"
@@ -36,16 +37,21 @@
 
 /// Set the correct organ state
 /datum/internal_organ/proc/set_organ_status()
-	if(damage > min_broken_damage || cut_away)
+	if(damage >= min_broken_damage || cut_away)
 		if(organ_status != ORGAN_BROKEN)
 			organ_status = ORGAN_BROKEN
 			return TRUE
 		return FALSE
-	if(damage > min_bruised_damage)
+	if(damage >= min_bruised_damage)
 		if(organ_status != ORGAN_BRUISED)
 			organ_status = ORGAN_BRUISED
 			return TRUE
 		return FALSE
+	if(damage >= min_little_bruised_damage) // Only for the stethoscopes and penlights, smaller damage check for extra precision
+		if(organ_status != ORGAN_LITTLE_BRUISED)
+			organ_status = ORGAN_LITTLE_BRUISED
+			return TRUE
+		return FALSE
 	if(organ_status != ORGAN_HEALTHY)
 		organ_status = ORGAN_HEALTHY
 		return TRUE