[MIRROR] Add pAI internal GPS to possible software (#3184)

* Add pAI internal GPS to possible software (#56404)

pAIs are now a useful space travelling companion, they can help you
navigate if lost (although only the pAI has the GPS view, so they'll
need to communicate the information). If you're holding a GPS, then the
pAI can find you even if you get separated.

* Add pAI internal GPS to possible software

Co-authored-by: coiax <yellowbounder@gmail.com>

code/modules/mob/living/silicon/pai/pai.dm

@@ -66,6 +66,9 @@
 	var/obj/machinery/newscaster			//pAI Newscaster
 	var/obj/item/healthanalyzer/hostscan				//pAI healthanalyzer
 
+	/// Internal pAI GPS, enabled if pAI downloads GPS software, and then uses it.
+	var/obj/item/gps/pai/internal_gps = null
+
 	var/encryptmod = FALSE
 	var/holoform = FALSE
 	var/canholo = TRUE
@@ -103,6 +106,8 @@
 		signaler = null
 	if(A == hostscan)
 		hostscan = null
+	if(A == internal_gps)
+		internal_gps = null
 	return ..()
 
 /mob/living/silicon/pai/Destroy()
@@ -111,6 +116,7 @@
 	QDEL_NULL(newscaster)
 	QDEL_NULL(signaler)
 	QDEL_NULL(hostscan)
+	QDEL_NULL(internal_gps)
 	if(!QDELETED(card) && loc != card)
 		card.forceMove(drop_location())
 		card.pai = null //these are otherwise handled by paicard/handle_atom_del()

code/modules/mob/living/silicon/pai/software.dm

@@ -22,6 +22,7 @@
 															"security HUD" = 20,
 															"loudness booster" = 20,
 															"newscaster" = 20,
+															"internal gps" = 35,
 															"door jack" = 25,
 															"encryption keys" = 25,
 															"universal translator" = 35
@@ -283,6 +284,11 @@
 				if(subscreen == 1) // Open Instrument
 					internal_instrument.interact(src)
 
+			if("internalgps")
+				if(!internal_gps)
+					internal_gps = new(src)
+				internal_gps.attack_self(src)
+
 		paiInterface()
 
 // MENUS
@@ -315,6 +321,9 @@
 			dat += "<a href='byond://?src=[REF(src)];software=signaller;sub=0'>Remote Signaller</a> <br>"
 		if(s == "loudness booster")
 			dat += "<a href='byond://?src=[REF(src)];software=loudness;sub=0'>Loudness Booster</a> <br>"
+		if(s == "internal gps")
+			dat += "<a href='byond://?src=[REF(src)];software=internalgps;sub=0'>Internal GPS</a> <br>"
+
 	dat += "<br>"
 
 	// Advanced