Orbit Player And Stuff

local Players = game:GetService("Players")

local RunService = game:GetService("RunService")

local player = Players.LocalPlayer

local mouse = player:GetMouse()

local TextChatService = game:GetService("TextChatService")

local HOVER_HEIGHT = 10

local ORBIT_RADIUS = 10

local ORBIT_SPEED = 2

local BP_P = 8000

local BP_D = 1000

local BG_P = 4000

local BG_D = 1000

local MAX_FORCE = 1e6

local activeParts = {}

local angleOffsets = {}

local levitateApplied = false

local orbitTarget = nil

local hoveredPlayer = nil

local highlight = nil

local function clearHighlight()

if highlight then

highlight:Destroy()

highlight = nil

end

end

local function clearParts()

for part, data in pairs(activeParts) do

if data.bp then data.bp:Destroy() end

if data.bg then data.bg:Destroy() end

end

activeParts = {}

angleOffsets = {}

levitateApplied = false

end

local function makeParts(character)

if levitateApplied then return end

levitateApplied = true

local root = character:FindFirstChild("HumanoidRootPart")

if not root then return end

for _, part in ipairs(character:GetDescendants()) do

if part:IsA("BasePart") then

part.Anchored = false

part.CanCollide = true

part.Massless = false

local bp = Instance.new("BodyPosition")

bp.MaxForce = Vector3.new(MAX_FORCE, MAX_FORCE, MAX_FORCE)

bp.P = BP_P

bp.D = BP_D

bp.Position = part.Position

bp.Parent = part

local bg = Instance.new("BodyGyro")

bg.MaxTorque = Vector3.new(MAX_FORCE, MAX_FORCE, MAX_FORCE)

bg.P = BG_P

bg.D = BG_D

bg.CFrame = part.CFrame

bg.Parent = part

activeParts[part] = {bp=bp,bg=bg}

angleOffsets[part] = math.random() * math.pi * 2

end

end

end

local function onCharacterAdded(chr)

TextChatService.TextChannels.RBXGeneral:SendAsync("-pd")

wait(0.5)

chr:BreakJoints()

wait(0.2)

makeParts(chr)

end

player.CharacterRemoving:Connect(function()

clearParts()

end)

player.CharacterAdded:Connect(function(chr)

wait(1)

onCharacterAdded(chr)

end)

if player.Character then

onCharacterAdded(player.Character)

end

local screenGui = Instance.new("ScreenGui")

screenGui.ResetOnSpawn = false

screenGui.Parent = player:WaitForChild("PlayerGui")

screenGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling

local frame = Instance.new("Frame")

frame.Size = UDim2.new(0,300,0,300)

frame.Position = UDim2.new(0.5, -150, 0.5, -75)

frame.BackgroundColor3 = Color3.fromRGB(35,35,35)

frame.BorderSizePixel = 0

frame.Parent = screenGui

frame.Active = true

frame.Draggable = true

local title = Instance.new("TextLabel")

title.Size = UDim2.new(1,0,0,30)

title.BackgroundTransparency = 1

title.Text = "shitty orbit"

title.TextColor3 = Color3.fromRGB(255,255,255)

title.Font = Enum.Font.GothamBold

title.TextScaled = true

title.Parent = frame

local followButton = Instance.new("TextButton")

followButton.Size = UDim2.new(0,260,0,40)

followButton.Position = UDim2.new(0,20,0,40)

followButton.BackgroundColor3 = Color3.fromRGB(80,80,80)

followButton.TextColor3 = Color3.new(1,1,1)

followButton.Text = "orbit player"

followButton.Font = Enum.Font.Gotham

followButton.TextScaled = true

followButton.Parent = frame

local shapeButton = Instance.new("TextButton")

shapeButton.Size = UDim2.new(0,260,0,40)

shapeButton.Position = UDim2.new(0,20,0,90)

