Jump to content

Funky text!


Mat
 Share

Recommended Posts

--|||||||--|||--|||--||----||--||---||--||--||------|||||||||--|||||||--||----||--|||||||||-

--|||------|||--|||--||||--||--||-||----||--||---------|||-----|||-------||--||------|||----

--||||||---|||--|||--||-||-||--||||------||||----------|||-----||||||-----||||-------|||----

--|||------|||--|||--||--||||--||-||------||-----------|||-----|||-------||--||------|||----

--|||-------||||||---||----||--||---||----||-----------|||-----|||||||--||----||-----|||----

--||||||---||--||------|||||||||||--||||||---|||||||--|||||||---||||||---|||||||--|||-----

--|||-|||--||--||------|||-|||-|||--|||-|||----|||----|||------|||-------|||------|||-----

--||||||----||||-------|||-|||-|||--|||-|||----|||----||||||----||||||---||||||---|||-----

--|||-|||----||--------|||-|||-|||--|||-|||----|||----|||-----------|||--|||------|||-----

--||||||-----||--------|||-|||-|||--||||||---|||||||--|||||||---||||||---|||||||--|||||||-

don't ask why, it was a pretty stupid Idea that ended up working!

This is only the function, the GUI is in the process of being made, I'll release that when it's done!

Still a few things:

* word wraps a bitch

* there are a lot of different characters, so this is just the basics.

Not everything looks perfect either...

anyway:

The script:

;---------------------------------------------------------------------------------------------------------------------------------
;-----------------------------------------------| M@'s Funky Text |---------------------------------------------------------------
;-------------------------------------------------| TextToFunky |-----------------------------------------------------------------
;
; Description:
;     Turns a standard string into "Funky text" E.g.
;
;--||||||||--|||--|||--|||||||||--||||||||--|||||||--|||||||||------||||||||--||||||||--|||||||--||---||---||||||--
;--|||--|||--|||--|||-----|||-----|||--|||----|||-------|||---------|||--|||--|||--|||--|||------||-||----|||------
;--||||||||--|||--|||-----|||-----|||--|||----|||-------|||---------||||||||--|||--|||--|||------||||------||||||--
;--|||--|||--|||--|||-----|||-----|||--|||----|||-------|||---------|||-|||---|||--|||--|||------||-||---------|||-
;--|||--|||---||||||------|||-----||||||||--|||||||-----|||---------|||---||--||||||||--|||||||--||---||---||||||--
;
; Practically of no real use, but a bit of fun, and can be used in stuff such as signitures (see mine!). It works simply by making
; an array of lines,and concatenating them to make them a long line of text. If you want another character to be placed, just put
; it in the switch, they are very simple to make, just use $B for a blank space and $t for text. Make sure they are even, EG line
; 1 has the same number of characters as line 2, or else the whole text will appear wobbly.
;
; Syntax
;     TextToFunky ($Text, $B, $t, $Flag)
;
; Parameters
;     * $Text is the text to be converted
;     * $B is the character to be used for blank spaces. default is "-"
;     * $t is the character to be shown as the text. default is "|"
;     * $Flag is the return value, it uses a special table shown below.
;
; Example:
;     TextToFunky ("AutoIt Rocks", "-", "|", 8)
;          (This syntax will get you the message shown above)
;
; PLEASE NOTE:
;     * Not all characters are programmed in, if you want additional characters, make them yourself, it is not hard.
;     * using a space as the blank character may not work, as many browsers etc. cancel out duplicates.
;     * Some characters are wider than others, and some browers and text editors show information differently to others.
;           If it does not work, then use a different combination
;           I have been testing mostly in notepad, and it works fine with almost all combos
;     * If you use an unrecognized character, It will replace it with a question mark (?)
;     * $Flag returns a line of the finished string, default is 0:
;          0 = Returns all, including @CRLF, so it can be written staraight to a file.
;          1 = Line 1 (outlines the characters used for blanks and the text converted)
;          2 to 6 = the corresponding line
;          7 = The array of lines, with no additions, such as @CRLF, this cannot be copied into a file startight away.
;          8 = All lines except the first (gives you only the actual text)
;          9 = Returns the text to be converted, blank and text chars, in an array:
;               [0] = Text
;               [1] = Blank Character
;               [2] = Text Character
;
; Return values
;     See above
;
; @Error values
;     1 = Blank String
;     2 = $B is the same as $t (It then switches back to the default)
;
;---------------------------------------------------------------------------------------------------------------------------------

