-- [[ Rscripts Risk Notice ]]
-- This script is not verified by rscripts.net. Deal with caution.
--
-- Stay safe:
--   • Never log in on unofficial Roblox sites or lookalike domains.
--   • Real Roblox links use roblox.com (check the .com ending).
--   • Treat fake Roblox login / "claim reward" pages as phishing.
-- [[ End Rscripts Risk Notice ]]
local PathfindingService = game:GetService("PathfindingService")
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local TweenService = game:GetService("TweenService")

local LocalPlayer = Players.LocalPlayer

-- إعدادات المتتبع والدوران
local IS_ACTIVE = false
local PREDICTION_TIME = 0.5 
local REACH_DISTANCE = 4 
local SPIN_SPEED = 50 

-- إنشاء واجهة المستخدم الرئيسية (زر التشغيل والإطفاء)
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "TrackerGUI"
ScreenGui.ResetOnSpawn = false
ScreenGui.Parent = LocalPlayer:WaitForChild("PlayerGui")

-- 1. تصميم شاشة البداية (شاشة كاملة بتأثير تغير الألوان)
local IntroFrame = Instance.new("Frame")
IntroFrame.Size = UDim2.new(1, 0, 1, 0) -- تغطي الشاشة بالكامل
IntroFrame.Position = UDim2.new(0, 0, 0, 0)
IntroFrame.BackgroundColor3 = Color3.fromRGB(0, 100, 255) -- تبدأ باللون الأزرق
IntroFrame.BorderSizePixel = 0
IntroFrame.ZIndex = 10
IntroFrame.Parent = ScreenGui

-- النص الأول (💣💀Timebomb💣💀)
local TitleLabel = Instance.new("TextLabel")
TitleLabel.Size = UDim2.new(1, 0, 0, 100)
TitleLabel.Position = UDim2.new(0, 0, 0.4, -50)
TitleLabel.BackgroundTransparency = 1
TitleLabel.Text = "💣💀Timebomb💣💀"
TitleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
TitleLabel.TextSize = 48 -- تكبير خط العنوان
TitleLabel.Font = Enum.Font.SourceSansBold
TitleLabel.ZIndex = 11
TitleLabel.Parent = IntroFrame

-- النص الثاني (By s1mn)
local SubtitleLabel = Instance.new("TextLabel")
SubtitleLabel.Size = UDim2.new(1, 0, 0, 60)
SubtitleLabel.Position = UDim2.new(0, 0, 0.5, 10)
SubtitleLabel.BackgroundTransparency = 1
SubtitleLabel.Text = "By s1mn"
SubtitleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
SubtitleLabel.TextSize = 28 -- تكبير خط التوقيع
SubtitleLabel.Font = Enum.Font.SourceSansItalic
SubtitleLabel.ZIndex = 11
SubtitleLabel.Parent = IntroFrame

-- تأثير تغير اللون المستمر (أزرق <-> أحمر)
local colorTweenInfo = TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.InOut, -1, true)
local colorTween = TweenService:Create(IntroFrame, colorTweenInfo, {
	BackgroundColor3 = Color3.fromRGB(255, 30, 30) -- التحول للون الأحمر
})
colorTween:Play()

-- إخفاء شاشة البداية بعد 3 ثوانٍ بتأثير اختفاء ناعم
task.delay(3, function()
	colorTween:Cancel() -- إيقاف حلقة اللون عند بدء الاختفاء
	
	local fadeInfo = TweenInfo.new(1, Enum.EasingStyle.Quad, Enum.EasingDirection.Out)
	local tween1 = TweenService:Create(IntroFrame, fadeInfo, {BackgroundTransparency = 1})
	local tween2 = TweenService:Create(TitleLabel, fadeInfo, {TextTransparency = 1})
	local tween3 = TweenService:Create(SubtitleLabel, fadeInfo, {TextTransparency = 1})
	
	tween1:Play()
	tween2:Play()
	tween3:Play()
	
	tween1.Completed:Connect(function()
		IntroFrame:Destroy()
	end)
end)

-- 2. زر التشغيل والإطفاء الأساسي
local ToggleButton = Instance.new("TextButton")
ToggleButton.Size = UDim2.new(0, 160, 0, 50)
ToggleButton.Position = UDim2.new(0.85, -80, 0.85, -25)
ToggleButton.BackgroundColor3 = Color3.fromRGB(200, 50, 50)
ToggleButton.Text = "التتبع: معطل"
ToggleButton.TextColor3 = Color3.fromRGB(255, 255, 255)
ToggleButton.TextSize = 18
ToggleButton.Font = Enum.Font.SourceSansBold
ToggleButton.Parent = ScreenGui

