Roblox Scripts

Royale High Script | 3 DIFFERENT OP AUTOFARMS

by 14 January 2022

Created by BaconLord

Features:

  • Teleport FARM PUT IN AUTO EXECUTE NO BAN
print("made by baconlord")
if game.PlaceId == 1067560271 then
repeat wait() until game:IsLoaded() wait()
spawn(function()
while wait () do
   pcall(function()
game.Players.LocalPlayer.Character.Humanoid.Jump = true
end) end end)
wait(6)
spawn(function()
   while wait () do
pcall(function()
for i,v in pairs(game.Workspace.DIAMONDS:GetChildren()) do
if v.Name == "specialdiamond" or v.Name == "Pink Diamond" or v.Name == "Green Diamond" or V.Name == "Red Diamond" or V.Name == "Yellow Diamond" then
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(v.Position)
wait()
end end end) end end)
local PlaceID = game.PlaceId
local AllIDs = {}
local foundAnything = ""
local actualHour = os.date("!*t").hour
local Deleted = false
local File = pcall(function()
   AllIDs = game:GetService('HttpService'):JSONDecode(readfile("NotSameServers.json"))
end)
if not File then
   table.insert(AllIDs, actualHour)
   writefile("NotSameServers.json", game:GetService('HttpService'):JSONEncode(AllIDs))
end
function TPReturner()
   local Site;
   if foundAnything == "" then
       Site = game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/' .. PlaceID .. '/servers/Public?sortOrder=Asc&limit=100'))
   else
       Site = game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/' .. PlaceID .. '/servers/Public?sortOrder=Asc&limit=100&cursor=' .. foundAnything))
   end
   local ID = ""
   if Site.nextPageCursor and Site.nextPageCursor ~= "null" and Site.nextPageCursor ~= nil then
       foundAnything = Site.nextPageCursor
   end
   local num = 0;
   for i,v in pairs(Site.data) do
       local Possible = true
       ID = tostring(v.id)
       if tonumber(v.maxPlayers) > tonumber(v.playing) then
           for _,Existing in pairs(AllIDs) do
               if num ~= 0 then
                   if ID == tostring(Existing) then
                       Possible = false
                   end
               else
                   if tonumber(actualHour) ~= tonumber(Existing) then
                       local delFile = pcall(function()
                           delfile("NotSameServers.json")
                           AllIDs = {}
                           table.insert(AllIDs, actualHour)
                       end)
                   end
               end
               num = num + 1
           end
           if Possible == true then
               table.insert(AllIDs, ID)
               wait()
               pcall(function()
                   writefile("NotSameServers.json", game:GetService('HttpService'):JSONEncode(AllIDs))
                   wait()
                   game:GetService("TeleportService"):TeleportToPlaceInstance(PlaceID, ID, game.Players.LocalPlayer)
               end)
               wait(4)
           end
       end
   end
end

function Teleport()
   while wait() do
       pcall(function()
           TPReturner()
           if foundAnything ~= "" then
               TPReturner()
           end
       end)
       end end
wait(30)
Teleport()
else
   game:GetService("TeleportService"):Teleport(1067560271, LocalPlayer)
   end
   print("made by baconlord")
if game.PlaceId == 1067560271 then
repeat wait() until game:IsLoaded() wait()
spawn(function()
while wait() do
   pcall(function()
for _,v in pairs(game:GetService("Workspace").DIAMONDS:GetDescendants()) do
if v:IsA("TouchTransmitter") then
firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, v.Parent, 0)
end end end) end end)

local PlaceID = game.PlaceId
local AllIDs = {}
local foundAnything = ""
local actualHour = os.date("!*t").hour
local Deleted = false
local File = pcall(function()
   AllIDs = game:GetService('HttpService'):JSONDecode(readfile("NotSameServers.json"))
end)
if not File then
   table.insert(AllIDs, actualHour)
   writefile("NotSameServers.json", game:GetService('HttpService'):JSONEncode(AllIDs))
