local RunService = game:GetService("RunService")
local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local TeleportService = game:GetService("TeleportService")
local HttpService = game:GetService("HttpService")
local LocalPlayer = Players.LocalPlayer
local Teams = game:GetService("Teams")

local Character, RootPart, Humanoid
local AlreadyFound = {}
local Camera = workspace.Camera
local CamCFrame = Camera.CFrame
local TeamEvent = workspace:WaitForChild("Remote"):WaitForChild("TeamEvent")
local Status = LocalPlayer.Status
local isArrested = Status.isArrested

local TeamAPI = {
    Teams = {
        Criminals = Teams.Criminals,
        Guards = Teams.Guards,
        Neutral = Teams.Neutral
    },
    ChangeTeam = function(team)
        TeamEvent:FireServer(team.Name)
    end,
    CanQuickRespawn = function()
        return true
    end
}

local DisconnectStamina = function(TargetHumanoid)
    task.wait(1)
    local JumpConns = getconnections(TargetHumanoid.Jumping)
    for _, JumpConn in pairs(JumpConns) do
        JumpConn:Disconnect()
    end
end

local HandleChar = function(Character)
    local Humanoid = Character:WaitForChild("Humanoid", 10)
    if Humanoid then
        DisconnectStamina(Humanoid)
    end
end

local function FindGunSpawner(GunName)
    if AlreadyFound[GunName] ~= nil then
        return AlreadyFound[GunName], true
    end
    for i,v in pairs(workspace:GetChildren()) do
        if v.Name == "TouchGiver" then
            if v:GetAttribute("ToolName") == GunName then
                AlreadyFound[GunName] = v.TouchGiver
                return v.TouchGiver, false
            end
        end
    end
end

local function GetTool(ToolName)
    return LocalPlayer:FindFirstChild("Backpack") and LocalPlayer.Backpack:FindFirstChild(ToolName) or LocalPlayer.Character and LocalPlayer.Character:FindFirstChild(ToolName)
end

local function GetGun(GunName)
    local Giver, Found = FindGunSpawner(GunName)
    if not Found then
        local CloneGiver = Giver:Clone()
        CloneGiver.Parent = Giver.Parent
        Giver.Parent = workspace.Folder
        Giver.CanCollide = false
        Giver.Transparency = 1
    end
    repeat task.wait()
        if RootPart then
            Giver.CFrame = RootPart.CFrame * CFrame.new(math.random(-2, 2),0,0)
        end
    until GetTool(GunName)
end

local function DoorsHandler()
    local Doors = workspace:FindFirstChild("Doors")
    if Doors then
        for i,v in pairs(Doors:GetDescendants()) do
            if v:IsA("BasePart") then
                v.CanCollide = false
                v.Transparency = 0.6
            end
        end
    end
    
    local CellDoors = workspace:FindFirstChild("CellDoors")
    if CellDoors then
        for i,v in pairs(CellDoors:GetDescendants()) do
            if v:IsA("BasePart") then
                v.CanCollide = false
                v.Transparency = 0.6
            end
        end
    end
end

local PlayerTased = ReplicatedStorage.GunRemotes.PlayerTased
local FakePlayerTased = PlayerTased:Clone()
FakePlayerTased.Parent = PlayerTased.Parent
PlayerTased:Destroy()

local CrimBase = CFrame.new(-927, 94, 2055)
local Yard = CFrame.new(832, 98, 2510)

local function Teleport(TargetCFrame, Character)
    CamCFrame = Camera.CFrame
    if not Character then Character = LocalPlayer.Character end
    if Character and Character:FindFirstChild("Humanoid") then
        Character.Humanoid:ChangeState(Enum.HumanoidStateType.Dead)
        Character.Humanoid.Name = "Valid"
    end
    local RootPart
    local OnRespawn
    OnRespawn = LocalPlayer.CharacterAdded:Connect(function(Character)
        RootPart = Character:WaitForChild("HumanoidRootPart")
        RootPart.CFrame = TargetCFrame
        OnRespawn:Disconnect()
    end)
    LocalPlayer.CharacterAdded:wait()
    repeat task.wait() until RootPart and (RootPart.Position - TargetCFrame.Position).Magnitude < 1
end

local function QuickSetup(Character)
    local Humanoid = Character:WaitForChild("Humanoid")
    local Connect
    Connect = Humanoid.Died:Connect(function()
        if TeamAPI.CanQuickRespawn() then
            TeamAPI.ChangeTeam(LocalPlayer.Team)
        end
        Connect:Disconnect()
    end)
