-- LocalScript: StarterPlayerScripts/FlingClientGui.lua
-- MAXIMUM CHAOS RANDOM FLING + SPIN

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

-- ======================
-- 🔥 ONLY CONTROL 🔥
local POWER = 900      -- increase for more insanity
local COOLDOWN = 0.6
-- ======================

-- GUI
local gui = Instance.new("ScreenGui")
gui.Name = "ChaosFlingGui"
gui.ResetOnSpawn = false

pcall(function()
	gui.Parent = CoreGui
end)
if not gui.Parent then
	gui.Parent = player:WaitForChild("PlayerGui")
end

-- Container
local frame = Instance.new("Frame")
frame.Size = UDim2.new(0, 200, 0, 70)
frame.Position = UDim2.new(0, 20, 0.5, -35)
frame.BackgroundTransparency = 0.15
frame.Active = true
frame.Parent = gui

Instance.new("UICorner", frame).CornerRadius = UDim.new(0, 14)

-- Button
local button = Instance.new("TextButton")
button.Size = UDim2.new(1, -16, 1, -16)
button.Position = UDim2.new(0, 8, 0, 8)
button.Text = "CHAOS FLING"
button.TextScaled = true
button.BackgroundTransparency = 0.1
button.Parent = frame

Instance.new("UICorner", button).CornerRadius = UDim.new(0, 12)

-- Random direction
local function randomUnitVector()
	local z = math.random() * 2 - 1
	local theta = math.random() * math.pi * 2
	local r = math.sqrt(1 - z * z)
	return Vector3.new(
		r * math.cos(theta),
		z,
		r * math.sin(theta)
	)
end

-- CHAOS FLING
local last = 0
local function chaosFling()
	if os.clock() - last < COOLDOWN then return end
	last = os.clock()

	local char = player.Character
	if not char then return end

	local root = char:FindFirstChild("HumanoidRootPart")
	if not root then return end

	-- BIG random launch
	local velocity = randomUnitVector() * POWER
	root.AssemblyLinearVelocity += velocity

	-- RANDOM SPIN (this is the funny part)
	root.AssemblyAngularVelocity = Vector3.new(
		math.random(-1,1),
		math.random(-1,1),
		math.random(-1,1)
	).Unit * POWER * 0.8
end

button.MouseButton1Click:Connect(chaosFling)

-- ======================
-- 🖱️ DRAGGING
-- ======================
local dragging = false
local dragStart
local startPos

frame.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)

UserInputService.InputChanged:Connect(function(input)
	if not dragging then return end
	if input.UserInputType ~= Enum.UserInputType.MouseMovement
	and input.UserInputType ~= Enum.UserInputType.Touch then return end

	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)