Advertisement
Guest User

ROBLOXDISCOLOLOLOL

a guest
Feb 21st, 2018
71
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.94 KB | None | 0 0
  1. local plr = game:GetService("Players").LocalPlayer
  2. local char = plr.Character
  3. local X
  4. local Y
  5. local Z
  6. X=1.0
  7. Y=1.0
  8. Z=1.0
  9. local part = Instance.new("Part", char)
  10. part.Name = "Visualizer"
  11. part.Size = Vector3.new(2,2,2)
  12. part.CanCollide = false
  13. part.Anchored = false
  14. part.Material = Enum.Material.Neon
  15. part.BrickColor = BrickColor.new("Really black")
  16. local bp = Instance.new("BodyPosition", part)
  17. local mesh = Instance.new("SpecialMesh", part)
  18. local scale = mesh.Scale
  19. scale = Vector3.new(1,1,1)
  20. local sound = Instance.new("Sound", char.HumanoidRootPart)
  21. sound.Name = "Music"
  22. sound.SoundId = "rbxassetid://1264646941"
  23. sound.Volume = 10
  24. sound.Looped = true
  25. sound:Play()
  26. local ff = Instance.new("ForceField")
  27. ff.Parent = char
  28. function rainb(hue)
  29. local section = hue % 1 * 3
  30. local secondary = 0.5 * math.pi * (section % 1)
  31. if section < 1 then
  32. return Color3.new(1, 1 - math.cos(secondary), 1 - math.sin(secondary))
  33. elseif section < 2 then
  34. return Color3.new(1 - math.sin(secondary), 1, 1 - math.cos(secondary))
  35. else
  36. return Color3.new(1 - math.cos(secondary), 1 - math.sin(secondary), 1)
  37. end
  38. end
  39. game:GetService('RunService').RenderStepped:connect(function()
  40. mesh.MeshType = Enum.MeshType.Brick
  41. mesh.Scale = mesh.Scale:lerp(Vector3.new(scale.X+sound.PlaybackLoudness/100,scale.Y+sound.PlaybackLoudness/100,scale.Z+sound.PlaybackLoudness/100),0.8)
  42. local Color = rainb(tick()/20)
  43. part.Color = Color
  44. bp.Position = char.Head.Position + Vector3.new(0,sound.PlaybackLoudness/1000,0)
  45. part.CFrame = part.CFrame * CFrame.fromEulerAnglesXYZ(math.rad(X),math.rad(Y),math.rad(Z))
  46. char.Humanoid.MaxHealth = math.huge
  47. end)
  48. plr.Chatted:connect(function(msg)
  49. if msg:sub(1,5) == "Music" or msg:sub(1,5) == "music" then
  50. sound:Stop()
  51. sound.SoundId = "rbxassetid://"..msg:sub(7)
  52. sound:Play()
  53. end
  54. if msg:sub(1,6) == "Volume" or msg:sub(1,6) == "volume" then
  55. sound.Volume = msg:sub(8)
  56. end
  57. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement