Slime_Rng.lua

--================ CORE =================--

local Services = {
    Players = game:GetService("Players"),
    RunService = game:GetService("RunService"),
    Stats = game:GetService("Stats"),
    UIS = game:GetService("UserInputService"),
    TweenService = game:GetService("TweenService"),
    VirtualUser = game:GetService("VirtualUser"),
    TeleportService = game:GetService("TeleportService")
}

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

if not game:IsLoaded() then game.Loaded:Wait() end

--================ LINK SCRIPT MAIN =================--

local MAIN_SCRIPT_URL = "https://rawscripts.net/raw/Slime-RNG-Auto-Roll-Auto-Farm-Mobs-Auto-area-206413"

--================ KEY SYSTEM 24H =================--

local KEY_FILE = "saved_key.txt"
local TIME_FILE = "key_time.txt"

local function getTime()
    return os.time()
end

local savedKey
local savedTime

if isfile and isfile(KEY_FILE) then
    savedKey = readfile(KEY_FILE)
end

if isfile and isfile(TIME_FILE) then
    savedTime = tonumber(readfile(TIME_FILE))
end

local expired = true

if savedKey and savedTime then
    if getTime() - savedTime < 24 * 60 * 60 then
        expired = false
    end
end

--================ LOADING =================--

local loadingGui = Instance.new("ScreenGui", playerGui)
loadingGui.IgnoreGuiInset = true
loadingGui.ResetOnSpawn = false

local loadingFrame = Instance.new("Frame", loadingGui)
loadingFrame.Size = UDim2.new(1,0,1,0)
loadingFrame.BackgroundColor3 = Color3.fromRGB(10,10,15)

local loadTitle = Instance.new("TextLabel", loadingFrame)
loadTitle.Size = UDim2.new(1,0,0.4,0)
loadTitle.Position = UDim2.new(0,0,0.3,0)
loadTitle.BackgroundTransparency = 1
loadTitle.Text = "SCRIPT LOADING..."
loadTitle.Font = Enum.Font.GothamBlack
loadTitle.TextScaled = true
loadTitle.TextColor3 = Color3.fromRGB(0,255,170)

local author = Instance.new("TextLabel", loadingFrame)
author.Size = UDim2.new(1,0,0.2,0)
author.Position = UDim2.new(0,0,0.7,0)
author.BackgroundTransparency = 1
author.Text = "By: Crow"
author.Font = Enum.Font.GothamBold
author.TextScaled = true
author.TextColor3 = Color3.fromRGB(180,180,180)

for i = 1,3 do
    loadTitle.Text = "SCRIPT LOADING" .. string.rep(".", i)
    task.wait(0.4)
end

task.wait(1)

for i = 1,10 do
    loadingFrame.BackgroundTransparency += 0.1
    loadTitle.TextTransparency += 0.1
    author.TextTransparency += 0.1
    task.wait(0.05)
end

loadingGui:Destroy()

--================ FPS + PING UI =================--

local statsGui = Instance.new("ScreenGui", game.CoreGui)
statsGui.ResetOnSpawn = false

local statFrame = Instance.new("Frame", statsGui)
statFrame.Size = UDim2.new(0, 220, 0, 90)
statFrame.Position = UDim2.new(0, 20, 0.4, 0)
statFrame.BackgroundColor3 = Color3.fromRGB(20,20,25)
statFrame.Active = true

local stroke = Instance.new("UIStroke", statFrame)
stroke.Thickness = 2

task.spawn(function()
    while task.wait() do
        stroke.Color = Color3.fromHSV((tick()%5)/5,1,1)
    end
end)

local statLabel = Instance.new("TextLabel", statFrame)
statLabel.Size = UDim2.new(1,0,1,0)
statLabel.BackgroundTransparency = 1
statLabel.TextScaled = true
statLabel.Font = Enum.Font.GothamBold
statLabel.TextColor3 = Color3.fromRGB(255,255,255)

