Basically i have a function in my game that happends every second but whenever the server fills up the function get’s an error somewhere i can’t seem to find what the cause of the error is i just want the code to continue running even if it errors
Code:
while State do
for i, Player : Player in pairs(game.Players:GetChildren()) do
if Player.Character then
local s, e = pcall(function()
if Player.ValuesFolder.TimeLeftOnStarterpack.Value > 0 then
Player.ValuesFolder.TimeLeftOnStarterpack.Value -= 1
Player.PlayerGui:WaitForChild("BeginnersBundle"):WaitForChild("MainFrame"):WaitForChild("TimeLeft").Text = convertToMinutes(Player.ValuesFolder.TimeLeftOnStarterpack.Value).." Minutes Left!"
Player.PlayerGui:WaitForChild("Hud"):WaitForChild("Gift"):WaitForChild("BeginnersBundle"):WaitForChild("Title").Text = convertToMS(Player.ValuesFolder.TimeLeftOnStarterpack.Value)
if Player.ValuesFolder.TimeLeftOnStarterpack.Value <= 0 then
Player.PlayerGui:WaitForChild("BeginnersBundle").Enabled = false
Player.PlayerGui:WaitForChild("Hud"):WaitForChild("Gift"):WaitForChild("BeginnersBundle").Visible = false
end
if Player.ValuesFolder.TimeLeftOnStarterpack.Value == 429 then
if Player.PlayerGui.BeginnersBundle.MainFrame.Position == UDim2.new(0.5,0,0.5,0) then
Player.PlayerGui.BeginnersBundle.MainFrame:TweenPosition(UDim2.new(0.5, 0,0.501,0), Enum.EasingDirection.In, Enum.EasingStyle.Linear, 0.2, false)
else
Player.PlayerGui.BeginnersBundle.MainFrame:TweenPosition(UDim2.new(0.5, 0,0.5,0), Enum.EasingDirection.In, Enum.EasingStyle.Linear, 0.2, false)
end
end
end
if Player:WaitForChild("ValuesFolder"):WaitForChild("TimeSinceAutoclicker").Value > 0 then
Player:WaitForChild("ValuesFolder"):WaitForChild("TimeSinceAutoclicker").Value -= 1
Player.PlayerGui:WaitForChild("HotBar"):WaitForChild("HotBar"):WaitForChild("Muscle"):WaitForChild("AutoClick"):WaitForChild("Timer"):WaitForChild("Timer").Text = convertToMS(Player:WaitForChild("ValuesFolder"):WaitForChild("TimeSinceAutoclicker").Value)
end
if Player:WaitForChild("ValuesFolder"):WaitForChild("TimeSinceAutoclicker").Value <= 0 then
Player.PlayerGui.HotBar.HotBar.Muscle.AutoClick.Timer.Visible = false
end
if Player.ValuesFolder.SpinsTimeLeft.Value > 0 then
Player.ValuesFolder.SpinsTimeLeft.Value -= 1
if Player.ValuesFolder.SpinsTimeLeft.Value <= 0 then
Player.ValuesFolder.SpinsTimeLeft.Value = 600
Player.ValuesFolder.SpinsLeft.Value += 1
end
if Player.ValuesFolder.SpinsTimeLeft.Value >= 1 then
Player.PlayerGui:WaitForChild("SpinWheel"):WaitForChild("MainFrame"):WaitForChild("SpinButton"):WaitForChild("Title").Text = "Spin Now ("..Player.ValuesFolder.SpinsLeft.Value..")"
Player.PlayerGui:WaitForChild("Hud"):WaitForChild("Gift"):WaitForChild("SpinWheel"):WaitForChild("Title").Text = "Ready!"
end
end
if Player.ValuesFolder.SpinsLeft.Value <= 0 then
Player.PlayerGui:WaitForChild("SpinWheel"):WaitForChild("MainFrame"):WaitForChild("SpinButton"):WaitForChild("Title").Text = "Spin ("..convertToMS(Player.ValuesFolder.SpinsTimeLeft.Value)..")"
Player.PlayerGui:WaitForChild("Hud"):WaitForChild("Gift"):WaitForChild("SpinWheel"):WaitForChild("Title").Text = convertToMS(Player.ValuesFolder.SpinsTimeLeft.Value)
end
if Player:FindFirstChild("Boosts") ~= nil then
for i, v in pairs(Player.Boosts:GetChildren()) do
Player.PlayerGui:WaitForChild("Shop"):WaitForChild("MainFrame"):WaitForChild("Main"):WaitForChild(v.Name):WaitForChild("Time").Text = convertToHMS(v.Value)
if v.Value > 0 then
v.Value -= 1
if v.Name == "AutoSell" then
if Player.Settings.AutoSell.Value == true then
if Player.Character == nil then
Player.CharacterAdded:Wait()
end
local Character = Player.Character
local PremMulti = 1
if Player.MembershipType == Enum.MembershipType.Premium then
PremMulti = 1.2
end
if MS:UserOwnsGamePassAsync(Player.UserId, 188463581) then
Player:WaitForChild("ValuesFolder"):WaitForChild("RealCoins").Value += (tonumber(Player.ValuesFolder:WaitForChild("RealMuscle").Value) * 2 * PremMulti)
else
Player.ValuesFolder.RealCoins.Value += (tonumber(Player.ValuesFolder.RealMuscle.Value) * PremMulti)
end
Player.ValuesFolder.RealMuscle.Value = tostring(0)
Player:WaitForChild("Settings"):WaitForChild("MaxHeight").Value = 1
Player.Settings:WaitForChild("Height").Value = 1
Character.Humanoid.BodyDepthScale.Value = 0.5
Character.Humanoid.BodyHeightScale.Value = 1
Character.Humanoid.HeadScale.Value = 0.85
Character.Humanoid.BodyWidthScale.Value = 0.5
if MS:UserOwnsGamePassAsync(Player.UserId, 189093989) then
Player.ValuesFolder.MaxHealth.Value = 200
Player.Character.Humanoid.MaxHealth = 200
Player.Character.Humanoid.Health = 200
else
Player.ValuesFolder.MaxHealth.Value = 100
Player.Character.Humanoid.MaxHealth = 100
Player.Character.Humanoid.Health = 100
end
end
end
end
end
end
end)
if not s then
warn(e)
end
end
end
end