if game.PlaceId == 7484251959 then
    repeat wait() until game:IsLoaded();
    wait(1000000000000000000000000000000000000000000000);

    local lp = game:service"Players".LocalPlayer;
    local rs = game:service"ReplicatedStorage";
    local ws = workspace;
    local run_s = game:service"RunService";
    local ts = game:service"TweenService";

	local old; old = hookmetamethod(game, "__namecall", function(self, ...)
	    if not checkcaller() and getnamecallmethod() == "Kick" then
		return;
	    end
	    return old(self, ...);
	end);
	wait(1);
	--lp:Kick("Script is patched");

    repeat wait() until lp.Character

    getgenv().item_farm = true;

    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(1);
    			end
    		end
    	end
    end

    function Teleport()
    	while wait() do
    		pcall(function()
    			TPReturner()
    			if foundAnything ~= "" then
    				TPReturner()
    				return true;
    			end
    		end)
    	end
    end

    local instance_names = {"Torso", "Head", "Right Arm", "Left Arm", "Left Leg", "Right Leg"};
    coroutine.wrap(function()
        local a = lp.Character.Humanoid:Clone();
    	a.Parent = lp.Character;
    	lp.Character.Humanoid:Destroy();
         ---[[
		run_s.RenderStepped:Connect(function()
            if item_farm and lp.Character and lp.Character:FindFirstChild("Humanoid") then
                lp.Character.Humanoid:ChangeState(11);
            end
        end);
        ---]]
		while wait() do
            if hide_character and lp and lp.Character then
                for i,v in pairs(lp.Character:GetChildren()) do
                    if v:IsA("Part") and table.find(instance_names, v.Name) then
                        v:Destroy();
                    end
                end
            end
        end
    end)();

	wait(1);
	--[[
	local function get_tbl_size(tbl)
		local size = 0;
		for i,v in pairs(tbl) do
			size = size + 1;
		end
		return size;
	end

	local function get_closest_item()
		local temp = nil;

		for i,v in pairs(ws.Drops.Active:GetChildren()) do
			if not table.find(item_blacklist, v.Name) and v:FindFirstChildOfClass("ProximityPrompt", true) then
                local a = v:FindFirstChildOfClass("ProximityPrompt", true);
                local b = v:FindFirstChildOfClass("Part") or v:FindFirstChildOfClass("MeshPart") or v:FindFirstChildOfClass("Handle") or v;
                if b and a then
                    temp = v;
					break;
                end
            end
		end

		for i,v in pairs(ws.Drops.Active:GetChildren()) do
			if not table.find(item_blacklist, v.Name) and v:FindFirstChildOfClass("ProximityPrompt", true) then
                local a = v:FindFirstChildOfClass("ProximityPrompt", true);
                local b = v:FindFirstChildOfClass("Part") or v:FindFirstChildOfClass("MeshPart") or v:FindFirstChildOfClass("Handle") or v;
                if b and a then
					local aaa = temp:FindFirstChildOfClass("Part") or temp:FindFirstChildOfClass("MeshPart") or temp:FindFirstChildOfClass("Handle") or temp;
                    if (b.Position - lp.Character.PrimaryPart.Position).magnitude < (aaa.Position - lp.Character.PrimaryPart.Position).magnitude then
						temp = v;
					end
                end
            end
		end

		print(temp);
		return temp;
	end

	pcall(function()
		for i,v in pairs(ws.Drops.Active:GetChildren()) do
			--if lp.Character and lp.Character.PrimaryPart then
				local closest = nil;
				repeat wait()
					closest = get_closest_item();
				until closest;

				local part = closest:FindFirstChildOfClass("Part") or closest:FindFirstChildOfClass("MeshPart") or closest:FindFirstChildOfClass("Handle") or closest;
				local pp = closest:FindFirstChildOfClass("ProximityPrompt", true);
				local dist = (part.Position - lp.Character.PrimaryPart.Position).magnitude;
				if dist <= dist_before_tp then
					lp.Character.PrimaryPart.CFrame = part.CFrame;
				else
					local time = dist / speed;
					local tween_info = TweenInfo.new(time, Enum.EasingStyle.Quad, Enum.EasingDirection.Out, 0, false, 0);
					local tween = ts:Create(lp.Character.PrimaryPart, tween_info, {CFrame = part.CFrame});
					tween:Play();
					repeat wait() until (part.Position - lp.Character.PrimaryPart.Position).magnitude <= dist_before_tp;
					tween:Cancel();
					lp.Character.PrimaryPart.CFrame = part.CFrame;
				end
				wait(.25);
				local count = 0;
				repeat wait()
					fireproximityprompt(pp);
					count = count + 1;
				until not pp or not pp:IsDescendantOf(game) or count >= 10;
				wait(.25);
			--end
		end
	end)
	--]]
	pcall(function()
		for i,v in pairs(ws.Drops.Active:GetChildren()) do
			if not table.find(item_blacklist, v.Name) and v:FindFirstChildOfClass("ProximityPrompt", true) then
				local a = v:FindFirstChildOfClass("ProximityPrompt", true);
				local b = v:FindFirstChildOfClass("Part", true) or v:FindFirstChildOfClass("MeshPart", true) or v:FindFirstChildOfClass("Handle", true) or v;
				if b and a then
					lp.Character.PrimaryPart.CFrame = b.CFrame;
					wait(.25);
					local count = 0;
					repeat wait()
						fireproximityprompt(a);
						count = count + 1;
					until not a or not a:IsDescendantOf(game) or count >= 10;
					wait(.25);
				end
			end
		end
	end)
    wait(1);
    Teleport();
end