ConvertTo-EncodedScript

function ConvertTo-EncodedScript
{
    param(
        $Path,
        [Switch]$Open
    )

    $Code = Get-Content -Path $Path -Raw
    $Bytes = [System.Text.Encoding]::Unicode.GetBytes($Code)
    $Base64 = [Convert]::ToBase64String($Bytes)
    $NewPath = [System.IO.Path]::ChangeExtension($Path, '.pse1')
    $Base64 | Set-Content -Path $NewPath

    if ($Open.IsPresent)
    {
        notepad.exe $NewPath
    }
}