SHARE
TWEET

Untitled

Hellotop2 Mar 24th, 2019 66 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -- Objects
  2.  
  3. local leakaudio = Instance.new("ScreenGui")
  4. local background = Instance.new("Frame")
  5. local title = Instance.new("TextLabel")
  6. local radioouthelp = Instance.new("TextLabel")
  7. local helpatend = Instance.new("TextLabel")
  8. local button = Instance.new("TextButton")
  9. local namebox = Instance.new("TextBox")
  10. local radioouthelp_2 = Instance.new("TextLabel")
  11.  
  12. -- Properties
  13.  
  14. leakaudio.Name = "leakaudio"
  15. leakaudio.Parent = game.CoreGui
  16. leakaudio.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  17.  
  18. background.Name = "background"
  19. background.Parent = leakaudio
  20. background.BackgroundColor3 = Color3.new(1, 1, 1)
  21. background.BorderColor3 = Color3.new(0.819608, 0.819608, 0.819608)
  22. background.BorderSizePixel = 2
  23. background.Position = UDim2.new(0.5, -228, 0.5, -123)
  24. background.Size = UDim2.new(0, 457, 0, 246)
  25.  
  26. title.Name = "title"
  27. title.Parent = background
  28. title.BackgroundColor3 = Color3.new(1, 1, 1)
  29. title.BackgroundTransparency = 1
  30. title.Position = UDim2.new(0, 0, -0.0040650405, 0)
  31. title.Size = UDim2.new(0, 457, 0, 49)
  32. title.Font = Enum.Font.SourceSansLight
  33. title.Text = "Leak Radio ID Gui"
  34. title.TextColor3 = Color3.new(0, 0, 0)
  35. title.TextScaled = true
  36. title.TextSize = 14
  37. title.TextWrapped = true
  38.  
  39. radioouthelp.Name = "radioouthelp"
  40. radioouthelp.Parent = background
  41. radioouthelp.BackgroundColor3 = Color3.new(1, 1, 1)
  42. radioouthelp.BackgroundTransparency = 1
  43. radioouthelp.Position = UDim2.new(-0.00218818383, 0, 0.227642283, 0)
  44. radioouthelp.Size = UDim2.new(0, 457, 0, 17)
  45. radioouthelp.Font = Enum.Font.SourceSansLight
  46. radioouthelp.Text = "To leak a audio please make sure the person you entered has the radio out."
  47. radioouthelp.TextColor3 = Color3.new(0, 0, 0)
  48. radioouthelp.TextScaled = true
  49. radioouthelp.TextSize = 14
  50. radioouthelp.TextWrapped = true
  51.  
  52. helpatend.Name = "helpatend"
  53. helpatend.Parent = background
  54. helpatend.BackgroundColor3 = Color3.new(1, 1, 1)
  55. helpatend.BackgroundTransparency = 1
  56. helpatend.Position = UDim2.new(0, 0, 0.321138233, 0)
  57. helpatend.Size = UDim2.new(0, 457, 0, 17)
  58. helpatend.Font = Enum.Font.SourceSansLight
  59. helpatend.Text = "Once leaked a audio, the numbers at the end of the link you got is the sound id."
  60. helpatend.TextColor3 = Color3.new(0, 0, 0)
  61. helpatend.TextScaled = true
  62. helpatend.TextSize = 14
  63. helpatend.TextWrapped = true
  64.  
  65. button.Name = "button"
  66. button.Parent = background
  67. button.BackgroundColor3 = Color3.new(1, 1, 1)
  68. button.BorderColor3 = Color3.new(0.819608, 0.819608, 0.819608)
  69. button.BorderSizePixel = 2
  70. button.Position = UDim2.new(0.280087531, 0, 0.821138203, 0)
  71. button.Size = UDim2.new(0, 200, 0, 31)
  72. button.Font = Enum.Font.SourceSansLight
  73. button.Text = "leak"
  74. button.TextColor3 = Color3.new(0, 0, 0)
  75. button.TextScaled = true
  76. button.TextSize = 14
  77. button.TextWrapped = true
  78.  
  79. namebox.Name = "namebox"
  80. namebox.Parent = background
  81. namebox.BackgroundColor3 = Color3.new(1, 1, 1)
  82. namebox.BorderColor3 = Color3.new(0.819608, 0.819608, 0.819608)
  83. namebox.BorderSizePixel = 2
  84. namebox.Position = UDim2.new(0, 0, 0.524390221, 0)
  85. namebox.Size = UDim2.new(0, 457, 0, 50)
  86. namebox.Font = Enum.Font.SourceSansLight
  87. namebox.PlaceholderText = "enter players name"
  88. namebox.Text = "enter players name"
  89. namebox.TextColor3 = Color3.new(0, 0, 0)
  90. namebox.TextScaled = true
  91. namebox.TextSize = 14
  92. namebox.TextWrapped = true
  93. namebox.TextXAlignment = Enum.TextXAlignment.Left
  94.  
  95. radioouthelp_2.Name = "radioouthelp"
  96. radioouthelp_2.Parent = background
  97. radioouthelp_2.BackgroundColor3 = Color3.new(1, 1, 1)
  98. radioouthelp_2.BackgroundTransparency = 1
  99. radioouthelp_2.Position = UDim2.new(0.881838083, 0, 0.930894315, 0)
  100. radioouthelp_2.Size = UDim2.new(0, 54, 0, 17)
  101. radioouthelp_2.Font = Enum.Font.SourceSansLight
  102. radioouthelp_2.Text = "3vpl"
  103. radioouthelp_2.TextColor3 = Color3.new(0.819608, 0.819608, 0.819608)
  104. radioouthelp_2.TextScaled = true
  105. radioouthelp_2.TextSize = 14
  106. radioouthelp_2.TextWrapped = true
  107.  
  108. local function leak(plr)
  109.     local player
  110.     player=plr;for i,v in pairs(workspace:GetChildren())do
  111.         if v.Name==plr then
  112.             for i,x in pairs(v:GetChildren())do
  113.                 if x:IsA"Tool"then
  114.                     for i,v in pairs(x:GetChildren())do
  115.                         if v.Name=="Handle"then
  116.                             for i,v in pairs(v:GetChildren())do
  117.                                 if v.Name=="Sound"and v:IsA"Sound"then
  118.                                     namebox.Text=v.SoundId
  119.                                 end
  120.                             end
  121.                         end
  122.                     end
  123.                 end
  124.             end
  125.         end
  126.     end
  127. end
  128. local players
  129. function FindPlayerFromCurrentText(str)
  130.     players=game.Players;for _,v in pairs(players:GetPlayers())do
  131.         if string.sub(v.Name,1,#str)==str then
  132.             return v
  133.         end
  134.     end
  135.     return nil
  136. end
  137.  
  138. button.MouseButton1Click:connect(function()
  139.     leak(namebox.Text)
  140. end)
  141. namebox.FocusLost:connect(function()
  142.     namebox.Text=FindPlayerFromCurrentText(namebox.Text).Name
  143. end)
  144. local UserInputService,gui,dragging,dragInput,dragStart,startPos=game:GetService("UserInputService"),background
  145.  
  146. local function update(input)
  147.     local delta = input.Position - dragStart
  148.     gui.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
  149. end
  150.  
  151. gui.InputBegan:Connect(function(input)
  152.     if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
  153.         dragging = true
  154.         dragStart = input.Position
  155.         startPos = gui.Position
  156.      
  157.         input.Changed:Connect(function()
  158.             if input.UserInputState == Enum.UserInputState.End then
  159.                 dragging = false
  160.             end
  161.         end)
  162.     end
  163. end)
  164.  
  165. gui.InputChanged:Connect(function(input)
  166.     if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
  167.         dragInput = input
  168.     end
  169. end)
  170.  
  171. UserInputService.InputChanged:Connect(function(input)
  172.     if input == dragInput and dragging then
  173.         update(input)
  174.     end
  175. end)
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top