-- دالة تشغيل السكربت وربطه بالشخصية الجديدة عند الرسبون
local function setupCharacter(Character)
	local Humanoid = Character:WaitForChild("Humanoid")
	local RootPart = Character:WaitForChild("HumanoidRootPart")

	-- البحث عن أقرب لاعب
	local function getNearestPlayer()
		local closestPlayer = nil
		local shortestDistance = math.huge

		for _, player in ipairs(Players:GetPlayers()) do
			if player ~= LocalPlayer and player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
				local targetRoot = player.Character.HumanoidRootPart
				local distance = (targetRoot.Position - RootPart.Position).Magnitude
				if distance < shortestDistance then
					shortestDistance = distance
					closestPlayer = player
				end
			end
		end
		return closestPlayer
	end

	-- توقع موقع اللاعب المستقبلي
	local function getPredictedPosition(targetRootPart)
		local velocity = targetRootPart.AssemblyLinearVelocity
		return targetRootPart.Position + (velocity * PREDICTION_TIME)
	end

	-- التنقل الذكي وتفادي الجدران
	local function moveToTarget(targetPosition)
		local path = PathfindingService:CreatePath({
			AgentRadius = 2,
			AgentHeight = 5,
			AgentCanJump = true,
			AgentJumpHeight = 10,
			AgentMaxSlope = 45
		})

		local success, _ = pcall(function()
			path:ComputeAsync(RootPart.Position, targetPosition)
		end)

		if success and path.Status == Enum.PathStatus.Success then
			local waypoints = path:GetWaypoints()
			if #waypoints > 1 then
				Humanoid:MoveTo(waypoints[2].Position)
				if waypoints[2].Action == Enum.PathWaypointAction.Jump then
					Humanoid.Jump = true
				end
			end
		else
			Humanoid:MoveTo(targetPosition)
		end
	end

	-- ربط التتبع بـ Heartbeat للشخصية الحالية
	local connection
	connection = RunService.Heartbeat:Connect(function()
		if not Character or not Character.Parent or Humanoid.Health <= 0 then
			connection:Disconnect()
			return
		end

		if not IS_ACTIVE then return end

		-- تطبيق الدوران عند التفعيل
		RootPart.CFrame = RootPart.CFrame * CFrame.Angles(0, math.rad(SPIN_SPEED), 0)

		-- تتبع أقرب لاعب
		local targetPlayer = getNearestPlayer()
		if targetPlayer and targetPlayer.Character and targetPlayer.Character:FindFirstChild("HumanoidRootPart") then
			local targetRoot = targetPlayer.Character.HumanoidRootPart
			local predictedPos = getPredictedPosition(targetRoot)

			if (targetRoot.Position - RootPart.Position).Magnitude > REACH_DISTANCE then
				moveToTarget(predictedPos)
			else
				Humanoid:MoveTo(RootPart.Position)
			end
		end
	end)
end

-- تفعيل السكربت للشخصية الحالية فوراً
if LocalPlayer.Character then
	setupCharacter(LocalPlayer.Character)
end

-- إعادة تهيئة السكربت تلقائياً كلما عمل اللاعب رسبون (Respawn)
LocalPlayer.CharacterAdded:Connect(function(newCharacter)
	IS_ACTIVE = false 
	ToggleButton.Text = "التتبع: معطل"
	ToggleButton.BackgroundColor3 = Color3.fromRGB(200, 50, 50)
	
	setupCharacter(newCharacter)
end)

-- مفتاح التشغيل والإطفاء (GUI)
ToggleButton.MouseButton1Click:Connect(function()
	if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") and LocalPlayer.Character.Humanoid.Health > 0 then
		IS_ACTIVE = not IS_ACTIVE
		if IS_ACTIVE then
			ToggleButton.Text = "التتبع: شغال"
			ToggleButton.BackgroundColor3 = Color3.fromRGB(50, 200, 50)
		else
			ToggleButton.Text = "التتبع: معطل"
			ToggleButton.BackgroundColor3 = Color3.fromRGB(200, 50, 50)
			LocalPlayer.Character.Humanoid:MoveTo(LocalPlayer.Character.HumanoidRootPart.Position)
		end
	end
end)