Merge pull request #126 from MistakeNot4892/fork/pyrelight

Updating from Neb dev

Author: MistakeNot4892

code/__defines/genetics.dm

@@ -5,7 +5,6 @@
 #define GENE_COND_REMOTE_TALK      /decl/genetic_condition/superpower/remotetalk
 #define GENE_COND_RUNNING          /decl/genetic_condition/superpower/running
 #define GENE_COND_REMOTE_VIEW      /decl/genetic_condition/superpower/remoteview
-#define GENE_COND_SHAPESHIFTER     /decl/genetic_condition/superpower/morph
 #define GENE_COND_NO_FINGERPRINTS  /decl/genetic_condition/superpower/noprints
 
 #define GENE_COND_CLUMSY           /decl/genetic_condition/disability/clumsy

code/__defines/hydroponics.dm

@@ -4,6 +4,7 @@
 // Defining these to point to the relevant decl types just to avoid a massive changeset.
 // TODO: rename to PLANT_TRAIT or bare decls to avoid mixing up with GetTrait etc.
 #define TRAIT_CHEMS                /decl/plant_trait/chems
+#define TRAIT_POLLEN               /decl/plant_trait/pollen
 #define TRAIT_EXUDE_GASSES         /decl/plant_trait/exude_gasses
 #define TRAIT_ALTER_TEMP           /decl/plant_trait/alter_temp
 #define TRAIT_POTENCY              /decl/plant_trait/potency

code/__defines/math_physics.dm

@@ -34,5 +34,8 @@
 #define TICKS_IN_DAY 		24*60*60*10
 #define TICKS_IN_SECOND 	10
 
-#define SIMPLE_SIGN(X) ((X) < 0 ? -1 : 1)
-#define SIGN(X)        ((X) ? SIMPLE_SIGN(X) : 0)
+#if DM_VERSION < 516
+#define SIGN(X) ( (X) ? ( (X) < 0 ? -1 : 1 ) : 0 )
+#else
+#define SIGN(X) sign(X)
+#endif

code/__defines/tools.dm

@@ -62,6 +62,7 @@
 #define IS_KNIFE(A)       IS_TOOL(A, TOOL_KNIFE)
 #define IS_HAMMER(A)      IS_TOOL(A, TOOL_HAMMER)
 #define IS_HOE(A)         IS_TOOL(A, TOOL_HOE)
+#define IS_SHEARS(A)      IS_TOOL(A, TOOL_SHEARS)
 
 #define IS_HEMOSTAT(A)    IS_TOOL(A, TOOL_HEMOSTAT)
 #define IS_RETRACTOR(A)   IS_TOOL(A, TOOL_RETRACTOR)

code/_helpers/areas.dm

@@ -36,28 +36,30 @@
 */
 /proc/pick_area_turf_by_flag(var/area_flags, var/list/predicates)
 	var/list/turfs
-	for(var/sub_area_type in subtypesof(/area))
-		var/area/sub_area = sub_area_type
-		if(!(initial(sub_area.area_flags) & area_flags))
+	var/list/valid_areas = list()
+	for(var/area/candidate_area as anything in global.areas)
+		if(!(candidate_area.area_flags & area_flags))
 			continue
-		sub_area = locate(sub_area_type)
-		if(!sub_area)
+		valid_areas[candidate_area] = TRUE
+	if(!length(valid_areas)) // no turfs at all have that flag
+		return FALSE
+	// Each area contents loop is an in-world loop, so we just do one here.
+	for(var/turf/turf_candidate in world)
+		var/area/candidate_area = get_area(turf_candidate)
+		if(!valid_areas[candidate_area])
 			continue
-		for(var/turf/T in sub_area.contents)
-			if(!predicates || all_predicates_true(list(T), predicates))
-				LAZYADD(turfs, T)
+		if(!predicates || all_predicates_true(list(turf_candidate), predicates))
+			LAZYADD(turfs, turf_candidate)
 	if(LAZYLEN(turfs))
 		return pick(turfs)
 
 /proc/pick_area_turf(var/areatype, var/list/predicates)
 	var/list/turfs = get_area_turfs(areatype, predicates)
