-- Defined Variables

local ReplicatedStorage = game:GetService("ReplicatedStorage")

local ServerStorage = game:GetService("ServerStorage")

local MapsFolder = ServerStorage:WaitForChild("Maps")

local Status = ReplicatedStorage:WaitForChild("Status")

local GameLength = 60

local reward = 25

-- Game Loop

while true do

Status.Value = "Waiting for more memers"

repeat wait(1) until game.Players.NumPlayers >= 2

Status.Value = "Intermission"

wait(10)

local plrs = {}

for i, player in pairs(game.Players:GetPlayers()) do
	if player then
		table.insert(plrs,player)	-- Add each player into plrs table
	end
end

wait(2)

local AvailableMaps = MapsFolder:GetChildren()

local ChosenMap = AvailableMaps[math.random(1,#AvailableMaps)]

Status.Value = ChosenMap.Name.." Chosen"

local ClonedMap = ChosenMap:Clone()
ClonedMap.Parent = workspace

-- teleport players to map

local SpawnPoints = ClonedMap:FindFirstChild("SpawnPoints")

if not SpawnPoints then
	print ("SpawnPoints not found")
end

local AvailableSpawnPoints = SpawnPoints:GetChildren()

for i, player in pairs(plrs) do
	if player then
		character = player.Character
		
		if character then
			-- Teleport them
			
			character:FindFirstChild("HumanoidRootPart").CFrame = AvailableSpawnPoints[1].CFrame
			table.remove(AvailableSpawnPoints,1)
			
			
			-- Give them a sword
			
			local Sword = ServerStorage.Sword:Clone()
			Sword.Parent = player.Backpack	
			
			local GameTag = Instance.new("BoolValue")
			GameTag.Name = "GameTag"
			GameTag.Parent = player.Character
			 
		else
			-- There is no character
			if not player then
				table.remove(plrs,i)
			end
		end
	end
end


Status.Value = "Get ready to rek noobs"

wait(2)

for i = GameLength,0,-1 do
	
	for x, player in pairs(plrs) do
		if player then
			
			character = player.Character
			
			if not character then
				-- Left the Game 
			else
				if character:FindFirstChild("Gametag") then
					-- They are still Alive
					print(player.Name.." hasn't been rekt!")
				else
					-- They are dead
					table.remove(plrs,x)
					print(player.Name.." got rekt!")
				end
			end
		else
			table.remove(plrs,x)
			print(player.Name.." got rekt!")
		end
	end
	
	Status.Value = "There are "..i.." seconds remaining, and "..#plrs.." Memers left"
	
	if #plrs == 1 then
		-- Last Person Standing
		Status.Value = "The Ultimate Memer is "..plrs[1].Name
		plrs[1].leaderstats.Memes.Value = plrs[1].leaderstats.Memes.Value + reward
		break
	elseif #plrs == 0 then
		Status.Value = "Nobody won!"
		break
	elseif i == 0 then
		Status.Value = "Welp no more time!"
		break
	end
	
	wait(1)
end

print("End of Game")

for i, player in pairs(game.Players:GetPlayers()) do
	character = player.Character
	
	if not character then
		--Ignore Them
	else
		if character:FindFirstChild("GameTag") then
			character.GameTag:Destroy()
		end
		
		if player.Backpack:FindFirstChild("Sword") then
			player.Backpack.Sword:Destroy()
		end
		
		if character:FindFirstChild("Sword") then
			character.Sword:Destroy()
		end
		
	end
	
	player:LoadCharacter()
end

ClonedMap:Destroy()

Status.Value = "Game Ended"

end

Is there anything i did wrong?

8 comments

0

Yes you wrote the code blocks incorrect

1

its probably a plugin

0

You code doesn't seem to do anything related to http request so its probably like Fifkee said that its one of your plugins

0

So can anyone teach me how to fix it

0

disable each plugin until you dont get the error

0

I do not see any issue with your code. It's either a plugin or an issue with another script. (Or Roblox if you're using a Local Server, and if that's the case there's nothing you can do about that)

0

Error checking in group: Player:GetRankInGroup failed because HTTP 0 (HTTP 400) Error checking in group: Player:IsInGroup failed because HTTP 0 (HTTP 400) Error checking in group: Player:GetRankInGroup failed because HTTP 0 (HTTP 400) Error checking in group: Player:IsInGroup failed because HTTP 0 (HTTP 400) whenever i test the server with two or more players i get this error anyone

0

know what i can do (All plugins are disabled and the same error)