samples/ProcessPercent.ps1

#requires -version 5.1
#requires -module PSScriptTools

$processes = Get-Process
$total = ($processes | Measure-Object -Property WS -Sum).sum

$processes | Sort-Object WS -Descending |
Select-Object -First 25 |
Format-Table -Property Name, ID, Handles,
@{Name = 'WS(MB)'; Expression = { Format-Value $_.WS -Unit MB } },
@{Name = 'PctWS'; Expression = {
        $pct = Format-Percent -Value $_.ws -Total $total -Decimal 2
        $bar = New-ANSIBar -Range 14 -Spacing $pct -Character BlackSquare
        '{0:00.00} {1}' -f $pct, $bar
    }
}