------------------------------------------------
-- UI INTRO PREMIUM (By Pedro_7p89)
------------------------------------------------
local Players = game:GetService("Players")
local TweenService = game:GetService("TweenService")
local Lighting = game:GetService("Lighting")

local player = Players.LocalPlayer

------------------------------------------------
-- BLUR
------------------------------------------------
local blur = Instance.new("BlurEffect")
blur.Size = 0
blur.Parent = Lighting

------------------------------------------------
-- GUI
------------------------------------------------
local gui = Instance.new("ScreenGui")
gui.Name = "IntroPedro"
gui.ResetOnSpawn = false
gui.Parent = player:WaitForChild("PlayerGui")

local frame = Instance.new("Frame")
frame.Parent = gui
frame.AnchorPoint = Vector2.new(0.5, 0.5)
frame.Position = UDim2.new(0.5, 0, 0.5, 0)
frame.Size = UDim2.new(0, 200, 0, 60) -- começa menor
frame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
frame.BackgroundTransparency = 1
frame.BorderSizePixel = 0

local corner = Instance.new("UICorner")
corner.CornerRadius = UDim.new(0, 16)
corner.Parent = frame

local text = Instance.new("TextLabel")
text.Parent = frame
text.Size = UDim2.new(1, 0, 1, 0)
text.BackgroundTransparency = 1
text.Text = "By Pedro_7p89"
text.Font = Enum.Font.GothamBold
text.TextSize = 20
text.TextColor3 = Color3.fromRGB(255, 255, 255)
text.TextTransparency = 1

------------------------------------------------
-- SOM
------------------------------------------------
local sound = Instance.new("Sound")
sound.SoundId = "rbxassetid://9118828564" -- som suave
sound.Volume = 0.6
sound.Parent = frame

------------------------------------------------
-- TWEENS
------------------------------------------------
local zoomIn = TweenService:Create(
	frame,
	TweenInfo.new(0.6, Enum.EasingStyle.Back, Enum.EasingDirection.Out),
	{
		Size = UDim2.new(0, 260, 0, 80),
		BackgroundTransparency = 0.15
	}
)

local textIn = TweenService:Create(
	text,
	TweenInfo.new(0.5),
	{TextTransparency = 0}
)

local blurIn = TweenService:Create(
	blur,
	TweenInfo.new(0.5),
	{Size = 12}
)

local zoomOut = TweenService:Create(
	frame,
	TweenInfo.new(0.5, Enum.EasingStyle.Quad, Enum.EasingDirection.In),
	{
		Size = UDim2.new(0, 200, 0, 60),
		BackgroundTransparency = 1
	}
)

local textOut = TweenService:Create(
	text,
	TweenInfo.new(0.5),
	{TextTransparency = 1}
)

local blurOut = TweenService:Create(
	blur,
	TweenInfo.new(0.5),
	{Size = 0}
)

------------------------------------------------
-- EXECUÇÃO
------------------------------------------------
sound:Play()
zoomIn:Play()
textIn:Play()
blurIn:Play()

task.delay(2, function()
	zoomOut:Play()
	textOut:Play()
	blurOut:Play()

	task.delay(0.6, function()
		gui:Destroy()
		blur:Destroy()
	end)
end)--[[
	WARNING: Heads up! This script has not been verified by ScriptBlox. Use at your own risk!
]]
--// SERVIÇOS
local Players = game:GetService("Players")
local Lighting = game:GetService("Lighting")
local RunService = game:GetService("RunService")
local Stats = game:GetService("Stats")

local player = Players.LocalPlayer
local desempenhoAtivo = true

------------------------------------------------
-- FUNÇÃO OTIMIZAR OBJETO
------------------------------------------------
local function otimizarObjeto(obj)
	if obj:IsA("BasePart") then
		obj.Material = Enum.Material.Plastic
		obj.Reflectance = 0
		obj.CastShadow = false
	elseif obj:IsA("Decal") or obj:IsA("Texture") then
		pcall(function()
			obj:Destroy()
		end)
	elseif obj:IsA("ParticleEmitter") or obj:IsA("Trail") then
		obj.Enabled = false
	end
end

------------------------------------------------
-- APLICAR EM TODO MAPA
------------------------------------------------
local function aplicarNoMapa()
	for _, obj in pairs(workspace:GetDescendants()) do
		otimizarObjeto(obj)
	end

	local terrain = workspace:FindFirstChildOfClass("Terrain")
	if terrain then
		terrain.WaterWaveSize = 0
		terrain.WaterWaveSpeed = 0
		terrain.WaterReflectance = 0
		terrain.WaterTransparency = 1
	end
end

------------------------------------------------
-- ATIVAR MODO DESEMPENHO (AUTO)
------------------------------------------------
settings().Rendering.QualityLevel = Enum.QualityLevel.Level01

Lighting.GlobalShadows = false
Lighting.Brightness = 1
Lighting.EnvironmentDiffuseScale = 0
Lighting.EnvironmentSpecularScale = 0
Lighting.FogEnd = 9e9

for _, v in pairs(Lighting:GetChildren()) do
	if v:IsA("PostEffect") then
		v.Enabled = false
	end
end

-- Primeira aplicação
aplicarNoMapa()

------------------------------------------------
-- OBJETOS NOVOS
------------------------------------------------
workspace.DescendantAdded:Connect(function(obj)
	task.wait()
	otimizarObjeto(obj)
end)

------------------------------------------------
-- REAPLICA A CADA 1 MINUTO
------------------------------------------------
task.spawn(function()
	while true do
		task.wait(60)
		aplicarNoMapa()
	end
end)

------------------------------------------------
-- GUI FPS + PING (PEQUENO)
------------------------------------------------
local gui = Instance.new("ScreenGui", player:WaitForChild("PlayerGui"))
gui.ResetOnSpawn = false

local infoFrame = Instance.new("Frame", gui)
infoFrame.Size = UDim2.new(0, 95, 0, 22)
infoFrame.Position = UDim2.new(1, -100, 0, 10)
infoFrame.BackgroundColor3 = Color3.new(0,0,0)
infoFrame.BackgroundTransparency = 0.4
infoFrame.BorderSizePixel = 0

local infoText = Instance.new("TextLabel", infoFrame)
infoText.Size = UDim2.new(1,0,1,0)
infoText.BackgroundTransparency = 1
infoText.Font = Enum.Font.Gotham
infoText.TextSize = 11
infoText.TextColor3 = Color3.fromRGB(0,255,0)
infoText.Text = "FPS: 0 | MS: 0"

------------------------------------------------
-- CALCULAR FPS + PING
------------------------------------------------
local frames = 0
local lastTime = tick()

RunService.RenderStepped:Connect(function()
	frames += 1
	if tick() - lastTime >= 1 then
		local ping = math.floor(Stats.Network.ServerStatsItem["Data Ping"]:GetValue())
		infoText.Text = "FPS: "..frames.." | MS: "..ping
		frames = 0
		lastTime = tick()
	end
end)