local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local SoundService = game:GetService("SoundService")
local LocalPlayer = Players.LocalPlayer

local targetName, targetPlayer = "", nil
local entered, exited, totalTargetTime = 0, 0, 0
local targetJoinTime, myJoinTime = nil, tick()

local notifySound = Instance.new("Sound", SoundService)
notifySound.SoundId = "rbxassetid://9118823104"
notifySound.Volume = 3

local function formatTime(sec)
	local h = math.floor(sec / 3600)
	local m = math.floor((sec % 3600) / 60)
	local s = math.floor(sec % 60)
	return string.format("%02d:%02d:%02d", h, m, s)
end

local gui = Instance.new("ScreenGui", game.CoreGui)
gui.Name = "EntryExitTracker"

local frame = Instance.new("Frame", gui)
frame.Size = UDim2.new(0, 400, 0, 380)
frame.Position = UDim2.new(0.75, 0, 0.05, 0)
frame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
frame.BorderSizePixel = 2
frame.BorderColor3 = Color3.fromRGB(200, 0, 0)
frame.Active = true
frame.Draggable = true

local corner = Instance.new("UICorner", frame)
corner.CornerRadius = UDim.new(0, 8)

local title = Instance.new("TextLabel", frame)
title.Size = UDim2.new(1, 0, 0, 35)
title.Position = UDim2.new(0, 0, 0, 5)
title.Text = "DARK - نقاط"
title.TextColor3 = Color3.fromRGB(200, 0, 0)
title.BackgroundTransparency = 1
title.TextScaled = true
title.Font = Enum.Font.GothamBold

local nameInput = Instance.new("TextBox", frame)
nameInput.Size = UDim2.new(1, -60, 0, 35)
nameInput.Position = UDim2.new(0, 5, 0, 45)
nameInput.PlaceholderText = "اكتب اسم الاعب"
nameInput.Text = ""
nameInput.TextColor3 = Color3.fromRGB(200, 0, 0)
nameInput.BackgroundColor3 = Color3.fromRGB(20, 20, 20)
nameInput.ClearTextOnFocus = false
nameInput.Font = Enum.Font.Gotham
nameInput.TextSize = 20
nameInput.TextScaled = true

local setButton = Instance.new("TextButton", frame)
setButton.Size = UDim2.new(0, 50, 0, 35)
setButton.Position = UDim2.new(1, -55, 0, 45)
setButton.Text = "بحث"
setButton.TextColor3 = Color3.fromRGB(200, 0, 0)
setButton.BackgroundColor3 = Color3.fromRGB(20, 20, 20)
setButton.Font = Enum.Font.GothamBold
setButton.TextScaled = true

local playerImage = Instance.new("ImageLabel")
playerImage.Size = UDim2.new(0, 70, 0, 70)
playerImage.Position = UDim2.new(0, 10, 0, 90)
playerImage.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
playerImage.BorderSizePixel = 2
playerImage.BorderColor3 = Color3.fromRGB(200, 0, 0)
playerImage.Parent = frame

local imageCorner = Instance.new("UICorner")
imageCorner.CornerRadius = UDim.new(1, 0)
imageCorner.Parent = playerImage

local nameLabel = Instance.new("TextLabel", frame)
nameLabel.Size = UDim2.new(0, 300, 0, 25)
nameLabel.Position = UDim2.new(0, 90, 0, 95)
nameLabel.Text = "الهدف: -"
nameLabel.TextColor3 = Color3.fromRGB(200, 0, 0)
nameLabel.BackgroundTransparency = 1
nameLabel.TextScaled = true
nameLabel.Font = Enum.Font.Gotham
nameLabel.TextXAlignment = Enum.TextXAlignment.Left

local enterLabel = Instance.new("TextLabel", frame)
enterLabel.Size = UDim2.new(0, 300, 0, 25)
enterLabel.Position = UDim2.new(0, 90, 0, 125)
enterLabel.Text = "دخول: 0"
enterLabel.TextColor3 = Color3.fromRGB(200, 0, 0)
enterLabel.BackgroundTransparency = 1
enterLabel.TextScaled = true
enterLabel.Font = Enum.Font.Gotham
enterLabel.TextXAlignment = Enum.TextXAlignment.Left

local exitLabel = Instance.new("TextLabel", frame)
exitLabel.Size = UDim2.new(0, 300, 0, 25)
exitLabel.Position = UDim2.new(0, 90, 0, 155)
exitLabel.Text = "خروج: 0"
exitLabel.TextColor3 = Color3.fromRGB(200, 0, 0)
exitLabel.BackgroundTransparency = 1
exitLabel.TextScaled = true
exitLabel.Font = Enum.Font.Gotham
exitLabel.TextXAlignment = Enum.TextXAlignment.Left

local timeLabel = Instance.new("TextLabel", frame)
timeLabel.Size = UDim2.new(0, 300, 0, 25)
timeLabel.Position = UDim2.new(0, 90, 0, 185)
timeLabel.Text = "مدة الهدف: 00:00:00"
timeLabel.TextColor3 = Color3.fromRGB(200, 0, 0)
timeLabel.BackgroundTransparency = 1
timeLabel.TextScaled = true
timeLabel.Font = Enum.Font.Gotham
timeLabel.TextXAlignment = Enum.TextXAlignment.Left

local myTimeLabel = Instance.new("TextLabel", frame)
myTimeLabel.Size = UDim2.new(0, 300, 0, 25)
myTimeLabel.Position = UDim2.new(0, 90, 0, 215)
myTimeLabel.Text = "وقتي بالسيرفر: 00:00:00"
myTimeLabel.TextColor3 = Color3.fromRGB(200, 0, 0)
myTimeLabel.BackgroundTransparency = 1
myTimeLabel.TextScaled = true
myTimeLabel.Font = Enum.Font.Gotham
myTimeLabel.TextXAlignment = Enum.TextXAlignment.Left

local credit = Instance.new("TextLabel", frame)
credit.Size = UDim2.new(1, -10, 0, 25)
credit.Position = UDim2.new(0, 5, 0, 255)
credit.Text = "DARK"
credit.TextColor3 = Color3.fromRGB(150, 0, 0)
credit.BackgroundTransparency = 1
credit.TextScaled = true
credit.Font = Enum.Font.GothamBold
credit.TextXAlignment = Enum.TextXAlignment.Left

local function updateLabels()
	nameLabel.Text = "الهدف: " .. (targetName ~= "" and targetName or "-")
	enterLabel.Text = "دخول: " .. entered
	exitLabel.Text = "خروج: " .. exited
	timeLabel.Text = "مدة الهدف: " .. formatTime(totalTargetTime + (targetJoinTime and (tick() - targetJoinTime) or 0))
	myTimeLabel.Text = "وقتي بالسيرفر: " .. formatTime(tick() - myJoinTime)
end

RunService.RenderStepped:Connect(updateLabels)

local function updatePlayerImage(player)
	if player then
		local success, thumbUrl = pcall(function()
			return Players:GetUserThumbnailAsync(player.UserId, Enum.ThumbnailType.HeadShot, Enum.ThumbnailSize.Size100x100)
		end)
		if success then
			playerImage.Image = thumbUrl
		end
	end
end

setButton.MouseButton1Click:Connect(function()
	targetName = nameInput.Text:lower()
	entered, exited, totalTargetTime, targetJoinTime, targetPlayer = 0, 0, 0, nil, nil
	for _, p in ipairs(Players:GetPlayers()) do
		if p.Name:lower():find(targetName) then
			targetPlayer = p
			targetJoinTime = tick()
			updatePlayerImage(p)
			notifySound:Play()
			break
		end
	end
end)

Players.PlayerAdded:Connect(function(p)
	if targetName ~= "" and p.Name:lower():find(targetName) then
		targetPlayer = p
		entered = entered + 1
		targetJoinTime = tick()
		updatePlayerImage(p)
		notifySound:Play()
	end
end)

Players.PlayerRemoving:Connect(function(p)
	if targetPlayer and p == targetPlayer then
		exited = exited + 1
		totalTargetTime = totalTargetTime + (tick() - (targetJoinTime or tick()))
		targetJoinTime, targetPlayer = nil, nil
		playerImage.Image = ""
		notifySound:Play()
	end
end)