metastruct-experiments/heat_seeking_minori.lua

-- Code by Henke and Minori
-- to remove the hook please run
-- hook.Remove("StartCommand", "heatseekingminori")

local target = empy
local shouldNoClip = false

print("[luadev/Autopilot] Now following " .. tostring(target))


hook.Add("StartCommand", "heatseekingminori", function(ply, cmd)
	if ply ~= LocalPlayer() then return end
	if not target:Alive() then return end

	if target:GetPos():Distance(ply:GetPos()) < 128 then
		shouldNoClip = false
		return
	end

	if not shouldNoClip then
		if not shouldNoClip then return else RunConsoleCommand("noclip") end
	else
		RunConsoleCommand("noclip")
	end


	-- we wanna run if our target is greater than 256 units
	-- that way we can still catch up
	if target:GetPos():Distance(ply:GetPos()) > 256 then
		cmd:AddKey(IN_SPEED)
		cmd:SetForwardMove(ply:GetRunSpeed())
	else
	    cmd:SetForwardMove(ply:GetWalkSpeed())
	end

	-- if farther than 512 units away, noclip
	if target:GetPos():Distance(ply:GetPos()) > 512 then
		shouldNoClip = true
		cmd:AddKey(IN_SPEED)
		cmd:SetForwardMove(ply:GetRunSpeed())
	end

	-- This is too far now, we need to TP at this rate.
	if target:GetPos():Distance(ply:GetPos()) > 4096 then
		RunConsoleCommand("aowl", "tp", target:Name())
	end

	local ang = cmd:GetViewAngles()
	local targetAngle = (target:GetShootPos() - ply:GetShootPos()):GetNormalized():Angle()
	targetAngle = LerpAngle(0.1, ang, targetAngle)

	cmd:SetViewAngles(targetAngle)
end)