local pi = math.pi
print'made by derickgamerbr100'
local function RBX(a)return'rbxassetid://'..a;end
local function wait(a)
	if not a then return({game:GetService("RunService").Stepped:Wait()})[2]end
	local b = a
	while a>0 do a-=wait()end
	return b-a
end
local function ChangeIndex(a,b,c)
	for d,e in next,b do
		local f = pcall(function()a[d]=e;end)
		if c and not f then print('bad index',a,d,e)end
	end
end
local function Create(a)return function(b)local c = Instance.new(a)ChangeIndex(c,b,1)return c;end;end
local assert = function(a,b,c)assert(a,b or('Bad argument'..(c or 1)))end


local function MonkeyCircle(Player,MonkeyInstance,Offset,SongID,MonkeyAmount,Speed)
	Player,Offset,SongID,MonkeyAmount,Speed=Player or getfenv(2).owner,Offset or CFrame.new(0,0,-6.5),SongID or 
		4066896895,MonkeyAmount or 6,Speed or .1
	local Character = Player.Character;assert(Character)local HUM = Character:FindFirstChildWhichIsA'Humanoid'
	local HRP = Character:FindFirstChild'HumanoidRootPart'assert(HRP and HUM,nil,2)
	if not MonkeyInstance then
		MonkeyInstance = Create'Part'{Parent=game:GetService("Lighting")}
		Create'SpecialMesh'{MeshId=RBX(5265943271);TextureId=RBX(5265943300);Parent=MonkeyInstance}
	end
	MonkeyInstance.CanCollide = false
	Create'Sound'{Parent=HRP;SoundId=RBX(SongID);Volume=3;Looped=true}:Play()
	local Monkeys = {}
	for a=1,MonkeyAmount do
		local b = MonkeyInstance:Clone()
		b.Parent = workspace
		Create'Weld'{Parent=b;Name='a';Part0=b;Part1=HRP;C1=CFrame.Angles(0,pi*2*a/MonkeyAmount,0);C0=Offset}
		table.insert(Monkeys,b)
	end
	while wait()do
		for _,a in next,Monkeys do
			a.a.C0*= CFrame.Angles(0,Speed,0)
		end
	end
end

MonkeyCircle()