-	if(turfs && turfs.len)
-		return pick(turfs)
+	return SAFEPICK(turfs)
 
 /proc/pick_area(var/list/predicates)
 	var/list/areas = get_filtered_areas(predicates)
-	if(LAZYLEN(areas))
-		. = pick(areas)
+	return SAFEPICK(areas)
 
 /proc/pick_area_and_turf(var/list/area_predicates, var/list/turf_predicates)
 	var/list/areas = get_filtered_areas(area_predicates)

code/_helpers/game.dm

@@ -223,7 +223,7 @@
 		if(Y1==Y2)
 			return 1 //Light cannot be blocked on same tile
 		else
-			var/s = SIMPLE_SIGN(Y2-Y1)
+			var/s = SIGN(Y2-Y1)
 			Y1+=s
 			while(Y1!=Y2)
 				T=locate(X1,Y1,Z)
@@ -233,8 +233,8 @@
 	else
 		var/m=(32*(Y2-Y1)+(PY2-PY1))/(32*(X2-X1)+(PX2-PX1))
 		var/b=(Y1+PY1/32-0.015625)-m*(X1+PX1/32-0.015625) //In tiles
-		var/signX = SIMPLE_SIGN(X2-X1)
-		var/signY = SIMPLE_SIGN(Y2-Y1)
+		var/signX = SIGN(X2-X1)
+		var/signY = SIGN(Y2-Y1)
 		if(X1<X2)
 			b+=m
 		while(X1!=X2 || Y1!=Y2)

code/_helpers/icons.dm

@@ -271,8 +271,8 @@ world
 
 // make this icon fully opaque--transparent pixels become black
 /icon/proc/Opaque(background = "#000000")
-		SwapColor(null, background)
-		MapColors(1,0,0,0, 0,1,0,0, 0,0,1,0, 0,0,0,0, 0,0,0,1)
+	SwapColor(null, background)
+	MapColors(1,0,0,0, 0,1,0,0, 0,0,1,0, 0,0,0,0, 0,0,0,1)
 
 // Change a grayscale icon into a white icon where the original color becomes the alpha
 // I.e., black -> transparent, gray -> translucent white, white -> solid white

code/_helpers/medical_scans.dm

@@ -8,7 +8,7 @@
 		if(!brain || stat == DEAD || (status_flags & FAKEDEATH))
 			brain_result = 0
 		else if(stat != DEAD)
-			brain_result = round(max(0,(1 - brain.damage/brain.max_damage)*100))
+			brain_result = round(max(0,(1 - brain.get_organ_damage() / brain.max_damage)*100))
 	else
 		brain_result = -1
 	.["brain_activity"] = brain_result
@@ -60,29 +60,29 @@
 			.["reagents"] += list(reagent)
 
 	.["external_organs"] = list()
-	for(var/obj/item/organ/external/E in get_external_organs())
+	for(var/obj/item/organ/external/limb in get_external_organs())
 		var/list/O =               list()
-		O["name"] =                E.name
-		O["brute_ratio"] =         E.brute_ratio
-		O["burn_ratio"] =          E.burn_ratio
-		O["limb_flags"] =          E.limb_flags
-		O["brute_dam"] =           E.brute_dam
-		O["burn_dam"] =            E.burn_dam
-		O["scan_results"] =        E.get_scan_results(tag)
-		O["tumors"] =              E.has_growths()
-		O["ailments"] =            E.has_diagnosable_ailments(scanner = TRUE)
+		O["name"] =                limb.name
+		O["brute_ratio"] =         limb.brute_ratio
+		O["burn_ratio"] =          limb.burn_ratio
+		O["limb_flags"] =          limb.limb_flags
+		O["brute_dam"] =           limb.brute_dam
+		O["burn_dam"] =            limb.burn_dam
+		O["scan_results"] =        limb.get_scan_results(tag)
+		O["tumors"] =              limb.has_growths()
+		O["ailments"] =            limb.has_diagnosable_ailments(scanner = TRUE)
 		.["external_organs"] += list(O)
 
 	.["internal_organs"] = list()
 	var/list/internal_organs = get_internal_organs()
