Merge pull request #19317 from GunHog/Xeno_Queen_Finder_For_Mista_Jay

Adds Queen Finder for Xenos

code/_onclick/hud/_defines.dm

@@ -94,6 +94,7 @@
 #define ui_borg_health "EAST-1:28,CENTER-1:15"		//borgs have the health display where humans have the pressure damage indicator.
 #define ui_alien_health "EAST-1:28,CENTER-1:15"	//aliens have the health display where humans have the pressure damage indicator.
 #define ui_alienplasmadisplay "EAST-1:28,CENTER-2:15"
+#define ui_alien_queen_finder "EAST-1:28,CENTER-3:13"
 
 // AI
 

code/_onclick/hud/alien.dm

@@ -21,13 +21,20 @@
 	if(T)
 		T.fire(A)
 
-
 /obj/screen/alien/plasma_display
 	icon = 'icons/mob/screen_gen.dmi'
 	icon_state = "power_display2"
 	name = "plasma stored"
 	screen_loc = ui_alienplasmadisplay
 
+
+/obj/screen/alien/alien_queen_finder
+	icon = 'icons/mob/screen_alien.dmi'
+	icon_state = "queen_finder"
+	name = "queen sense"
+	desc = "Allows you to sense the general direction of your Queen."
+	screen_loc = ui_alienplasmadisplay
+
 /datum/hud/alien/New(mob/living/carbon/alien/humanoid/owner)
 	..()
 
@@ -109,6 +116,9 @@
 
 	alien_plasma_display = new /obj/screen/alien/plasma_display()
 	infodisplay += alien_plasma_display
+	if(!istype(mymob, /mob/living/carbon/alien/humanoid/royal/queen))
+		alien_queen_finder = new /obj/screen/alien/alien_queen_finder
+		infodisplay += alien_queen_finder
 
 	zone_select = new /obj/screen/zone_sel/alien()
 	zone_select.update_icon(mymob)

code/_onclick/hud/alien_larva.dm

@@ -13,7 +13,8 @@
 	nightvisionicon = new /obj/screen/alien/nightvision()
 	nightvisionicon.screen_loc = ui_alien_nightvision
 	infodisplay += nightvisionicon
-
+	alien_queen_finder = new /obj/screen/alien/alien_queen_finder()
+	infodisplay += alien_queen_finder
 	pull_icon = new /obj/screen/pull()
 	pull_icon.icon = 'icons/mob/screen_alien.dmi'
 	pull_icon.update_icon(mymob)

code/_onclick/hud/hud.dm

@@ -19,6 +19,7 @@
 	var/obj/screen/blobpwrdisplay
 
 	var/obj/screen/alien_plasma_display
+	var/obj/screen/alien_queen_finder
 
 	var/obj/screen/devil/soul_counter/devilsouldisplay
 
@@ -96,6 +97,7 @@
 	lingstingdisplay = null
 	blobpwrdisplay = null
 	alien_plasma_display = null
+	alien_queen_finder = null
 	deity_power_display = null
 	deity_follower_display = null
 	nightvisionicon = null

code/modules/mob/living/carbon/alien/humanoid/caste/drone.dm

@@ -36,7 +36,7 @@
 	if(!isturf(user.loc))
 		user << "<span class='notice'>You can't evolve here!</span>"
 		return 0
-	if(!alien_type_present(/mob/living/carbon/alien/humanoid/royal))
+	if(!get_alien_type(/mob/living/carbon/alien/humanoid/royal))
 		var/mob/living/carbon/alien/humanoid/royal/praetorian/new_xeno = new (user.loc)
 		user.alien_evolve(new_xeno)
 		return 1

code/modules/mob/living/carbon/alien/humanoid/caste/praetorian.dm

@@ -38,7 +38,7 @@
 	if(node.recent_queen_death)
 		user << "<span class='danger'>You are still too burdened with guilt to evolve into a queen.</span>"
 		return 0
-	if(!alien_type_present(/mob/living/carbon/alien/humanoid/royal/queen))
+	if(!get_alien_type(/mob/living/carbon/alien/humanoid/royal/queen))
 		var/mob/living/carbon/alien/humanoid/royal/queen/new_xeno = new (user.loc)
 		user.alien_evolve(new_xeno)
 		if(new_xeno.client.prefs.unlock_content)

code/modules/mob/living/carbon/alien/humanoid/humanoid.dm

@@ -162,15 +162,15 @@
 		A.loc = new_xeno
 	..()
 
-//For alien evolution/promotion procs. Checks for
-proc/alien_type_present(var/alienpath)
+//For alien evolution/promotion/queen finder procs. Checks for an active alien of that type
+proc/get_alien_type(var/alienpath)
 	for(var/mob/living/carbon/alien/humanoid/A in living_mob_list)
 		if(!istype(A, alienpath))
 			continue
 		if(!A.key || A.stat == DEAD) //Only living aliens with a ckey are valid.
 			continue
-		return 1
-	return 0
+		return A
+	return FALSE
 
 
 /mob/living/carbon/alien/humanoid/check_breath(datum/gas_mixture/breath)

code/modules/mob/living/carbon/alien/humanoid/queen.dm

@@ -78,7 +78,7 @@
 
 /obj/effect/proc_holder/alien/royal/queen/promote/fire(mob/living/carbon/alien/user)
 	var/obj/item/queenpromote/prom
-	if(alien_type_present(/mob/living/carbon/alien/humanoid/royal/praetorian/))
+	if(get_alien_type(/mob/living/carbon/alien/humanoid/royal/praetorian/))
 		user << "<span class='noticealien'>You already have a Praetorian!</span>"
 		return 0
 	else
@@ -106,7 +106,7 @@
 	if(!isalienadult(M) || istype(M, /mob/living/carbon/alien/humanoid/royal))
 		user << "<span class='noticealien'>You may only use this with your adult, non-royal children!</span>"
 		return
-	if(alien_type_present(/mob/living/carbon/alien/humanoid/royal/praetorian/))
+	if(get_alien_type(/mob/living/carbon/alien/humanoid/royal/praetorian/))
 		user << "<span class='noticealien'>You already have a Praetorian!</span>"
 		return
 

code/modules/mob/living/carbon/alien/life.dm

@@ -1,3 +1,6 @@
+/mob/living/carbon/alien/Life()
+	findQueen()
+	return..()
 
 /mob/living/carbon/alien/check_breath(datum/gas_mixture/breath)
 	if(status_flags & GODMODE)

code/modules/mob/living/carbon/alien/screen.dm

@@ -4,4 +4,31 @@
 		hud_used.alien_plasma_display.maptext = "<div align='center' valign='middle' style='position:relative; top:0px; left:6px'><font color='magenta'>[round(getPlasma())]</font></div>"
 
 /mob/living/carbon/alien/larva/updatePlasmaDisplay()
-	return
+	return
+
+/mob/living/carbon/alien/proc/findQueen()
+	if(hud_used)
+		hud_used.alien_queen_finder.cut_overlays()
+		var/mob/queen = get_alien_type(/mob/living/carbon/alien/humanoid/royal/queen)
+		if(!queen)
+			return
+		var/turf/Q = get_turf(queen)
+		var/turf/A = get_turf(src)
+		if(Q.z != A.z) //The queen is on a different Z level, we cannot sense that far.
+			return
+		var/Qdir = get_dir(src, Q)
+		var/Qdist = get_dist(src, Q)
+		image(icon,loc,icon_state,layer,dir)
+		var/finder_icon = "finder_center" //Overlay showed when adjacent to or on top of the queen!
+		switch(Qdist)
+			if(2 to 7)
+				finder_icon = "finder_near"
+			if(8 to 20)
+				finder_icon = "finder_med"
+			if(21 to INFINITY)
+				finder_icon = "finder_far"
+		var/image/finder_eye = image('icons/mob/screen_alien.dmi', icon_state = finder_icon, dir = Qdir)
+		hud_used.alien_queen_finder.add_overlay(finder_eye)
+
+/mob/living/carbon/alien/humanoid/royal/queen/findQueen()
+	return //Queen already knows where she is. Hopefully.