Advertisement
ScriptingFluff

SynX Stream Sniper

Apr 19th, 2020
4,409
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 5.73 KB | None | 0 0
  1. local fake = function() return 'asd' end
  2. if not is_synapse_function(fake) then while true do end end
  3.  
  4. local StreamSnipe = Instance.new("ScreenGui")
  5. local Frame = Instance.new("Frame")
  6. local TextLabel = Instance.new("TextLabel")
  7. local TextLabel_2 = Instance.new("TextLabel")
  8. local UsernameBox = Instance.new("TextBox")
  9. local TextLabel_3 = Instance.new("TextLabel")
  10. local PlaceIdBox = Instance.new("TextBox")
  11. local StartButton = Instance.new("TextButton")
  12. local HttpService = game:GetService("HttpService")
  13.  
  14. StreamSnipe.Name = HttpService:GenerateGUID(false)
  15. StreamSnipe.Parent = game:GetService("CoreGui")
  16.  
  17. Frame.Parent = StreamSnipe
  18. Frame.Active = true
  19. Frame.BackgroundColor3 = Color3.new(0.121569, 0.121569, 0.121569)
  20. Frame.BorderColor3 = Color3.new(0.121569, 0.121569, 0.121569)
  21. Frame.Position = UDim2.new(0, 430, 0, 200)
  22. Frame.Size = UDim2.new(0, 400, 0, 260)
  23. Frame.Draggable = true
  24.  
  25. TextLabel.Parent = Frame
  26. TextLabel.Active = true
  27. TextLabel.BackgroundColor3 = Color3.new(1, 0.666667, 0)
  28. TextLabel.BorderColor3 = Color3.new(0.121569, 0.121569, 0.160784)
  29. TextLabel.Size = UDim2.new(0, 400, 0, 40)
  30. TextLabel.Font = Enum.Font.SourceSansLight
  31. TextLabel.Text = "Synapse X Stream Sniper"
  32. TextLabel.TextSize = 24
  33.  
  34. TextLabel_2.Parent = Frame
  35. TextLabel_2.Active = true
  36. TextLabel_2.BackgroundColor3 = Color3.new(0.121569, 0.121569, 0.121569)
  37. TextLabel_2.BorderColor3 = Color3.new(0.121569, 0.121569, 0.121569)
  38. TextLabel_2.Position = UDim2.new(0, 10, 0, 50)
  39. TextLabel_2.Size = UDim2.new(0, 380, 0, 20)
  40. TextLabel_2.Font = Enum.Font.SourceSansLight
  41. TextLabel_2.Text = "Username/UserId:"
  42. TextLabel_2.TextColor3 = Color3.new(1, 1, 1)
  43. TextLabel_2.TextSize = 16
  44.  
  45. UsernameBox.Name = "UsernameBox"
  46. UsernameBox.Parent = Frame
  47. UsernameBox.BackgroundColor3 = Color3.new(0.239216, 0.239216, 0.239216)
  48. UsernameBox.BorderColor3 = Color3.new(0.121569, 0.121569, 0.121569)
  49. UsernameBox.Position = UDim2.new(0, 10, 0, 80)
  50. UsernameBox.Size = UDim2.new(0, 380, 0, 40)
  51. UsernameBox.Font = Enum.Font.SourceSansLight
  52. UsernameBox.PlaceholderColor3 = Color3.new(1, 1, 1)
  53. UsernameBox.PlaceholderText = "Enter Username Here"
  54. UsernameBox.Text = ""
  55. UsernameBox.TextColor3 = Color3.new(1, 1, 1)
  56. UsernameBox.TextSize = 18
  57.  
  58. TextLabel_3.Parent = Frame
  59. TextLabel_3.Active = true
  60. TextLabel_3.BackgroundColor3 = Color3.new(0.121569, 0.121569, 0.121569)
  61. TextLabel_3.BorderColor3 = Color3.new(0.121569, 0.121569, 0.121569)
  62. TextLabel_3.Position = UDim2.new(0, 10, 0, 130)
  63. TextLabel_3.Size = UDim2.new(0, 380, 0, 20)
  64. TextLabel_3.Font = Enum.Font.SourceSansLight
  65. TextLabel_3.Text = "Place Id:"
  66. TextLabel_3.TextColor3 = Color3.new(1, 1, 1)
  67. TextLabel_3.TextSize = 16
  68.  
  69. PlaceIdBox.Name = "PlaceIdBox"
  70. PlaceIdBox.Parent = Frame
  71. PlaceIdBox.BackgroundColor3 = Color3.new(0.239216, 0.239216, 0.239216)
  72. PlaceIdBox.BorderColor3 = Color3.new(0.121569, 0.121569, 0.121569)
  73. PlaceIdBox.Position = UDim2.new(0, 10, 0, 160)
  74. PlaceIdBox.Size = UDim2.new(0, 380, 0, 40)
  75. PlaceIdBox.Font = Enum.Font.SourceSansLight
  76. PlaceIdBox.PlaceholderColor3 = Color3.new(1, 1, 1)
  77. PlaceIdBox.PlaceholderText = "Enter PlaceId Here"
  78. PlaceIdBox.Text = ""
  79. PlaceIdBox.TextColor3 = Color3.new(1, 1, 1)
  80. PlaceIdBox.TextSize = 18
  81.  
  82. StartButton.Name = "StartButton"
  83. StartButton.Parent = Frame
  84. StartButton.BackgroundColor3 = Color3.new(0.160784, 0.160784, 0.160784)
  85. StartButton.BorderColor3 = Color3.new(0.121569, 0.121569, 0.121569)
  86. StartButton.Position = UDim2.new(0, 10, 0, 210)
  87. StartButton.Size = UDim2.new(0, 380, 0, 40)
  88. StartButton.Font = Enum.Font.SourceSansLight
  89. StartButton.Text = "Start"
  90. StartButton.TextColor3 = Color3.new(1, 1, 1)
  91. StartButton.TextSize = 24
  92.  
  93. local Debounce = false
  94. local Kill = false
  95.  
  96. local function HttpGet(url)
  97.     return HttpService:JSONDecode(htgetf(url))
  98. end
  99.  
  100. local function Status(text, tout)
  101.     StartButton.Text = text
  102.     if tout then
  103.         spawn(function()
  104.             wait(tout)
  105.             StartButton.Text = "Start"
  106.         end)
  107.     end
  108. end
  109.  
  110. StartButton.MouseButton1Click:Connect(function()
  111.     if Debounce then
  112.         Kill = true
  113.         Debounce = false
  114.         return
  115.     end
  116.    
  117.     Debounce = true
  118.    
  119.     local PlaceId = PlaceIdBox.Text
  120.     Status("Stage 1...")
  121.    
  122.     local Suc, UserId = pcall(function()
  123.         if tonumber(UsernameBox.Text) then
  124.             return tonumber(UsernameBox.Text)
  125.         end
  126.        
  127.         return game:GetService("Players"):GetUserIdFromNameAsync(UsernameBox.Text)
  128.     end)
  129.    
  130.     if not Suc then
  131.         return Status("Username does not exist!", 3)
  132.     end
  133.    
  134.     Status("Stage 2..")
  135.    
  136.     local Thumbnail = HttpGet("https://www.roblox.com/headshot-thumbnail/json?userId=" .. UserId .. "&width=48&height=48").Url
  137.    
  138.     Status("Stage 3...")
  139.    
  140.     local Index = 0
  141.     while true do
  142.         local GameInstances = HttpGet("https://www.roblox.com/games/getgameinstancesjson?placeId=" .. PlaceId .. "&startindex=" .. Index)
  143.         for I,V in pairs(GameInstances.Collection) do
  144.             for I2,V2 in pairs(V.CurrentPlayers) do
  145.                 if V2.Id == UserId or V2.Thumbnail.Url == Thumbnail then
  146.                     Status("Complete!")
  147.                     game:GetService("TeleportService"):TeleportToPlaceInstance(tonumber(PlaceId), V.Guid)
  148.                     local FailCounter = 0
  149.                     game:GetService("Players").LocalPlayer.OnTeleport:Connect(function(State)
  150.                         if State == Enum.TeleportState.Failed then
  151.                             FailCounter = FailCounter + 1
  152.                             Status("Failed to teleport. (retry " .. tostring(FailCounter) .. ")")
  153.                             game:GetService("TeleportService"):TeleportToPlaceInstance(tonumber(PlaceId), V.Guid)
  154.                         end
  155.                     end)
  156.                     return
  157.                 end
  158.             end
  159.         end
  160.         Status("Stage 3 (" .. tostring(Index) .. "/" .. tostring(GameInstances.TotalCollectionSize) .. " servers scanned)...")
  161.         if Index > GameInstances.TotalCollectionSize then
  162.             return Status("Failed to get game! (VIP server?)", 3)
  163.         end
  164.         if Kill then
  165.             Kill = false
  166.             Debounce = false
  167.             Status("Cancelled.", 3)
  168.             return
  169.         end
  170.         Index = Index + 10
  171.     end
  172. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement