initial commit - cross reference with 5th port - obviously has compile errors

code/modules/surgery/organs/helpers.dm

@@ -0,0 +1,33 @@
+mob/proc/getorgan(typepath)
+	return
+
+mob/proc/getorganszone(zone)
+	return
+
+mob/proc/getorganslot(slot)
+	return
+
+
+mob/living/carbon/getorgan(typepath)
+	return (locate(typepath) in internal_organs)
+
+mob/living/carbon/getorganszone(zone, var/subzones = 0)
+	var/list/returnorg = list()
+	if(subzones)
+		// Include subzones - groin for chest, eyes and mouth for head
+		if(zone == "head")
+			returnorg = getorganszone("eyes") + getorganszone("mouth")
+		if(zone == "chest")
+			returnorg = getorganszone("groin")
+
+	for(var/obj/item/organ/O in internal_organs)
+		if(zone == O.zone)
+			returnorg += O
+	return returnorg
+
+mob/living/carbon/getorganslot(slot)
+	return internal_organs_slot[slot]
+
+
+proc/isorgan(atom/A)
+	return istype(A, /obj/item/organ)