-- MENÚ DE CARGA "ROJANSEL" (10 SEGUNDOS) local Players = game:GetService("Players") local TweenService = game:GetService("TweenService") local plr = Players.LocalPlayer -- 1. OBTENER INTERFAZ SEGURA (CoreGui o PlayerGui) local ParentGui local success, coreGui = pcall(function() return game:GetService("CoreGui") end) if gethui then ParentGui = gethui() elseif success and coreGui and coreGui:FindFirstChild("RobloxGui") then ParentGui = coreGui:FindFirstChild("RobloxGui") else ParentGui = plr:WaitForChild("PlayerGui") end -- Limpiar interfaz anterior si existe if ParentGui:FindFirstChild("Rojansel_LoadingScreen") then ParentGui["Rojansel_LoadingScreen"]:Destroy() end -- Crear ScreenGui principal local ScreenGui = Instance.new("ScreenGui") ScreenGui.Name = "Rojansel_LoadingScreen" ScreenGui.ResetOnSpawn = false ScreenGui.DisplayOrder = 99999 ScreenGui.IgnoreGuiInset = true ScreenGui.Parent = ParentGui -- Marco de fondo principal local IntroFrame = Instance.new("Frame") IntroFrame.Name = "IntroFrame" IntroFrame.Size = UDim2.new(1, 0, 1, 0) IntroFrame.BackgroundColor3 = Color3.fromRGB(10, 10, 12) IntroFrame.BackgroundTransparency = 0 IntroFrame.BorderSizePixel = 0 IntroFrame.Parent = ScreenGui -- Contenedor Central para alinear fácilmente todo local CenterContainer = Instance.new("Frame") CenterContainer.Name = "CenterContainer" CenterContainer.Size = UDim2.new(0, 400, 0, 180) CenterContainer.Position = UDim2.new(0.5, -200, 0.5, -90) CenterContainer.BackgroundTransparency = 1 CenterContainer.Parent = IntroFrame -- Texto de la marca "ROJANSEL" (Color Rojo Brillante) local IntroText = Instance.new("TextLabel") IntroText.Name = "IntroText" IntroText.Size = UDim2.new(1, 0, 0, 70) IntroText.Position = UDim2.new(0, 0, 0, 0) IntroText.BackgroundTransparency = 1 IntroText.Text = "ROJANSEL" IntroText.TextColor3 = Color3.fromRGB(255, 30, 30) -- Rojo Brillante IntroText.TextSize = 42 IntroText.Font = Enum.Font.FredokaOne IntroText.TextTransparency = 1 IntroText.Parent = CenterContainer -- Borde brillante para el texto (UIStroke Rojo) local UIStroke = Instance.new("UIStroke") UIStroke.Color = Color3.fromRGB(255, 0, 0) UIStroke.Thickness = 3 UIStroke.Transparency = 1 UIStroke.Parent = IntroText -- Fondo de la Barra de Carga (Debajo del nombre) local ProgressBarBackground = Instance.new("Frame") ProgressBarBackground.Name = "ProgressBarBackground" ProgressBarBackground.Size = UDim2.new(0, 300, 0, 12) ProgressBarBackground.Position = UDim2.new(0.5, -150, 0, 85) ProgressBarBackground.BackgroundColor3 = Color3.fromRGB(30, 30, 35) ProgressBarBackground.BorderSizePixel = 0 ProgressBarBackground.BackgroundTransparency = 1 ProgressBarBackground.Parent = CenterContainer local bgCorner = Instance.new("UICorner") bgCorner.CornerRadius = UDim.new(1, 0) bgCorner.Parent = ProgressBarBackground -- Relleno de la Barra de Carga (Rojo Brillante) local ProgressBarFill = Instance.new("Frame") ProgressBarFill.Name = "ProgressBarFill" ProgressBarFill.Size = UDim2.new(0, 0, 1, 0) ProgressBarFill.BackgroundColor3 = Color3.fromRGB(255, 40, 40) ProgressBarFill.BorderSizePixel = 0 ProgressBarFill.BackgroundTransparency = 1 ProgressBarFill.Parent = ProgressBarBackground local fillCorner = Instance.new("UICorner") fillCorner.CornerRadius = UDim.new(1, 0) fillCorner.Parent = ProgressBarFill -- Texto de Porcentaje de Carga local LoadingStatus = Instance.new("TextLabel") LoadingStatus.Name = "LoadingStatus" LoadingStatus.Size = UDim2.new(1, 0, 0, 25) LoadingStatus.Position = UDim2.new(0, 0, 0, 105) LoadingStatus.BackgroundTransparency = 1 LoadingStatus.Text = "Cargando... 0%" LoadingStatus.TextColor3 = Color3.fromRGB(200, 200, 200) LoadingStatus.TextSize = 14 LoadingStatus.Font = Enum.Font.SourceSansBold LoadingStatus.TextTransparency = 1 LoadingStatus.Parent = CenterContainer -- --- ANIMACIÓN Y LÓGICA DE CARGA (10 SEGUNDOS) --- task.spawn(function() task.wait(0.3) -- 1. Fade In del Nombre y Menú de Carga local fadeInInfo = TweenInfo.new(1, Enum.EasingStyle.Quad, Enum.EasingDirection.Out) TweenService:Create(IntroText, fadeInInfo, {TextTransparency = 0}):Play() TweenService:Create(UIStroke, fadeInInfo, {Transparency = 0.2}):Play() TweenService:Create(ProgressBarBackground, fadeInInfo, {BackgroundTransparency = 0}):Play() TweenService:Create(ProgressBarFill, fadeInInfo, {BackgroundTransparency = 0}):Play() TweenService:Create(LoadingStatus, fadeInInfo, {TextTransparency = 0}):Play() task.wait(0.5) -- 2. Animación de la Barra de Carga (10 Segundos) local loadingTime = 10 local barTweenInfo = TweenInfo.new(loadingTime, Enum.EasingStyle.Linear, Enum.EasingDirection.InOut) local fillTween = TweenService:Create(ProgressBarFill, barTweenInfo, {Size = UDim2.new(1, 0, 1, 0)}) fillTween:Play() -- Contador de Porcentaje sincronizado local startTime = tick() while tick() - startTime < loadingTime do local progress = math.clamp((tick() - startTime) / loadingTime, 0, 1) LoadingStatus.Text = "Cargando... " .. math.floor(progress * 100) .. "%" task.wait(0.05) end LoadingStatus.Text = "Cargando... 100%" task.wait(0.5) -- 3. Fade Out y Limpieza Final local fadeOutInfo = TweenInfo.new(0.8, Enum.EasingStyle.Quad, Enum.EasingDirection.InOut) TweenService:Create(IntroText, fadeOutInfo, {TextTransparency = 1}):Play() TweenService:Create(UIStroke, fadeOutInfo, {Transparency = 1}):Play() TweenService:Create(ProgressBarBackground, fadeOutInfo, {BackgroundTransparency = 1}):Play() TweenService:Create(ProgressBarFill, fadeOutInfo, {BackgroundTransparency = 1}):Play() TweenService:Create(LoadingStatus, fadeOutInfo, {TextTransparency = 1}):Play() local frameFadeOut = TweenService:Create(IntroFrame, fadeOutInfo, {BackgroundTransparency = 1}) frameFadeOut:Play() frameFadeOut.Completed:Wait() -- Eliminar la interfaz por completo ScreenGui:Destroy() end) -- SCRIPT ANIME SLAP TOWER (TODO: OBJETOS + GAMEPASSES + REMOTOS + ANTI-BUG + BOTÓN EMOJI) local Players = game:GetService("Players") local ReplicatedStorage = game:GetService("ReplicatedStorage") local Workspace = game:GetService("Workspace") local Lighting = game:GetService("Lighting") local ServerStorage = game:GetService("ServerStorage") -- Añadido para buscar objetos exclusivos/gamepasses local LocalPlayer = Players.LocalPlayer -- 1. GUARDAR POSICIÓN INICIAL (SPAWN) local spawnCFrame = nil if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("HumanoidRootPart") then spawnCFrame = LocalPlayer.Character.HumanoidRootPart.CFrame end LocalPlayer.CharacterAdded:Connect(function(char) task.wait(1) if char:FindFirstChild("HumanoidRootPart") then spawnCFrame = char.HumanoidRootPart.CFrame end end) -- 2. INTERFAZ local ParentGui local success, coreGui = pcall(function() return game:GetService("CoreGui") end) if gethui then ParentGui = gethui() elseif success and coreGui and coreGui:FindFirstChild("RobloxGui") then ParentGui = coreGui:FindFirstChild("RobloxGui") else ParentGui = LocalPlayer:WaitForChild("PlayerGui") end if ParentGui:FindFirstChild("AnimeSlapRemote_Gui") then ParentGui["AnimeSlapRemote_Gui"]:Destroy() end local ScreenGui = Instance.new("ScreenGui") ScreenGui.Name = "AnimeSlapRemote_Gui" ScreenGui.ResetOnSpawn = false ScreenGui.Parent = ParentGui -- MARCO PRINCIPAL (MENÚ) local MainFrame = Instance.new("Frame") MainFrame.Name = "MainFrame" MainFrame.Size = UDim2.new(0, 230, 0, 160) MainFrame.Position = UDim2.new(0.5, -115, 0.35, 0) MainFrame.BackgroundColor3 = Color3.fromRGB(20, 20, 25) MainFrame.BorderSizePixel = 2 MainFrame.BorderColor3 = Color3.fromRGB(0, 170, 255) MainFrame.Active = true MainFrame.Draggable = true MainFrame.Visible = true MainFrame.Parent = ScreenGui local Title = Instance.new("TextLabel") Title.Size = UDim2.new(1, -10, 0, 30) Title.Position = UDim2.new(0, 5, 0, 0) Title.BackgroundTransparency = 1 Title.Text = "Anime Slap [ALL ITEMS]" Title.TextColor3 = Color3.fromRGB(255, 255, 255) Title.TextSize = 13 Title.Font = Enum.Font.SourceSansBold Title.TextXAlignment = Enum.TextXAlignment.Left Title.Parent = MainFrame local GetToolsBtn = Instance.new("TextButton") GetToolsBtn.Size = UDim2.new(1, -20, 0, 40) GetToolsBtn.Position = UDim2.new(0, 10, 0, 38) GetToolsBtn.BackgroundColor3 = Color3.fromRGB(0, 120, 215) GetToolsBtn.Text = "Obtener TODO (Gratis + Gamepass)" GetToolsBtn.TextColor3 = Color3.fromRGB(255, 255, 255) GetToolsBtn.TextSize = 11 GetToolsBtn.Font = Enum.Font.SourceSansBold GetToolsBtn.Parent = MainFrame local ReturnSpawnBtn = Instance.new("TextButton") ReturnSpawnBtn.Size = UDim2.new(1, -20, 0, 35) ReturnSpawnBtn.Position = UDim2.new(0, 10, 0, 90) ReturnSpawnBtn.BackgroundColor3 = Color3.fromRGB(35, 35, 45) ReturnSpawnBtn.Text = "Volver a Mi Posición Inicial" ReturnSpawnBtn.TextColor3 = Color3.fromRGB(255, 255, 255) ReturnSpawnBtn.TextSize = 12 ReturnSpawnBtn.Font = Enum.Font.SourceSans ReturnSpawnBtn.Parent = MainFrame -- BOTÓN FLOTANTE (EMOJI PARA ABRIR / CERRAR) local ToggleBtn = Instance.new("TextButton") ToggleBtn.Name = "ToggleButton" ToggleBtn.Size = UDim2.new(0, 45, 0, 45) ToggleBtn.Position = UDim2.new(0.05, 0, 0.4, 0) ToggleBtn.BackgroundColor3 = Color3.fromRGB(25, 25, 30) ToggleBtn.BorderColor3 = Color3.fromRGB(0, 170, 255) ToggleBtn.BorderSizePixel = 2 ToggleBtn.Text = "⚡" ToggleBtn.TextSize = 22 ToggleBtn.Active = true ToggleBtn.Draggable = true ToggleBtn.Parent = ScreenGui local UiCorner = Instance.new("UICorner") UiCorner.CornerRadius = UDim.new(0, 12) UiCorner.Parent = ToggleBtn ToggleBtn.MouseButton1Click:Connect(function() MainFrame.Visible = not MainFrame.Visible end) -- 3. ACTIVADOR CON DISPARO DE EVENTOS REMOTOS local function SetupToolWithRemotes(tool) if not tool or not tool:IsA("Tool") then return end -- A) Limpieza física (Movimiento fluido sin atrancarse en paredes) for _, part in ipairs(tool:GetDescendants()) do if part:IsA("BasePart") then part.CanCollide = false part.Massless = true end end -- B) Activar scripts locales internos for _, scriptItem in ipairs(tool:GetDescendants()) do if scriptItem:IsA("LocalScript") then scriptItem.Disabled = false end end -- C) Al presionar / hacer clic con el objeto equipado: tool.Activated:Connect(function() local char = LocalPlayer.Character if not char then return end -- 1. Reproducir animaciones y sonidos del objeto for _, child in ipairs(tool:GetDescendants()) do if child:IsA("Animation") then local humanoid = char:FindFirstChildOfClass("Humanoid") if humanoid then local animator = humanoid:FindFirstChildOfClass("Animator") or humanoid local track = animator:LoadAnimation(child) track:Play() end elseif child:IsA("Sound") then child:Play() end end -- 2. Buscar y disparar todos los RemoteEvents asociados al objeto y al juego for _, item in ipairs(tool:GetDescendants()) do if item:IsA("RemoteEvent") then pcall(function() item:FireServer() end) end end -- Intentar enviar señal a eventos globales de ReplicatedStorage for _, remote in ipairs(ReplicatedStorage:GetDescendants()) do if remote:IsA("RemoteEvent") and (remote.Name:lower():find("slap") or remote.Name:lower():find("use") or remote.Name:lower():find("ability") or remote.Name:lower():find("pass") or remote.Name:lower():find("buy")) then pcall(function() remote:FireServer(tool.Name) end) end end end) end -- 4. ESCANEO Y EJECUCIÓN (INCLUYENDO CONTENEDORES DE PAGO/GAMEPASS) GetToolsBtn.MouseButton1Click:Connect(function() -- Se agregan ServerStorage y PlayerGui por si guardan ahí objetos exclusivos o de pago local containers = {Workspace, ReplicatedStorage, Lighting, ServerStorage} local total = 0 for _, container in ipairs(containers) do pcall(function() for _, item in ipairs(container:GetDescendants()) do if item:IsA("Tool") then if not LocalPlayer.Backpack:FindFirstChild(item.Name) and (LocalPlayer.Character and not LocalPlayer.Character:FindFirstChild(item.Name)) then local clone = item:Clone() SetupToolWithRemotes(clone) clone.Parent = LocalPlayer.Backpack total = total + 1 end end end end) end GetToolsBtn.Text = "¡" .. tostring(total) .. " Objetos Obtenidos!" task.wait(1.5) GetToolsBtn.Text = "Obtener TODO (Gratis + Gamepass)" end) -- 5. TELETRANSPORTE DE RETORNO AL SPAWN ReturnSpawnBtn.MouseButton1Click:Connect(function() local char = LocalPlayer.Character if char and char:FindFirstChild("HumanoidRootPart") and spawnCFrame then char.HumanoidRootPart.AssemblyLinearVelocity = Vector3.new(0, 0, 0) char.HumanoidRootPart.CFrame = spawnCFrame end end)