Happy Birthday

$Text = @"
          *                                             *
                                               *
                    *
                                  *
                                                            *
         *                 HAPPY BIRTHDAY!
                                                  *
             *
                           *             *
                                                     *
      *                                                               *
               *
                               (             )
                       )      (*)           (*)      (
              *       (*)      |             |      (*)
                       |      |~|           |~|      |          *
                      |~|     | |           | |     |~|
                      | |     | |           | |     | |
                     ,| |a@@@@| |@@@@@@@@@@@| |@@@@a| |.
                .,a@@@| |@@@@@| |@@@@@@@@@@@| |@@@@@| |@@@@a,.
              ,a@@@@@@| |@@@@@@@@@@@@.@@@@@@@@@@@@@@| |@@@@@@@a,
             a@@@@@@@@@@@@@@@@@@@@@' . `@@@@@@@@@@@@@@@@@@@@@@@@a
             ;`@@@@@@@@@@@@@@@@@@'   .   `@@@@@@@@@@@@@@@@@@@@@';
             ;@@@`@@@@@@@@@@@@@'     .     `@@@@@@@@@@@@@@@@'@@@;
             ;@@@;,.aaaaaaaaaa       .       aaaaa,,aaaaaaa,;@@@;
             ;;@;;;;@@@@@@@@;@      @.@      ;@@@;;;@@@@@@;;;;@@;
             ;;;;;;;@@@@;@@;;@    @@ . @@    ;;@;;;;@@;@@@;;;;;;;
             ;;;;;;;;@@;;;;;;;  @@   .   @@  ;;;;;;;;;;;@@;;;;@;;
             ;;;;;;;;;;;;;;;;;@@     .     @@;;;;;;;;;;;;;;;;@@@;
         ,%%%;;;;;;;;@;;;;;;;;       .       ;;;;;;;;;;;;;;;;@@;;%%%,
      .%%%%%%;;;;;;;@@;;;;;;;;     ,%%%,     ;;;;;;;;;;;;;;;;;;;;%%%%%%,
     .%%%%%%%;;;;;;;@@;;;;;;;;   ,%%%%%%%,   ;;;;;;;;;;;;;;;;;;;;%%%%%%%,
     %%%%%%%%`;;;;;;;;;;;;;;;;  %%%%%%%%%%%  ;;;;;;;;;;;;;;;;;;;'%%%%%%%%
     %%%%%%%%%%%%`;;;;;;;;;;;;,%%%%%%%%%%%%%,;;;;;;;;;;;;;;;'%%%%%%%%%%%%
     `%%%%%%%%%%%%%%%%%,,,,,,,%%%%%%%%%%%%%%%,,,,,,,%%%%%%%%%%%%%%%%%%%%'
       `%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'
           `%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'
                  """"""""""""""`,,,,,,,,,'"""""""""""""""""
                                 `%%%%%%%'
                                  `%%%%%'
                                   %%%
                                  %%%%%
                               .,%%%%%%%,.
                          ,%%%%%%%%%%%%%%%%%%%,
"@

Function Play-Tone ($Tone)
{
 # Double up on C, G, and F -- 2 numbers each
    #A
    if (  $Tone -eq "A" ){
        [console]::beep(440,500)
     }
    #B
    ElseIf(  $Tone -eq "B" ){
        [console]::beep(493.88,500)
     }
    #C
    ElseIf(  $Tone -eq "C" ){
        [console]::beep(523.25,500)
     }
    #D
    ElseIf(  $Tone -eq "D" ){
        [console]::beep(587.33,500)
     }
    #E
    ElseIf(  $Tone -eq "E" ){
        [console]::beep(659.26,500)
     }
    #F
    ElseIf(  $Tone -eq "F" ){
        [console]::beep(698.46,500)
     }
    #G
    ElseIf(  $Tone -eq "G" ){
        [console]::beep(783.99,500)
     }

}

Function Play-Song ( $Keys )
{
    ForEach ( $Key in $Keys.ToCharArray() )
    {
        Play-Tone $Key
    }
}

Clear-Host
Write-Host $Text
Play-Song "CCDCFECCDCGFCCG FDCB FFECDC"