local p = game.Players.LocalPlayer
local k = "SavedScriptRainbow"

local function createGUI()
	local old = p.PlayerGui:FindFirstChild("hphucVIPGui")
	if old then old:Destroy() end

	local g = Instance.new("ScreenGui")
	g.Name = "hphucVIPGui"
	g.ResetOnSpawn = false
	g.Parent = p:WaitForChild("PlayerGui")

	local function r(s)
		local t = tick() * s
		return Color3.new(math.sin(t) * 0.5 + 0.5, math.sin(t + 2) * 0.5 + 0.5, math.sin(t + 4) * 0.5 + 0.5)
	end

	local m = Instance.new("Frame", g)
	m.Size = UDim2.new(0, 280, 0, 280)
	m.Position = UDim2.new(0.5, -140, 0.5, -140)
	m.BorderSizePixel = 0
	m.Visible = false
	m.Active = true
	m.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
	m.BackgroundTransparency = 0.2
	m.Draggable = true

	local t = Instance.new("TextLabel", m)
	t.Size = UDim2.new(1, 0, 0, 30)
	t.Text = "hphúc Vip"
	t.Font = Enum.Font.SourceSansBold
	t.TextSize = 18
	t.TextColor3 = Color3.new(1, 1, 1)
	t.BackgroundTransparency = 1

	local x = Instance.new("TextButton", m)
	x.Size = UDim2.new(0, 25, 0, 25)
	x.Position = UDim2.new(1, -30, 0, 2)
	x.Text = "X"
	x.Font = Enum.Font.SourceSans
	x.TextSize = 16
	x.TextColor3 = Color3.fromRGB(255, 80, 80)
	x.BackgroundColor3 = Color3.fromRGB(50, 50, 50)

	local o = Instance.new("TextButton", g)
	o.Size = UDim2.new(0, 100, 0, 30)
	o.Position = UDim2.new(0, 10, 0, 10)
	o.Text = "Open hphúc"
	o.Font = Enum.Font.SourceSans
	o.TextSize = 16
	o.TextColor3 = Color3.new(1, 1, 1)
	o.BackgroundColor3 = Color3.fromRGB(50, 50, 50)

	local e = Instance.new("TextBox", m)
	e.Size = UDim2.new(1, -20, 0, 130)
	e.Position = UDim2.new(0, 10, 0, 40)
	e.Text = "-- Paste script here"
	e.ClearTextOnFocus = false
	e.MultiLine = true
	e.TextXAlignment = Enum.TextXAlignment.Left
	e.TextYAlignment = Enum.TextYAlignment.Top
	e.Font = Enum.Font.Code
	e.TextSize = 14
	e.TextColor3 = Color3.new(1, 1, 1)
	e.BackgroundColor3 = Color3.fromRGB(40, 40, 40)

	local b = Instance.new("TextButton", m)
	b.Size = UDim2.new(0.5, -15, 0, 30)
	b.Position = UDim2.new(0, 10, 1, -50)
	b.Text = "Execute"
	b.Font = Enum.Font.SourceSansBold
	b.TextSize = 14
	b.TextColor3 = Color3.new(1, 1, 1)
	b.BackgroundColor3 = Color3.fromRGB(50, 150, 50)

	local c = Instance.new("TextButton", m)
	c.Size = UDim2.new(0.5, -15, 0, 30)
	c.Position = UDim2.new(0.5, 5, 1, -50)
	c.Text = "Clear"
	c.Font = Enum.Font.SourceSansBold
	c.TextSize = 14
	c.TextColor3 = Color3.new(1, 1, 1)
	c.BackgroundColor3 = Color3.fromRGB(150, 50, 50)

	local s = Instance.new("TextButton", m)
	s.Size = UDim2.new(1, -20, 0, 25)
	s.Position = UDim2.new(0, 10, 1, -85)
	s.Text = "Save Script"
	s.Font = Enum.Font.SourceSansBold
	s.TextSize = 13
	s.TextColor3 = Color3.new(1, 1, 1)
	s.BackgroundColor3 = Color3.fromRGB(50, 100, 200)

	local w = game:GetService("TweenService")

	local function z(sh)
		if sh then
			m.Visible = true
		end

		local tween = w:Create(m, TweenInfo.new(0.4, Enum.EasingStyle.Quart, Enum.EasingDirection.Out), {
			Size = sh and UDim2.new(0, 280, 0, 280) or UDim2.new(0, 0, 0, 0),
			Position = sh and UDim2.new(0.5, -140, 0.5, -140) or UDim2.new(0.5, 0, 0.5, 0),
			Rotation = sh and 0 or 180,
			BackgroundTransparency = sh and 0.2 or 1
		})
		tween:Play()

		if not sh then
			tween.Completed:Wait()
			m.Visible = false
		end
	end

	x.MouseButton1Click:Connect(function()
		z(false)
		o.Visible = true
	end)

	o.MouseButton1Click:Connect(function()
		z(true)
		o.Visible = false
	end)

	b.MouseButton1Click:Connect(function()
		local d = e.Text
		local f, err = pcall(f