Func TextToFunky ($Text, $B, $t, $flag)
   Local $String, $n, $Line[6], $Return

   $Text = StringUpper ($Text) ; Halves the size of the switch!

   If $B = "" Or -1 Then
      $B = "-"
   EndIf

   If $t = "" Or -1 Then
      $t = "|"
   EndIf

   If $B = $t Then
      Return Seterror (2)
      $B = "-"
      $t = "|"
   EndIf

   If $Text = "" Then
      Return Seterror (1)
      $String = ""
   Else
      $String = StringSplit ($Text, "", 0) ; Seperates it out into individual letters.
   Endif
   
   $Line[0] = "; M@'s Funky text!!! - Blank character; " & $B & "    Text Character; " & $t & "    Text converted; "
   $Line[1] = $B
   $Line[2] = $B
   $Line[3] = $B
   $Line[4] = $B
   $Line[5] = $B
   
   For $n = 1 to $String[0]
      Switch $String[$n]
         Case " "
            $Line[0] &= " "
            $Line[1] &= $B & $B & $B & $B ; ----
            $Line[2] &= $B & $B & $B & $B ; ----
            $Line[3] &= $B & $B & $B & $B ; ----
            $Line[4] &= $B & $B & $B & $B ; ----
            $Line[5] &= $B & $B & $B & $B ; ----
         Case "A"
            $Line[0] &= "A"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||---|||-
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||||-
            $Line[4] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||---|||-
            $Line[5] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||---|||-
         Case "B"
            $Line[0] &= "B"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
            $Line[2] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
            $Line[4] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
         Case "C"
            $Line[0] &= "C"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[3] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[4] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
         Case "D"
            $Line[0] &= "D"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
            $Line[2] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[3] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[4] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
         Case "E"
            $Line[0] &= "E"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
            $Line[4] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
         Case "F"
            $Line[0] &= "F"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
            $Line[4] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[5] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
         Case "G"
            $Line[0] &= "G"
            $Line[1] &= $B & $B & $t & $t & $t & $t & $t & $t & $B ; --||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[3] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[4] &= $B & $t & $t & $t & $B & $B & $t & $t & $B ; -|||--||-
            $Line[5] &= $B & $B & $t & $t & $t & $t & $t & $t & $B ; --||||||-
         Case "H"
            $Line[0] &= "H"
            $Line[1] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[2] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[4] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[5] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
         Case "I"
            $Line[0] &= "I"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[2] &= $B & $B & $B & $t & $t & $t & $B & $B & $B ; ---|||---
            $Line[3] &= $B & $B & $B & $t & $t & $t & $B & $B & $B ; ---|||---
            $Line[4] &= $B & $B & $B & $t & $t & $t & $B & $B & $B ; ---|||---
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
         Case "J"
            $Line[0] &= "J"
            $Line[1] &= $B & $B & $B & $t & $t & $t & $t & $t & $B ; ---|||||-
            $Line[2] &= $B & $B & $B & $B & $B & $t & $t & $t & $B ; -----|||-
            $Line[3] &= $B & $B & $B & $B & $B & $t & $t & $t & $B ; -----|||-
            $Line[4] &= $B & $t & $t & $B & $B & $t & $t & $t & $B ; -||--|||-
            $Line[5] &= $B & $B & $t & $t & $t & $t & $t & $t & $B ; --||||||-
         Case "K"
            $Line[0] &= "K"
            $Line[1] &= $B & $t & $t & $B & $B & $B & $t & $t & $B ; -||---||-
            $Line[2] &= $B & $t & $t & $B & $t & $t & $B & $B & $B ; -||-||---
            $Line[3] &= $B & $t & $t & $t & $t & $B & $B & $B & $B ; -||||----
            $Line[4] &= $B & $t & $t & $B & $t & $t & $B & $B & $B ; -||-||---
            $Line[5] &= $B & $t & $t & $B & $B & $B & $t & $t & $B ; -||---||-
         Case "L"
            $Line[0] &= "L"
            $Line[1] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[2] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[3] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[4] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
         Case "M"
            $Line[0] &= "M"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-|||-
            $Line[3] &= $B & $t & $t & $t & $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-|||-
            $Line[4] &= $B & $t & $t & $t & $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-|||-
            $Line[5] &= $B & $t & $t & $t & $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-|||-
         Case "N"
            $Line[0] &= "N"
            $Line[1] &= $B & $t & $t & $B & $B & $B & $B & $t & $t & $B ; -||----||-
            $Line[2] &= $B & $t & $t & $t & $t & $B & $B & $t & $t & $B ; -||||--||-
            $Line[3] &= $B & $t & $t & $B & $t & $t & $B & $t & $t & $B ; -||-||-||-
            $Line[4] &= $B & $t & $t & $B & $B & $t & $t & $t & $t & $B ; -||--||||-
            $Line[5] &= $B & $t & $t & $B & $B & $B & $B & $t & $t & $B ; -||----||-
         Case "O"
            $Line[0] &= "O"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -||||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[3] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[4] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -||||||||-
         Case "P"
            $Line[0] &= "P"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -||||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -||||||||-
            $Line[4] &= $B & $t & $t & $t & $B & $B & $B & $B & $B & $B ; -|||------
            $Line[5] &= $B & $t & $t & $t & $B & $B & $B & $B & $B & $B ; -|||------
         Case "Q"
            $Line[0] &= "Q"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $B & $B & $B ; -||||||---
            $Line[2] &= $B & $t & $t & $B & $B & $t & $t & $B & $B & $B ; -||--||---
            $Line[3] &= $B & $t & $t & $B & $B & $t & $t & $B & $B & $B ; -||--||---
            $Line[4] &= $B & $t & $t & $B & $t & $t & $t & $t & $B & $B ; -||-||||--
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $B & $t & $B ; -||||||-|-
         Case "R"
            $Line[0] &= "R"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -||||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -||||||||-
            $Line[4] &= $B & $t & $t & $t & $B & $t & $t & $t & $B & $B ; -|||-|||--
            $Line[5] &= $B & $t & $t & $t & $B & $B & $B & $t & $t & $B ; -|||---||-
         Case "S"
            $Line[0] &= "S"
            $Line[1] &= $B & $B & $t & $t & $t & $t & $t & $t & $B & $B ; --||||||--
            $Line[2] &= $B & $t & $t & $t & $B & $B & $B & $B & $B & $B ; -|||------
            $Line[3] &= $B & $B & $t & $t & $t & $t & $t & $t & $B & $B ; --||||||--
            $Line[4] &= $B & $B & $B & $B & $B & $B & $t & $t & $t & $B ; ------|||-
            $Line[5] &= $B & $B & $t & $t & $t & $t & $t & $t & $B & $B ; --||||||--
         Case "T"
            $Line[0] &= "T"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||||-
            $Line[2] &= $B & $B & $B & $B & $t & $t & $t & $B & $B & $B & $B ; ----|||----
            $Line[3] &= $B & $B & $B & $B & $t & $t & $t & $B & $B & $B & $B ; ----|||----
            $Line[4] &= $B & $B & $B & $B & $t & $t & $t & $B & $B & $B & $B ; ----|||----
            $Line[5] &= $B & $B & $B & $B & $t & $t & $t & $B & $B & $B & $B ; ----|||----
         Case "U"
            $Line[0] &= "U"
            $Line[1] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[3] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[4] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[5] &= $B & $B & $t & $t & $t & $t & $t & $t & $B & $B ; --||||||--
         Case "V"
            $Line[0] &= "V"
            $Line[1] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[3] &= $B & $t & $t & $t & $B & $B & $t & $t & $t & $B ; -|||--|||-
            $Line[4] &= $B & $B & $t & $t & $t & $t & $t & $t & $B & $B ; --||||||--
            $Line[5] &= $B & $B & $B & $t & $t & $t & $t & $B & $B & $B ; ---||||---
         Case "W"
            $Line[0] &= "W"
            $Line[1] &= $B & $t & $t & $t & $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-|||-
            $Line[2] &= $B & $t & $t & $t & $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-|||-
            $Line[3] &= $B & $t & $t & $t & $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-|||-
            $Line[4] &= $B & $t & $t & $t & $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-|||-
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||||||-
         Case "X"
            $Line[0] &= "X"
            $Line[1] &= $B & $t & $t & $B & $B & $B & $B & $t & $t & $B ; -||----||-
            $Line[2] &= $B & $B & $t & $t & $B & $B & $t & $t & $B & $B ; --||--||--
            $Line[3] &= $B & $B & $B & $t & $t & $t & $t & $B & $B & $B ; ---||||---
            $Line[4] &= $B & $B & $t & $t & $B & $B & $t & $t & $B & $B ; --||--||--
            $Line[5] &= $B & $t & $t & $B & $B & $B & $B & $t & $t & $B ; -||----||-
         Case "Y"
            $Line[0] &= "Y"
            $Line[1] &= $B & $t & $t & $B & $B & $t & $t & $B ; -||--||-
            $Line[2] &= $B & $t & $t & $B & $B & $t & $t & $B ; -||--||-
            $Line[3] &= $B & $B & $t & $t & $t & $t & $B & $B ; --||||--
            $Line[4] &= $B & $B & $B & $t & $t & $B & $B & $B ; ---||---
            $Line[5] &= $B & $B & $B & $t & $t & $B & $B & $B ; ---||---
         Case "Z"
            $Line[0] &= "Z"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[2] &= $B & $B & $B & $B & $B & $t & $t & $t & $B & $B ; -----|||-
            $Line[3] &= $B & $B & $B & $B & $t & $t & $t & $B & $B & $B ; ---|||---
            $Line[4] &= $B & $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
         Case "."
            $Line[0] &= "."
            $Line[1] &= $B & $B & $B & $B ; ----
            $Line[2] &= $B & $B & $B & $B ; ----
            $Line[3] &= $B & $B & $B & $B ; ----
            $Line[4] &= $B & $B & $B & $B ; ----
            $Line[5] &= $B & $t & $t & $B ; -||-
         Case "("
            $Line[0] &= "("
            $Line[1] &= $B & $B & $t & $t & $B ; --||-
            $Line[2] &= $B & $t & $t & $B & $B ; -||--
            $Line[3] &= $B & $t & $t & $B & $B ; -||--
            $Line[4] &= $B & $t & $t & $B & $B ; -||--
            $Line[5] &= $B & $B & $t & $t & $B ; --||-
         Case ")"
            $Line[0] &= ")"
            $Line[1] &= $B & $t & $t & $B & $B ; -||--
            $Line[2] &= $B & $B & $t & $t & $B ; --||-
            $Line[3] &= $B & $B & $t & $t & $B ; --||-
            $Line[4] &= $B & $B & $t & $t & $B ; --||-
            $Line[5] &= $B & $t & $t & $B & $B ; -||--
         Case "!"
            $Line[0] &= "!"
            $Line[1] &= $B & $t & $t & $B ; -||-
            $Line[2] &= $B & $t & $t & $B ; -||-
            $Line[3] &= $B & $t & $t & $B ; -||-
            $Line[4] &= $B & $B & $B & $B ; ----
            $Line[5] &= $B & $t & $t & $B ; -||-
         Case '"'
            $Line[0] &= '"'
            $Line[1] &= $B & $t & $t & $B & $t & $t & $B ; -||-||-
            $Line[2] &= $B & $t & $t & $B & $t & $t & $B ; -||-||-
            $Line[3] &= $B & $B & $B & $B & $B & $B & $B ; -------
            $Line[4] &= $B & $B & $B & $B & $B & $B & $B ; -------
            $Line[5] &= $B & $B & $B & $B & $B & $B & $B ; -------
         Case "["
            $Line[0] &= "["
            $Line[1] &= $B & $t & $t & $t & $B ; -|||-
            $Line[2] &= $B & $t & $t & $B & $B ; -||--
            $Line[3] &= $B & $t & $t & $B & $B ; -||--
            $Line[4] &= $B & $t & $t & $B & $B ; -||--
            $Line[5] &= $B & $t & $t & $t & $B ; -|||-
         Case "]"
            $Line[0] &= "]"
            $Line[1] &= $B & $t & $t & $t & $B ; -|||-
            $Line[2] &= $B & $B & $t & $t & $B ; --||-
            $Line[3] &= $B & $B & $t & $t & $B ; --||-
            $Line[4] &= $B & $B & $t & $t & $B ; --||-
            $Line[5] &= $B & $t & $t & $t & $B ; -|||-
         Case "ÂŁ"
            $Line[0] &= "ÂŁ"
            $Line[1] &= $B & $B & $t & $t & $t & $t & $t & $t & $t & $B ; --||||||-
            $Line[2] &= $B & $t & $t & $B & $B & $B & $B & $B & $B & $B ; -||------
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $B & $B & $B ; -|||||---
            $Line[4] &= $B & $t & $t & $B & $B & $B & $B & $B & $B & $B ; -||------
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
         Case "$"
            $Line[0] &= "$"
            $Line[1] &= $B & $B & $t & $t & $t & $t & $t & $t & $B & $B ; --||||||--
            $Line[2] &= $B & $t & $t & $t & $B & $t & $t & $B & $B & $B ; -|||-||---
            $Line[3] &= $B & $B & $t & $t & $t & $t & $t & $t & $B & $B ; --||||||--
            $Line[4] &= $B & $B & $B & $t & $t & $B & $t & $t & $t & $B ; ---||-|||-
            $Line[5] &= $B & $B & $t & $t & $t & $t & $t & $t & $B & $B ; --||||||--
         Case "%"
            $Line[0] &= "%"
            $Line[1] &= $B & $t & $t & $B & $B & $t & $t & $B ; -||--||-
            $Line[2] &= $B & $B & $B & $B & $t & $t & $B & $B ; ----||--
            $Line[3] &= $B & $B & $B & $t & $t & $B & $B & $B ; ---||---
            $Line[4] &= $B & $B & $t & $t & $B & $B & $B & $B ; --||----
            $Line[5] &= $B & $t & $t & $B & $B & $t & $t & $B ; -||--||-
         Case "^"
            $Line[0] &= "^"
            $Line[1] &= $B & $B & $B & $t & $t & $B & $B & $B ; ---||---
            $Line[2] &= $B & $B & $t & $t & $t & $t & $B & $B ; --||||--
            $Line[3] &= $B & $t & $t & $B & $B & $t & $t & $B ; -||--||-
            $Line[4] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
            $Line[5] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
         Case "&"
            $Line[0] &= "&"
            $Line[1] &= $B & $B & $t & $t & $t & $B & $B & $B & $B ; --|||----
            $Line[2] &= $B & $t & $t & $B & $t & $t & $B & $B & $B ; -||-||---
            $Line[3] &= $B & $B & $t & $t & $t & $B & $B & $t & $B ; --|||--|-
            $Line[4] &= $B & $t & $t & $B & $B & $t & $t & $B & $B ; -||--||--
            $Line[5] &= $B & $B & $t & $t & $t & $t & $B & $t & $B ; --||||-|-
         Case "*"
            $Line[0] &= "*"
            $Line[1] &= $B & $B & $B & $t & $B & $B & $B ; ---|---
            $Line[2] &= $B & $t & $t & $t & $t & $t & $B ; -|||||-
            $Line[3] &= $B & $B & $t & $B & $t & $B & $B ; --|-|--
            $Line[4] &= $B & $B & $B & $B & $B & $B & $B ; -------
            $Line[5] &= $B & $B & $B & $B & $B & $B & $B ; -------
         Case "1"
            $Line[0] &= "1"
            $Line[1] &= $B & $t & $t & $t & $B & $B ; -|||--
            $Line[2] &= $B & $B & $t & $t & $B & $B ; --||--
            $Line[3] &= $B & $B & $t & $t & $B & $B ; --||--
            $Line[4] &= $B & $B & $t & $t & $B & $B ; --||--
            $Line[5] &= $B & $t & $t & $t & $t & $B ; -||||-
         Case "2"
            $Line[0] &= "2"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
            $Line[2] &= $B & $B & $B & $B & $B & $t & $t & $t & $B & $B ; -----|||-
            $Line[3] &= $B & $B & $B & $B & $t & $t & $t & $B & $B & $B ; ---|||---
            $Line[4] &= $B & $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
         Case "3"
            $Line[0] &= "3"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
            $Line[2] &= $B & $B & $B & $B & $B & $t & $t & $t & $B ; -----|||-
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
            $Line[4] &= $B & $B & $B & $B & $B & $t & $t & $t & $B ; -----|||-
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $B & $B ; -||||||--
         Case "4"
            $Line[0] &= "4"
            $Line[1] &= $B & $B & $B & $B & $B & $t & $t & $t & $B & $B ; -----|||--
            $Line[2] &= $B & $B & $B & $t & $t & $B & $t & $t & $B & $B ; ---||-||--
            $Line[3] &= $B & $t & $t & $B & $B & $B & $t & $t & $B & $B ; -||---||--
            $Line[4] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -||||||||-
            $Line[5] &= $B & $B & $B & $B & $B & $B & $t & $t & $B & $B ; ------||--
         Case "5"
            $Line[0] &= "5"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $B & $B ; -|||||||--
            $Line[2] &= $B & $t & $t & $t & $B & $B & $B & $B & $B & $B ; -|||------
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $t & $B & $B ; -|||||||--
            $Line[4] &= $B & $B & $B & $B & $B & $B & $t & $t & $t & $B ; ------|||-
            $Line[5] &= $B & $B & $t & $t & $t & $t & $t & $t & $B & $B ; --||||||--
         Case "6"
            $Line[0] &= "6"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $B & $B & $B & $B ; -|||-----
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[4] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
         Case "7"
            $Line[0] &= "7"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[2] &= $B & $B & $B & $B & $B & $B & $B & $t & $t & $B ; ------||-
            $Line[3] &= $B & $B & $t & $t & $t & $t & $t & $t & $B & $B ; --|||||--
            $Line[4] &= $B & $B & $B & $B & $B & $t & $t & $B & $B & $B ; ----||---
            $Line[5] &= $B & $B & $B & $B & $t & $t & $B & $B & $B & $B ; ---||----
         Case "8"
            $Line[0] &= "8"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[4] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
         Case "9"
            $Line[0] &= "9"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[4] &= $B & $B & $B & $B & $B & $t & $t & $t & $B ; -----|||-
            $Line[5] &= $B & $B & $B & $B & $B & $t & $t & $t & $B ; -----|||-
         Case "0"
            $Line[0] &= "0"
            $Line[1] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
            $Line[2] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[3] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[4] &= $B & $t & $t & $t & $B & $t & $t & $t & $B ; -|||-|||-
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $B ; -|||||||-
         Case "+"
            $Line[0] &= "+"
            $Line[1] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
            $Line[2] &= $B & $B & $B & $t & $t & $B & $B & $B ; ---||---
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $B ; -||||||-
            $Line[4] &= $B & $B & $B & $t & $t & $B & $B & $B ; ---||---
            $Line[5] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
         Case "="
            $Line[0] &= "="
            $Line[1] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
            $Line[2] &= $B & $t & $t & $t & $t & $t & $t & $B ; -||||||-
            $Line[3] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
            $Line[4] &= $B & $t & $t & $t & $t & $t & $t & $B ; -||||||-
            $Line[5] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
         Case "-"
            $Line[0] &= "-"
            $Line[1] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
            $Line[2] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
            $Line[3] &= $B & $t & $t & $t & $t & $t & $t & $B ; -||||||-
            $Line[4] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
            $Line[5] &= $B & $B & $B & $B & $B & $B & $B & $B ; --------
         Case "_"
            $Line[0] &= "_"
            $Line[1] &= $B & $B & $B & $B & $B & $B & $B & $B & $B & $B ; ----------
            $Line[2] &= $B & $B & $B & $B & $B & $B & $B & $B & $B & $B ; ----------
            $Line[3] &= $B & $B & $B & $B & $B & $B & $B & $B & $B & $B ; ----------
            $Line[4] &= $B & $B & $B & $B & $B & $B & $B & $B & $B & $B ; ----------
            $Line[5] &= $B & $t & $t & $t & $t & $t & $t & $t & $t & $B ; -||||||||-
         Case "/"
            $Line[0] &= "/"
            $Line[1] &= $B & $B & $B & $B & $B & $t & $t & $B ; -----||-
            $Line[2] &= $B & $B & $B & $B & $t & $t & $B & $B ; ----||--
            $Line[3] &= $B & $B & $B & $t & $t & $B & $B & $B ; ---||---
            $Line[4] &= $B & $B & $t & $t & $B & $B & $B & $B ; --||----
            $Line[5] &= $B & $t & $t & $B & $B & $B & $B & $B ; -||-----
         Case "\"
            $Line[0] &= "\"
            $Line[1] &= $B & $t & $t & $B & $B & $B & $B & $B ; -||-----
            $Line[2] &= $B & $B & $t & $t & $B & $B & $B & $B ; --||----
            $Line[3] &= $B & $B & $B & $t & $t & $B & $B & $B ; ---||---
            $Line[4] &= $B & $B & $B & $B & $t & $t & $B & $B ; ----||--
            $Line[5] &= $B & $B & $B & $B & $B & $t & $t & $B ; -----||-
         Case Else
            $Line[0] &= "?"
            $Line[1] &= $B & $B & $t & $t & $t & $t & $B & $B ; --||||--
            $Line[2] &= $B & $t & $t & $B & $B & $t & $t & $B ; -||--||-
            $Line[3] &= $B & $B & $B & $B & $t & $t & $B & $B ; ----||--
            $Line[4] &= $B & $B & $B & $t & $t & $B & $B & $B ; ---||---
            $Line[5] &= $B & $B & $B & $t & $t & $B & $B & $B ; ---||---
      EndSwitch
   Next
   Switch $Line
      Case 0
         $Return = @CRLF & $Line[0] & @CRLF & $Line[1] & @CRLF & $Line[2] & @CRLF & $Line[3] & @CRLF & $Line[4] & @CRLF & $Line[5]
      Case 1
         $Return = $Line[0]
      Case 2
         $Return = $Line[1]
      Case 3
         $Return = $Line[2]
      Case 4
         $Return = $Line[3]
      Case 5
         $Return = $Line[4]
      Case 6
         $Return = $Line[5]
      Case 7
         $Return = $Line
      Case 8
         $Return = @CRLF & $Line[1] & @CRLF & $Line[2] & @CRLF & $Line[3] & @CRLF & $Line[4] & @CRLF & $Line[5]
      Case 9
         Local $Return[3] = [$Text, $B, $t]
   EndSwitch
   Return $Return
EndFunc

--|||-|||--||||||||--|||--|||--|||||||------|||||||--|||--|||--||----||--------||----------------||---

--|||-|||--|||--|||--|||--|||--|||----------|||------|||--|||--||||--||-------||||--------------||||--

--|||||||--||||||||--|||--|||--||||||-------||||||---|||--|||--||-||-||------||--||------------||--||-

--|||-|||--|||--|||---||||||---|||----------|||------|||--|||--||--||||-------------------------------

--|||-|||--|||--|||----||||----|||||||------|||-------||||||---||----||--------------||||||||---------

Edited by Mat
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...