12/21 modernizations from TG live (#103)

* sync (#3)

* shuttle auto call

* Merge /vore into /master (#39)

* progress

* Compile errors fixed

No idea if it's test worthy tho as conflicts with race overhaul and
narky removal.

* Update admins.txt

* efforts continue

Fuck grab code, seriously

* grab code is cancer

* Execute the Narkism

Do not hesitate.

Show no mercy.

* holy shit grab code is awful

* have I bitched about grab code

My bitching, let me show you it

* código de agarre es una mierda

No really it is

* yeah I don't even know anymore.

* Lolnope. Fuck grab code

* I'm not even sure what to fix anymore

* Self eating is not an acceptable fate

* Taste the void, son.

* My code doesn't pass it's own sanity check.

Maybe it's a sign of things to come.

* uncommented and notes

* It Works and I Don't Know Why (#38)

* shuttle auto call

* it works and I don't know why

* Subsystem 12/21

Most Recent TG subsystem folder

* globalvars 12/21

Tossed out the flavor_misc and parallax files

* Onclick 12/21

as well as .dme updates

* _defines 12/21

ommited old _MC.dm

* _HELPERS 12/21

Preserved snowflake placement of furry sprites

* _defeines/genetics

reapplied narkism holdover for snowflake races.

* Oops forgot mutant colors

* modules porting 12/21 + Sounds/icons

Admin, Client and most of mob life files ommitted

* enviroment file

* Admin optimizations

ahelp log system kept

* Mob ports 12/21

Flavor text preserved

* datums ported 12/21

* Game ported 12/21

* batch of duplicate fixes/dogborg work

Dogborgs need to be modernized to refractored borg standards.

* moar fixes

* Maps and futher compile fixes

code/datums/diseases/_MobProcs.dm

@@ -19,9 +19,6 @@
 	if(!(type in D.viable_mobtypes))
 		return 0
 
-	if(count_by_type(viruses, /datum/disease/advance) >= 3)
-		return 0
-
 	return 1
 
 
@@ -32,23 +29,30 @@
 
 
 /mob/proc/AddDisease(datum/disease/D)
-	var/datum/disease/DD = new D.type(1, D, 0)
-	viruses += DD
-	DD.affected_mob = src
-	DD.holder = src
+	for(var/datum/disease/advance/P in viruses)
+		if(istype(D, /datum/disease/advance))
+			var/datum/disease/advance/DD = D
+			if (P.totalResistance() < DD.totalTransmittable()) //Overwrite virus if the attacker's Transmission is lower than the defender's Resistance. This does not grant immunity to the lost virus.
+				P.remove_virus()
 
-	//Copy properties over. This is so edited diseases persist.
-	var/list/skipped = list("affected_mob","holder","carrier","stage","type","parent_type","vars","transformed")
-	for(var/V in DD.vars)
-		if(V in skipped)
-			continue
-		if(istype(DD.vars[V],/list))
-			var/list/L = D.vars[V]
-			DD.vars[V] = L.Copy()
-		else
-			DD.vars[V] = D.vars[V]
+	if (!viruses.len) //Only add the new virus if it defeated the existing one
+		var/datum/disease/DD = new D.type(1, D, 0)
+		viruses += DD
+		DD.affected_mob = src
+		DD.holder = src
 
-	DD.affected_mob.med_hud_set_status()
+		//Copy properties over. This is so edited diseases persist.
+		var/list/skipped = list("affected_mob","holder","carrier","stage","type","parent_type","vars","transformed")
+		for(var/V in DD.vars)
+			if(V in skipped)
+				continue
+			if(istype(DD.vars[V],/list))
+				var/list/L = D.vars[V]
+				DD.vars[V] = L.Copy()
+			else
+				DD.vars[V] = D.vars[V]
+
+		DD.affected_mob.med_hud_set_status()
 
 
 /mob/living/carbon/ContractDisease(datum/disease/D)
@@ -82,7 +86,7 @@
 
 	var/target_zone = pick(head_ch;1,body_ch;2,hands_ch;3,feet_ch;4)
 
-	if(istype(src, /mob/living/carbon/human))
+	if(ishuman(src))
 		var/mob/living/carbon/human/H = src
 
 		switch(target_zone)
@@ -93,6 +97,9 @@
 				if(passed && isobj(H.wear_mask))
 					Cl = H.wear_mask
 					passed = prob((Cl.permeability_coefficient*100) - 1)
+				if(passed && isobj(H.wear_neck))
+					Cl = H.wear_neck
+					passed = prob((Cl.permeability_coefficient*100) - 1)
 			if(2)
 				if(isobj(H.wear_suit))
 					Cl = H.wear_suit
@@ -117,7 +124,7 @@
 					Cl = H.shoes
 					passed = prob((Cl.permeability_coefficient*100) - 1)
 
-	else if(istype(src, /mob/living/carbon/monkey))
+	else if(ismonkey(src))
 		var/mob/living/carbon/monkey/M = src
 		switch(target_zone)
 			if(1)
@@ -140,6 +147,6 @@
 
 
 /mob/living/carbon/human/CanContractDisease(datum/disease/D)
-	if(dna && (VIRUSIMMUNE in dna.species.specflags))
+	if(dna && (VIRUSIMMUNE in dna.species.species_traits))
 		return 0
 	return ..()