Advertisement
Chronostasis

Old server finder

Nov 13th, 2022
820
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.96 KB | None | 0 0
  1. repeat wait() until game:IsLoaded()
  2.  
  3.  
  4. while true do wait(0.1)
  5. if game.Players.LocalPlayer.PlayerGui.ver.ver.Text == "v.246" or game.Players.LocalPlayer.PlayerGui.ver.ver.Text == "v.239" then
  6. local PlaceID = game.PlaceId
  7. local AllIDs = {}
  8. local foundAnything = ""
  9. local actualHour = os.date("!*t").hour
  10. local Deleted = false
  11. local File = pcall(function()
  12. AllIDs = game:GetService('HttpService'):JSONDecode(readfile("NotSameServers.json"))
  13. end)
  14. if not File then
  15. table.insert(AllIDs, actualHour)
  16. writefile("NotSameServers.json", game:GetService('HttpService'):JSONEncode(AllIDs))
  17. end
  18. function TPReturner()
  19. local Site;
  20. if foundAnything == "" then
  21. Site = game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/' .. PlaceID .. '/servers/Public?sortOrder=Asc&limit=100'))
  22. else
  23. Site = game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/' .. PlaceID .. '/servers/Public?sortOrder=Asc&limit=100&cursor=' .. foundAnything))
  24. end
  25. local ID = ""
  26. if Site.nextPageCursor and Site.nextPageCursor ~= "null" and Site.nextPageCursor ~= nil then
  27. foundAnything = Site.nextPageCursor
  28. end
  29. local num = 0;
  30. for i,v in pairs(Site.data) do
  31. local Possible = true
  32. ID = tostring(v.id)
  33. if tonumber(v.maxPlayers) > tonumber(v.playing) then
  34. for _,Existing in pairs(AllIDs) do
  35. if num ~= 0 then
  36. if ID == tostring(Existing) then
  37. Possible = false
  38. end
  39. else
  40. if tonumber(actualHour) ~= tonumber(Existing) then
  41. local delFile = pcall(function()
  42. delfile("NotSameServers.json")
  43. AllIDs = {}
  44. table.insert(AllIDs, actualHour)
  45. end)
  46. end
  47. end
  48. num = num + 1
  49. end
  50. if Possible == true then
  51. table.insert(AllIDs, ID)
  52. wait()
  53. pcall(function()
  54. writefile("NotSameServers.json", game:GetService('HttpService'):JSONEncode(AllIDs))
  55. wait()
  56. game:GetService("TeleportService"):TeleportToPlaceInstance(PlaceID, ID, game.Players.LocalPlayer)
  57. end)
  58. wait(4)
  59. end
  60. end
  61. end
  62. end
  63.  
  64. function Teleport()
  65. while wait() do
  66. pcall(function()
  67. TPReturner()
  68. if foundAnything ~= "" then
  69. TPReturner()
  70. end
  71. end)
  72. end
  73. end
  74. Teleport()
  75. else
  76. --yourhere
  77. -- heres a script: loadstring(game:HttpGet("https://raw.githubusercontent.com/ItachiPvPUchiha/CuHub/main/projectslayers.lua"))()
  78. end
  79. end
  80.  
  81.  
  82. --Credits to my self I make everything my self except for the instakill gui
  83. BurntOut#9751
  84. https://discord.gg/bE2GQgpKQu
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement