Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- loadstring(game:HttpGet("https://keysystem.work.ink/scripts/019fa8a5-1983-7351-9c42-d940656a2f63"))()
- local player = game.Players.LocalPlayer
- local playerGui = player:WaitForChild("PlayerGui")
- local old = playerGui:FindFirstChild("MyDraggableUI")
- if old then old:Destroy() end
- local screenGui = Instance.new("ScreenGui")
- screenGui.Name = "MyDraggableUI"
- screenGui.ResetOnSpawn = false
- screenGui.Parent = playerGui
- local frame = Instance.new("Frame")
- frame.Name = "MainFrame"
- frame.Size = UDim2.new(0, 300, 0, 120)
- frame.Position = UDim2.new(0.5, -150, 0.5, -60)
- frame.BackgroundColor3 = Color3.fromRGB(35, 35, 40)
- frame.BorderSizePixel = 0
- frame.Parent = screenGui
- local corner = Instance.new("UICorner")
- corner.CornerRadius = UDim.new(0, 10)
- corner.Parent = frame
- local titleBar = Instance.new("Frame")
- titleBar.Name = "TitleBar"
- titleBar.Size = UDim2.new(1, 0, 0, 32)
- titleBar.BackgroundColor3 = Color3.fromRGB(50, 50, 58)
- titleBar.BorderSizePixel = 0
- titleBar.Parent = frame
- local titleCorner = Instance.new("UICorner")
- titleCorner.CornerRadius = UDim.new(0, 10)
- titleCorner.Parent = titleBar
- local titleLabel = Instance.new("TextLabel")
- titleLabel.Size = UDim2.new(1, -40, 1, 0)
- titleLabel.Position = UDim2.new(0, 10, 0, 0)
- titleLabel.BackgroundTransparency = 1
- titleLabel.Text = "Copy keysystem"
- titleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
- titleLabel.TextXAlignment = Enum.TextXAlignment.Left
- titleLabel.Font = Enum.Font.GothamBold
- titleLabel.TextSize = 16
- titleLabel.Parent = titleBar
- local closeBtn = Instance.new("TextButton")
- closeBtn.Size = UDim2.new(0, 28, 0, 28)
- closeBtn.Position = UDim2.new(1, -30, 0, 2)
- closeBtn.BackgroundColor3 = Color3.fromRGB(200, 60, 60)
- closeBtn.Text = "X"
- closeBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
- closeBtn.Font = Enum.Font.GothamBold
- closeBtn.TextSize = 16
- closeBtn.Parent = titleBar
- local closeCorner = Instance.new("UICorner")
- closeCorner.CornerRadius = UDim.new(0, 8)
- closeCorner.Parent = closeBtn
- closeBtn.MouseButton1Click:Connect(function()
- screenGui:Destroy()
- end)
- local textBox = Instance.new("TextBox")
- textBox.Size = UDim2.new(1, -20, 0, 40)
- textBox.Position = UDim2.new(0, 10, 0, 45)
- textBox.BackgroundColor3 = Color3.fromRGB(25, 25, 30)
- textBox.Text = "https://work.ink/2cky/grow-a-garden-2-dupe"
- textBox.TextColor3 = Color3.fromRGB(255, 255, 255)
- textBox.Font = Enum.Font.Gotham
- textBox.TextSize = 14
- textBox.ClearTextOnFocus = false
- textBox.Parent = frame
- local textCorner = Instance.new("UICorner")
- textCorner.CornerRadius = UDim.new(0, 6)
- textCorner.Parent = textBox
- local selectBtn = Instance.new("TextButton")
- selectBtn.Size = UDim2.new(1, -20, 0, 28)
- selectBtn.Position = UDim2.new(0, 10, 0, 90)
- selectBtn.BackgroundColor3 = Color3.fromRGB(60, 120, 200)
- selectBtn.Text = "Tap, then Ctrl+C / Long-press to Copy"
- selectBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
- selectBtn.Font = Enum.Font.Gotham
- selectBtn.TextSize = 12
- selectBtn.Parent = frame
- local selectCorner = Instance.new("UICorner")
- selectCorner.CornerRadius = UDim.new(0, 6)
- selectCorner.Parent = selectBtn
- selectBtn.MouseButton1Click:Connect(function()
- textBox:CaptureFocus()
- end)
- local dragging = false
- local dragStart, startPos
- titleBar.InputBegan:Connect(function(input)
- if input.UserInputType == Enum.UserInputType.MouseButton1
- or input.UserInputType == Enum.UserInputType.Touch then
- dragging = true
- dragStart = input.Position
- startPos = frame.Position
- input.Changed:Connect(function()
- if input.UserInputState == Enum.UserInputState.End then
- dragging = false
- end
- end)
- end
- end)
- titleBar.InputChanged:Connect(function(input)
- if dragging and (input.UserInputType == Enum.UserInputType.MouseMovement
- or input.UserInputType == Enum.UserInputType.Touch) then
- local delta = input.Position - dragStart
- frame.Position = UDim2.new(
- startPos.X.Scale, startPos.X.Offset + delta.X,
- startPos.Y.Scale, startPos.Y.Offset + delta.Y
- )
- end
- end)
Advertisement
Add Comment
Please, Sign In to add comment