--================ DRAG PC + MOBILE =================--

local dragging, dragInput, dragStart, startPos

statFrame.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1
    or input.UserInputType == Enum.UserInputType.Touch then

        dragging = true
        dragStart = input.Position
        startPos = statFrame.Position

        input.Changed:Connect(function()
            if input.UserInputState == Enum.UserInputState.End then
                dragging = false
            end
        end)
    end
end)

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

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

--================ FPS + PING =================--

local fpsTable, pingTable = {}, {}
local last = tick()

Services.RunService.RenderStepped:Connect(function(dt)
    local fps = math.floor(1/dt)

    local ping = 0
    pcall(function()
        ping = math.floor(Services.Stats.Network.ServerStatsItem["Data Ping"]:GetValue())
    end)

    table.insert(fpsTable, fps)
    table.insert(pingTable, ping)

    if #fpsTable > 20 then table.remove(fpsTable,1) end
    if #pingTable > 20 then table.remove(pingTable,1) end

    if tick() - last > 0.5 then
        last = tick()

        local f,p = 0,0

        for _,v in ipairs(fpsTable) do f += v end
        for _,v in ipairs(pingTable) do p += v end

        statLabel.Text =
        "⚡ FPS: "..math.floor(f/#fpsTable)..
        "\n📡 Ping: "..math.floor(p/#pingTable)..
        "\n👤 By: Crow"
    end
end)

--================ KEY GUI =================--

if expired then
    local gui = Instance.new("ScreenGui", game.CoreGui)

    local frame = Instance.new("Frame", gui)
    frame.Size = UDim2.new(0,250,0,150)
    frame.Position = UDim2.new(0.5,-125,0.5,-75)
    frame.BackgroundColor3 = Color3.fromRGB(30,30,35)

    local box = Instance.new("TextBox", frame)
    box.Size = UDim2.new(0.9,0,0.3,0)
    box.Position = UDim2.new(0.05,0,0.1,0)
    box.PlaceholderText = "Nhập key..."
    box.TextScaled = true

    local btn = Instance.new("TextButton", frame)
    btn.Size = UDim2.new(0.9,0,0.3,0)
    btn.Position = UDim2.new(0.05,0,0.6,0)
    btn.Text = "SAVE KEY"
    btn.TextScaled = true
    btn.BackgroundColor3 = Color3.fromRGB(0,170,120)

    btn.MouseButton1Click:Connect(function()
        if box.Text ~= "" then
            savedKey = box.Text

            if writefile then
                writefile(KEY_FILE, savedKey)
                writefile(TIME_FILE, tostring(getTime()))
            end

            frame:Destroy()
        end
    end)

    repeat task.wait() until savedKey
end

--================ AUTO KEY INTO SCRIPT MAIN =================--

task.spawn(function()
    task.wait(3)

    if savedKey then
        for _,v in pairs(game.CoreGui:GetDescendants()) do
            if v:IsA("TextBox") then
                v.Text = savedKey
            end
        end
    end
end)

--================ LOAD SCRIPT MAIN =================--

task.spawn(function()
    task.wait(1)
    loadstring(game:HttpGet(MAIN_SCRIPT_URL))()
end)

--================ ANTI AFK =================--

player.Idled:Connect(function()
    Services.VirtualUser:CaptureController()
    Services.VirtualUser:ClickButton2(Vector2.new())
end)

--================ AUTO REJOIN =================--

if queue_on_teleport then
    queue_on_teleport('task.wait(2); loadstring(game:HttpGet("'..MAIN_SCRIPT_URL..'"))()')
end

local rejoining = false

game:GetService("CoreGui").RobloxPromptGui.promptOverlay.ChildAdded:Connect(function(child)
    if child.Name == "ErrorPrompt" and not rejoining then
        rejoining = true
        task.wait(2)
        Services.TeleportService:Teleport(game.PlaceId, player)
    end
end)