
Key Required

-- Modern PursuitCore Checking GUI Script
-- Place this inside a LocalScript within StarterGui
local Players = game:GetService("Players")
local TweenService = game:GetService("TweenService")
local LocalPlayer = Players.LocalPlayer
-- Create the ScreenGui
local screenGui = Instance.new("ScreenGui")
screenGui.Name = "PursuitCoreCheckingGUI"
screenGui.ResetOnSpawn = false
screenGui.Parent = LocalPlayer:WaitForChild("PlayerGui")
-- Create main background frame
local mainFrame = Instance.new("Frame")
mainFrame.Name = "MainFrame"
mainFrame.Size = UDim2.new(0, 320, 0, 180)
mainFrame.Position = UDim2.new(0.5, -160, 0.4, -90) -- Centered on screen
mainFrame.BackgroundColor3 = Color3.fromRGB(25, 25, 30) -- Dark sleek slate
mainFrame.BorderSizePixel = 0
mainFrame.Parent = screenGui
-- Smooth corner styling
local frameCorner = Instance.new("UICorner")
frameCorner.CornerRadius = UDim.new(0, 12)
frameCorner.Parent = mainFrame
-- UI Stroke for a crisp cyber-border
local frameStroke = Instance.new("UIStroke")
frameStroke.Thickness = 2
frameStroke.Color = Color3.fromRGB(60, 60, 75)
frameStroke.Parent = mainFrame
-- Title Header
local titleLabel = Instance.new("TextLabel")
titleLabel.Name = "Title"
titleLabel.Size = UDim2.new(1, 0, 0, 40)
titleLabel.BackgroundTransparency = 1
titleLabel.Text = "PURSUITCORE CHECKING"
titleLabel.TextColor3 = Color3.fromRGB(240, 240, 255)
titleLabel.TextSize = 16
titleLabel.Font = Enum.Font.GothamBold
titleLabel.Parent = mainFrame
-- Container for Balances
local container = Instance.new("Frame")
container.Name = "BalanceContainer"
container.Size = UDim2.new(1, -30, 1, -55)
container.Position = UDim2.new(0, 15, 0, 45)
container.BackgroundTransparency = 1
container.Parent = mainFrame
-- UI List Layout for organizing rows
local listLayout = Instance.new("UIListLayout")
listLayout.Padding = UDim.new(0, 10)
listLayout.SortOrder = Enum.SortOrder.LayoutOrder
listLayout.Parent = container
-- Function to generate standardized balance metric boxes
local function createMetricBox(name, defaultAmount, themeColor, order)
local box = Instance.new("Frame")
box.Name = name .. "Box"
box.Size = UDim2.new(1, 0, 0, 50)
box.BackgroundColor3 = Color3.fromRGB(35, 35, 45)
box.BorderSizePixel = 0
box.LayoutOrder = order
box.Parent = container
local boxCorner = Instance.new("UICorner")
boxCorner.CornerRadius = UDim.new(0, 8)
boxCorner.Parent = box
-- Metric Label Icon/Text
local label = Instance.new("TextLabel")
label.Name = "Label"
label.Size = UDim2.new(0.4, 0, 1, 0)
label.Position = UDim2.new(0, 15, 0, 0)
label.BackgroundTransparency = 1
label.Text = name:upper() .. ":"
label.TextColor3 = themeColor
label.TextSize = 14
label.Font = Enum.Font.GothamBold
label.TextXAlignment = Enum.TextXAlignment.Left
label.Parent = box
-- Value display
local valDisplay = Instance.new("TextLabel")
valDisplay.Name = "Value"
valDisplay.Size = UDim2.new(0.6, -15, 1, 0)
valDisplay.Position = UDim2.new(0.4, 0, 0, 0)
valDisplay.BackgroundTransparency = 1
valDisplay.Text = tostring(defaultAmount)
valDisplay.TextColor3 = Color3.fromRGB(255, 255, 255)
valDisplay.TextSize = 16
valDisplay.Font = Enum.Font.GothamBlack
valDisplay.TextXAlignment = Enum.TextXAlignment.Right
valDisplay.Parent = box
return valDisplay
end
-- Render the Points and Coins fields
local pointsValueLabel = createMetricBox("Points", 0, Color3.fromRGB(0, 170, 255), 1) -- Blue text theme
local coinsValueLabel = createMetricBox("Coins", 0, Color3.fromRGB(255, 200, 0), 2) -- Gold text theme
-- Hook into Leaderstats data changes if they exist in your game engine
local function setupDataListening()
local leaderstats = LocalPlayer:WaitForChild("leaderstats", 5)
if not leaderstats then return end
local pointsData = leaderstats:FindFirstChild("Points")
local coinsData = leaderstats:FindFirstChild("Coins")
if pointsData then
pointsValueLabel.Text = tostring(pointsData.Value)
pointsData.Changed:Connect(function(newVal)
pointsValueLabel.Text = tostring(newVal)
end)
end
if coinsData then
coinsValueLabel.Text = tostring(coinsData.Value)
coinsData.Changed:Connect(function(newVal)
coinsValueLabel.Text = tostring(newVal)
end)
end
end
-- Run initialization data scan
task.spawn(setupDataListening)No comments yet for this script.



