/obj/item/device/healthanalyzer/verb/toggle_guide()
set name = "Toggle Guidance"
set desc = "Toggles whether or not \the [src] will provide guidance and instruction in addition to scanning."
set category = "Object"
guide = !guide
to_chat(usr, "You toggle \the [src]'s guidance system [guide ? "on" : "off"].")
/obj/item/device/healthanalyzer/guide
name = "Instructional health analyzer"
desc = "A hand-held body scanner able to distinguish vital signs of the subject. It shows extra information to medical personnel!"
guide = TRUE
icon_state = "health-g"
/obj/item/device/healthanalyzer/proc/guide(var/mob/living/carbon/human/M, mob/living/user)
var/obj/item/weapon/card/id/ourid = user?.GetIdCard()
if(!ourid)
return
if(access_change_ids in ourid.access)
playsound(src, 'sound/machines/defib_failed.ogg', 50, 0)
return
if(access_medical in ourid.access)
playsound(src, 'sound/effects/pop.ogg', 50, FALSE)
else
playsound(src, 'sound/machines/defib_failed.ogg', 50, 0)
return
if(!ishuman(M))
return
var/dat = ""
var/bleeding_external = FALSE
var/bleeding_internal = FALSE
var/infection = FALSE
var/organ = FALSE
var/bone = FALSE
var/bloodloss = FALSE
var/robotparts = FALSE
for(var/obj/item/organ/external/org in M.organs)
if(!istype(org)) //how?
continue
if(org.robotic >= ORGAN_ROBOT)
robotparts = TRUE
continue
for(var/datum/wound/W in org.wounds)
if(W.internal)
bleeding_internal = TRUE
break
if(org.status & ORGAN_BLEEDING)
bleeding_external = TRUE
if(org.status & ORGAN_BROKEN && (!org.splinted))
bone = TRUE
if(org.has_infected_wound())
infection = TRUE
for(var/obj/item/organ/org in M.internal_organs)
if(!istype(org)) //how?
continue
if(org.robotic >= ORGAN_ROBOT)
robotparts = TRUE
continue
if(org.status & ORGAN_BLEEDING)
bleeding_internal = TRUE
if(org.damage >= 1 && !istype(org, /obj/item/organ/internal/brain))
organ = TRUE
var/blood_volume = M.vessel.get_reagent_amount("blood")
if(blood_volume <= M.species.blood_volume*M.species.blood_level_safe)
bloodloss = TRUE
if(bleeding_external)
dat += "Surface bleeding - Bandage immediately or apply brute-damage fixing chemicals (i.e. Bicaridine) if no bandages available.
"
if(bleeding_internal)
dat += "Internal bleeding - Commence internal vein repair surgery or apply clotting chemicals (i.e. Myelamine).
"
if(M.getOxyLoss())
dat += "Suffociation - Give Dexalin or Dexalin Plus. Check for heart or lung damage.
"
if(infection)
dat += "Infection - Give Spaceacillin. If severe, use Corophizine or overdose on Spaceacillin and monitor until well.
"
if(M.getBrainLoss() >= 1)
dat += "Brain damage - Commence brain repair surgery, apply Alkysine, or universal organ-repair chemicals. (i.e. Peridaxon).
"
if(M.radiation || M.accumulated_rads)
dat += "Radiation - Give Hyronalin or Arithrazine. Monitor for genetic damage.
"
if(organ)
dat += "Organ damage - Give Peridaxon. Perform full body scan for targeted organ repair surgery.
"
if(bloodloss)
dat += "Low blood volume - Commence blood transfusion via IV drip or provide blood-restorative chemicals (e.g.: Copper for zorren and skrell, iron for the rest)."
if(M.getToxLoss())
dat += "Toxins - Give Dylovene or Carthatoline. Vomitting is normal and helpful. Tends to be a symptom of larger issues, such as infection.
"
if(M.getBruteLoss())
dat += "Brute trauma - Bandage wounded body part. Give Bicaridine or Vermicetol.
"
if(M.getFireLoss())
dat += "Surface burn - Salve wounded body part in ointment. Give Kelotane or Dermaline. Check for infections.
"
if(M.getCloneLoss())
dat += "Genetic damage - Utilize cryogenic pod with appropriate chemicals (i.e. Cryoxadone) and below 70 K, or give Rezadone.
"
if(bone)
dat += "Bone fracture - Splint damaged area. Treat with bone repair surgery or Osteodaxon after treating brute damage.
"
if(M.virus2.len)
dat += "Viral infection - Proceed with virology pathogen curing procedures or apply antiviral chemicals (i.e. Corophizine).
"
if(robotparts)
dat += "Robotic body parts - Should not be repaired by medical personnel, refer to robotics if damaged."
var/peeb
if(dat)
peeb +="GUIDANCE SYSTEM BEGIN
"
peeb += dat
peeb += "For more detailed information about patient condition, use the stationary scanner in medbay."
user.show_message(peeb, 1)