Amiga Guru mediation

gistfile1.txt

        Dim sTopChar As String = "▄"
        Dim sBottomChar As String = "▀"
        Dim sVerticalChar As String = "█"

        Console.ForegroundColor = ConsoleColor.Red
        For n = 0 To 63
            Console.Write(sTopChar)
        Next
        Console.Write(vbCrLf)
        Console.WriteLine(sVerticalChar & "    Software failure.  Press left mouse button to continue    " & sVerticalChar)
        Console.WriteLine(sVerticalChar & "              Guru mediation. #00000000.00000000              " & sVerticalChar)
        For n = 0 To 63
            Console.Write(sBottomChar)
        Next
        Console.Write(vbCrLf)
        Console.ForegroundColor = ConsoleColor.White

=

▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄
█    Software failure.  Press left mouse button to continue    █
█              Guru mediation. #00000000.00000000              █
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