Advertisement
PersonsadminTeam

Local Musicblock

Dec 13th, 2016
324
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 2.53 KB | None | 0 0
  1. --a local musicblock.
  2. --do /music ID
  3. --dec'd by blyat.
  4. local Game = game
  5. local Player = Game:GetService("Players").LocalPlayer
  6. local PlayerChar = Player.Character
  7. local Http = Game:GetService("HttpService")
  8. Game:GetService("Lighting").TimeOfDay = "0:00:00"
  9. local P = Instance.new("Part", workspace)
  10. P.Anchored = true
  11. P.Locked = true
  12. P.Transparency = 0.5
  13. P.Size = Vector3.new(2, 2, 2)
  14. P.CanCollide = false
  15. P.Material = Enum.Material.Neon
  16. P.Name = "DiscoPart"
  17. local Thing = P
  18. local Pon = Instance.new("PointLight", P)
  19. Pon.Range = 8
  20. Pon.Brightness = 1
  21. Game:GetService("RunService").RenderStepped:connect(function()
  22.  
  23.   Pon.Color = Color3.new(math.sin(x / (1.5 * a)) ^ 2, math.sin(x / (2 * a)) ^ 2, math.sin(x / (2.5 * a)) ^ 2)
  24.   x = x + 3
  25. end
  26. )
  27. p = P
  28. a = 16
  29. x = 0
  30. CreateText = function(Text)
  31.  
  32.   if P:FindFirstChild("BillboardGui") then
  33.     game.Debris:AddItem(P.BillboardGui, 0)
  34.   end
  35.   local Bill = Instance.new("BillboardGui", P)
  36.   Bill.Size = UDim2.new(0, 200, 0, 50)
  37.   Bill.Adornee = P
  38.   Bill.StudsOffset = Vector3.new(0, 0, 0)
  39.   local Tx = Instance.new("TextLabel", Bill)
  40.   Tx.Size = UDim2.new(0, 200, 0, 50)
  41.   Tx.BackgroundTransparency = 1
  42.   Tx.TextStrokeTransparency = 0.5
  43.   Tx.TextStrokeColor3 = Color3.new(0, 0, 0)
  44.   Tx.Font = Enum.Font.ArialBold
  45.   Tx.FontSize = Enum.FontSize.Size18
  46.   Tx.Text = Text
  47.   zx = Tx
  48.   xc = 16
  49.   cv = 0
  50.   Game:GetService("RunService").RenderStepped:connect(function()
  51.    
  52.     zx.TextColor3 = Color3.new(math.sin(cv / (1.5 * xc)) ^ 2, math.sin(cv / (2 * xc)) ^ 2, math.sin(cv / (2.5 * xc)) ^ 2)
  53.     cv = cv + 3
  54.   end
  55. )
  56. end
  57.  
  58. Game:GetService("RunService").RenderStepped:connect(function()
  59.  
  60.   p.BrickColor = BrickColor.new(math.sin(x / (1.5 * a)) ^ 2, math.sin(x / (2 * a)) ^ 2, math.sin(x / (2.5 * a)) ^ 2)
  61.   x = x + 3
  62. end
  63. )
  64. Player.Chatted:connect(function(Msg)
  65.  
  66.   if Msg:lower():sub(1, 7) == "/music " then
  67.     if P:FindFirstChild("Sound") then
  68.       game.Debris:AddItem(P.Sound, 0)
  69.     end
  70.     local S = Instance.new("Sound", P)
  71.     S.SoundId = "https://www.roblox.com/asset/?id=" .. Msg:sub(8, #Msg)
  72.     S.Looped = true
  73.     S.Volume = 10
  74.     S.Pitch = 1
  75.     S:Play()
  76.     local Asset = game:GetService("MarketplaceService"):GetProductInfo(Msg:sub(8))
  77.     CreateText("[ Now Playing ]; " .. Asset.Name .. " [ " .. Msg:sub(8, #Msg) .. " ] [ MUSIC BLOX MADE BY BADLUKE1 ]")
  78.   end
  79. end
  80. )
  81. for i = 1, math.huge, 0.1 do
  82.   wait()
  83.   P.CFrame = CFrame.new(PlayerChar.Torso.Position) * CFrame.fromEulerAnglesXYZ(math.sin(i), math.sin(i), math.sin(i)) + Vector3.new(0, 0, -6)
  84. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement