FormatTools.psm1

function Format-Banner
{
    [CmdletBinding()]
    param ( 
        [Parameter(ValueFromRemainingArguments,ValueFromPipeline=$true,position=0,mandatory=$true)]
        [string[]]$strings, 
        [switch]$asString ,
        [char]$marker = "#"
        )
    BEGIN
    {
        $bit = @( 128, 64, 32, 16, 8, 4, 2, 1 )
        $chars = @(
                @( 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 ),   # ' '
                @( 0x38, 0x38, 0x38, 0x10, 0x00, 0x38, 0x38 ),   # '!'
                @( 0x24, 0x24, 0x24, 0x00, 0x00, 0x00, 0x00 ),   # '"' UNV
                @( 0x28, 0x28, 0xFE, 0x28, 0xFE, 0x28, 0x28 ),   # '#'
                @( 0x7C, 0x92, 0x90, 0x7C, 0x12, 0x92, 0x7C ),   # '$'
                @( 0xE2, 0xA4, 0xE8, 0x10, 0x2E, 0x4A, 0x8E ),   # '%'
                @( 0x30, 0x48, 0x30, 0x70, 0x8A, 0x84, 0x72 ),   # '&'
                @( 0x38, 0x38, 0x10, 0x20, 0x00, 0x00, 0x00 ),   # '''
                @( 0x18, 0x20, 0x40, 0x40, 0x40, 0x20, 0x18 ),   # '('
                @( 0x30, 0x08, 0x04, 0x04, 0x04, 0x08, 0x30 ),   # ')'
                @( 0x00, 0x44, 0x28, 0xFE, 0x28, 0x44, 0x00 ),   # '*'
                @( 0x00, 0x10, 0x10, 0x7C, 0x10, 0x10, 0x00 ),   # '+'
                @( 0x00, 0x00, 0x00, 0x38, 0x38, 0x10, 0x20 ),   # ','
                @( 0x00, 0x00, 0x00, 0x7C, 0x00, 0x00, 0x00 ),   # '-'
                @( 0x00, 0x00, 0x00, 0x00, 0x38, 0x38, 0x38 ),   # '.'
                @( 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80 ),   # '/'
                @( 0x38, 0x44, 0x82, 0x82, 0x82, 0x44, 0x38 ),   # '0'
                @( 0x10, 0x30, 0x50, 0x10, 0x10, 0x10, 0x7C ),   # '1'
                @( 0x7C, 0x82, 0x02, 0x7C, 0x80, 0x80, 0xFE ),   # '2'
                @( 0x7C, 0x82, 0x02, 0x7C, 0x02, 0x82, 0x7C ),   # '3'
                @( 0x80, 0x84, 0x84, 0x84, 0xFE, 0x04, 0x04 ),   # '4'
                @( 0xFE, 0x80, 0x80, 0xFC, 0x02, 0x82, 0x7C ),   # '5'
                @( 0x7C, 0x82, 0x80, 0xFC, 0x82, 0x82, 0x7C ),   # '6'
                @( 0xFC, 0x84, 0x08, 0x10, 0x20, 0x20, 0x20 ),   # '7'
                @( 0x7C, 0x82, 0x82, 0x7C, 0x82, 0x82, 0x7C ),   # '8'
                @( 0x7C, 0x82, 0x82, 0x7E, 0x02, 0x82, 0x7C ),   # '9'
                @( 0x10, 0x38, 0x10, 0x00, 0x10, 0x38, 0x10 ),   # ':'
                @( 0x38, 0x38, 0x00, 0x38, 0x38, 0x10, 0x20 ),   # ';'
                @( 0x08, 0x10, 0x20, 0x40, 0x20, 0x10, 0x08 ),   # '<'
                @( 0x00, 0x00, 0xFE, 0x00, 0xFE, 0x00, 0x00 ),   # '=' UNV.
                @( 0x20, 0x10, 0x08, 0x04, 0x08, 0x10, 0x20 ),   # '>'
                @( 0x7C, 0x82, 0x02, 0x1C, 0x10, 0x00, 0x10 ),   # '?'
                @( 0x7C, 0x82, 0xBA, 0xBA, 0xBC, 0x80, 0x7C ),   # '@'
                @( 0x10, 0x28, 0x44, 0x82, 0xFE, 0x82, 0x82 ),   # 'A'
                @( 0xFC, 0x82, 0x82, 0xFC, 0x82, 0x82, 0xFC ),   # 'B'
                @( 0x7C, 0x82, 0x80, 0x80, 0x80, 0x82, 0x7C ),   # 'C'
                @( 0xFC, 0x82, 0x82, 0x82, 0x82, 0x82, 0xFC ),   # 'D'
                @( 0xFE, 0x80, 0x80, 0xF8, 0x80, 0x80, 0xFE ),   # 'E'
                @( 0xFE, 0x80, 0x80, 0xF8, 0x80, 0x80, 0x80 ),   # 'F'
                @( 0x7C, 0x82, 0x80, 0x9E, 0x82, 0x82, 0x7C ),   # 'G'
                @( 0x82, 0x82, 0x82, 0xFE, 0x82, 0x82, 0x82 ),   # 'H'
                @( 0x38, 0x10, 0x10, 0x10, 0x10, 0x10, 0x38 ),   # 'I'
                @( 0x02, 0x02, 0x02, 0x02, 0x82, 0x82, 0x7C ),   # 'J'
                @( 0x84, 0x88, 0x90, 0xE0, 0x90, 0x88, 0x84 ),   # 'K'
                @( 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0xFE ),   # 'L'
                @( 0x82, 0xC6, 0xAA, 0x92, 0x82, 0x82, 0x82 ),   # 'M'
                @( 0x82, 0xC2, 0xA2, 0x92, 0x8A, 0x86, 0x82 ),   # 'N'
                @( 0xFE, 0x82, 0x82, 0x82, 0x82, 0x82, 0xFE ),   # 'O'
                @( 0xFC, 0x82, 0x82, 0xFC, 0x80, 0x80, 0x80 ),   # 'P'
                @( 0x7C, 0x82, 0x82, 0x82, 0x8A, 0x84, 0x7A ),   # 'Q'
                @( 0xFC, 0x82, 0x82, 0xFC, 0x88, 0x84, 0x82 ),   # 'R'
                @( 0x7C, 0x82, 0x80, 0x7C, 0x02, 0x82, 0x7C ),   # 'S'
                @( 0xFE, 0x10, 0x10, 0x10, 0x10, 0x10, 0x10 ),   # 'T'
                @( 0x82, 0x82, 0x82, 0x82, 0x82, 0x82, 0x7C ),   # 'U'
                @( 0x82, 0x82, 0x82, 0x82, 0x44, 0x28, 0x10 ),   # 'V'
                @( 0x82, 0x92, 0x92, 0x92, 0x92, 0x92, 0x6C ),   # 'W'
                @( 0x82, 0x44, 0x28, 0x10, 0x28, 0x44, 0x82 ),   # 'X'
                @( 0x82, 0x44, 0x28, 0x10, 0x10, 0x10, 0x10 ),   # 'Y'
                @( 0xFE, 0x04, 0x08, 0x10, 0x20, 0x40, 0xFE ),   # 'Z'
                @( 0x7C, 0x40, 0x40, 0x40, 0x40, 0x40, 0x7C ),   # '['
                @( 0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02 ),   # '\'
                @( 0x7C, 0x04, 0x04, 0x04, 0x04, 0x04, 0x7C ),   # ']'
                @( 0x10, 0x28, 0x44, 0x00, 0x00, 0x00, 0x00 ),   # '^'
                @( 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFE ),   # '_'
                @( 0x00, 0x38, 0x38, 0x10, 0x08, 0x00, 0x00 ),   # '`'
                @( 0x00, 0x18, 0x24, 0x42, 0x7E, 0x42, 0x42 ),   # 'a'
                @( 0x00, 0x7C, 0x42, 0x7C, 0x42, 0x42, 0x7C ),   # 'b'
                @( 0x00, 0x3C, 0x42, 0x40, 0x40, 0x42, 0x3C ),   # 'c'
                @( 0x00, 0x7C, 0x42, 0x42, 0x42, 0x42, 0x7C ),   # 'd'
                @( 0x00, 0x7E, 0x40, 0x7C, 0x40, 0x40, 0x7E ),   # 'e'
                @( 0x00, 0x7E, 0x40, 0x7C, 0x40, 0x40, 0x40 ),   # 'f'
                @( 0x00, 0x3C, 0x42, 0x40, 0x4E, 0x42, 0x3C ),   # 'g'
                @( 0x00, 0x42, 0x42, 0x7E, 0x42, 0x42, 0x42 ),   # 'h'
                @( 0x00, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08 ),   # 'i'
                @( 0x00, 0x02, 0x02, 0x02, 0x02, 0x42, 0x3C ),   # 'j'
                @( 0x00, 0x42, 0x44, 0x78, 0x48, 0x44, 0x42 ),   # 'k'
                @( 0x00, 0x40, 0x40, 0x40, 0x40, 0x40, 0x7E ),   # 'l'
                @( 0x00, 0x42, 0x66, 0x5A, 0x42, 0x42, 0x42 ),   # 'm'
                @( 0x00, 0x42, 0x62, 0x52, 0x4A, 0x46, 0x42 ),   # 'n'
                @( 0x00, 0x3C, 0x42, 0x42, 0x42, 0x42, 0x3C ),   # 'o'
                @( 0x00, 0x7C, 0x42, 0x42, 0x7C, 0x40, 0x40 ),   # 'p'
                @( 0x00, 0x3C, 0x42, 0x42, 0x4A, 0x44, 0x3A ),   # 'q'
                @( 0x00, 0x7C, 0x42, 0x42, 0x7C, 0x44, 0x42 ),   # 'r'
                @( 0x00, 0x3C, 0x40, 0x3C, 0x02, 0x42, 0x3C ),   # 's'
                @( 0x00, 0x3E, 0x08, 0x08, 0x08, 0x08, 0x08 ),   # 't'
                @( 0x00, 0x42, 0x42, 0x42, 0x42, 0x42, 0x3C ),   # 'u'
                @( 0x00, 0x42, 0x42, 0x42, 0x42, 0x24, 0x18 ),   # 'v'
                @( 0x00, 0x42, 0x42, 0x42, 0x5A, 0x66, 0x42 ),   # 'w'
                @( 0x00, 0x42, 0x24, 0x18, 0x18, 0x24, 0x42 ),   # 'x'
                @( 0x00, 0x22, 0x14, 0x08, 0x08, 0x08, 0x08 ),   # 'y'
                @( 0x00, 0x7E, 0x04, 0x08, 0x10, 0x20, 0x7E ),   # 'z'
                @( 0x38, 0x40, 0x40, 0xC0, 0x40, 0x40, 0x38 ),   # '{'
                @( 0x10, 0x10, 0x10, 0x10, 0x10, 0x10, 0x10 ),   # '|'
                @( 0x38, 0x04, 0x04, 0x06, 0x04, 0x04, 0x38 ),   # '}'
                @( 0x60, 0x92, 0x0C, 0x00, 0x00, 0x00, 0x00 )    # '~'
        );
        $o = new-object -TypeName psobject
        $o | add-member -MemberType NoteProperty -Name OriginalStrings -Value @()
        $o.psobject.typenames.Insert(0,"Banner")
    }
    PROCESS
    {
        $o.OriginalStrings += $strings
        $output = ""
        $length = "$strings".length
        $width = [math]::floor(($host.ui.rawui.buffersize.width-1)/8)
        # check and bail if a string is too long
        foreach ( $substring in $strings)
        {
            if ($substring.length -gt $width)
            {
                throw "strings must be less than $width characters"
            }
        }

        foreach($substring in $strings)
        {
            for($r = 0; $r -lt 7; $r++)
            {
                foreach($c in $substring.ToCharArray())
                {
                    $bitmap = 0
                    if ( ($c -ge " ") -and ($c -le [char]"~"))
                    {
                        $offset = ([int]$c) - 32
                        $bitmap = $chars[$offset][$r]
                    }
                    for($c=0;$c -lt 8;$c++)
                    {
                        if ( $bitmap -band $bit[$c] ) { $output += $marker } else { $output += " " }
                    }
                }
                $output += "`n"
            }
        }
        #$output
        $sb = $executioncontext.invokecommand.NewScriptBlock("'$output'")
        $o | add-member -force -MemberType ScriptMethod -Name ToString -Value $sb
        if ( $asString )
        {
            $o.ToString()
        }
        else
        {
            $o
        }
    }
}

