Basykung7845

Test

Feb 27th, 2019
58
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.  
  2.  
  3. local Player = owner
  4. local c = Player.Character
  5. if not c or not c.Parent then
  6. c = Player.CharacterAdded:wait()
  7. end
  8.  
  9. wait(1)
  10.  
  11. local radio = Instance.new("Part",c)
  12. radio.Name = "Radio"
  13. radio.CanCollide = false
  14. radio.Anchored = true
  15. radio.FormFactor = "Custom"
  16. radio.Size = Vector3.new(3.2, 1.43, 0.8)
  17. radio.CFrame = c.Torso.CFrame * CFrame.new(0,0,.8)
  18. radio.CFrame = radio.CFrame * CFrame.fromEulerAnglesXYZ(0,3.15,0)
  19. radio.CFrame = radio.CFrame * CFrame.fromEulerAnglesXYZ(0,0,-.7)
  20.  
  21. local mesh = Instance.new("SpecialMesh",radio)
  22. mesh.MeshId = "http://www.roblox.com/asset/?id=151760030"
  23. mesh.TextureId = "https://www.roblox.com/Sweg-item?id=156708131"
  24.  
  25. local weld = Instance.new("Weld",radio)
  26. weld.Part0 = c.Torso
  27. weld.Part1 = radio
  28. weld.C0 = c.Torso.CFrame:inverse()
  29. weld.C1 = radio.CFrame:inverse()
  30. radio.Anchored = false
  31.  
  32. local sound = Instance.new("Sound",radio)
  33. sound.Name = "Music"
  34. sound.Looped = true
  35. sound.Volume = 1
  36.  
  37. local gui = Instance.new("ScreenGui",Player.PlayerGui)
  38.  
  39. local frame = Instance.new("Frame",gui)
  40. frame.BackgroundColor3 = Color3.new(58/255,58/255,58/255)
  41. frame.BorderColor3 = Color3.new(0,0,0)
  42. frame.BorderSizePixel = 2
  43. frame.Size = UDim2.new(0,300,0,200)
  44. frame.Position = UDim2.new(0,20,.5,-100)
  45.  
  46. local playb = Instance.new("TextButton",frame)
  47. playb.BackgroundColor3 = Color3.new(0,85/255,0)
  48. playb.BorderColor3 = Color3.new(0,0,0)
  49. playb.BorderSizePixel = 2
  50. playb.Size = UDim2.new(.3,0,.2,0)
  51. playb.Position = UDim2.new(.1,0,.7,0)
  52. playb.Text = "Play"
  53. playb.TextColor3 = Color3.new(255,255,255)
  54. playb.TextScaled = true
  55.  
  56. local stopb = Instance.new("TextButton",frame)
  57. stopb.BackgroundColor3 = Color3.new(170/255,0,0)
  58. stopb.BorderColor3 = Color3.new(0,0,0)
  59. stopb.BorderSizePixel = 2
  60. stopb.Size = UDim2.new(.3,0,.2,0)
  61. stopb.Position = UDim2.new(.6,0,.7,0)
  62. stopb.Text = "Stop"
  63. stopb.TextColor3 = Color3.new(255,255,255)
  64. stopb.TextScaled = true
  65.  
  66. local stipb = Instance.new("TextBox",frame)
  67. stipb.BackgroundColor3 = Color3.new(0,0,127/255)
  68. stipb.BorderColor3 = Color3.new(0,0,0)
  69. stipb.BorderSizePixel = 2
  70. stipb:TweenSize(UDim2.new(.5,0,.25,0),"Out","Quad",1,true)
  71. stipb.Position = UDim2.new(.25,0,.3,0)
  72. stipb.Text = "SoundId"
  73. stipb.TextColor3 = Color3.new(255,255,255)
  74. stipb.TextScaled = true
  75.  
  76. local label = Instance.new("TextLabel",frame)
  77. label.Text = "Made By naser2018!"
  78. label.TextScaled = true
  79. label:TweenSize(UDim2.new(1,0,.2,0))
  80. label.TextColor3 = Color3.new(255,255,255)
  81. label.BackgroundTransparency = 1
  82. --stipb.Size = UDim2.new(1,0,.2,0)
  83.  
  84. local Playing = false
  85.  
  86. stipb.Changed:connect(function()
  87. sound.SoundId = "rbxassetid://" .. stipb.Text
  88. end)
  89.  
  90. playb.MouseButton1Click:connect(function()
  91. sound:Play()
  92. Playing = true
  93. end)
  94.  
  95. stopb.MouseButton1Click:connect(function()
  96. sound:Stop()
  97. Playing = false
  98. end)
  99.  
  100. while true do
  101. if Playing then
  102. mesh.Scale = Vector3.new(1.1,1.1,1.1)
  103. wait(.2)
  104. mesh.Scale = Vector3.new(1,1,1)
  105. end
  106. wait(.2)
  107. end
RAW Paste Data