shapeButton.BackgroundColor3 = Color3.fromRGB(80,80,80)

shapeButton.TextColor3 = Color3.new(1,1,1)

shapeButton.Text = "goofy circle"

shapeButton.Font = Enum.Font.Gotham

shapeButton.TextScaled = true

shapeButton.Parent = frame

local reset = Instance.new("TextButton")

reset.Size = UDim2.new(0,260,0,40)

reset.Position = UDim2.new(0,20,0,140)

reset.BackgroundColor3 = Color3.fromRGB(80,80,80)

reset.TextColor3 = Color3.new(1,1,1)

reset.Text = "reset"

reset.Font = Enum.Font.Gotham

reset.TextScaled = true

reset.Parent = frame

reset.MouseButton1Click:Connect(function()

TextChatService.TextChannels.RBXGeneral:SendAsync("-re")

end)

followButton.MouseButton1Click:Connect(function()

for _, p in ipairs(Players:GetPlayers()) do

if p ~= player and p.Character then

orbitTarget = p

break

end

end

end)

shapeButton.MouseButton1Click:Connect(function()

orbitTarget = nil

local partsList = {}

for part, _ in pairs(activeParts) do

table.insert(partsList, part)

end

local n = #partsList

for i, part in ipairs(partsList) do

local angle = i/n * math.pi * 2

local radius = ORBIT_RADIUS

if part:IsA("BasePart") then

activeParts[part].bp.Position = Vector3.new(math.cos(angle)*radius,HOVER_HEIGHT,math.sin(angle)*radius)

end

end

end)

RunService.Heartbeat:Connect(function()

local character = player.Character

if not character then return end

local root = character:FindFirstChild("HumanoidRootPart")

if not root then return end

if orbitTarget and orbitTarget.Character then

local targetRoot = orbitTarget.Character:FindFirstChild("HumanoidRootPart")

if targetRoot then

local t = tick()

for part, data in pairs(activeParts) do

local angle = t * ORBIT_SPEED + angleOffsets[part]

local radius = ORBIT_RADIUS

local x = math.cos(angle) * radius

local z = math.sin(angle) * radius

local yOffset = HOVER_HEIGHT

if targetRoot.Parent:FindFirstChild("Humanoid") then

local hum = targetRoot.Parent.Humanoid

if hum.RigType == Enum.HumanoidRigType.R15 then

yOffset = 3

else

yOffset = 2

end

end

local targetPos = targetRoot.Position + Vector3.new(x,yOffset,z)

if data.bp and data.bp.Parent then

data.bp.Position = targetPos

end

if data.bg and data.bg.Parent then

data.bg.CFrame = CFrame.new(targetPos)

end

end

end

else

for part, data in pairs(activeParts) do

if data.bp and data.bp.Parent then

data.bp.Position = root.Position + Vector3.new(0,HOVER_HEIGHT,0)

end

if data.bg and data.bg.Parent then

data.bg.CFrame = part.CFrame

end

end

end

local target = nil

for _, p in ipairs(Players:GetPlayers()) do

if p ~= player and p.Character then

for _, part in ipairs(p.Character:GetDescendants()) do

if part:IsA("BasePart") then

local screenPos, onScreen = workspace.CurrentCamera:WorldToViewportPoint(part.Position)

local mousePos = Vector2.new(mouse.X, mouse.Y)

if onScreen and (Vector2.new(screenPos.X,screenPos.Y)-mousePos).Magnitude < 50 then

target = p

break

end

end

end

if target then break end

end

end

if target ~= hoveredPlayer then

hoveredPlayer = target

clearHighlight()

if hoveredPlayer and hoveredPlayer.Character then

highlight = Instance.new("Highlight")

highlight.Adornee = hoveredPlayer.Character

highlight.Parent = workspace

end

end

end)

mouse.Button1Down:Connect(function()

if hoveredPlayer then

orbitTarget = hoveredPlayer

end

end)