better pochang ui

--------------------------------------------------------------------------------------------------------------------
isstudio = game:GetService("RunService"):IsStudio()
if isstudio then
	task.wait(5)
end
--------------------------------------------------------------------------------------------------------------------
plr = game:GetService("Players").LocalPlayer
plrgui = game.CoreGui
plrscr = plr.PlayerScripts
sounds = game:GetService("SoundService")
startergui = game.StarterGui
repl = game:GetService("ReplicatedStorage")
replc = game:GetService("ReplicatedFirst")
mouse = plr:GetMouse()
chat = game:GetService("TextChatService")
--------------------------------------------------------------------------------------------------------------------
function createFrame()
	local frame = Instance.new("Frame")
	frame.BackgroundColor3 = Color3.fromRGB(242,243,243)
	frame.BackgroundTransparency = 0.5
	return frame
end
--------------------------------------------------------------------------------------------------------------------
function createCommand(name,name2,callback:() -> ())
	chat.SendingMessage:Connect(function(msg)
		local text = string.lower(msg.Text)
		if string.sub(text,1,1) == "/" and window then
			local text = string.sub(text,2)
			if text == name or text == name2 then
				callback()
			end
		end
	end)
end
--------------------------------------------------------------------------------------------------------------------
function createButton(text)
	local frame = Instance.new("TextButton")
	frame.Size = UDim2.fromScale(1,0.05)
	frame.Text = text
	frame.BackgroundColor3 = Color3.fromRGB(242,243,243)
	frame.BackgroundTransparency = 0.5
	frame.Font = "SourceSans"
	frame.TextScaled = true
	frame.TextWrapped = true
	return frame
end
--------------------------------------------------------------------------------------------------------------------
function createText(text)
	local frame = Instance.new("TextLabel")
	frame.Size = UDim2.fromScale(1,0.05)
	frame.Text = text
	frame.BackgroundColor3 = Color3.fromRGB(242,243,243)
	frame.BackgroundTransparency = 0
	frame.Font = "SourceSans"
	frame.TextScaled = true
	frame.TextWrapped = true
	return frame
end
--------------------------------------------------------------------------------------------------------------------
function regenScroller(scrolling)
	scrolling.CanvasSize = UDim2.fromOffset(0, scrolling.UIListLayout.AbsoluteContentSize.Y)
end
--------------------------------------------------------------------------------------------------------------------
function createScroller()
	local frame = Instance.new("ScrollingFrame")
	frame.BackgroundColor3 = Color3.fromRGB(242,243,243)
	frame.BackgroundTransparency = 0.5
	local layout = Instance.new("UIListLayout")
	layout.Parent = frame
	layout.SortOrder = Enum.SortOrder.LayoutOrder
	layout.Padding = UDim.new(0.025,0)
	frame.ChildAdded:Connect(function()
		regenScroller(frame)
	end)
	return frame
end
--------------------------------------------------------------------------------------------------------------------
function createInput(text)
	local canvas = Instance.new("CanvasGroup")
	canvas.BackgroundTransparency = 1
	canvas.Size = UDim2.fromScale(1,0.05)
	local textlabel = Instance.new("TextLabel")
	textlabel.Text = text
	textlabel.BackgroundColor3 = Color3.fromRGB(242,243,243)
	textlabel.BackgroundTransparency = 0.5
	textlabel.Size = UDim2.fromScale(0.5,1)
	textlabel.Parent = canvas
	textlabel.Font = "SourceSans"
	textlabel.TextScaled = true
	textlabel.TextWrapped = true
	local textbox = Instance.new("TextBox")
	textbox.BackgroundColor3 = Color3.fromRGB(242,243,243)
	textbox.BackgroundTransparency = 0.5
	textbox.Size = UDim2.fromScale(0.5,1)
	textbox.Position = UDim2.fromScale(0.5,0)
	textbox.Parent = canvas
	textbox.Font = "SourceSans"
	textbox.TextScaled = true
	textbox.TextWrapped = true
	canvas.ClipsDescendants = false
	return canvas
end
--------------------------------------------------------------------------------------------------------------------
local window = Instance.new("ScreenGui")
window.Name = "Window"
window.Parent = plrgui
window.ResetOnSpawn = false
window.DisplayOrder = 1000000000
--------------------------------------------------------------------------------------------------------------------
local winframe = createFrame()
winframe.Size = UDim2.fromScale(0.5,0.5)
winframe.Position = UDim2.fromScale(0.25,0.25)
winframe.Parent = window
--------------------------------------------------------------------------------------------------------------------
function hideall()
	local children = winframe:GetChildren()
	for i in children do
		if children[i].ClassName == "ScrollingFrame" then
			children[i].Visible = false
		end
	end
