AI fixes: Perceptiveness now affects lua AI, AHumans look around when sentrying, drop ships drop bombs at a proper height

Author: fourZK

Base.rte/AI/CrabBehaviors.lua

@@ -2,9 +2,10 @@
 CrabBehaviors = {}
 
 function CrabBehaviors.LookForTargets(AI, Owner)
-	local viewAngDeg = RangeRand(35, 85)
+	local viewAngDeg = RangeRand(35, 85) * Owner.Perceptiveness
 	if AI.deviceState == AHuman.AIMING then
-		viewAngDeg = 20
+		AI.Ctrl:SetState(Controller.AIM_SHARP, true)
+		viewAngDeg = 20 * Owner.Perceptiveness
 	end
 
 	local HitPoint

Base.rte/AI/HumanBehaviors.lua

@@ -36,10 +36,10 @@ end
 
 -- spot targets by casting a ray in a random direction
 function HumanBehaviors.LookForTargets(AI, Owner, Skill)
-	local viewAngDeg = RangeRand(50, 120) * (0.5 + Skill / 200)
+	local viewAngDeg = RangeRand(50, 120) * Owner.Perceptiveness * (0.5 + Skill / 200)
 	if AI.deviceState == AHuman.AIMING then
 		AI.Ctrl:SetState(Controller.AIM_SHARP, true)	-- reinforce sharp aim controller state to enable SharpLength in LookForMOs
-		viewAngDeg = 15 + (Skill / 10)
+		viewAngDeg = 15 * Owner.Perceptiveness + (Skill / 10)
 	end
 
 	local FoundMO = Owner:LookForMOs(viewAngDeg, rte.grassID, false)
@@ -500,6 +500,13 @@ function HumanBehaviors.Sentry(AI, Owner, Abort)
 				elseif AI.SentryFacing and Owner.HFlipped ~= AI.SentryFacing then
 					Owner.HFlipped = AI.SentryFacing	-- turn to the direction we have been order to guard
 					break	-- restart this behavior
+				elseif math.random() < Owner.Perceptiveness then
+				
+					-- turn around occasionally if there is open space behind our back
+					local backAreaRay = Vector(-math.random(FrameMan.PlayerScreenWidth/4, FrameMan.PlayerScreenWidth/2) * Owner.FlipFactor, 0):DegRotate(math.random(-25, 25) * Owner.Perceptiveness)
+					if not SceneMan:CastStrengthRay(Owner.EyePos, backAreaRay, 10, Vector(), 10, rte.grassID, SceneMan.SceneWrapsX) then
+						Owner.HFlipped = Owner.FlipFactor == 1 and true or false
+					end
 				end
 			end
 		end

Base.rte/AI/NativeDropShipAI.lua

@@ -16,11 +16,16 @@ function NativeDropShipAI:Create(Owner)
 
 	Members.LastAIMode = Actor.AIMODE_NONE
 
+	local item = Owner:Inventory();
+	if item and IsTDExplosive(item) then
+		Members.AIMode = Actor.AIMODE_BOMB;
+	end
+	
 	-- The drop ship tries to hover this many pixels above the ground
 	if Members.AIMode == Actor.AIMODE_BRAINHUNT then
 		Members.hoverAlt = Owner.Radius * 1.7
 	elseif Members.AIMode == Actor.AIMODE_BOMB then
-		Members.hoverAlt = Owner.Radius * 7
+		Members.hoverAlt = Owner.Radius * 6
 	else
 		Members.hoverAlt = Owner.Radius * 2	
 	end