if not game:IsLoaded() then game.Loaded:Wait() end
local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer
local UserInputService = game:GetService("UserInputService")

local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Parent = game.CoreGui

local Frame = Instance.new("Frame")
Frame.Size = UDim2.new(0, 350, 0, 350)
Frame.Position = UDim2.new(0.5, -175, 0.5, -175)
Frame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Frame.BorderSizePixel = 5
Frame.BorderColor3 = Color3.fromRGB(0, 122, 255)
Frame.Parent = ScreenGui
Frame.Active = true 

local dragging, dragInput, startPos, startMousePos
Frame.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 then
        dragging = true
        startPos = Frame.Position
        startMousePos = input.Position
        input.Changed:Connect(function()
            if input.UserInputState == Enum.UserInputState.End then
                dragging = false
            end
        end)
    end
end)

Frame.InputChanged:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseMovement then
        dragInput = input
    end
end)

UserInputService.InputChanged:Connect(function(input)
    if input == dragInput and dragging then
        local delta = input.Position - startMousePos
        Frame.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
    end
end)

local Title = Instance.new("TextLabel")
Title.Size = UDim2.new(1, 0, 0, 50)
Title.Text = "EveryMalware | Security"
Title.TextColor3 = Color3.fromRGB(255, 255, 255)
Title.BackgroundColor3 = Color3.fromRGB(0, 122, 255)
Title.Font = Enum.Font.SourceSansBold
Title.TextSize = 20
Title.Parent = Frame

local CloseButton = Instance.new("TextButton")
CloseButton.Size = UDim2.new(0, 40, 0, 40)
CloseButton.Position = UDim2.new(1, -45, 0, 5)
CloseButton.Text = "X"
CloseButton.TextColor3 = Color3.fromRGB(255, 255, 255)
CloseButton.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
CloseButton.Font = Enum.Font.SourceSansBold
CloseButton.TextSize = 20
CloseButton.Parent = Frame
CloseButton.MouseButton1Click:Connect(function()
    ScreenGui:Destroy()
end)

local ScanButton = Instance.new("TextButton")
ScanButton.Size = UDim2.new(0.8, 0, 0, 40)
ScanButton.Position = UDim2.new(0.1, 0, 0.2, 0)
ScanButton.Text = "Scan Server"
ScanButton.BackgroundColor3 = Color3.fromRGB(0, 122, 255)
ScanButton.TextColor3 = Color3.fromRGB(255, 255, 255)
ScanButton.Font = Enum.Font.SourceSansBold
ScanButton.TextSize = 18
ScanButton.Parent = Frame

local ResultFrame = Instance.new("Frame")
ResultFrame.Size = UDim2.new(0.9, 0, 0.5, 0)
ResultFrame.Position = UDim2.new(0.05, 0, 0.4, 0)
ResultFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
ResultFrame.BorderSizePixel = 5
ResultFrame.BorderColor3 = Color3.fromRGB(0, 122, 255)
ResultFrame.Parent = Frame

local ResultBox = Instance.new("TextLabel")
ResultBox.Size = UDim2.new(1, -10, 1, -10)
ResultBox.Position = UDim2.new(0, 5, 0, 5)
ResultBox.Text = "Results will appear here..."
ResultBox.TextWrapped = true
ResultBox.TextColor3 = Color3.fromRGB(0, 0, 0)
ResultBox.BackgroundTransparency = 1
ResultBox.Font = Enum.Font.SourceSans
ResultBox.TextSize = 16
ResultBox.Parent = ResultFrame

local joinTimes = {}
local lastPositions = {}

Players.PlayerAdded:Connect(function(player)
    joinTimes[player.UserId] = tick()
end)

for _, player in ipairs(Players:GetPlayers()) do
    joinTimes[player.UserId] = tick()
end

local function ScanServer()
    ResultBox.Text = "🔍 Scanning server..."
    task.wait(1)

    local found = false
    local results = {}

    for _, player in ipairs(Players:GetPlayers()) do
        if player ~= LocalPlayer then
            local status = "🟢 Clean"
            local char = player.Character or player.CharacterAdded:Wait()
            local age = player.AccountAge
            local timeInServer = tick() - (joinTimes[player.UserId] or tick())

            local isYoung = age < 30
            local hasAbnormalHumanoid = false
            local isBot = false
            local isExploiter = false

            if char and char:FindFirstChild("Humanoid") and char:FindFirstChild("HumanoidRootPart") then
                local humanoid = char:FindFirstChild("Humanoid")
                local humanoidRootPart = char:FindFirstChild("HumanoidRootPart")

                if humanoid.WalkSpeed > 16 or humanoid.JumpPower > 50 then
                    hasAbnormalHumanoid = true
                end

                if isYoung and hasAbnormalHumanoid then
                    status = "⛔️ Exploiter"
                    isExploiter = true
                    found = true
                end

                if isYoung and timeInServer > 1800 then
                    status = "⛔️ Bot account"
                    isBot = true
                    found = true
                end
            end

            local result = "[" .. player.Name .. "] " .. status
            table.insert(results, result)

            ResultBox.Text = ResultBox.Text .. "\n" .. result
            task.wait(0.2)
        end
    end

    if not found then
        ResultBox.Text = "🟢 No exploiter detected"
    end

    task.wait(0.5)
    ResultBox.Text = "✅ Scan Complete!\n" .. ResultBox.Text
end

ScanButton.MouseButton1Click:Connect(ScanServer)