function New-TableFormat
{
    [CmdletBinding()]
    param ( 
        [Parameter(Mandatory=$true,ValueFromPipeline=$true)]$object, 
        [Parameter(Mandatory=$true,Position=0)][object[]]$property, 
        [Parameter(Mandatory=$false,Position=1)][string]$group, 
        [switch]$auto, $name, 
        [switch]$force ,
        [switch]$StandAlone
        )
    Begin
    {
        $TypeCollection = @{}
    }
    Process
    {
        if ( ! $TypeCollection.ContainsKey($object.gettype().Fullname))
        {
            $TypeCollection[$object.gettype().FullName] = 1
        }
    }
    End
    {
        $SelectionSet = $null
        if ( $TypeCollection.Keys.Count -gt 1 )
        {
            $SelectionSetName = ($typeCollection.keys |sort-object| foreach-object { $_.split(".")[-1] }) -join "_"
            $SelectionSet = "<SelectionSets>",
                " <SelectionSet>",
                " <Name>${SelectionSetName}</Name>",
                " <Types>"
            $SelectionSet += $TypeCollection.Keys | foreach-object{ " <TypeName>$_</TypeName>" }
            $SelectionSet += " </Types>", " </SelectionSet>", "</SelectionSets>"

        }
        if ( $StandAlone )
        {
            "<Configuration>"
        }
        if ( $SelectionSet )
        {
            $SelectionSet
        }

        if ( $StandAlone )
        {
            " <ViewDefinitions>"
        }
        if ( $name )
        {
            $TN = $name
            $TypeNameSelector = "<TypeName>${TN}</TypeName>`n"
        }
        elseif ( $object -and ($SelectionSet -eq $null) )
        {
            if ( $object -is "PSObject")
            {
                $TN = $object.psobject.typenames[0]
            }
            else
            {
                $TN = $object.gettype().fullname
            }
            $TypeNameSelector = "<TypeName>${TN}</TypeName>`n"
        }
        elseif ( $SelectionSet -ne $null )
        {
            $TN = $SelectionSetName
            $TypeNameSelector = "<SelectionSetName>${SelectionSetName}</SelectionSetName>"
        }
        # skip this check for now, because we added support for hashtables,
        # we need to just keep going
        #foreach($p in $property)
        #{
        # if(! $object.psobject.members.item($p) -and ! $force)
        # {
        # $property = $property | ?{ $_ -notmatch $p }
        # write-host -for red "$p does not exist, skipping"
        # }
        #}
        $NAME = $TN.split(".")[-1]
        $sb = new-object -TypeName System.Text.StringBuilder
        [void]$sb.Append(" <View>`n")
        [void]$sb.Append(" <Name>${Name}Table</Name>`n")
        [void]$sb.Append(" <ViewSelectedBy>`n")
        [void]$sb.Append(" ${TypeNameSelector}`n")
        [void]$sb.Append(" </ViewSelectedBy>`n")
        if ( $group )
        {
            [void]$sb.Append(" <GroupBy>`n")
            [void]$sb.Append(" <PropertyName>$group</PropertyName>`n")
            [void]$sb.Append(" <Label>$group</Label>`n")
            [void]$sb.Append(" </GroupBy>`n")
        }
        [void]$sb.Append(" <TableControl>`n")
        if ( $auto ) 
        { 
        [void]$sb.Append(" <AutoSize />`n") 
        }
        [void]$sb.Append(" <TableHeaders>`n")
        ###
        ### HEADER
        ###
        foreach($p in $property)
        {
            if ( $p -is "string" )
            {
                [void]$sb.Append(" <TableColumnHeader><Label>${p}</Label></TableColumnHeader>`n")
            }
            elseif ( $p -is "scriptblock" )
            {
                [void]$sb.Append(" <TableColumnHeader>`n")
                [void]$sb.Append(" <Label>" + $p.ToString() + "</Label>`n")
                [void]$sb.Append(" </TableColumnHeader>`n")
            }
            elseif ( $p -is "hashtable" )
            {
                $Label = $p.keys | ?{$_ -match "^L" }
                if ( ! $Label )
                {
                    throw "need Name or Label Key"
                }
                [void]$sb.Append(" <TableColumnHeader>`n")
                [void]$sb.Append(" <Label>" + $p.$label + "</Label>`n")
                $Width = $p.Keys |?{$_ -match "^W"}
                if ( $Width )
                {
                    [void]$sb.Append(" <Width>" + $p.$Width + "</Width>`n")
                }
                $Align = $p.Keys |?{$_ -match "^A"}
                if ( $Align )
                {
                    [void]$sb.Append(" <Alignment>" + $p.$align + "</Alignment>`n")
                }
                [void]$sb.Append(" </TableColumnHeader>`n")
                # write-host -for red ("skipping " + $p.Name + " for now")
            }
        }
        [void]$sb.Append(" </TableHeaders>`n")
        ###
        ### ROWS
        ###
        [void]$sb.Append(" <TableRowEntries>`n")
        [void]$sb.Append(" <TableRowEntry>`n")
        [void]$sb.Append(" <TableColumnItems>`n")
        foreach($p in $property)
        {
            if ( $p -is "string" )
            {
                [void]$sb.Append(" <TableColumnItem><PropertyName>${p}</PropertyName></TableColumnItem>`n")
            }
            elseif ( $p -is "Scriptblock" )
            {
                [void]$sb.Append(" <TableColumnItem><ScriptBlock>" + $p.tostring() + "</ScriptBlock></TableColumnItem>`n") 
            }
            elseif ( $p -is "hashtable" )
            {
                $Name = $p.Keys | ?{$_ -match "^N" }
                if ( $Name ) 
                { 
                    [void]$sb.Append(" <TableColumnItem><PropertyName>" + $p.$Name + "</PropertyName></TableColumnItem>`n") 
                }
                $Expression = $p.Keys |?{$_ -match "^E" }
                if ( $Expression )
                {
                    if ( $p.$Expression -is "string" )
                    {
                        [void]$sb.Append(" <TableColumnItem><PropertyName>" + $p.$Expression + "</PropertyName></TableColumnItem>`n") 
                    }
                    elseif ( $p.$Expression -is "scriptblock" )
                    {
                        [void]$sb.Append(" <TableColumnItem><ScriptBlock>" + $p.$Expression + "</ScriptBlock></TableColumnItem>`n") 
                    }
                }
                else 
                { 
                    [void]$sb.Append(" <TableColumnItem><PropertyName>" + $p.Label + "</PropertyName></TableColumnItem>`n") 
                }
            }
        }
        [void]$sb.Append(" </TableColumnItems>`n")
        [void]$sb.Append(" </TableRowEntry>`n")
        [void]$sb.Append(" </TableRowEntries>`n")
        [void]$sb.Append(" </TableControl>`n")
        [void]$sb.Append(" </View>`n")
        $sb.ToString()
        if ( $StandAlone )
        {
            " </ViewDefinitions>"
            "</Configuration>"
        }
    }
}

function Format-String
{
    [CmdletBinding()]
    param ( [string]$string, [int]$width = 76 , [switch]$indent, [int]$padw = 0, [int]$tabWidth = 4)
    END
    {
        $string = $string.Replace("`n", " ").Replace(" ", " ")
        $columns = $width
        $text = $string.split( "[ `t]" )

        $pad = " " * $padw
        $lines = @()
        $l = 0
        $initialTab = ""
        if ( $indent )
        {
            $initialTab = " " * $tabWidth
        }

        $line = $initialTab + $pad
        #"01234567890123456789012345678901234567890123456789"
        foreach ( $word in $text )
        {
            if ( $word.length -gt $columns)
            {
                $wordFragment = $word
                while($wordFragment.Length -gt $columns)
                {
                    $sub = $columns - ($line.length + 1)
                    $line += $wordFragment.Substring(0,$sub)
                    $lines += $line.TrimEnd()
                    $line = $pad
                    $wordFragment = $wordFragment.SubString($sub)
                }
                $line = $wordFragment + " "
            }
            elseif ( $word.length + 1 + $line.length -gt $columns)
            {
                $lines += $line.TrimEnd()
                $line = $pad + $word + " "
            }
            else
            {
                $line += $word + " "
            }
            <#
            if (($line.length + $word.length + 1) -gt $columns )
            {
                 
            }
                if ( ($line.length + $word.length + 1 ) -gt $columns )
                {
                        #"big " + $word
                        $lines += ($pad + $line)
                        $lines += ($pad + $word)
                        $line = ""
                        $l = 0
                }
# elseif(($pad.length + $l + $word.length + 1) -lt $columns)
# {
# #"ok " + $word
# $line += $word + " "
# $l += $word.length + 1
# }
                else
                {
                        #"cr " + $word
                        $lines += ($pad + $line)
                        $line = $word + " "
                        $l = $line.length
                }
                #>

        }
        $lines += $line.TrimEnd()
        #$lines | %{ "${pad}${_}" }
        # if ( ! $indent )
        #{
        # $lines[0] = $lines[0].Trim()
        # }
        $lines
    }
}