-	for(var/obj/item/organ/internal/I in internal_organs)
+	for(var/obj/item/organ/internal/organ in internal_organs)
 		var/list/O =               list()
-		O["name"] =                I.name
-		O["is_broken"] =           I.is_broken()
-		O["is_bruised"] =          I.is_bruised()
-		O["is_damaged"] =          I.damage > 0
-		O["scan_results"] =        I.get_scan_results(tag)
-		O["ailments"] =            I.has_diagnosable_ailments(scanner = TRUE)
+		O["name"] =                organ.name
+		O["is_broken"] =           organ.is_broken()
+		O["is_bruised"] =          organ.is_bruised()
+		O["is_damaged"] =          organ.get_organ_damage() > 0
+		O["scan_results"] =        organ.get_scan_results(tag)
+		O["ailments"] =            organ.has_diagnosable_ailments(scanner = TRUE)
 		.["internal_organs"] += list(O)
 
 	.["missing_organs"] = list()
@@ -270,34 +270,34 @@
 	dat += "<tr><th>Organ</th><th>Damage</th><th>Status</th></tr>"
 	subdat = list()
 
-	for(var/list/E in scan["external_organs"])
-		if(!E)
+	for(var/list/organ_data in scan["external_organs"])
+		if(!organ_data)
 			break
 		var/row = list()
-		row += "<tr><td>[E["name"]]</td>"
+		row += "<tr><td>[organ_data["name"]]</td>"
 		var/rowdata = list()
-		if(E["brute_dam"] + E["burn_dam"] == 0)
+		if(organ_data["brute_dam"] + organ_data["burn_dam"] == 0)
 			rowdata += "None"
 		else if(skill_level < SKILL_ADEPT)
-			if(E["brute_dam"])
+			if(organ_data["brute_dam"])
 				rowdata += "<span class='bad'>Damaged</span>"
-			if(E["burn_dam"])
+			if(organ_data["burn_dam"])
 				rowdata += "<span class='average'>Burned</span>"
 		else
-			if(E["brute_dam"])
-				rowdata += "<span class='bad'>[capitalize(get_wound_severity(E["brute_ratio"], (E["limb_flags"] & ORGAN_FLAG_HEALS_OVERKILL)))] physical trauma</span>"
-			if(E["burn_dam"])
-				rowdata += "<span class='average'>[capitalize(get_wound_severity(E["burn_ratio"], (E["limb_flags"] & ORGAN_FLAG_HEALS_OVERKILL)))] burns</span>"
+			if(organ_data["brute_dam"])
+				rowdata += "<span class='bad'>[capitalize(get_wound_severity(organ_data["brute_ratio"], (organ_data["limb_flags"] & ORGAN_FLAG_HEALS_OVERKILL)))] physical trauma</span>"
+			if(organ_data["burn_dam"])
+				rowdata += "<span class='average'>[capitalize(get_wound_severity(organ_data["burn_ratio"], (organ_data["limb_flags"] & ORGAN_FLAG_HEALS_OVERKILL)))] burns</span>"
 		row += "<td>[jointext(rowdata, "<br>")]</td>"
 
 		if(skill_level >= SKILL_ADEPT)
 			var/list/status = list()
-			if(E["scan_results"])
-				status += "<span class='bad'>[english_list(E["scan_results"], nothing_text = "&nbsp;")]</span>"
-			if(E["tumors"])
+			if(organ_data["scan_results"])
+				status += "<span class='bad'>[english_list(organ_data["scan_results"], nothing_text = "&nbsp;")]</span>"
+			if(organ_data["tumors"])
 				status += "<span class='bad'>Abnormal internal growth</span>"
