TheGamerKing

(Rare Script) Visualiser

Sep 25th, 2017
134
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.93 KB | None | 0 0
  1. --[[
  2. VISUALISER
  3. { Now using trails! }
  4. Created by Quil_Cyndaquil (ROBLOX) [UserID 5719877]
  5. MintyLatios (V3rmillion)
  6. Nebula Zorua#1938
  7.  
  8.  
  9. --]]
  10. local Player = game:service'Players'.localPlayer;
  11. local Char = Player.Character
  12.  
  13. local Orb = Instance.new("Part",Char)
  14. Orb.Transparency = 1
  15. Orb.CanCollide=false
  16. Orb.Anchored = true
  17. local Attachment0 = Instance.new("Attachment",Orb)
  18. local Attachment1 = Instance.new("Attachment",Orb)
  19.  
  20. local trail=Instance.new("Trail",Orb)
  21. local keypoints={}
  22. for i = 0,1,0.1 do
  23. local color = Color3.fromHSV(i,1,1)
  24. local keypoint = ColorSequenceKeypoint.new(i,color)
  25. table.insert(keypoints,keypoint)
  26. end
  27. trail.Color=ColorSequence.new(keypoints)
  28. trail.Attachment0=Attachment0
  29. trail.Attachment1=Attachment1
  30. trail.Lifetime = 4
  31. trail.Enabled=true
  32.  
  33. local Sound = Instance.new("Sound",Char)
  34. Sound.Name = "VisSound"
  35. Sound.Volume = 1;
  36. Sound.Pitch = 1
  37. Sound.Looped = true
  38. Player.Chatted:connect(function(m)
  39. m=m:lower();
  40. if string.match(m, "id/(%w+)") or string.match(m, "play/(%w+)") then
  41. local id = tonumber(string.match(m, "id/(%w+)") or string.match(m, "play/(%w+)"))
  42. Sound.SoundId = "rbxassetid://"..id
  43. Sound:Play()
  44. elseif string.match(m, "volume/(%w+)") or string.match(m, "vol/(%w+)") then
  45. local vol = tonumber(string.match(m, "volume/(%w+)") or string.match(m, "vol/(%w+)"))
  46. Sound.Volume = vol
  47. elseif m:sub(1,6) == "pitch/" then
  48. local vol = tonumber(m:sub(7))
  49. Sound.Pitch = vol
  50. end
  51. end)
  52.  
  53. local Rot = 0
  54. local RotInc = 1
  55. game:service'RunService'.RenderStepped:connect(function()
  56. Attachment0.CFrame = CFrame.new(0,Sound.PlaybackLoudness/150,0)
  57. Attachment1.CFrame = CFrame.new(0,-Sound.PlaybackLoudness/150,0)
  58. Rot = Rot + RotInc
  59. Orb.CFrame = Char.Torso.CFrame*CFrame.Angles(0,math.rad(Rot),0) * CFrame.new(0,0,3)
  60. end)
Add Comment
Please, Sign In to add comment