-- Marretao HIM v1.5 - Completo + Link Discord atualizado -- @himfofis local Players = game:GetService("Players") local RunService = game:GetService("RunService") local UserInputService = game:GetService("UserInputService") local Lighting = game:GetService("Lighting") local TweenService = game:GetService("TweenService") local Settings = settings() local player = Players.LocalPlayer local playerGui = player:WaitForChild("PlayerGui") -- ==================== TRADUÇÕES ==================== local Lang = { en = { Title = "Marretao HIM", Home = "Home", Stalker = "Stalker", Config = "Config", Updates = "Updates", ESPPlayers = "ESP Players: ", ESPComputers = "ESP Computers: ", ON = "ON", OFF = "OFF", ViewByName = "View by Name", Previous = "< Previous", Next = "Next >", StopViewing = "Stop Viewing", NotViewing = "Not viewing anyone", TypeName = "Type player name...", PlayerNotFound = "Player not found", NoPlayers = "No players", BaseOpti = "Base Optimization: ", BaseOptiDesc = "(reduces 70% lights + effects)", UltraOpti = "Ultra Optimization: ", UltraOptiDesc = "(reduces 40% of everything)", OptiInfo = "Base: disables most lights,\nshadows and particles.\n\nUltra: more aggressive mode\n(low graphics quality).", UpdatesText = [[Marretao HIM - Updates v1.5 (Current) • Loading screen + Language system • Discord button added • Credits section v1.4 • Config + Optimizations v1.3 • Stalker improvements v1.0 • Initial release]], Credits = "Credits", CreditsText = "Instagram: @himfofis\nJoin us!", DiscordBtn = "Discord Server", LinkCopied = "Link copied!", Loading = "Loading...", JoinDiscord = "Join our Discord server", SelectLanguage = "Select your language", English = "English", Portuguese = "Português (Brasil)" }, pt = { Title = "Marretao HIM", Home = "Home", Stalker = "Stalker", Config = "Config", Updates = "Updates", ESPPlayers = "ESP Players: ", ESPComputers = "ESP Computers: ", ON = "ON", OFF = "OFF", ViewByName = "Ver por Nome", Previous = "< Anterior", Next = "Próximo >", StopViewing = "Parar de Ver", NotViewing = "Não está vendo ninguém", TypeName = "Digite o nome do jogador...", PlayerNotFound = "Jogador não encontrado", NoPlayers = "Nenhum jogador", BaseOpti = "Otimização Base: ", BaseOptiDesc = "(reduz 70% luzes + efeitos)", UltraOpti = "Otimização Ultra: ", UltraOptiDesc = "(reduz 40% de tudo)", OptiInfo = "Base: desativa a maioria das luzes,\nsombras e partículas.\n\nUltra: modo mais agressivo\n(qualidade gráfica baixa).", UpdatesText = [[Marretao HIM - Atualizações v1.5 (Atual) • Tela de carregamento + Sistema de idioma • Botão do Discord adicionado • Seção de Créditos v1.4 • Config + Otimizações v1.3 • Melhorias no Stalker v1.0 • Versão inicial]], Credits = "Créditos", CreditsText = "Instagram: @himfofis\nJunte-se!", DiscordBtn = "Servidor do Discord", LinkCopied = "Link copiado!", Loading = "Carregando...", JoinDiscord = "Join our Discord server", SelectLanguage = "Escolha seu idioma", English = "English", Portuguese = "Português (Brasil)" } } local currentLang = "en" local T = Lang.en -- ==================== LOADING SCREEN ==================== local loadingGui = Instance.new("ScreenGui") loadingGui.Name = "MarretaoLoading" loadingGui.IgnoreGuiInset = true loadingGui.ResetOnSpawn = false loadingGui.Parent = playerGui local loadingBg = Instance.new("Frame") loadingBg.Size = UDim2.new(1, 0, 1, 0) loadingBg.BackgroundColor3 = Color3.fromRGB(15, 8, 25) loadingBg.BorderSizePixel = 0 loadingBg.Parent = loadingGui local symbols = Instance.new("TextLabel") symbols.Size = UDim2.new(1, 0, 0, 50) symbols.Position = UDim2.new(0, 0, 0.38, 0) symbols.BackgroundTransparency = 1 symbols.Text = "⪩ ⪨ ꠹" symbols.TextColor3 = Color3.fromRGB(220, 80, 160) symbols.Font = Enum.Font.GothamBold symbols.TextSize = 32 symbols.Parent = loadingBg local loadingText = Instance.new("TextLabel") loadingText.Size = UDim2.new(1, 0, 0, 30) loadingText.Position = UDim2.new(0, 0, 0.45, 0) loadingText.BackgroundTransparency = 1 loadingText.Text = "Loading..." loadingText.TextColor3 = Color3.fromRGB(255, 255, 255) loadingText.Font = Enum.Font.Gotham loadingText.TextSize = 18 loadingText.Parent = loadingBg local barBg = Instance.new("Frame") barBg.Size = UDim2.new(0, 320, 0, 12) barBg.Position = UDim2.new(0.5, -160, 0.52, 0) barBg.BackgroundColor3 = Color3.fromRGB(40, 20, 60) barBg.BorderSizePixel = 0 barBg.Parent = loadingBg Instance.new("UICorner", barBg).CornerRadius = UDim.new(0, 6) local barFill = Instance.new("Frame") barFill.Size = UDim2.new(0, 0, 1, 0) barFill.BackgroundColor3 = Color3.fromRGB(220, 80, 160) barFill.BorderSizePixel = 0 barFill.Parent = barBg Instance.new("UICorner", barFill).CornerRadius = UDim.new(0, 6) local discordText = Instance.new("TextLabel") discordText.Size = UDim2.new(1, 0, 0, 25) discordText.Position = UDim2.new(0, 0, 0.62, 0) discordText.BackgroundTransparency = 1 discordText.Text = "Join our Discord server" discordText.TextColor3 = Color3.fromRGB(180, 140, 220) discordText.Font = Enum.Font.Gotham discordText.TextSize = 15 discordText.Parent = loadingBg local progress = 0 local loadingConnection loadingConnection = RunService.Heartbeat:Connect(function(dt) progress = math.min(progress + dt * 0.55, 1) barFill.Size = UDim2.new(progress, 0, 1, 0) if progress >= 1 then loadingConnection:Disconnect() task.wait(0.35) loadingGui:Destroy() showLanguageSelect() end end) -- ==================== LANGUAGE SELECT ==================== function showLanguageSelect() local langGui = Instance.new("ScreenGui") langGui.Name = "LanguageSelect" langGui.IgnoreGuiInset = true langGui.ResetOnSpawn = false langGui.Parent = playerGui local bg = Instance.new("Frame") bg.Size = UDim2.new(1, 0, 1, 0) bg.BackgroundColor3 = Color3.fromRGB(15, 8, 25) bg.BorderSizePixel = 0 bg.Parent = langGui local titleLang = Instance.new("TextLabel") titleLang.Size = UDim2.new(1, 0, 0, 40) titleLang.Position = UDim2.new(0, 0, 0.32, 0) titleLang.BackgroundTransparency = 1 titleLang.Text = "Select your language / Escolha seu idioma" titleLang.TextColor3 = Color3.fromRGB(255, 255, 255) titleLang.Font = Enum.Font.GothamBold titleLang.TextSize = 22 titleLang.Parent = bg local enBtn = Instance.new("TextButton") enBtn.Size = UDim2.new(0, 260, 0, 55) enBtn.Position = UDim2.new(0.5, -130, 0.45, 0) enBtn.BackgroundColor3 = Color3.fromRGB(90, 40, 140) enBtn.Text = "English" enBtn.TextColor3 = Color3.fromRGB(255, 255, 255) enBtn.Font = Enum.Font.GothamBold enBtn.TextSize = 18 enBtn.Parent = bg Instance.new("UICorner", enBtn).CornerRadius = UDim.new(0, 10) local ptBtn = Instance.new("TextButton") ptBtn.Size = UDim2.new(0, 260, 0, 55) ptBtn.Position = UDim2.new(0.5, -130, 0.58, 0) ptBtn.BackgroundColor3 = Color3.fromRGB(90, 40, 140) ptBtn.Text = "Português (Brasil)" ptBtn.TextColor3 = Color3.fromRGB(255, 255, 255) ptBtn.Font = Enum.Font.GothamBold ptBtn.TextSize = 18 ptBtn.Parent = bg Instance.new("UICorner", ptBtn).CornerRadius = UDim.new(0, 10) local function startMain(lang) currentLang = lang T = Lang[lang] langGui:Destroy() createMainPanel() end enBtn.MouseButton1Click:Connect(function() startMain("en") end) ptBtn.MouseButton1Click:Connect(function() startMain("pt") end) end -- ==================== MAIN PANEL ==================== function createMainPanel() local ESPPlayersEnabled = false local ESPComputersEnabled = false local isMinimized = false local CurrentSpectate = nil local spectateList = {} local spectateIndex = 1 local BaseOptiEnabled = false local UltraOptiEnabled = false local COR_ROXO = Color3.fromRGB(90, 40, 140) local COR_ROXO_ESCURO = Color3.fromRGB(45, 20, 70) local COR_ROSA = Color3.fromRGB(220, 80, 160) local COR_FUNDO = Color3.fromRGB(25, 12, 40) local screenGui = Instance.new("ScreenGui") screenGui.Name = "MarretaoHIM" screenGui.ResetOnSpawn = false screenGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling screenGui.Parent = playerGui local watermark = Instance.new("TextLabel") watermark.Size = UDim2.new(0, 220, 0, 40) watermark.Position = UDim2.new(1, -230, 1, -50) watermark.BackgroundTransparency = 1 watermark.Text = "@himfofis\nJoin our Discord server" watermark.TextColor3 = COR_ROSA watermark.Font = Enum.Font.GothamBold watermark.TextSize = 14 watermark.TextXAlignment = Enum.TextXAlignment.Right watermark.TextYAlignment = Enum.TextYAlignment.Bottom watermark.Parent = screenGui local mainFrame = Instance.new("Frame") mainFrame.Size = UDim2.new(0, 300, 0, 480) mainFrame.Position = UDim2.new(0.5, -150, 0.5, -240) mainFrame.BackgroundColor3 = COR_FUNDO mainFrame.BackgroundTransparency = 0.15 mainFrame.BorderSizePixel = 0 mainFrame.Active = true mainFrame.Parent = screenGui Instance.new("UICorner", mainFrame).CornerRadius = UDim.new(0, 12) local stroke = Instance.new("UIStroke") stroke.Color = COR_ROSA stroke.Thickness = 1.6 stroke.Transparency = 0.3 stroke.Parent = mainFrame local titleBar = Instance.new("Frame") titleBar.Size = UDim2.new(1, 0, 0, 38) titleBar.BackgroundColor3 = COR_ROXO_ESCURO titleBar.BackgroundTransparency = 0.1 titleBar.BorderSizePixel = 0 titleBar.Parent = mainFrame Instance.new("UICorner", titleBar).CornerRadius = UDim.new(0, 12) local title = Instance.new("TextLabel") title.Size = UDim2.new(1, -75, 1, 0) title.Position = UDim2.new(0, 14, 0, 0) title.BackgroundTransparency = 1 title.Text = T.Title title.TextColor3 = COR_ROSA title.Font = Enum.Font.GothamBold title.TextSize = 17 title.TextXAlignment = Enum.TextXAlignment.Left title.Parent = titleBar local minimizeBtn = Instance.new("TextButton") minimizeBtn.Size = UDim2.new(0, 30, 0, 30) minimizeBtn.Position = UDim2.new(1, -68, 0.5, -15) minimizeBtn.BackgroundColor3 = COR_ROXO minimizeBtn.Text = "–" minimizeBtn.TextColor3 = Color3.fromRGB(255, 255, 255) minimizeBtn.Font = Enum.Font.GothamBold minimizeBtn.TextSize = 18 minimizeBtn.Parent = titleBar Instance.new("UICorner", minimizeBtn).CornerRadius = UDim.new(0, 6) local closeBtn = Instance.new("TextButton") closeBtn.Size = UDim2.new(0, 30, 0, 30) closeBtn.Position = UDim2.new(1, -34, 0.5, -15) closeBtn.BackgroundColor3 = Color3.fromRGB(160, 40, 80) closeBtn.Text = "×" closeBtn.TextColor3 = Color3.fromRGB(255, 255, 255) closeBtn.Font = Enum.Font.GothamBold closeBtn.TextSize = 18 closeBtn.Parent = titleBar Instance.new("UICorner", closeBtn).CornerRadius = UDim.new(0, 6) local contentFrame = Instance.new("Frame") contentFrame.Size = UDim2.new(1, -14, 1, -50) contentFrame.Position = UDim2.new(0, 7, 0, 44) contentFrame.BackgroundTransparency = 1 contentFrame.Parent = mainFrame local homeBtn = Instance.new("TextButton") homeBtn.Size = UDim2.new(0.25, -3, 0, 28) homeBtn.Position = UDim2.new(0, 0, 0, 0) homeBtn.BackgroundColor3 = COR_ROXO homeBtn.Text = T.Home homeBtn.TextColor3 = Color3.fromRGB(255, 255, 255) homeBtn.Font = Enum.Font.Gotham homeBtn.TextSize = 12 homeBtn.Parent = contentFrame Instance.new("UICorner", homeBtn).CornerRadius = UDim.new(0, 6) local stalkerBtn = Instance.new("TextButton") stalkerBtn.Size = UDim2.new(0.25, -3, 0, 28) stalkerBtn.Position = UDim2.new(0.25, 1, 0, 0) stalkerBtn.BackgroundColor3 = Color3.fromRGB(50, 25, 70) stalkerBtn.Text = T.Stalker stalkerBtn.TextColor3 = Color3.fromRGB(255, 255, 255) stalkerBtn.Font = Enum.Font.Gotham stalkerBtn.TextSize = 12 stalkerBtn.Parent = contentFrame Instance.new("UICorner", stalkerBtn).CornerRadius = UDim.new(0, 6) local configBtn = Instance.new("TextButton") configBtn.Size = UDim2.new(0.25, -3, 0, 28) configBtn.Position = UDim2.new(0.5, 2, 0, 0) configBtn.BackgroundColor3 = Color3.fromRGB(50, 25, 70) configBtn.Text = T.Config configBtn.TextColor3 = Color3.fromRGB(255, 255, 255) configBtn.Font = Enum.Font.Gotham configBtn.TextSize = 12 configBtn.Parent = contentFrame Instance.new("UICorner", configBtn).CornerRadius = UDim.new(0, 6) local updatesBtn = Instance.new("TextButton") updatesBtn.Size = UDim2.new(0.25, -3, 0, 28) updatesBtn.Position = UDim2.new(0.75, 3, 0, 0) updatesBtn.BackgroundColor3 = Color3.fromRGB(50, 25, 70) updatesBtn.Text = T.Updates updatesBtn.TextColor3 = Color3.fromRGB(255, 255, 255) updatesBtn.Font = Enum.Font.Gotham updatesBtn.TextSize = 12 updatesBtn.Parent = contentFrame Instance.new("UICorner", updatesBtn).CornerRadius = UDim.new(0, 6) -- HOME local homeFrame = Instance.new("Frame") homeFrame.Size = UDim2.new(1, 0, 1, -38) homeFrame.Position = UDim2.new(0, 0, 0, 38) homeFrame.BackgroundTransparency = 1 homeFrame.Visible = true homeFrame.Parent = contentFrame local espPlayersBtn = Instance.new("TextButton") espPlayersBtn.Size = UDim2.new(1, 0, 0, 38) espPlayersBtn.Position = UDim2.new(0, 0, 0, 8) espPlayersBtn.BackgroundColor3 = Color3.fromRGB(55, 30, 80) espPlayersBtn.Text = T.ESPPlayers .. T.OFF espPlayersBtn.TextColor3 = Color3.fromRGB(255, 255, 255) espPlayersBtn.Font = Enum.Font.Gotham espPlayersBtn.TextSize = 14 espPlayersBtn.Parent = homeFrame Instance.new("UICorner", espPlayersBtn).CornerRadius = UDim.new(0, 7) local espComputersBtn = Instance.new("TextButton") espComputersBtn.Size = UDim2.new(1, 0, 0, 38) espComputersBtn.Position = UDim2.new(0, 0, 0, 54) espComputersBtn.BackgroundColor3 = Color3.fromRGB(55, 30, 80) espComputersBtn.Text = T.ESPComputers .. T.OFF espComputersBtn.TextColor3 = Color3.fromRGB(255, 255, 255) espComputersBtn.Font = Enum.Font.Gotham espComputersBtn.TextSize = 14 espComputersBtn.Parent = homeFrame Instance.new("UICorner", espComputersBtn).CornerRadius = UDim.new(0, 7) -- STALKER local stalkerFrame = Instance.new("Frame") stalkerFrame.Size = UDim2.new(1, 0, 1, -38) stalkerFrame.Position = UDim2.new(0, 0, 0, 38) stalkerFrame.BackgroundTransparency = 1 stalkerFrame.Visible = false stalkerFrame.Parent = contentFrame local nameBox = Instance.new("TextBox") nameBox.Size = UDim2.new(1, 0, 0, 34) nameBox.Position = UDim2.new(0, 0, 0, 8) nameBox.BackgroundColor3 = Color3.fromRGB(40, 20, 60) nameBox.PlaceholderText = T.TypeName nameBox.Text = "" nameBox.TextColor3 = Color3.fromRGB(255, 255, 255) nameBox.PlaceholderColor3 = Color3.fromRGB(160, 140, 180) nameBox.Font = Enum.Font.Gotham nameBox.TextSize = 14 nameBox.Parent = stalkerFrame Instance.new("UICorner", nameBox).CornerRadius = UDim.new(0, 7) local viewByNameBtn = Instance.new("TextButton") viewByNameBtn.Size = UDim2.new(1, 0, 0, 34) viewByNameBtn.Position = UDim2.new(0, 0, 0, 50) viewByNameBtn.BackgroundColor3 = COR_ROXO viewByNameBtn.Text = T.ViewByName viewByNameBtn.TextColor3 = Color3.fromRGB(255, 255, 255) viewByNameBtn.Font = Enum.Font.Gotham viewByNameBtn.TextSize = 14 viewByNameBtn.Parent = stalkerFrame Instance.new("UICorner", viewByNameBtn).CornerRadius = UDim.new(0, 7) local prevBtn = Instance.new("TextButton") prevBtn.Size = UDim2.new(0.5, -4, 0, 34) prevBtn.Position = UDim2.new(0, 0, 0, 96) prevBtn.BackgroundColor3 = Color3.fromRGB(70, 35, 100) prevBtn.Text = T.Previous prevBtn.TextColor3 = Color3.fromRGB(255, 255, 255) prevBtn.Font = Enum.Font.Gotham prevBtn.TextSize = 13 prevBtn.Parent = stalkerFrame Instance.new("UICorner", prevBtn).CornerRadius = UDim.new(0, 7) local nextBtn = Instance.new("TextButton") nextBtn.Size = UDim2.new(0.5, -4, 0, 34) nextBtn.Position = UDim2.new(0.5, 4, 0, 96) nextBtn.BackgroundColor3 = Color3.fromRGB(70, 35, 100) nextBtn.Text = T.Next nextBtn.TextColor3 = Color3.fromRGB(255, 255, 255) nextBtn.Font = Enum.Font.Gotham nextBtn.TextSize = 13 nextBtn.Parent = stalkerFrame Instance.new("UICorner", nextBtn).CornerRadius = UDim.new(0, 7) local stopViewBtn = Instance.new("TextButton") stopViewBtn.Size = UDim2.new(1, 0, 0, 34) stopViewBtn.Position = UDim2.new(0, 0, 0, 142) stopViewBtn.BackgroundColor3 = Color3.fromRGB(140, 40, 70) stopViewBtn.Text = T.StopViewing stopViewBtn.TextColor3 = Color3.fromRGB(255, 255, 255) stopViewBtn.Font = Enum.Font.Gotham stopViewBtn.TextSize = 14 stopViewBtn.Parent = stalkerFrame Instance.new("UICorner", stopViewBtn).CornerRadius = UDim.new(0, 7) local currentViewLabel = Instance.new("TextLabel") currentViewLabel.Size = UDim2.new(1, 0, 0, 24) currentViewLabel.Position = UDim2.new(0, 0, 0, 185) currentViewLabel.BackgroundTransparency = 1 currentViewLabel.Text = T.NotViewing currentViewLabel.TextColor3 = COR_ROSA currentViewLabel.Font = Enum.Font.Gotham currentViewLabel.TextSize = 13 currentViewLabel.Parent = stalkerFrame -- CONFIG local configFrame = Instance.new("Frame") configFrame.Size = UDim2.new(1, 0, 1, -38) configFrame.Position = UDim2.new(0, 0, 0, 38) configFrame.BackgroundTransparency = 1 configFrame.Visible = false configFrame.Parent = contentFrame local baseOptiBtn = Instance.new("TextButton") baseOptiBtn.Size = UDim2.new(1, 0, 0, 48) baseOptiBtn.Position = UDim2.new(0, 0, 0, 10) baseOptiBtn.BackgroundColor3 = Color3.fromRGB(55, 30, 80) baseOptiBtn.Text = T.BaseOpti .. T.OFF .. "\n" .. T.BaseOptiDesc baseOptiBtn.TextColor3 = Color3.fromRGB(255, 255, 255) baseOptiBtn.Font = Enum.Font.Gotham baseOptiBtn.TextSize = 13 baseOptiBtn.TextWrapped = true baseOptiBtn.Parent = configFrame Instance.new("UICorner", baseOptiBtn).CornerRadius = UDim.new(0, 7) local ultraOptiBtn = Instance.new("TextButton") ultraOptiBtn.Size = UDim2.new(1, 0, 0, 48) ultraOptiBtn.Position = UDim2.new(0, 0, 0, 68) ultraOptiBtn.BackgroundColor3 = Color3.fromRGB(55, 30, 80) ultraOptiBtn.Text = T.UltraOpti .. T.OFF .. "\n" .. T.UltraOptiDesc ultraOptiBtn.TextColor3 = Color3.fromRGB(255, 255, 255) ultraOptiBtn.Font = Enum.Font.Gotham ultraOptiBtn.TextSize = 13 ultraOptiBtn.TextWrapped = true ultraOptiBtn.Parent = configFrame Instance.new("UICorner", ultraOptiBtn).CornerRadius = UDim.new(0, 7) local optiInfo = Instance.new("TextLabel") optiInfo.Size = UDim2.new(1, 0, 0, 90) optiInfo.Position = UDim2.new(0, 0, 0, 130) optiInfo.BackgroundTransparency = 1 optiInfo.Text = T.OptiInfo optiInfo.TextColor3 = Color3.fromRGB(180, 160, 200) optiInfo.Font = Enum.Font.Gotham optiInfo.TextSize = 12 optiInfo.TextWrapped = true optiInfo.Parent = configFrame -- UPDATES local updatesFrame = Instance.new("Frame") updatesFrame.Size = UDim2.new(1, 0, 1, -38) updatesFrame.Position = UDim2.new(0, 0, 0, 38) updatesFrame.BackgroundTransparency = 1 updatesFrame.Visible = false updatesFrame.Parent = contentFrame local updatesLabel = Instance.new("TextLabel") updatesLabel.Size = UDim2.new(1, 0, 0, 145) updatesLabel.Position = UDim2.new(0, 0, 0, 5) updatesLabel.BackgroundTransparency = 1 updatesLabel.Text = T.UpdatesText updatesLabel.TextColor3 = Color3.fromRGB(220, 200, 255) updatesLabel.Font = Enum.Font.Gotham updatesLabel.TextSize = 13 updatesLabel.TextXAlignment = Enum.TextXAlignment.Left updatesLabel.TextYAlignment = Enum.TextYAlignment.Top updatesLabel.TextWrapped = true updatesLabel.Parent = updatesFrame local creditsTitle = Instance.new("TextLabel") creditsTitle.Size = UDim2.new(1, 0, 0, 24) creditsTitle.Position = UDim2.new(0, 0, 0, 155) creditsTitle.BackgroundTransparency = 1 creditsTitle.Text = T.Credits creditsTitle.TextColor3 = COR_ROSA creditsTitle.Font = Enum.Font.GothamBold creditsTitle.TextSize = 16 creditsTitle.Parent = updatesFrame local creditsText = Instance.new("TextLabel") creditsText.Size = UDim2.new(1, 0, 0, 40) creditsText.Position = UDim2.new(0, 0, 0, 178) creditsText.BackgroundTransparency = 1 creditsText.Text = T.CreditsText creditsText.TextColor3 = Color3.fromRGB(255, 200, 230) creditsText.Font = Enum.Font.Gotham creditsText.TextSize = 14 creditsText.Parent = updatesFrame local discordBtn = Instance.new("TextButton") discordBtn.Size = UDim2.new(1, 0, 0, 38) discordBtn.Position = UDim2.new(0, 0, 0, 230) discordBtn.BackgroundColor3 = Color3.fromRGB(88, 101, 242) discordBtn.Text = T.DiscordBtn discordBtn.TextColor3 = Color3.fromRGB(255, 255, 255) discordBtn.Font = Enum.Font.GothamBold discordBtn.TextSize = 15 discordBtn.Parent = updatesFrame Instance.new("UICorner", discordBtn).CornerRadius = UDim.new(0, 8) -- LINK DO SEU DISCORD JÁ COLOCADO discordBtn.MouseButton1Click:Connect(function() local discordLink = "https://discord.gg/9zqWhSaUTe" pcall(function() setclipboard(discordLink) end) local oldText = discordBtn.Text discordBtn.Text = T.LinkCopied discordBtn.BackgroundColor3 = Color3.fromRGB(40, 180, 80) task.wait(1.8) discordBtn.Text = oldText discordBtn.BackgroundColor3 = Color3.fromRGB(88, 101, 242) end) -- Category switch local function setCategory(active) homeFrame.Visible = active == "home" stalkerFrame.Visible = active == "stalker" configFrame.Visible = active == "config" updatesFrame.Visible = active == "updates" homeBtn.BackgroundColor3 = active == "home" and COR_ROXO or Color3.fromRGB(50, 25, 70) stalkerBtn.BackgroundColor3 = active == "stalker" and COR_ROXO or Color3.fromRGB(50, 25, 70) configBtn.BackgroundColor3 = active == "config" and COR_ROXO or Color3.fromRGB(50, 25, 70) updatesBtn.BackgroundColor3 = active == "updates" and COR_ROXO or Color3.fromRGB(50, 25, 70) end homeBtn.MouseButton1Click:Connect(function() setCategory("home") end) stalkerBtn.MouseButton1Click:Connect(function() setCategory("stalker") end) configBtn.MouseButton1Click:Connect(function() setCategory("config") end) updatesBtn.MouseButton1Click:Connect(function() setCategory("updates") end) -- Minimize / Close / Drag minimizeBtn.MouseButton1Click:Connect(function() isMinimized = not isMinimized if isMinimized then contentFrame.Visible = false mainFrame.Size = UDim2.new(0, 300, 0, 38) minimizeBtn.Text = "+" else contentFrame.Visible = true mainFrame.Size = UDim2.new(0, 300, 0, 480) minimizeBtn.Text = "–" end end) closeBtn.MouseButton1Click:Connect(function() mainFrame.Visible = false end) local dragging, dragStart, startPos titleBar.InputBegan:Connect(function(input) if input.UserInputType == Enum.UserInputType.MouseButton1 then dragging = true dragStart = input.Position startPos = mainFrame.Position end end) titleBar.InputEnded:Connect(function(input) if input.UserInputType == Enum.UserInputType.MouseButton1 then dragging = false end end) UserInputService.InputChanged:Connect(function(input) if dragging and input.UserInputType == Enum.UserInputType.MouseMovement then local delta = input.Position - dragStart mainFrame.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y) end end) UserInputService.InputBegan:Connect(function(input, processed) if processed then return end if input.KeyCode == Enum.KeyCode.RightShift then mainFrame.Visible = not mainFrame.Visible end end) -- Optimization local originalLights = {} local originalParticles = {} local function applyBaseOptimization(enable) BaseOptiEnabled = enable baseOptiBtn.Text = T.BaseOpti .. (enable and T.ON or T.OFF) .. "\n" .. T.BaseOptiDesc baseOptiBtn.BackgroundColor3 = enable and Color3.fromRGB(40, 100, 50) or Color3.fromRGB(55, 30, 80) if enable then Lighting.GlobalShadows = false Lighting.FogEnd = 100000 pcall(function() Settings.Rendering.QualityLevel = Enum.QualityLevel.Level01 end) for _, obj in ipairs(workspace:GetDescendants()) do if obj:IsA("PointLight") or obj:IsA("SpotLight") or obj:IsA("SurfaceLight") then if not originalLights[obj] then originalLights[obj] = {Enabled = obj.Enabled, Brightness = obj.Brightness} end if math.random() < 0.7 then obj.Enabled = false else obj.Brightness = obj.Brightness * 0.3 end end if obj:IsA("ParticleEmitter") or obj:IsA("Trail") or obj:IsA("Beam") then if not originalParticles[obj] then originalParticles[obj] = obj.Enabled end obj.Enabled = false end end for _, fx in ipairs(Lighting:GetChildren()) do if fx:IsA("BloomEffect") or fx:IsA("BlurEffect") or fx:IsA("SunRaysEffect") or fx:IsA("ColorCorrectionEffect") or fx:IsA("DepthOfFieldEffect") then fx.Enabled = false end end else Lighting.GlobalShadows = true for obj, data in pairs(originalLights) do if obj and obj.Parent then obj.Enabled = data.Enabled obj.Brightness = data.Brightness end end for obj, enabled in pairs(originalParticles) do if obj and obj.Parent then obj.Enabled = enabled end end end end local function applyUltraOptimization(enable) UltraOptiEnabled = enable ultraOptiBtn.Text = T.UltraOpti .. (enable and T.ON or T.OFF) .. "\n" .. T.UltraOptiDesc ultraOptiBtn.BackgroundColor3 = enable and Color3.fromRGB(40, 100, 50) or Color3.fromRGB(55, 30, 80) if enable then pcall(function() Settings.Rendering.QualityLevel = Enum.QualityLevel.Level01 end) Lighting.GlobalShadows = false Lighting.Brightness = 1 Lighting.FogEnd = 9e9 Lighting.EnvironmentDiffuseScale = 0 Lighting.EnvironmentSpecularScale = 0 for _, obj in ipairs(workspace:GetDescendants()) do if obj:IsA("PointLight") or obj:IsA("SpotLight") or obj:IsA("SurfaceLight") then obj.Enabled = false end if obj:IsA("ParticleEmitter") or obj:IsA("Trail") or obj:IsA("Beam") or obj:IsA("Fire") or obj:IsA("Smoke") then obj.Enabled = false end end for _, fx in ipairs(Lighting:GetChildren()) do if fx:IsA("PostEffect") then fx.Enabled = false end end else if not BaseOptiEnabled then Lighting.GlobalShadows = true end end end baseOptiBtn.MouseButton1Click:Connect(function() applyBaseOptimization(not BaseOptiEnabled) end) ultraOptiBtn.MouseButton1Click:Connect(function() applyUltraOptimization(not UltraOptiEnabled) end) -- ESP local playerHighlights = {} local computerHighlights = {} local lastComputerScan = 0 espPlayersBtn.MouseButton1Click:Connect(function() ESPPlayersEnabled = not ESPPlayersEnabled espPlayersBtn.Text = T.ESPPlayers .. (ESPPlayersEnabled and T.ON or T.OFF) espPlayersBtn.BackgroundColor3 = ESPPlayersEnabled and Color3.fromRGB(100, 40, 150) or Color3.fromRGB(55, 30, 80) if not ESPPlayersEnabled then for _, hl in pairs(playerHighlights) do if hl and hl.Parent then hl:Destroy() end end playerHighlights = {} end end) espComputersBtn.MouseButton1Click:Connect(function() ESPComputersEnabled = not ESPComputersEnabled espComputersBtn.Text = T.ESPComputers .. (ESPComputersEnabled and T.ON or T.OFF) espComputersBtn.BackgroundColor3 = ESPComputersEnabled and Color3.fromRGB(100, 40, 150) or Color3.fromRGB(55, 30, 80) if not ESPComputersEnabled then for _, hl in pairs(computerHighlights) do if hl and hl.Parent then hl:Destroy() end end computerHighlights = {} end end) RunService.Heartbeat:Connect(function() if ESPPlayersEnabled then for _, plr in ipairs(Players:GetPlayers()) do if plr ~= player and plr.Character and plr.Character:FindFirstChild("HumanoidRootPart") then if not playerHighlights[plr] or not playerHighlights[plr].Parent then local highlight = Instance.new("Highlight") highlight.FillColor = Color3.fromRGB(160, 60, 220) highlight.OutlineColor = Color3.fromRGB(255, 180, 255) highlight.FillTransparency = 0.5 highlight.DepthMode = Enum.HighlightDepthMode.AlwaysOnTop highlight.Parent = plr.Character playerHighlights[plr] = highlight end end end end if ESPComputersEnabled and tick() - lastComputerScan > 3 then lastComputerScan = tick() for obj, hl in pairs(computerHighlights) do if not obj or not obj.Parent then if hl and hl.Parent then hl:Destroy() end computerHighlights[obj] = nil else local screen = obj:FindFirstChild("Screen") if screen and (screen.BrickColor == BrickColor.new("Dark green") or (screen.Color.G > 0.5 and screen.Color.R < 0.3)) then if hl and hl.Parent then hl:Destroy() end computerHighlights[obj] = nil end end end for _, obj in ipairs(workspace:GetDescendants()) do if obj:IsA("Model") and obj.Name == "ComputerTable" then local screen = obj:FindFirstChild("Screen") local isCompleted = screen and (screen.BrickColor == BrickColor.new("Dark green") or (screen.Color.G > 0.5 and screen.Color.R < 0.3)) if not isCompleted and (not computerHighlights[obj] or not computerHighlights[obj].Parent) then local highlight = Instance.new("Highlight") highlight.FillColor = Color3.fromRGB(0, 180, 255) highlight.OutlineColor = Color3.fromRGB(200, 240, 255) highlight.FillTransparency = 0.4 highlight.DepthMode = Enum.HighlightDepthMode.AlwaysOnTop highlight.Parent = obj computerHighlights[obj] = highlight end end end end end) -- Stalker local function spectatePlayer(target) if target and target.Character and target.Character:FindFirstChild("Humanoid") then CurrentSpectate = target workspace.CurrentCamera.CameraSubject = target.Character.Humanoid currentViewLabel.Text = "Viewing: " .. target.Name end end local function updateSpectateList() spectateList = {} for _, plr in ipairs(Players:GetPlayers()) do if plr ~= player then table.insert(spectateList, plr) end end end viewByNameBtn.MouseButton1Click:Connect(function() local name = nameBox.Text if name == "" then return end local target = Players:FindFirstChild(name) if target then spectatePlayer(target) else for _, plr in ipairs(Players:GetPlayers()) do if string.lower(plr.Name):find(string.lower(name), 1, true) then spectatePlayer(plr) return end end currentViewLabel.Text = T.PlayerNotFound end end) prevBtn.MouseButton1Click:Connect(function() updateSpectateList() if #spectateList == 0 then currentViewLabel.Text = T.NoPlayers return end spectateIndex = spectateIndex - 1 if spectateIndex < 1 then spectateIndex = #spectateList end spectatePlayer(spectateList[spectateIndex]) end) nextBtn.MouseButton1Click:Connect(function() updateSpectateList() if #spectateList == 0 then currentViewLabel.Text = T.NoPlayers return end spectateIndex = spectateIndex + 1 if spectateIndex > #spectateList then spectateIndex = 1 end spectatePlayer(spectateList[spectateIndex]) end) stopViewBtn.MouseButton1Click:Connect(function() CurrentSpectate = nil if player.Character and player.Character:FindFirstChild("Humanoid") then workspace.CurrentCamera.CameraSubject = player.Character.Humanoid end currentViewLabel.Text = T.NotViewing end) print("✅ Marretao HIM v1.5 loaded | Language: " .. currentLang .. " | Discord: https://discord.gg/9zqWhSaUTe | @himfofis") end