Music vis 2

print("Created by HyperSonicFan213 and mexicanbro1234")
print(" ")
print("Commands : play&(ID), stop&, vol&(1 to 10), pitch&(Any Value)")
print(" ")
print("wk& - Sets the sound in workspace, pd& - Sets the sound in the part.")
print(" ")
print("hidebars&/showbars& - Shows or hides the bars of the visualizer.")
print(" ")
print("hidesquare&/showsqaure& - Shows or hides the square pad of the visualier.")
print(" ")
print("image&(ID) --IMPORTANT NOTE--, When using a decal ID, be sure to decrease the ID by one.")
print(" ")
print("nolightsquare&/lightsquare& - Removes or brings back the light square pad in the center.")
print(" ")
print("nodarksqaure&/darksquare& - Removes or brings back the dark square pad in the outer layer.")
print(" ")
print("nolightcircle&/lightcircle& - Removes or brings back the light circle pad in the center.")
print(" ")
print("nodarkcircle&/darkcircle& - Removes or brings back the dark circle pad in the outer layer.")
print(" ")
print("hidecircle&/showcircle& - Shows or hides the circular pad of the visualier.")
print(" ")
print("circle& - Turns the shape into a circle.")
print(" ")
print("square& - Turns the shape into a square.")
print(" ")
print("It's never ogre. -- Signed, Shrek.")
print(" ")
print("WafflesAreVeryGood is so cool it's not even funny lol")

local p = Instance.new('Part',workspace)
p.Size = Vector3.new(10,0,10)
p.CanCollide = false
p.Anchored = true
p.Material = 'Neon'
p.Position = Vector3.new(0,0,-35)
p.Name = 'p'
p.TopSurface = 'Smooth'
p.BrickColor = BrickColor.new('Really black')

local p1 = Instance.new('Part',workspace)
p1.Size = Vector3.new(5,0.50,5)
p1.CanCollide = false
p1.Anchored = true
p1.Material = 'Neon'
p1.TopSurface = 'Smooth'
p1.Position = Vector3.new(0,0,-35)
p1.BrickColor = BrickColor.new('White')
p1.Name = 'p1'

local p2 = Instance.new('Part',workspace)
p2.Size = Vector3.new(0,10,10)
p2.Shape = "Cylinder"
p2.Rotation = Vector3.new(0,0,90)
p2.CanCollide = false
p2.Anchored = true
p2.Material = 'Neon'
p2.Position = Vector3.new(0,0,-35)
p2.Name = 'p2'
p2.TopSurface = 'Smooth'
p2.BrickColor = BrickColor.new('Really black')
p2.Transparency = 1

local p3 = Instance.new('Part',workspace)
p3.Size = Vector3.new(0.5,5,5)
p3.Shape = "Cylinder"
p3.Rotation = Vector3.new(0,0,90)
p3.CanCollide = false
p3.Anchored = true
p3.Material = 'Neon'
p3.TopSurface = 'Smooth'
p3.Position = Vector3.new(0,0,-35)
p3.BrickColor = BrickColor.new('White')
p3.Name = 'p3'
p3.Transparency = 1

local Light = Instance.new("SurfaceLight", p)
Light.Brightness = 0
Light.Face = "Top"
Light.Name = "Light"

local Bar1 = Instance.new("Part",workspace)
Bar1.Size = Vector3.new(1,1,1)
Bar1.BrickColor = BrickColor.new("White")
Bar1.Anchored = true
Bar1.Material = "Neon"
Bar1.CanCollide = false
Bar1.Name = 'Bar1'

local Bar2 = Instance.new("Part",workspace)
Bar2.Size = Vector3.new(1,1,1)
Bar2.BrickColor = BrickColor.new("White")
Bar2.Anchored = true
Bar2.Material = "Neon"
Bar2.CanCollide = false
Bar2.Name = 'Bar2'

local Bar3 = Instance.new("Part",workspace)
Bar3.Size = Vector3.new(1,1,1)
Bar3.BrickColor = BrickColor.new("White")
Bar3.Anchored = true
Bar3.Material = "Neon"
Bar3.CanCollide = false
Bar3.Name = 'Bar3'

local Bar4 = Instance.new("Part",workspace)
Bar4.Size = Vector3.new(1,1,1)
Bar4.BrickColor = BrickColor.new("White")
Bar4.Anchored = true
Bar4.Material = "Neon"
Bar4.CanCollide = false
Bar4.Name = 'Bar4'

local Bar5 = Instance.new("Part",workspace)
Bar5.Size = Vector3.new(1,1,1)
Bar5.BrickColor = BrickColor.new("White")
Bar5.Anchored = true
Bar5.Material = "Neon"
Bar5.CanCollide = false
Bar5.Name = 'Bar5'