end

local function JapaDo()
    if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
        LocalPlayer.Character.Humanoid:ChangeState(Enum.HumanoidStateType.Dead)
    end
end

-- Sistema de quebrar vasos melhorado
local HasHammerEquipped = false

local function BreakAllToilets()
    local meleeEvent = ReplicatedStorage:WaitForChild("meleeEvent")
    local foundToilets = false
    
    for _, toilet in pairs(workspace:GetDescendants()) do
        if toilet.Name == "Toilet" and toilet:IsA("Model") then
            foundToilets = true
            for i = 1, 15 do
                meleeEvent:FireServer(toilet, 1)
            end
        end
    end
    
    return foundToilets
end

local function CheckHammerAndBreakToilets()
    if not LocalPlayer.Character then return end
    
    local hasHammerNow = LocalPlayer.Character:FindFirstChild("Hammer") ~= nil
    
    if hasHammerNow and not HasHammerEquipped then
        BreakAllToilets()
    end
    
    HasHammerEquipped = hasHammerNow
end

-- Auto Arrest System by xtel
local ArrestPlayer = ReplicatedStorage:WaitForChild("Remotes"):WaitForChild("ArrestPlayer")
local LastArrestAttempt = {}
local ARREST_COOLDOWN = 1

local function AutoArrest()
    local character = LocalPlayer.Character
    if not character then return end
    
    local humanoid = character:FindFirstChild("Humanoid")
    local humanoidRootPart = character:FindFirstChild("HumanoidRootPart")
    if not humanoid or not humanoidRootPart or humanoid.Health <= 0 then return end
    
    local currentTime = tick()
    
    for _, player in pairs(Players:GetPlayers()) do
        if player ~= LocalPlayer then
            local targetCharacter = player.Character
            if targetCharacter then
                local targetHumanoid = targetCharacter:FindFirstChild("Humanoid")
                local targetHRP = targetCharacter:FindFirstChild("HumanoidRootPart")
                
                if targetHumanoid and targetHRP and targetHumanoid.Health > 0 then
                    local distance = (humanoidRootPart.Position - targetHRP.Position).magnitude
                    
                    if distance <= 15 then
                        if player.Team == Teams.Criminals or player.Team == Teams.Inmates then
                            local canArrest = false
                            
                            if player.Team == Teams.Criminals then
                                canArrest = true
                            elseif player.Team == Teams.Inmates then
                                local attributes = targetCharacter:GetAttributes()
                                if attributes.Hostile or attributes.Tased or attributes.Trespassing then
                                    canArrest = true
                                end
                            end
                            
                            if canArrest and not targetCharacter:FindFirstChildOfClass("ForceField") then
                                if not LastArrestAttempt[player] or (currentTime - LastArrestAttempt[player]) > ARREST_COOLDOWN then
                                    local success = pcall(function()
                                        ArrestPlayer:InvokeServer(player)
                                    end)
                                    
                                    LastArrestAttempt[player] = currentTime
                                end
                            end
                        end
                    end
                end
            end
        end
    end
end

local namecall
namecall = hookmetamethod(game, "__namecall", function(self,...)
    local method = getnamecallmethod()
    if method == "GetAttributes" then
        local result = namecall(self, ...)
        result.AutoFire = true
        result.FireRate = 0.075
        result.Range = 999999999
        result.Spread = 999999999
        return result
    end
    return namecall(self, ...)
end)

function JoinLowestPingServer()
    local IGNORE_FILE = "ServerHop.txt"
    local HOUR = 3600

    local function getIgnoredServers()
        if not isfile(IGNORE_FILE) then
            return {}
        end

        local ignored = {}
        local currentTime = os.time()
        
        local success, fileContent = pcall(readfile, IGNORE_FILE)
        if not success or not fileContent then
            return {}
        end

        for _, line in ipairs(fileContent:split("\n")) do
            local serverId, timestampStr = line:match("([^|]+)|?(%d*)")
            local timestamp = tonumber(timestampStr)
            
            if serverId and timestamp and (currentTime - timestamp < HOUR) then
                ignored[serverId] = timestamp
            end
        end
        return ignored
    end

    local function updateIgnoredServers(servers)
        local lines = {}
        for id, time in pairs(servers) do
            table.insert(lines, id .. "|" .. tostring(time))
        end
        pcall(writefile, IGNORE_FILE, table.concat(lines, "\n"))
    end

    local ignoredServers = getIgnoredServers()
    local cursor = ""

    while true do
        local requestUrl = string.format(
            "https://games.roblox.com/v1/games/%d/servers/Public?limit=100&sortOrder=Asc&cursor=%s",
            game.PlaceId,
            cursor
        )

        local success, result = pcall(function()
            local response = game:HttpGet(requestUrl)
            return HttpService:JSONDecode(response)
        end)

        if not success or not result or not result.data then
            return
        end

        local serverList = result.data
        
        table.sort(serverList, function(a, b)
            return a.ping < b.ping
        end)

        for _, server in ipairs(serverList) do
            if not ignoredServers[server.id] then
                ignoredServers[server.id] = os.time()
                updateIgnoredServers(ignoredServers)

                local teleportSuccess, teleportError = pcall(function()
                    TeleportService:TeleportToPlaceInstance(game.PlaceId, server.id, LocalPlayer)
                end)
                
                if not teleportSuccess then
                end
                
                return
            end
        end

        if not result.nextPageCursor then
            break
        end
        
        cursor = result.nextPageCursor
        task.wait(0.5)
    end
end

local function AutoOpenDoors()
    local Doors = workspace.Doors
    local function Touch(HitBox)
        firetouchinterest(CharPart, HitBox, 0)
        firetouchinterest(CharPart, HitBox, 1)
    end

    RunService.Heartbeat:Connect(function()
        Character = LocalPlayer.Character
        if Character then
            CharPart = Character["Right Arm"]
            if Character.Humanoid.Health > 0 then
                for i, Object in pairs(Doors:GetDescendants()) do
                    if Object.Name == "hitbox" then
                        task.spawn(Touch, Object)
                    end
                end
            end
        end
    end)
end

local Gun1 = "AK-47"
local Gun2 = "Remington 870"
local Gun3 = "M9"

RunService.Heartbeat:Connect(function()
    Character = LocalPlayer.Character
    if Character then
        RootPart = Character:FindFirstChild("HumanoidRootPart")
        Humanoid = Character:FindFirstChild("Humanoid")
        if Humanoid then
            Humanoid:SetStateEnabled(Enum.HumanoidStateType.Dead, false)
            if not GetTool(Gun1) then
                GetGun(Gun1)
            end
            if not GetTool(Gun2) then
                GetGun(Gun2)
            end
            if not GetTool(Gun3) then
                GetGun(Gun3)
            end
            DoorsHandler()
        end
    end
end)

RunService.Heartbeat:Connect(function()
    if isArrested.Value == true then
        JapaDo()
    end
end)

RunService.Heartbeat:Connect(function()
    CheckHammerAndBreakToilets()
end)

RunService.Heartbeat:Connect(function()
    AutoArrest()
end)

LocalPlayer.CharacterAdded:Connect(function(Character)
    QuickSetup(Character)
    HandleChar(Character)
    HasHammerEquipped = false
end)

LocalPlayer.CharacterRemoving:Connect(function(Character)
    if Character:FindFirstChild("Humanoid") and Character.Humanoid.Name ~= "Valid" then
        Teleport(Character.HumanoidRootPart.CFrame, Character)
        task.wait()
        Camera.CFrame = CamCFrame
    end
end)

game:GetService("CoreGui").DescendantAdded:Connect(function(Descendant)
    if Descendant.Name == "ErrorPrompt" then
        JoinLowestPingServer()
    end
end)

task.spawn(function()
    if LocalPlayer.Character then
        QuickSetup(LocalPlayer.Character)
        HandleChar(LocalPlayer.Character)
    end
end)

TeamAPI.ChangeTeam(TeamAPI.Teams.Criminals)

AutoOpenDoors()

game:GetService("StarterGui"):SetCore("SendNotification", {
    Title = "",
    Text = "Made by xtel",
    Duration = 3
})

print("user: 2_ll1 | 🇧🇷")

-- tomato.txt - Infinite Stamina OPEN SOURCE
-- tomato.txt - Anti-Tase System OPEN SOURCE  
-- tomato.txt - Auto Guns System OPEN SOURCE
-- tomato.txt - Quick Respawn System OPEN SOURCE
-- tomato.txt - Team API OPEN SOURCE
-- tomato.txt - JapaDo Anti-Arrest OPEN SOURCE
-- Server Hop System OPEN SOURCE
-- Break All Toilets System by xtel
-- Auto Arrest System by xtel
-- Prison Life scripts compilation by xtel
-- All scripts used are open source and publicly available