local Players = game:GetService("Players")

local function waitForChar(plr)
    local char = plr.Character or plr.CharacterAdded:Wait()
    char:WaitForChild("Humanoid")
    return char
end

local function thinPart(part, color)
    if part and part:IsA("BasePart") then
        part.Color = color
        part.Size = Vector3.new(part.Size.X, part.Size.Y, 0.05)
        part.Material = Enum.Material.SmoothPlastic
    end
end

local function paperCharacter(char)
    -- remove roupas e acessórios
    for _, obj in ipairs(char:GetDescendants()) do
        if obj:IsA("Accessory")
        or obj:IsA("Shirt")
        or obj:IsA("Pants")
        or obj:IsA("ShirtGraphic") then
            obj:Destroy()
        end

        if (obj:IsA("SpecialMesh") or obj:IsA("Mesh"))
        and obj.Parent
        and obj.Parent.Name == "Head" then
            obj:Destroy()
        end
    end

    -- cabeça
    thinPart(char:FindFirstChild("Head"), Color3.fromRGB(255,255,255))

    -- tronco
    thinPart(char:FindFirstChild("UpperTorso") or char:FindFirstChild("Torso"), Color3.fromRGB(0,170,0))

    -- braços
    thinPart(char:FindFirstChild("LeftUpperArm") or char:FindFirstChild("Left Arm"), Color3.fromRGB(255,255,255))
    thinPart(char:FindFirstChild("RightUpperArm") or char:FindFirstChild("Right Arm"), Color3.fromRGB(255,255,255))

    -- pernas
    local legColor = Color3.fromRGB(120,190,255)
    thinPart(char:FindFirstChild("LeftUpperLeg") or char:FindFirstChild("Left Leg"), legColor)
    thinPart(char:FindFirstChild("RightUpperLeg") or char:FindFirstChild("Right Leg"), legColor)
end

-- aplica em todos
for _, plr in ipairs(Players:GetPlayers()) do
    task.spawn(function()
        local char = waitForChar(plr)
        paperCharacter(char)
    end)

    plr.CharacterAdded:Connect(function(char)
        task.wait(1)
        paperCharacter(char)
    end)
end