local Bar6 = Instance.new("Part",workspace)
Bar6.Size = Vector3.new(1,1,1)
Bar6.BrickColor = BrickColor.new("White")
Bar6.Anchored = true
Bar6.Material = "Neon"
Bar6.CanCollide = false
Bar6.Name = 'Bar6'

local Bar7 = Instance.new("Part",workspace)
Bar7.Size = Vector3.new(1,1,1)
Bar7.BrickColor = BrickColor.new("White")
Bar7.Anchored = true
Bar7.Material = "Neon"
Bar7.CanCollide = false
Bar7.Name = 'Bar7'

local Bar8 = Instance.new("Part",workspace)
Bar8.Size = Vector3.new(1,1,1)
Bar8.BrickColor = BrickColor.new("White")
Bar8.Anchored = true
Bar8.Material = "Neon"
Bar8.CanCollide = false
Bar8.Name = 'Bar1'

local Image1 = Instance.new("Decal", p1)
Image1.Face = "Top"
Image1.Name = "Image1"
Image1.Texture = "rbxassetid://"

local Image2 = Instance.new("Decal", p2)
Image2.Face = "Top"
Image2.Name = "Image2"
Image2.Texture = "rbxassetid://"

coroutine.wrap(function()
	while wait() do
p.CFrame = p.CFrame:lerp(game.Players.LocalPlayer.Character.Torso.CFrame*CFrame.new(0,-3,0),0.25)
p1.CFrame = p1.CFrame:lerp(game.Players.LocalPlayer.Character.Torso.CFrame*CFrame.new(0,-3,0),0.25)
p2.CFrame = p2.CFrame:lerp(game.Players.LocalPlayer.Character.Torso.CFrame*CFrame.new(0,-3,0),0.25)
p2.Rotation = Vector3.new(0,0,90)
p3.CFrame = p3.CFrame:lerp(game.Players.LocalPlayer.Character.Torso.CFrame*CFrame.new(0,-3,0),0.25)
p3.Rotation = Vector3.new(0,0,90)
	end
end)()

local click1 = Instance.new('ClickDetector', p)
click1.Name = 'click'
click1.MaxActivationDistance = math.huge

click1.MouseClick:connect(function()
	p.BrickColor = BrickColor.Random()
end)

click1.MouseHoverEnter:connect(function()
	p.Material = 'Plastic'
end)

click1.MouseHoverLeave:connect(function()
	p.Material = 'Neon'
end)

local click2 = Instance.new('ClickDetector', p2)
click2.Name = 'click2'
click2.MaxActivationDistance = math.huge

click2.MouseClick:connect(function()
	p2.Brickcolor = BrickColor.Random()
end)

click2.MouseHoverEnter:connect(function()
	p2.Material = "Plastic"
end)

click2.MouseHoverLeave:connect(function()
	p2.Material = "Neon"
end)

click2:Remove()

local Sound = Instance.new('Sound',p)
Sound.Looped = true
Sound.SoundId = 'rbxassetid://'
Sound.Volume = 1

coroutine.wrap(function()
while wait() do
	local alg = math.floor(Sound.PlaybackLoudness)/75
	p.Size = p.Size:lerp(Vector3.new(11+alg,0,11+alg),0.25)
	p1.Size = p1.Size:lerp(Vector3.new(5+alg,0.201,5+alg),0.25)
	p2.Size = p2.Size:lerp(Vector3.new(0,13+alg,13+alg),0.25)
	p3.Size = p3.Size:lerp(Vector3.new(0.201,6.5+alg,6.5+alg),0.25)
	p.Light.Brightness = 0+alg
	local alg2 = math.floor(Sound.PlaybackLoudness)/math.random(10,100)
	Bar1.Size = Bar1.Size:lerp(Vector3.new(0.5,0+alg2,0.5),0.35)
	local alg3 = math.floor(Sound.PlaybackLoudness)/math.random(10,100)
	Bar2.Size = Bar2.Size:lerp(Vector3.new(0.5,0+alg3,0.5),0.35)
	local alg4 = math.floor(Sound.PlaybackLoudness)/math.random(10,100)
	Bar3.Size = Bar3.Size:lerp(Vector3.new(0.5,0+alg4,0.5),0.35)
	local alg5 = math.floor(Sound.PlaybackLoudness)/math.random(10,100)
	Bar4.Size = Bar4.Size:lerp(Vector3.new(0.5,0+alg5,0.5),0.35)
	local alg6 = math.floor(Sound.PlaybackLoudness)/math.random(10,100)
	Bar5.Size = Bar5.Size:lerp(Vector3.new(0.5,0+alg6,0.5),0.35)
	local alg7 = math.floor(Sound.PlaybackLoudness)/math.random(10,100)
	Bar6.Size = Bar6.Size:lerp(Vector3.new(0.5,0+alg7,0.5),0.35)
	local alg8 = math.floor(Sound.PlaybackLoudness)/math.random(10,100)
	Bar7.Size = Bar7.Size:lerp(Vector3.new(0.5,0+alg8,0.5),0.35)
	local alg9 = math.floor(Sound.PlaybackLoudness)/math.random(10,100)
	Bar8.Size = Bar8.Size:lerp(Vector3.new(0.5,0+alg9,0.5),0.35)
	end
end)()