-			if(E["ailments"])
-				status += "[jointext(E["ailments"], "<br>")]"
+			if(organ_data["ailments"])
+				status += "[jointext(organ_data["ailments"], "<br>")]"
 			row += "<td>[status ? jointext(status, "<br>") : "Nominal."]</td>"
 		else
 			row += "<td>&nbsp;</td>"
@@ -311,24 +311,24 @@
 	//Internal Organs
 	if(skill_level >= SKILL_BASIC)
 		dat += "<tr><th colspan='3'><center>Internal Organs</center></th></tr>"
-		for(var/list/I in scan["internal_organs"])
+		for(var/list/organ_data in scan["internal_organs"])
 			var/row = list()
-			row += "<tr><td>[I["name"]]</td>"
-			if(I["is_broken"])
+			row += "<tr><td>[organ_data["name"]]</td>"
+			if(organ_data["is_broken"])
 				row += "<td><span class='bad'>Severe</span></td>"
-			else if(I["is_bruised"])
+			else if(organ_data["is_bruised"])
 				row += "<td><span class='average'>Moderate</span></td>"
-			else if(I["is_damaged"])
+			else if(organ_data["is_damaged"])
 				row += "<td><span class='mild'>Minor</span></td>"
 			else
 				row += "<td>None</td>"
 
 			if(skill_level >= SKILL_ADEPT)
 				var/list/status = list()
-				if(I["scan_results"])
-					status += "<span class='bad'>[english_list(I["scan_results"], nothing_text = "&nbsp;")]</span>"
-				if(I["ailments"])
-					status += "[jointext(I["ailments"], "<br>")]"
+				if(organ_data["scan_results"])
+					status += "<span class='bad'>[english_list(organ_data["scan_results"], nothing_text = "&nbsp;")]</span>"
+				if(organ_data["ailments"])
+					status += "[jointext(organ_data["ailments"], "<br>")]"
 				row += "<td>[status ? jointext(status, "<br>") : "Nominal."]</td>"
 			else
 				row += "<td>&nbsp;</td>"

code/_helpers/text.dm

@@ -27,6 +27,10 @@
  * from text that will be sent to the browser.
  */
 #define strip_improper(input_text) replacetext(replacetext(input_text, "\proper", ""), "\improper", "")
+var/global/regex/starts_uppercase_regex = regex(@"^[A-Z]")
+var/global/regex/starts_lowercase_regex = regex(@"^[a-z]")
+#define is_proper(input_text) ((findtext(input_text, "\proper") == 1) || findtext(input_text, starts_uppercase_regex))
+#define is_improper(input_text) ((findtext(input_text, "\improper") == 1 || findtext(input_text, starts_lowercase_regex)))
 
 //Used for preprocessing entered text
 //Added in an additional check to alert players if input is too long

code/_helpers/unsorted.dm

@@ -169,11 +169,6 @@ Turf and target are seperate in case you want to teleport some distance from a t
 			return 1
 	return 0
 
-#if DM_VERSION < 516
-/proc/sign(x)
-	return x!=0?x/abs(x):0
-#endif
-
 /proc/getline(atom/M,atom/N)//Ultra-Fast Bresenham Line-Drawing Algorithm
 	var/px=M.x		//starting x
 	var/py=M.y
@@ -182,8 +177,8 @@ Turf and target are seperate in case you want to teleport some distance from a t
 	var/dy=N.y-py
 	var/dxabs=abs(dx)//Absolute value of x distance
 	var/dyabs=abs(dy)
-	var/sdx=sign(dx)	//Sign of x distance (+ or -)
-	var/sdy=sign(dy)
+	var/sdx=SIGN(dx)	//Sign of x distance (+ or -)
+	var/sdy=SIGN(dy)
 	var/x=BITSHIFT_RIGHT(dxabs,1)	//Counters for steps taken, setting to distance/2
 	var/y=BITSHIFT_RIGHT(dyabs,1)	//Bit-shifting makes me l33t.  It also makes getline() unnessecarrily fast.
 	var/j			//Generic integer for counting