Advertisement
Guest User

Untitled

a guest
Dec 13th, 2017
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.55 KB | None | 0 0
  1. local parts = {}
  2.  
  3. local rainbow = {}
  4. for i = 0,1,1/100 do
  5. local color = Color3.fromHSV(i,1,1)
  6. table.insert(rainbow,color)
  7. end
  8.  
  9. local HumanoidRootPart = game.Players.LocalPlayer.Character.HumanoidRootPart
  10. for i = 1,200 do
  11. local p = Instance.new('Part')
  12. p.Shape = 'Ball'
  13. p.TopSurface=10
  14. p.BottomSurface=10
  15. p.Size = Vector3.new(.2,.2,.2)
  16. p.Anchored=true
  17. p.CanCollide = false
  18. table.insert(parts,p)
  19. p.Parent = HumanoidRootPart
  20. p.Material = 'Neon'
  21. end
  22. local currcol = 0
  23. spawn(function()
  24. while wait(.1) do
  25. local color
  26. currcol = currcol + 1
  27. if rainbow[currcol] then
  28. color = rainbow[currcol]
  29. else
  30. currcol = 1
  31. color = rainbow[1]
  32. end
  33. spawn(function()
  34. for i,v in pairs(parts) do
  35. v.Color = color
  36. --game:service'RunService'.RenderStepped:wait()
  37. end
  38. end)
  39. end
  40. end)
  41. local s = Instance.new('Sound',HumanoidRootPart)
  42. s.SoundId = 'rbxassetid://495007399'
  43. s.Volume = 7
  44. s:Play()
  45. rot = 1
  46. game.Players.LocalPlayer.Chatted:connect(function(message)
  47. if message:sub(1,4) == 'play' then
  48. s:Stop()
  49. s.SoundId = 'rbxassetid://'..message:sub(6)
  50. s:Play()
  51. end
  52. end)
  53. game:service'RunService'.RenderStepped:connect(function()
  54. local deb = s.PlaybackLoudness/200
  55. rot = rot + deb/2
  56. for i,v in pairs(parts) do
  57. local angle = math.rad(i*(360/#parts) + rot)
  58. v.CFrame = v.CFrame:lerp(CFrame.new(HumanoidRootPart.Position.X,3,HumanoidRootPart.Position.Z)
  59. * CFrame.Angles(math.rad(90),0,0)
  60. * CFrame.new(0,0,1.7)
  61. * CFrame.Angles(0,0,angle)
  62. * CFrame.new(0,math.sin(tick()+i)*deb + 3,1)
  63. ,.2)
  64. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement