Skip to content

Instantly share code, notes, and snippets.

@ProIntegritate

ProIntegritate/gist:8c543d5e80c8aec34d8e6ad46085be69

Created October 13, 2021 21:39
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save ProIntegritate/8c543d5e80c8aec34d8e6ad46085be69 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save ProIntegritate/8c543d5e80c8aec34d8e6ad46085be69 to your computer and use it in GitHub Desktop.
Download ZIP

Revisions

  1. ProIntegritate created this gist Oct 13, 2021.
    23 changes: 23 additions & 0 deletions gistfile1.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,23 @@
    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 █
    ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