end
function TPReturner()
   local Site;
   if foundAnything == "" then
       Site = game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/' .. PlaceID .. '/servers/Public?sortOrder=Asc&limit=100'))
   else
       Site = game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/' .. PlaceID .. '/servers/Public?sortOrder=Asc&limit=100&cursor=' .. foundAnything))
   end
   local ID = ""
   if Site.nextPageCursor and Site.nextPageCursor ~= "null" and Site.nextPageCursor ~= nil then
       foundAnything = Site.nextPageCursor
   end
   local num = 0;
   for i,v in pairs(Site.data) do
       local Possible = true
       ID = tostring(v.id)
       if tonumber(v.maxPlayers) > tonumber(v.playing) then
           for _,Existing in pairs(AllIDs) do
               if num ~= 0 then
                   if ID == tostring(Existing) then
                       Possible = false
                   end
               else
                   if tonumber(actualHour) ~= tonumber(Existing) then
                       local delFile = pcall(function()
                           delfile("NotSameServers.json")
                           AllIDs = {}
                           table.insert(AllIDs, actualHour)
                       end)
                   end
               end
               num = num + 1
           end
           if Possible == true then
               table.insert(AllIDs, ID)
               wait()
               pcall(function()
                   writefile("NotSameServers.json", game:GetService('HttpService'):JSONEncode(AllIDs))
                   wait()
                   game:GetService("TeleportService"):TeleportToPlaceInstance(PlaceID, ID, game.Players.LocalPlayer)
               end)
               wait(4)
           end
       end
   end
end

function Teleport()
   while wait() do
       pcall(function()
           TPReturner()
           if foundAnything ~= "" then
               TPReturner()
           end
       end)
       end end
wait(16)
Teleport()
else
   game:GetService("TeleportService"):Teleport(1067560271, LocalPlayer)
   end
  • TELEPORT DIAMOND TO YOU AUTOFARM A TRADE BAN RISK STAY IN ONE SERVER NO NEED TO PUT INTO AUTOEXEC
if game.PlaceId == 1067560271 then
spawn(function()
   while wait () do
game.Players.LocalPlayer.Character:WaitForChild("Humanoid"):ChangeState(11)
end end)
wait(1)
local _speed=3000
function tp(...)
  local plr=game.Players.LocalPlayer
  local args={...}
  if typeof(args[1])=="number"and args[2]and args[3]then
     args=Vector3.new(args[1],args[2],args[3])
  elseif typeof(args[1])=="Vector3" then
      args=args[1]    
  elseif typeof(args[1])=="CFrame" then
      args=args[1].Position
  end
  local dist=(plr.Character.HumanoidRootPart.Position-args).Magnitude
  game:GetService("TweenService"):Create(
      plr.Character.HumanoidRootPart,
      TweenInfo.new(dist/_speed,Enum.EasingStyle.Linear),
      {CFrame=CFrame.new(args)}
  ):Play()
end

tp(-638.353638, -58.3049469, 757.653931, -0.709312856, -2.77422252e-11, 0.704893827, 6.66586893e-15, 1, 3.93633112e-11, -0.704893827, 2.79256011e-11, -0.709312856)
wait(0.5)
local baseplate = Instance.new("Part")
baseplate.Parent = workspace
baseplate.Size = Vector3.new(80,1,80)
baseplate.Anchored = true
baseplate.Name = "Baseplate"
baseplate.Position = game.Players.LocalPlayer.Character.HumanoidRootPart.Position + Vector3.new(0,-2,0)
wait(1.5)
game:GetService("RunService").RenderStepped:Connect(function()
for i,v in pairs(game.Workspace.DIAMONDS:GetChildren()) do
  if v.Name == "specialdiamond" or v.Name == "Pink Diamond" or v.Name == "Green Diamond" or V.Name == "Red Diamond" then
      v.Position = game.Players.LocalPlayer.Character.HumanoidRootPart.Position
      wait(1)
  end end end)
  
  while wait () do
 game:GetService("Players").LocalPlayer.PlayerGui.CaptchaGui.Captcha.Top.Visible = false
game:GetService("Players").LocalPlayer.PlayerGui.CaptchaGui.Award.Visible = false
for i,v in pairs(game:GetService("Players").LocalPlayer.PlayerGui.CaptchaGui.Captcha.FloatArea:GetChildren()) do
if v.Name == "FloatBox" and v:FindFirstChild("ImageLabel") then
if v.Visible == true then
wait(2)
firesignal(v.MouseButton1Click) wait(1)
v:remove()
end
end 
end 
end 

local vu = game:GetService("VirtualUser")
game:GetService("Players").LocalPlayer.Idled:connect(function()
 vu:Button2Down(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
 wait(1)
 vu:Button2Up(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
end)
else
    game:GetService("TeleportService"):Teleport(1067560271, LocalPlayer)
    end 

print("Works MADE BY BACONLORD")

You may also like...

Roblox Scripts

Anime Simulator X GUI Script | AUTO FARM

Roblox Scripts

Kat Script | GUN MOD, NO RECOIL, NO SPREAD, INFINITE AMMO & MORE!

Leave a Reply

Your email address will not be published. Required fields are marked *