Advertisement
Hellotop2

Untitled

Mar 24th, 2019
186
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.79 KB | None | 0 0
  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)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement