bbaaccuuaa

Untitled

Feb 13th, 2019
1,361
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.78 KB | None | 0 0
  1. Draggable = false -- True = Draggable | False = Not draggable
  2.  
  3. game:GetService("StarterGui"):SetCore("SendNotification", {
  4. Title = "Music Player Loaded";
  5. Text = "Note: Only you can locally hear the music";
  6. Icon = "rbxassetid://936721732";
  7. Duration = math.random(4,6);
  8. Button1 = "Okay"
  9. })
  10.  
  11. -- Objects
  12.  
  13. local ScreenGui = Instance.new("ScreenGui")
  14. local Frame = Instance.new("Frame")
  15. local PlaySubmit = Instance.new("TextButton")
  16. local AudioID = Instance.new("TextBox")
  17. local MusicPlayer = Instance.new("TextLabel")
  18. local StopSubmit = Instance.new("TextButton")
  19. local PitchSubmit = Instance.new("TextButton")
  20. local Pitch = Instance.new("TextLabel")
  21. local DistortSubmit = Instance.new("TextButton")
  22. local Distort = Instance.new("TextLabel")
  23. local PitchValue = Instance.new("TextBox")
  24. local DistortionValue = Instance.new("TextBox")
  25. local Speed = Instance.new("TextLabel")
  26. local SpeedValue = Instance.new("TextBox")
  27. local SpeedSubmit = Instance.new("TextButton")
  28. local ResetPitchSpeedDistortion = Instance.new("TextButton")
  29. local MusicPlayer_2 = Instance.new("TextLabel")
  30. local False = Instance.new("TextButton")
  31. local True = Instance.new("TextButton")
  32.  
  33. -- Properties
  34.  
  35. ScreenGui.Parent = game.CoreGui
  36.  
  37. Frame.Parent = ScreenGui
  38. Frame.BackgroundColor3 = Color3.new(0.105882, 0.164706, 0.207843)
  39. Frame.Position = UDim2.new(0.00910931174, 0, 0.578864336, 0)
  40. Frame.Size = UDim2.new(0, 182, 0, 249)
  41. Frame.Active = Draggable
  42. Frame.Draggable = Draggable
  43.  
  44. PlaySubmit.Name = "PlaySubmit"
  45. PlaySubmit.Parent = Frame
  46. PlaySubmit.BackgroundColor3 = Color3.new(0, 1, 0.0666667)
  47. PlaySubmit.Position = UDim2.new(0.0405219793, 0, 0.333471209, 0)
  48. PlaySubmit.Size = UDim2.new(0, 75, 0, 26)
  49. PlaySubmit.Font = Enum.Font.ArialBold
  50. PlaySubmit.Text = "Play"
  51. PlaySubmit.TextColor3 = Color3.new(0, 0, 0)
  52. PlaySubmit.TextScaled = true
  53. PlaySubmit.TextSize = 14
  54. PlaySubmit.TextWrapped = true
  55.  
  56. AudioID.Name = "AudioID"
  57. AudioID.Parent = Frame
  58. AudioID.BackgroundColor3 = Color3.new(1, 1, 1)
  59. AudioID.Position = UDim2.new(0.106456041, 0, 0.20366402, 0)
  60. AudioID.Size = UDim2.new(0, 142, 0, 22)
  61. AudioID.Font = Enum.Font.ArialBold
  62. AudioID.Text = "Audio ID"
  63. AudioID.TextColor3 = Color3.new(0, 0, 0)
  64. AudioID.TextScaled = true
  65. AudioID.TextSize = 14
  66. AudioID.TextWrapped = true
  67.  
  68. MusicPlayer.Name = "Music Player"
  69. MusicPlayer.Parent = Frame
  70. MusicPlayer.BackgroundColor3 = Color3.new(1, 1, 1)
  71. MusicPlayer.Size = UDim2.new(0, 182, 0, 36)
  72. MusicPlayer.Font = Enum.Font.ArialBold
  73. MusicPlayer.Text = "Music Player"
  74. MusicPlayer.TextColor3 = Color3.new(0, 0, 0)
  75. MusicPlayer.TextScaled = true
  76. MusicPlayer.TextSize = 14
  77. MusicPlayer.TextWrapped = true
  78.  
  79. StopSubmit.Name = "StopSubmit"
  80. StopSubmit.Parent = Frame
  81. StopSubmit.BackgroundColor3 = Color3.new(1, 0, 0)
  82. StopSubmit.Position = UDim2.new(0.541560769, 0, 0.333471209, 0)
  83. StopSubmit.Size = UDim2.new(0, 74, 0, 26)
  84. StopSubmit.Font = Enum.Font.ArialBold
  85. StopSubmit.Text = "Stop"
  86. StopSubmit.TextColor3 = Color3.new(0, 0, 0)
  87. StopSubmit.TextScaled = true
  88. StopSubmit.TextSize = 14
  89. StopSubmit.TextWrapped = true
  90.  
  91. PitchSubmit.Name = "PitchSubmit"
  92. PitchSubmit.Parent = Frame
  93. PitchSubmit.BackgroundColor3 = Color3.new(0, 1, 0.0666667)
  94. PitchSubmit.Position = UDim2.new(0.0405219793, 0, 0.788832068, 0)
  95. PitchSubmit.Size = UDim2.new(0, 45, 0, 18)
  96. PitchSubmit.Font = Enum.Font.ArialBold
  97. PitchSubmit.Text = "Submit"
  98. PitchSubmit.TextColor3 = Color3.new(0, 0, 0)
  99. PitchSubmit.TextScaled = true
  100. PitchSubmit.TextSize = 14
  101. PitchSubmit.TextWrapped = true
  102.  
  103. Pitch.Name = "Pitch"
  104. Pitch.Parent = Frame
  105. Pitch.BackgroundColor3 = Color3.new(1, 1, 1)
  106. Pitch.Position = UDim2.new(0.0405219793, 0, 0.562249005, 0)
  107. Pitch.Size = UDim2.new(0, 45, 0, 21)
  108. Pitch.Font = Enum.Font.ArialBold
  109. Pitch.Text = "Pitch"
  110. Pitch.TextColor3 = Color3.new(0, 0, 0)
  111. Pitch.TextScaled = true
  112. Pitch.TextSize = 14
  113. Pitch.TextWrapped = true
  114.  
  115. DistortSubmit.Name = "DistortSubmit"
  116. DistortSubmit.Parent = Frame
  117. DistortSubmit.BackgroundColor3 = Color3.new(0, 1, 0.0666667)
  118. DistortSubmit.Position = UDim2.new(0.695406854, 0, 0.788832068, 0)
  119. DistortSubmit.Size = UDim2.new(0, 45, 0, 18)
  120. DistortSubmit.Font = Enum.Font.ArialBold
  121. DistortSubmit.Text = "Submit"
  122. DistortSubmit.TextColor3 = Color3.new(0, 0, 0)
  123. DistortSubmit.TextScaled = true
  124. DistortSubmit.TextSize = 14
  125. DistortSubmit.TextWrapped = true
  126.  
  127. Distort.Name = "Distort"
  128. Distort.Parent = Frame
  129. Distort.BackgroundColor3 = Color3.new(1, 1, 1)
  130. Distort.Position = UDim2.new(0.700901389, 0, 0.562249005, 0)
  131. Distort.Size = UDim2.new(0, 45, 0, 21)
  132. Distort.Font = Enum.Font.ArialBold
  133. Distort.Text = "Distort"
  134. Distort.TextColor3 = Color3.new(0, 0, 0)
  135. Distort.TextScaled = true
  136. Distort.TextSize = 14
  137. Distort.TextWrapped = true
  138.  
  139. PitchValue.Name = "PitchValue"
  140. PitchValue.Parent = Frame
  141. PitchValue.BackgroundColor3 = Color3.new(1, 1, 1)
  142. PitchValue.Position = UDim2.new(0.0405219793, 0, 0.681575656, 0)
  143. PitchValue.Size = UDim2.new(0, 45, 0, 16)
  144. PitchValue.Font = Enum.Font.ArialBold
  145. PitchValue.Text = "1"
  146. PitchValue.TextColor3 = Color3.new(0, 0, 0)
  147. PitchValue.TextScaled = true
  148. PitchValue.TextSize = 14
  149. PitchValue.TextWrapped = true
  150.  
  151. DistortionValue.Name = "DistortValue"
  152. DistortionValue.Parent = Frame
  153. DistortionValue.BackgroundColor3 = Color3.new(1, 1, 1)
  154. DistortionValue.Position = UDim2.new(0.700901389, 0, 0.681575656, 0)
  155. DistortionValue.Size = UDim2.new(0, 45, 0, 16)
  156. DistortionValue.Font = Enum.Font.ArialBold
  157. DistortionValue.Text = "0"
  158. DistortionValue.TextColor3 = Color3.new(0, 0, 0)
  159. DistortionValue.TextScaled = true
  160. DistortionValue.TextSize = 14
  161. DistortionValue.TextWrapped = true
  162.  
  163. Speed.Name = "Speed"
  164. Speed.Parent = Frame
  165. Speed.BackgroundColor3 = Color3.new(1, 1, 1)
  166. Speed.Position = UDim2.new(0.370192319, 0, 0.562249005, 0)
  167. Speed.Size = UDim2.new(0, 45, 0, 21)
  168. Speed.Font = Enum.Font.ArialBold
  169. Speed.Text = "Speed"
  170. Speed.TextColor3 = Color3.new(0, 0, 0)
  171. Speed.TextScaled = true
  172. Speed.TextSize = 14
  173. Speed.TextWrapped = true
  174.  
  175. SpeedValue.Name = "SpeedValue"
  176. SpeedValue.Parent = Frame
  177. SpeedValue.BackgroundColor3 = Color3.new(1, 1, 1)
  178. SpeedValue.Position = UDim2.new(0.370192319, 0, 0.681575656, 0)
  179. SpeedValue.Size = UDim2.new(0, 45, 0, 16)
  180. SpeedValue.Font = Enum.Font.ArialBold
  181. SpeedValue.Text = "1"
  182. SpeedValue.TextColor3 = Color3.new(0, 0, 0)
  183. SpeedValue.TextScaled = true
  184. SpeedValue.TextSize = 14
  185. SpeedValue.TextWrapped = true
  186.  
  187. SpeedSubmit.Name = "SpeedSubmit"
  188. SpeedSubmit.Parent = Frame
  189. SpeedSubmit.BackgroundColor3 = Color3.new(0, 1, 0.0666667)
  190. SpeedSubmit.Position = UDim2.new(0.370192319, 0, 0.788832068, 0)
  191. SpeedSubmit.Size = UDim2.new(0, 45, 0, 18)
  192. SpeedSubmit.Font = Enum.Font.ArialBold
  193. SpeedSubmit.Text = "Submit"
  194. SpeedSubmit.TextColor3 = Color3.new(0, 0, 0)
  195. SpeedSubmit.TextScaled = true
  196. SpeedSubmit.TextSize = 14
  197. SpeedSubmit.TextWrapped = true
  198.  
  199. ResetPitchSpeedDistortion.Name = "Reset Pitch/Speed/Distortion"
  200. ResetPitchSpeedDistortion.Parent = Frame
  201. ResetPitchSpeedDistortion.BackgroundColor3 = Color3.new(0, 1, 0.968628)
  202. ResetPitchSpeedDistortion.Position = UDim2.new(0.0405219793, 0, 0.909313977, 0)
  203. ResetPitchSpeedDistortion.Size = UDim2.new(0, 165, 0, 16)
  204. ResetPitchSpeedDistortion.Font = Enum.Font.ArialBold
  205. ResetPitchSpeedDistortion.Text = "Reset Pitch/Speed/Distortion"
  206. ResetPitchSpeedDistortion.TextColor3 = Color3.new(0, 0, 0)
  207. ResetPitchSpeedDistortion.TextScaled = true
  208. ResetPitchSpeedDistortion.TextSize = 14
  209. ResetPitchSpeedDistortion.TextWrapped = true
  210.  
  211. MusicPlayer_2.Name = "Music Player"
  212. MusicPlayer_2.Parent = Frame
  213. MusicPlayer_2.BackgroundColor3 = Color3.new(1, 1, 1)
  214. MusicPlayer_2.Position = UDim2.new(0.0384615399, 0, 0.461847395, 0)
  215. MusicPlayer_2.Size = UDim2.new(0, 45, 0, 18)
  216. MusicPlayer_2.Font = Enum.Font.ArialBold
  217. MusicPlayer_2.Text = "Loop"
  218. MusicPlayer_2.TextColor3 = Color3.new(0, 0, 0)
  219. MusicPlayer_2.TextScaled = true
  220. MusicPlayer_2.TextSize = 14
  221. MusicPlayer_2.TextWrapped = true
  222.  
  223. False.Name = "False"
  224. False.Parent = Frame
  225. False.BackgroundColor3 = Color3.new(1, 0, 0)
  226. False.Position = UDim2.new(0.700901449, 0, 0.461847395, 0)
  227. False.Size = UDim2.new(0, 45, 0, 18)
  228. False.Font = Enum.Font.ArialBold
  229. False.Text = "False"
  230. False.TextColor3 = Color3.new(0, 0, 0)
  231. False.TextScaled = true
  232. False.TextSize = 14
  233. False.TextWrapped = true
  234.  
  235. True.Name = "True"
  236. True.Parent = Frame
  237. True.BackgroundColor3 = Color3.new(0, 1, 0.0666667)
  238. True.Position = UDim2.new(0.370192319, 0, 0.461847395, 0)
  239. True.Size = UDim2.new(0, 45, 0, 18)
  240. True.Font = Enum.Font.ArialBold
  241. True.Text = "True"
  242. True.TextColor3 = Color3.new(0, 0, 0)
  243. True.TextScaled = true
  244. True.TextSize = 14
  245. True.TextWrapped = true
  246.  
  247. PlaySubmit.MouseButton1Click:connect(function()
  248. local ClientSound = Instance.new("Sound")
  249. ClientSound.SoundId = "http://www.roblox.com/asset/?id="..AudioID.Text
  250. ClientSound.Volume = .5
  251. ClientSound.Parent = workspace
  252. ClientSound.PlaybackSpeed = 1
  253. ClientSound:Play()
  254. wait()
  255. ClientSound.Name = "Music_Player"
  256. end)
  257.  
  258. StopSubmit.MouseButton1Click:connect(function()
  259. for i=1,25 do
  260. workspace["Music_Player"]:Remove()
  261. wait()
  262. end
  263. end)
  264.  
  265. PitchSubmit.MouseButton1Click:connect(function()
  266. local PitchShift = Instance.new("PitchShiftSoundEffect", workspace["Music_Player"])
  267. PitchShift.Octave = PitchValue.Text
  268. end)
  269.  
  270. DistortSubmit.MouseButton1Click:connect(function()
  271. local DistortionLevel = Instance.new("DistortionSoundEffect", workspace["Music_Player"])
  272. DistortionLevel.Level = DistortionValue.Text
  273. end)
  274.  
  275. SpeedSubmit.MouseButton1Click:connect(function()
  276. workspace["Music_Player"].PlaybackSpeed = SpeedValue.Text
  277. end)
  278.  
  279. True.MouseButton1Click:connect(function()
  280. workspace["Music_Player"].Looped = true
  281. end)
  282.  
  283. False.MouseButton1Click:connect(function()
  284. workspace["Music_Player"].Looped = false
  285. end)
  286.  
  287. ResetPitchSpeedDistortion.MouseButton1Click:connect(function()
  288. workspace["Music_Player"].PlaybackSpeed = 1
  289. wait()
  290. workspace["Music_Player"].PitchShiftSoundEffect:Remove()
  291. wait()
  292. workspace["Music_Player"].DistortionSoundEffect:Remove()
  293. end)
Add Comment
Please, Sign In to add comment