local function Chat(plr,msg)
	if msg:sub(1,5):lower()=='play&' then
		local id = tonumber(msg:match'%d+')
		if not id then return end
		Sound:Stop()
		Sound.SoundId ='rbxassetid://'..msg:match'%d+'
		Sound:Play()
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)
Sound:Play()

local function Chat(plr,msg)
	if msg:sub(1,4):lower()=='vol&' then
local Value = tonumber(msg:match'%d+')
	if not Value then return end
		Sound.Volume = Value
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,6):lower()=='pitch&' then
local Value = tonumber(msg:match'%d+')
	if not Value then return end
		Sound.Pitch = Value
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,3):lower()=='wk&' then
		Sound.Parent = workspace
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,3):lower()=='pd&' then
		Sound.Parent = p
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,5):lower()=='stop&' then
		Sound:Stop()
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)
Sound:Stop()

local function Chat(plr,msg)
	if msg:sub(1,11):lower()=='hidesquare&' then
		p.Transparency = 1
		p1.Transparency = 1
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,11):lower()=='showsquare&' then
		p.Transparency = 0
		p1.Transparency = 0
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,14):lower()=='nolightsquare&' then
		p1.Transparency = 1
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,12):lower()=='lightsquare&' then
		p1.Transparency = 0
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,13):lower()=='nodarksquare&' then
		p.Transparency = 1
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,11):lower()=='darksqaure&' then
		p.Transparency = 0
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,11):lower()=='hidecircle&' then
		p2.Transparency = 1
		p3.Transparency = 1
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,11):lower()=='showcircle&' then
		p2.Transparency = 0
		p3.Transparency = 0
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,14):lower()=='nolightcircle&' then
		p3.Transparency = 1
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,12):lower()=='lightcircle&' then
		p3.Transparency = 0
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,13):lower()=='nodarkcircle&' then
		p2.Transparency = 1
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,11):lower()=='darkcircle&' then
		p2.Transparency = 0
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,9):lower()=='hidebars&' then
		Bar1.Transparency = 1
		Bar2.Transparency = 1
		Bar3.Transparency = 1
		Bar4.Transparency = 1
		Bar5.Transparency = 1
		Bar6.Transparency = 1
		Bar7.Transparency = 1
		Bar8.Transparency = 1
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,9):lower()=='showbars&' then
		Bar1.Transparency = 0
		Bar2.Transparency = 0
		Bar3.Transparency = 0
		Bar4.Transparency = 0
		Bar5.Transparency = 0
		Bar6.Transparency = 0
		Bar7.Transparency = 0
		Bar8.Transparency = 0
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end
game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,6):lower()=='image&' then wait(1)
		local ID = tonumber(msg:match'%d+')
		if not ID then return end
		Image1.Texture ='rbxassetid://'..ID
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end

game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,7):lower()=='circle&' then wait()
	p1.Transparency = 1
	p.Transparency = 1
	p2.Transparency = 0
	p3.Transparency = 0
	click1:Remove()
	click2.Parent = p2
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end

game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local function Chat(plr,msg)
	if msg:sub(1,7):lower()=='square&' then wait()
	p1.Transparency = 0
	p.Transparency = 0
	p2.Transparency = 1
	p3.Transparency = 1
	click1.Parent = p
	click2:Remove()
	end
end
for i,p in next,game.Players:children() do
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end

game.Players.PlayerAdded:connect(function(p)
	p.Chatted:connect(function(m)
		Chat(p,m)
	end)
end)

local Torso = game.Players.LocalPlayer.Character.Torso
local sine = 0
local cosi = 0

while true do wait()--ill let you know what happens in discord
	sine = sine + 0.01
	cosi = cosi + 0.01
	for i,v in pairs({Bar1,Bar2,Bar3,Bar4,Bar5,Bar6,Bar7,Bar8}) do
local num1 = math.sin(sine+i)*5 --  i almost did it
local num2 = math.cos(cosi+i)*5
v.CFrame = v.CFrame:lerp(Torso.CFrame * CFrame.new(num1,-2.99,num2),0.25)
local alg10 = math.floor(Sound.PlaybackLoudness)/100
end
end