end
--------------------------------------------------------------------------------------------------------------------
if true then
	local dragger = Instance.new("UIDragDetector")
	dragger.Parent = winframe
	local close = createButton("Close")
	close.Parent = winframe
	close.Size = UDim2.fromScale(0.1,0.05)
	local open = createButton("Open")
	open.Parent = window
	open.Visible = false
	open.Size = UDim2.fromScale(0.1,0.05)
	local delete = createButton("Delete")
	delete.Parent = window
	delete.Visible = false
	delete.Size = UDim2.fromScale(0.1,0.05)
	delete.Position = UDim2.fromScale(0.1,0)
	local function toggle()
		winframe.Visible = not winframe.Visible
		close.Visible = not close.Visible
		open.Visible = not open.Visible
		delete.Visible = not delete.Visible
	end
	close.Activated:Connect(toggle)
	open.Activated:Connect(toggle)
	delete.Activated:Connect(function()
		window:Destroy()
	end)
end
--------------------------------------------------------------------------------------------------------------------
local humanoidcontent

if true then
	local content = createScroller()
	content.Parent = winframe
	content.Size = UDim2.fromScale(1,0.95)
	content.Position = UDim2.fromScale(0,0.05)
	humanoidcontent = content
	
	local open = createButton("Humanoid")
	open.Parent = winframe
	open.Size = UDim2.fromScale(0.2,0.05)
	open.Position = UDim2.fromScale(0.1,0)
	open.Activated:Connect(function()
		hideall()
		content.Visible = true
	end)
	--------------------------------------------------------------------------------------------------------------------
	if true then --humanoid options
		if true then --header
			local header = createText("Humanoid Options")
			header.LayoutOrder = 0
			header.Parent = content
		end

		if true then --walkspeed
			local textbox = createInput("Walk Speed")
			textbox.LayoutOrder = 1
			textbox.Parent = content
			textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").WalkSpeed
			textbox.TextBox.FocusLost:Connect(function(isenter)
				if isenter then
					local number = tonumber(textbox.TextBox.Text)
					if number then
						plr.Character:FindFirstChildOfClass("Humanoid").WalkSpeed = number
					end
				end
			end)

			plr.Character:FindFirstChildOfClass("Humanoid").Changed:Connect(function()
				textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").WalkSpeed
			end)

			plr.CharacterAdded:Connect(function()
				textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").WalkSpeed
			end)
		end

		if true then --jumppower
			local textbox = createInput("Jump Power")
			textbox.LayoutOrder = 2
			textbox.Parent = content
			if plr.Character:FindFirstChildOfClass("Humanoid").UseJumpPower == true then
				textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").JumpPower
				textbox.Visible = true
			else
				textbox.Visible = false
			end
			textbox.TextBox.FocusLost:Connect(function(isenter)
				if isenter then
					local number = tonumber(textbox.TextBox.Text)
					if number then
						plr.Character:FindFirstChildOfClass("Humanoid").JumpPower = number
					end
				end
			end)

			plr.Character:FindFirstChildOfClass("Humanoid").Changed:Connect(function()
				if plr.Character:FindFirstChildOfClass("Humanoid").UseJumpPower == true then
					textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").JumpPower
					textbox.Visible = true
				else
					textbox.Visible = false
				end
			end)

			plr.CharacterAdded:Connect(function()
				if plr.Character:FindFirstChildOfClass("Humanoid").UseJumpPower == true then
					textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").JumpPower
					textbox.Visible = true
				else
					textbox.Visible = false
				end
			end)
		end

		if true then --jumpheight
			local textbox = createInput("Jump Height")
			textbox.LayoutOrder = 3
			textbox.Parent = content
			if plr.Character:FindFirstChildOfClass("Humanoid").UseJumpPower == false then
				textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").JumpHeight
				textbox.Visible = true
			else
				textbox.Visible = false
			end
			textbox.TextBox.FocusLost:Connect(function(isenter)
				if isenter then
					local number = tonumber(textbox.TextBox.Text)
					if number then
						plr.Character:FindFirstChildOfClass("Humanoid").JumpHeight = number
					end
				end
			end)

			plr.Character:FindFirstChildOfClass("Humanoid").Changed:Connect(function()
				if plr.Character:FindFirstChildOfClass("Humanoid").UseJumpPower == false then
					textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").JumpHeight
					textbox.Visible = true
				else
					textbox.Visible = false
				end
			end)

			plr.CharacterAdded:Connect(function()
				if plr.Character:FindFirstChildOfClass("Humanoid").UseJumpPower == false then
					textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").JumpHeight
					textbox.Visible = true
				else
					textbox.Visible = false
				end
			end)
		end

		if true then --walkspeed
			local textbox = createInput("Health")
			textbox.LayoutOrder = 4
			textbox.Parent = content
			textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").Health
			textbox.TextBox.FocusLost:Connect(function(isenter)
				if isenter then
					local number = tonumber(textbox.TextBox.Text)
					if number then
						plr.Character:FindFirstChildOfClass("Humanoid").Health = number
					end
				end
			end)

			plr.Character:FindFirstChildOfClass("Humanoid").Changed:Connect(function()
				textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").Health
			end)

			plr.CharacterAdded:Connect(function()
				textbox.TextBox.Text = plr.Character:FindFirstChildOfClass("Humanoid").Health
			end)
		end

		if true then --switch between jumpheight and jumppower
			local header = createButton("Toggle between Jump Height and Jump Power")
			header.LayoutOrder = 5
			header.Parent = content
			header.Activated:Connect(function()
				plr.Character:FindFirstChildOfClass("Humanoid").UseJumpPower = not plr.Character:FindFirstChildOfClass("Humanoid").UseJumpPower
			end)
		end
	end
	--------------------------------------------------------------------------------------------------------------------
	if true then --humanoid actions
		if true then --header
			local header = createText("Humanoid Actions")
			header.LayoutOrder = 6
			header.Parent = content
		end

		if true then --toggle sit
			local header = createButton("Toggle sit")
			header.LayoutOrder = 7
			header.Parent = content
			header.Activated:Connect(function()
				plr.Character:FindFirstChildOfClass("Humanoid").Sit = not plr.Character:FindFirstChildOfClass("Humanoid").Sit
			end)
		end

		if true then --toggle sit
			local header = createButton("Sit")
			header.LayoutOrder = 8
			header.Parent = content
			header.Activated:Connect(function()
				plr.Character:FindFirstChildOfClass("Humanoid").Sit = true
			end)
		end

		if true then --toggle sit
			local header = createButton("Unsit")
			header.LayoutOrder = 9
			header.Parent = content
			header.Activated:Connect(function()
				plr.Character:FindFirstChildOfClass("Humanoid").Sit = false
			end)
		end

		--------------------------------------------------------------------------------

		if true then --toggle plat
			local header = createButton("Toggle platform stand")
			header.LayoutOrder = 10
			header.Parent = content
			header.Activated:Connect(function()
				plr.Character:FindFirstChildOfClass("Humanoid").PlatformStand = not plr.Character:FindFirstChildOfClass("Humanoid").PlatformStand
			end)
		end

		if true then --toggle plat
			local header = createButton("Platform Stand")
			header.LayoutOrder = 11
			header.Parent = content
			header.Activated:Connect(function()
				plr.Character:FindFirstChildOfClass("Humanoid").PlatformStand = true
			end)
		end

		if true then --toggle plat
			local header = createButton("Unplatform Stand")
			header.LayoutOrder = 12
			header.Parent = content
			header.Activated:Connect(function()
				plr.Character:FindFirstChildOfClass("Humanoid").PlatformStand = false
			end)
		end
	end
end

local workspacecontent

if true then
	local content = createScroller()
	content.Parent = winframe
	content.Size = UDim2.fromScale(1,0.95)
	content.Position = UDim2.fromScale(0,0.05)
	workspacecontent = content
	content.Visible = false

	local open = createButton("Workspace")
	open.Parent = winframe
	open.Size = UDim2.fromScale(0.2,0.05)
	open.Position = UDim2.fromScale(0.3,0)
	open.Activated:Connect(function()
		hideall()
		content.Visible = true
	end)
	if true then --physics
		if true then --header
			local header = createText("Physics")
			header.LayoutOrder = 0
			header.Parent = content
		end

		if true then --gravity
			local textbox = createInput("Gravity")
			textbox.LayoutOrder = 1
			textbox.Parent = content
			textbox.TextBox.Text = workspace.Gravity
			textbox.TextBox.FocusLost:Connect(function(isenter)
				if isenter then
					local number = tonumber(textbox.TextBox.Text)
					if number then
						workspace.Gravity = number
					end
				end
			end)

			workspace.Changed:Connect(function()
				textbox.TextBox.Text = workspace.Gravity
			end)
		end
		
		if true then --scale
			local textbox = createInput("World Scale")
			textbox.LayoutOrder = 2
			textbox.Parent = content
			textbox.TextBox.Text = workspace:GetScale()
			textbox.TextBox.FocusLost:Connect(function(isenter)
				if isenter then
					local number = tonumber(textbox.TextBox.Text)
					if number then
						workspace:ScaleTo(number)
					end
				end
			end)

			workspace.Changed:Connect(function()
				textbox.TextBox.Text = workspace:GetScale()
			end)
		end
	end
end
--------------------------------------------------------------------------------------------------------------------

local commands

if true then
	local content = createScroller()
	content.Parent = winframe
	content.Size = UDim2.fromScale(1,0.95)
	content.Position = UDim2.fromScale(0,0.05)
	commands = content
	content.Visible = false

	local open = createButton("Commands")
	open.Parent = winframe
	open.Size = UDim2.fromScale(0.2,0.05)
	open.Position = UDim2.fromScale(0.5,0)
	open.Activated:Connect(function()
		hideall()
		content.Visible = true
	end)
	
	if true then --teleport
		local header = createText("/tp or /teleport - Teleports you to that position")
		header.LayoutOrder = 0
		header.Parent = content
	end
end

--commands
local tp = createCommand("tp","teleport",function()
	plr.Character:PivotTo(mouse.Hit)
end)