local Players = game:GetService("Players")
local player = Players.LocalPlayer

local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Parent = player:WaitForChild("PlayerGui")

local Frame = Instance.new("Frame")
Frame.Parent = ScreenGui
Frame.Size = UDim2.new(0, 394, 0, 152)
Frame.Position = UDim2.new(0, 14, 0, 40)
Frame.BackgroundColor3 = Color3.fromRGB(234,234,234)
Frame.BorderSizePixel = 6
Frame.BorderColor3 = Color3.fromRGB(255,0,0)
Frame.Name = "Page1"

local UIS = game:GetService("UserInputService")
local dragging, dragInput, mousePos, framePos

Frame.InputBegan:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1 then
		dragging = true
		mousePos = input.Position
		framePos = Frame.Position

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

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

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

local Title = Instance.new("TextBox")
Title.Parent = Frame
Title.Size = UDim2.new(0,304,0,36)
Title.Position = UDim2.new(0,0,0,0)
Title.Text = "Trollgaming7 | Find the chomiks"
Title.TextEditable = false

local function tp(pos)
	local char = player.Character or player.CharacterAdded:Wait()
	local hrp = char:WaitForChild("HumanoidRootPart")
	hrp.CFrame = pos
end

local function createBtn(parent, text, pos, callback)
	local btn = Instance.new("TextButton")
	btn.Parent = parent
	btn.Size = UDim2.new(0,62,0,28)
	btn.Position = pos
	btn.Text = text
	btn.BackgroundColor3 = Color3.fromRGB(255,255,255)
	btn.MouseButton1Click:Connect(callback)
	return btn
end

createBtn(Frame, "Ultra Secret", UDim2.new(0,20,0,110), function()
	tp(CFrame.new(-3142.82,254.34,1216.39))
end)

createBtn(Frame, "Trollgemik", UDim2.new(0,200,0,40), function()
	tp(CFrame.new(5583.66,737.56,-7323.40))
end)

createBtn(Frame, "Troll Secret", UDim2.new(0,200,0,80), function()
	tp(CFrame.new(113.5,263.02,-259.49))
end)

createBtn(Frame, "Majin", UDim2.new(0,70,0,40), function()
	tp(CFrame.new(0,50,0))
end)

createBtn(Frame, "Omega", UDim2.new(0,10,0,80), function()
	tp(CFrame.new(19877,20479,20144))
end)

createBtn(Frame, "Uber Secret", UDim2.new(0,100,0,80), function()
	tp(CFrame.new(75000,99999,99999))
end)

createBtn(Frame, "Memory", UDim2.new(0,140,0,40), function()
	tp(CFrame.new(10000,10250,10000))
end)

createBtn(Frame, "M Secret", UDim2.new(0,300,0,40), function()
	tp(CFrame.new(-29477,6.5,11281))
end)

createBtn(Frame, "Nothcom", UDim2.new(0,0,0,40), function()
	local ReplicatedStorage = game:GetService("ReplicatedStorage")
	local event = ReplicatedStorage:WaitForChild("ChomcoEvents"):WaitForChild("NothcomEvent")
	event:FireServer("")
end)

local PageBtn = Instance.new("TextButton")
PageBtn.Parent = Frame
PageBtn.Size = UDim2.new(0,80,0,30)
PageBtn.Position = UDim2.new(0,300,0,0)
PageBtn.Text = "Next"

local Page2 = Frame:Clone()
Page2.Parent = ScreenGui
Page2.Name = "Page2"
Page2.Visible = false

for _,v in pairs(Page2:GetChildren()) do
	if v:IsA("TextButton") then
		v:Destroy()
	end
end

createBtn(Page2, "Back", UDim2.new(0,300,0,0), function()
	Page2.Visible = false
	Frame.Visible = true
end)

createBtn(Page2, "Testing", UDim2.new(0,100,0,60), function()
	tp(CFrame.new(0,100,0))
end)

PageBtn.MouseButton1Click:Connect(function()
	Frame.Visible = false
	Page2.Visible = true
end)