fix: Add safe-guards for scr_orbiting_player_fleet function (#994)

Author: OH296

scripts/scr_fleet_functions/scr_fleet_functions.gml

@@ -431,6 +431,28 @@ function scr_efleet_arrive_at_trade_loc(){
 }
 
 
+/// @function scr_orbiting_fleet(faction, system)
+/// @description Returns the ID of a fleet orbiting the given system/star that matches the specified faction.
+/// @param {any|array} faction 
+/// The faction identifier to check against. Can be a single faction ID or an array of multiple factions.
+/// @param {any} [system="none"] 
+/// The system instance or star to check. If `"none"`, the function uses the calling instance's position.
+/// @returns {real|string} The ID of the matching fleet instance, or `"none"` if no valid fleet is found.
+///
+/// @example
+/// ```gml
+/// // Find a fleet orbiting this star that belongs to faction 3
+/// var fleet_id = scr_orbiting_fleet(3);
+/// if (fleet_id != "none") {
+///     show_debug_message("Faction fleet found: " + string(fleet_id));
+/// }
+///
+/// // Find fleets from multiple factions
+/// var factions = [1, 2, 5];
+/// var fleet_id = scr_orbiting_fleet(factions, some_system);
+/// ```
+///
+
 function scr_orbiting_fleet(faction, system="none"){
 	var _found_fleet = "none";
 	var _faction_list = is_array(faction);
@@ -455,19 +477,50 @@ function scr_orbiting_fleet(faction, system="none"){
 	return _found_fleet;	
 }
 
+
+/// @function object_distance(obj_1, obj_2)
+/// @description Returns the distance in pixels between two instances or objects based on their `x` and `y` coordinates.
+/// @param {instance} obj_1 The first object or instance.
+/// @param {instance} obj_2 The second object or instance.
+/// @returns {real} The distance in pixels between `obj_1` and `obj_2`.
+///
+/// @example
+/// ```gml
+/// var dist = object_distance(player, enemy);
+/// if (dist < 100) {
+///     show_debug_message("Enemy is within range!");
+/// }
+/// ```
+///
+
 function object_distance(obj_1, obj_2){
 	return (point_distance(obj_1.x, obj_1.y,obj_2.x, obj_2.y ))
 }
 
+
+/// @function scr_orbiting_player_fleet(system)
+/// @description Returns the ID of the nearest player fleet orbiting the given system or star.
+/// @param {any} [system="none"] 
+/// The system instance or identifier to check. If `"none"`, the function checks the calling star instance.
+/// @returns {real} The instance ID of the orbiting player fleet, or -1 if none is found.
+///
+/// @example
+/// ```gml
+/// var fleet_id = scr_orbiting_player_fleet();
+/// if (fleet_id != -1) {
+///     show_debug_message("Fleet orbiting star: " + string(fleet_id));
+/// }
+/// ```
+///
 function scr_orbiting_player_fleet(system = "none"){
-	if (object_index == obj_star){
+	if (system == "none" && !(is_struct(self)) && object_index == obj_star){
 		var _fleet = instance_nearest(x, y, obj_p_fleet);
-		if (object_distance(self, _fleet) > 0){
+		if (object_distance(self, _fleet) > 0){s
 			return -1
 		} else{
 			return _fleet.id;
 		}
-	} else{
+	} else if system != "none"{
 		try{
 			with (system){
 				return scr_orbiting_player_fleet();
@@ -477,6 +530,8 @@ function scr_orbiting_player_fleet(system = "none"){
 		}
 	}
 
+	return -1;
+
 }
 
 function get_orbiting_fleets(faction,system="none"){

scripts/scr_weapon/scr_weapon.gml

@@ -2887,7 +2887,7 @@ global.gear = {
 				"master_crafted": 35,
 				"artifact": 40
 			},
-			"tags": ["jump"],
+			"tags": ["jump", "ancient"],
 		},
 		"Heavy Weapons Pack": {
 			"abbreviation": "HvyWpPck",