function Get-Lorem
{
    [CmdletBinding()]
    param ([int]$count = 14 )
    END
    {
    $lorem = "Lorem","ipsum","dolor","sit","amet,","consectetaur","adipisicing","elit,",
        "sed","do","eiusmod","tempor","incididunt","ut","labore","et","dolore","magna",
        "aliqua.","Ut","enim","ad","minim","veniam,","quis","nostrud","exercitation",
        "ullamco","laboris","nisi","ut","aliquip","ex","ea","commodo","consequat.","Duis",
        "aute","irure","dolor","in","reprehenderit","in","voluptate","velit","esse","cillum",
        "dolore","eu","fugiat","nulla","pariatur.","Excepteur","sint","occaecat","cupidatat",
        "non","proident,","sunt","in","culpa","qui","officia","deserunt","mollit","anim","id",
        "est","laborum.","Sed","ut","perspiciatis","unde","omnis","iste","natus","error",
        "sit","voluptatem","accusantium","doloremque","laudantium,","totam","rem","aperiam,",
        "eaque","ipsa","quae","ab","illo","inventore","veritatis","et","quasi","architecto",
        "beatae","vitae","dicta","sunt","explicabo.","Nemo","enim","ipsam","voluptatem","quia",
        "voluptas","sit","aspernatur","aut","odit","aut","fugit,","sed","quia","consequuntur","magni",
        "dolores","eos","qui","ratione","voluptatem","sequi","nesciunt.","Neque","porro","quisquam",
        "est,","qui","dolorem","ipsum","quia","dolor","sit","amet,","consectetur,","adipisci",
        "velit,","sed","quia","non","numquam","eius","modi","tempora","incidunt","ut","labore","et",
        "dolore","magnam","aliquam","quaerat","voluptatem.","Ut","enim","ad","minima","veniam,",
        "quis","nostrum","exercitationem","ullam","corporis","suscipit","laboriosam,","nisi","ut","aliquid",
        "ex","ea","commodi","consequatur?","Quis","autem","vel","eum","iure","reprehenderit","qui",
        "in","ea","voluptate","velit","esse","quam","nihil","molestiae","consequatur,","vel",
        "illum","qui","dolorem","eum","fugiat","quo","voluptas","nulla","pariatur?",
        "At","vero","eos","et","accusamus","et","iusto","odio","dignissimos","ducimus","qui",
        "blanditiis","praesentium","voluptatum","deleniti","atque","corrupti","quos","dolores","et",
        "quas","molestias","excepturi","sint","occaecati","cupiditate","non","provident,","similique",
        "sunt","in","culpa","qui","officia","deserunt","mollitia","animi,","id","est","laborum",
        "et","dolorum","fuga.","Et","harum","quidem","rerum","facilis","est","et","expedita",
        "distinctio.","Nam","libero","tempore,","cum","soluta","nobis","est","eligendi","optio",
        "cumque","nihil","impedit","quo","minus","id","quod","maxime","placeat","facere","possimus,",
        "omnis","voluptas","assumenda","est,","omnis","dolor","repellendus.","Temporibus","autem",
        "quibusdam","et","aut","officiis","debitis","aut","rerum","necessitatibus","saepe","eveniet",
        "ut","et","voluptates","repudiandae","sint","et","molestiae","non","recusandae.","Itaque","earum",
        "rerum","hic","tenetur","a","sapiente","delectus,","ut","aut","reiciendis","voluptatibus","maiores",
        "alias","consequatur","aut","perferendis","doloribus","asperiores","repellat."

    $r = get-random -input $lorem -count $count
    $s = $r -join " "
    ([char]::ToUpper($s[0]) + $s.substring(1) + ".")
    }

}