fix bots spamming get_path_to (#1126)

Author: Kapu1178

code/modules/mob/living/simple_animal/bot/cleanbot.dm

@@ -242,6 +242,7 @@
 				start_patrol()
 			if(BOT_PATROL)
 				bot_patrol()
+
 	else if(target)
 		if(QDELETED(target) || !isturf(target.loc))
 			target = null
@@ -255,12 +256,13 @@
 				mode = BOT_IDLE
 				return
 
-		if(target && path.len == 0 && (get_dist(src,target) > 1))
-			path = jps_path_to(src, target, max_distance=30, mintargetdist=1, access = access_card?.GetAccess())
+		if(target && path.len == 0 && (get_dist(src,target) > 1) && mode != BOT_MOVING)
 			mode = BOT_MOVING
+			path = jps_path_to(src, target, max_distance=30, mintargetdist=1, access = access_card?.GetAccess())
 			if(length(path) == 0)
 				add_to_ignore(target)
 				target = null
+				mode = BOT_IDLE
 
 		if(path.len > 0 && target)
 			if(!bot_move(path[path.len]))

code/modules/mob/living/simple_animal/bot/firebot.dm

@@ -226,10 +226,9 @@
 		soft_reset()
 		return
 
-	if(target_fire && (get_dist(src, target_fire) > 2))
-
-		path = jps_path_to(src, target_fire, max_distance=30, mintargetdist=1, access = access_card?.GetAccess())
+	if(target_fire && (get_dist(src, target_fire) > 2) && mode != BOT_MOVING)
 		mode = BOT_MOVING
+		path = jps_path_to(src, target_fire, max_distance=30, mintargetdist=1, access = access_card?.GetAccess())
 		if(!path.len)
 			soft_reset()
 

code/modules/mob/living/simple_animal/bot/medbot.dm

@@ -375,9 +375,9 @@
 		soft_reset()
 		return
 
-	if(patient && path.len == 0 && (get_dist(src,patient) > 1))
-		path = jps_path_to(src, patient, max_distance=30, access = access_card?.GetAccess())
+	if(patient && path.len == 0 && (get_dist(src,patient) > 1) && mode != BOT_MOVING)
 		mode = BOT_MOVING
+		path = jps_path_to(src, patient, max_distance=30, access = access_card?.GetAccess())
 		if(!path.len) //try to get closer if you can't reach the patient directly
 			path = jps_path_to(src, patient, max_distance=30, mintargetdist=1, access = access_card?.GetAccess())
 			if(!path.len) //Do not chase a patient we cannot reach.