local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")

local player = Players.LocalPlayer
local playerGui = player:WaitForChild("PlayerGui")

local practiceScore = ReplicatedStorage:WaitForChild("practiceScore")

local screenGui = Instance.new("ScreenGui")
screenGui.Name = "PracticeScoreSenderGui"
screenGui.ResetOnSpawn = false
screenGui.Parent = playerGui

local frame = Instance.new("Frame")
frame.Size = UDim2.new(0, 320, 0, 220)
frame.Position = UDim2.new(0.5, -160, 0.5, -110)
frame.BackgroundColor3 = Color3.fromRGB(28,28,28)
frame.BorderSizePixel = 0
frame.Active = true
frame.Draggable = true
frame.Parent = screenGui

local title = Instance.new("TextLabel")
title.Size = UDim2.new(1, 0, 0, 34)
title.Position = UDim2.new(0,0,0,0)
title.BackgroundColor3 = Color3.fromRGB(0,150,255)
title.Text = "Made by Exzblaze12"
title.TextColor3 = Color3.new(1,1,1)
title.Font = Enum.Font.GothamSemibold
title.TextSize = 16
title.Parent = frame

local exitBtn = Instance.new("TextButton")
exitBtn.Size = UDim2.new(0,44,0,28)
exitBtn.Position = UDim2.new(1, -50, 0, 3)
exitBtn.Text = "X"
exitBtn.Font = Enum.Font.GothamBold
exitBtn.TextSize = 14
exitBtn.BackgroundColor3 = Color3.fromRGB(220,60,60)
exitBtn.TextColor3 = Color3.new(1,1,1)
exitBtn.Parent = frame

local freqLabel = Instance.new("TextLabel")
freqLabel.Position = UDim2.new(0,12,0,44)
freqLabel.Size = UDim2.new(0,200,0,20)
freqLabel.BackgroundTransparency = 1
freqLabel.TextColor3 = Color3.new(1,1,1)
freqLabel.Font = Enum.Font.Gotham
freqLabel.TextSize = 14
freqLabel.Text = "Frequency: 10/s"
freqLabel.Parent = frame

local sliderBg = Instance.new("Frame")
sliderBg.Position = UDim2.new(0,12,0,70)
sliderBg.Size = UDim2.new(0,296,0,10)
sliderBg.BackgroundColor3 = Color3.fromRGB(80,80,80)
sliderBg.Parent = frame

local sliderKnob = Instance.new("Frame")
sliderKnob.Size = UDim2.new(0,14,1,0)
sliderKnob.Position = UDim2.new(0, 0, 0, 0)
sliderKnob.BackgroundColor3 = Color3.fromRGB(0,230,180)
sliderKnob.Parent = sliderBg

local callsLabel = Instance.new("TextLabel")
callsLabel.Position = UDim2.new(0,12,0,92)
callsLabel.Size = UDim2.new(0,200,0,20)
callsLabel.BackgroundTransparency = 1
callsLabel.TextColor3 = Color3.new(1,1,1)
callsLabel.Font = Enum.Font.Gotham
callsLabel.TextSize = 14
callsLabel.Text = "Calls Sent: 0"
callsLabel.Parent = frame

local startBtn = Instance.new("TextButton")
startBtn.Position = UDim2.new(0.5, -60, 0, 122)
startBtn.Size = UDim2.new(0,120,0,40)
startBtn.Text = "Start"
startBtn.Font = Enum.Font.GothamBold
startBtn.TextSize = 16
startBtn.BackgroundColor3 = Color3.fromRGB(0,200,110)
startBtn.TextColor3 = Color3.new(1,1,1)
startBtn.Parent = frame

local payloadBox = Instance.new("TextBox")
payloadBox.Position = UDim2.new(0,12,0,170)
payloadBox.Size = UDim2.new(0,200,0,28)
payloadBox.PlaceholderText = "Amount (number) e.g. 100"
payloadBox.Text = "100"
payloadBox.Font = Enum.Font.Gotham
payloadBox.TextSize = 14
payloadBox.Parent = frame

local optimizeLabel = Instance.new("TextLabel")
optimizeLabel.Position = UDim2.new(0,220,0,170)
optimizeLabel.Size = UDim2.new(0,90,0,28)
optimizeLabel.BackgroundTransparency = 1
optimizeLabel.TextColor3 = Color3.new(1,1,1)
optimizeLabel.Font = Enum.Font.Gotham
optimizeLabel.TextSize = 14
optimizeLabel.Text = "Mode: Send"
optimizeLabel.Parent = frame

local dragging = false
local sliderDragging = false
local frequency = 10
local MAX_FREQ = 40
local callsSent = 0
local running = false
local sendMode = true

local function updateFreqLabel()
    freqLabel.Text = ("Frequency: %d/s"):format(frequency)
end

sliderBg.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseButton1 then
        sliderDragging = true
    end
end)
sliderBg.InputEnded:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseButton1 then
        sliderDragging = false
    end
end)
UserInputService.InputChanged:Connect(function(input)
    if sliderDragging and (input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseMovement) then
        local relX = math.clamp(input.Position.X - sliderBg.AbsolutePosition.X, 0, sliderBg.AbsoluteSize.X)
        sliderKnob.Position = UDim2.new(0, relX - 7, 0, 0)
        local newFreq = math.clamp(math.floor((relX / sliderBg.AbsoluteSize.X) * MAX_FREQ), 1, MAX_FREQ)
        if newFreq < 1 then newFreq = 1 end
        frequency = newFreq
        updateFreqLabel()
    end
end)

startBtn.MouseButton1Click:Connect(function()
    running = not running
    if running then
        startBtn.Text = "Stop"
        task.spawn(function()
            while running do
                local waitTime = 1 / math.max(1, frequency)
                if sendMode then
                    local amount = tonumber(payloadBox.Text) or 0
                    amount = math.clamp(amount, 0, 10000)
                    local success, err = pcall(function()
                        practiceScore:FireServer(amount)
                    end)
                    if not success then
                        warn("Failed to FireServer:", err)
                    end
                end
                callsSent = callsSent + 1
                callsLabel.Text = "Calls Sent: " .. callsSent
                task.wait(waitTime)
            end
        end)
    else
        startBtn.Text = "Start"
    end
end)

exitBtn.MouseButton1Click:Connect(function()
    screenGui:Destroy()
end)

optimizeLabel.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseButton1 then
        sendMode = not sendMode
        optimizeLabel.Text = sendMode and "Mode: Send" or "Mode: Sim"
    end
end)

updateFreqLabel()