Microsoft Small Basic

Program Listing: BDC439

List Program

GraphicsWindow.MouseDown = click
Controls.ButtonClicked = btnClick

init()
loadFont()
loadWindow()
drawMatrix()
input()

While "True"
While flag
shift = shift + 1
If shift > Text.GetLength(data[1]) Then
shift = 0
EndIf
Program.Delay(scrollSpeed)
scrollText()
EndWhile
EndWhile


Sub btnClick
data = ""
txtString = Controls.GetTextBoxText(txtBox)
If txtString <> "" Then
len = Text.GetLength(txtString)
For i = 1 To len
subChar = Text.GetSubText(txtString,i,1)
subCharC = Text.GetCharacterCode(subChar)
If subCharC > 96 And subCharC < 123 Then
subChar = subChar + "1"
EndIf
For j = 1 To ledVirtical
data[j] = Text.Append(data[j],characters[subChar][j])
EndFor
EndFor
EndIf
flag = "True"
EndSub

Sub scrollText
For i = 1 To ledHorizontal
For j = 1 To ledVirtical
subChar = Text.GetSubText(data[j],i+shift,1)
If subChar = 1 Then
Shapes.SetOpacity(matrix[i][j],100)
ElseIf subChar = 0 Then
Shapes.SetOpacity(matrix[i][j],30)
EndIf
EndFor
EndFor
EndSub

Sub click
If Mouse.IsRightButtonDown And count = 1 Then
displayHeight = displayHeight + 90
GraphicsWindow.Height = displayHeight
flag = "False"
count = count + 1
ElseIf Mouse.IsRightButtonDown And count > 1 Then
displayHeight = displayHeight - 90
GraphicsWindow.Height = displayHeight
count = 1
flag = "True"
EndIf
EndSub

Sub init
ledSize = 10
ledHorizontal = 60
ledVirtical = 7
displayWidth = ledHorizontal*ledSize
displayHeight = ledVirtical * ledSize
bgColor = "Black"
ledColor["inner"] = "Blue"
ledColor["outer"] = "DarkBlue"
scrollSpeed = 60 'lower the value faster the speed
count = 1
flag = "False"
EndSub
Sub loadWindow
GraphicsWindow.Title = "LED Matrix Scroller Version 0.1 [Right click to input text]"
GraphicsWindow.BackgroundColor = bgColor
GraphicsWindow.PenColor = ledColor["outer"]
GraphicsWindow.BrushColor = ledColor["inner"]
GraphicsWindow.Width = displayWidth - 10
GraphicsWindow.Height = displayHeight - 10
GraphicsWindow.CanResize = 0
GraphicsWindow.Show()
EndSub

Sub drawMatrix
For i = 0 To ledVirtical - 1
For j = 0 to ledHorizontal - 1
matrix[j+1][i+1] = Shapes.AddEllipse(ledSize,ledSize)
Shapes.SetOpacity(matrix[j+1][i+1],30)
Shapes.Move(matrix[j+1][i+1],j*ledSize,i*ledSize)
EndFor
EndFor
EndSub

Sub input
txtBox = Controls.AddTextBox(0,(ledVirtical*ledSize)+30)
Controls.SetSize(txtBox,ledHorizontal*ledSize,25)
GraphicsWindow.DrawText(0,(ledVirtical*ledSize)+5,"Enter Your Text And Click OK Button.: [Right click again to close input pan]")
txtbtn = Controls.AddButton("OK",0,(ledVirtical*ledSize)+60)
EndSub

Sub loadFont
characters[0][1] = "011100"
characters[0][2] = "100010"
characters[0][3] = "100110"
characters[0][4] = "101010"
characters[0][5] = "110010"
characters[0][6] = "100010"
characters[0][7] = "011100"
characters[1][1] = "0100"
characters[1][2] = "1100"
characters[1][3] = "0100"
characters[1][4] = "0100"
characters[1][5] = "0100"
characters[1][6] = "0100"
characters[1][7] = "1110"
characters[2][1] = "011100"
characters[2][2] = "100010
characters[2][3] = "000010"
characters[2][4] = "001100"
characters[2][5] = "010000"
characters[2][6] = "100000"
characters[2][7] = "111110"
characters[3][1] = "011100"
characters[3][2] = "100010"
characters[3][3] = "000010"
characters[3][4] = "001100"
characters[3][5] = "000010"
characters[3][6] = "100010"
characters[3][7] = "011100"
characters[4][1] = "001100"
characters[4][2] = "010100"
characters[4][3] = "100100"
characters[4][4] = "100100"
characters[4][5] = "111110"
characters[4][6] = "000100"
characters[4][7] = "000100"
characters[5][1] = "111100"
characters[5][2] = "100000"
characters[5][3] = "100000"
characters[5][4] = "111100"
characters[5][5] = "000010"
characters[5][6] = "100010"
characters[5][7] = "011100"
characters[6][1] = "001100"
characters[6][2] = "010000"
characters[6][3] = "100000"
characters[6][4] = "111100"
characters[6][5] = "100010"
characters[6][6] = "100010"
characters[6][7] = "011100"
characters[7][1] = "111110"
characters[7][2] = "100010"
characters[7][3] = "000010"
characters[7][4] = "000100"
characters[7][5] = "001000"
characters[7][6] = "001000"
characters[7][7] = "001000"
characters[8][1] = "011100"
characters[8][2] = "100010"
characters[8][3] = "100010"
characters[8][4] = "011100"
characters[8][5] = "100010"
characters[8][6] = "100010"
characters[8][7] = "011100"
characters[9][1] = "011100"
characters[9][2] = "100010"
characters[9][3] = "100010"
characters[9][4] = "011110"
characters[9][5] = "000010"
characters[9][6] = "000100"
characters[9][7] = "011000"
characters["a1"][1] = "000000"
characters["a1"][2] = "000000"
characters["a1"][3] = "011100"
characters["a1"][4] = "000010"
characters["a1"][5] = "011110"
characters["a1"][6] = "100010"
characters["a1"][7] = "011110"
characters["b1"][1] = "100000"
characters["b1"][2] = "100000"
characters["b1"][3] = "111100"
characters["b1"][4] = "100010"
characters["b1"][5] = "100010"
characters["b1"][6] = "100010"
characters["b1"][7] = "111100"
characters["c1"][1] = "000000"
characters["c1"][2] = "000000"
characters["c1"][3] = "011100"
characters["c1"][4] = "100010"
characters["c1"][5] = "100000"
characters["c1"][6] = "100010"
characters["c1"][7] = "011100"
characters["d1"][1] = "000010"
characters["d1"][2] = "000010"
characters["d1"][3] = "011110"
characters["d1"][4] = "100010"
characters["d1"][5] = "100010"
characters["d1"][6] = "100010"
characters["d1"][7] = "011110"
characters["e1"][1] = "000000"
characters["e1"][2] = "000000"
characters["e1"][3] = "011100"
characters["e1"][4] = "100010"
characters["e1"][5] = "111110"
characters["e1"][6] = "100000"
characters["e1"][7] = "011100"
characters["f1"][1] = "0010"
characters["f1"][2] = "0100"
characters["f1"][3] = "1110"
characters["f1"][4] = "0100"
characters["f1"][5] = "0100"
characters["f1"][6] = "0100"
characters["f1"][7] = "1110"
characters["g1"][1] = "011110"
characters["g1"][2] = "100010"
characters["g1"][3] = "100010"
characters["g1"][4] = "100010"
characters["g1"][5] = "011110"
characters["g1"][6] = "000010"
characters["g1"][7] = "011100"
characters["h1"][1] = "100000"
characters["h1"][2] = "100000"
characters["h1"][3] = "111100"
characters["h1"][4] = "100010"
characters["h1"][5] = "100010"
characters["h1"][6] = "100010"
characters["h1"][7] = "100010"
characters["i1"][1] = "0100"
characters["i1"][2] = "0000"
characters["i1"][3] = "1100"
characters["i1"][4] = "0100"
characters["i1"][5] = "0100"
characters["i1"][6] = "0100"
characters["i1"][7] = "1110"
characters["j1"][1] = "0100"
characters["j1"][2] = "0000"
characters["j1"][3] = "1100"
characters["j1"][4] = "0100"
characters["j1"][5] = "0100"
characters["j1"][6] = "0100"
characters["j1"][7] = "1000"
characters["k1"][1] = "100000"
characters["k1"][2] = "100000"
characters["k1"][3] = "100010"
characters["k1"][4] = "100100"
characters["k1"][5] = "111000"
characters["k1"][6] = "100100"
characters["k1"][7] = "100010"
characters["l1"][1] = "1100"
characters["l1"][2] = "0100"
characters["l1"][3] = "0100"
characters["l1"][4] = "0100"
characters["l1"][5] = "0100"
characters["l1"][6] = "0100"
characters["l1"][7] = "1110"
characters["m1"][1] = "000000"
characters["m1"][2] = "000000"
characters["m1"][3] = "110100"
characters["m1"][4] = "101010"
characters["m1"][5] = "101010"
characters["m1"][6] = "101010"
characters["m1"][7] = "101010"
characters["n1"][1] = "000000"
characters["n1"][2] = "000000"
characters["n1"][3] = "111100"
characters["n1"][4] = "100010"
characters["n1"][5] = "100010"
characters["n1"][6] = "100010"
characters["n1"][7] = "100010"
characters["o1"][1] = "000000"
characters["o1"][2] = "000000"
characters["o1"][3] = "011100"
characters["o1"][4] = "100010"
characters["o1"][5] = "100010"
characters["o1"][6] = "100010"
characters["o1"][7] = "011100"
characters["p1"][1] = "011100"
characters["p1"][2] = "100010"
characters["p1"][3] = "100010"
characters["p1"][4] = "100010"
characters["p1"][5] = "111100"
characters["p1"][6] = "100000"
characters["p1"][7] = "100000"
characters["q1"][1] = "000000"
characters["q1"][2] = "011100"
characters["q1"][3] = "100010"
characters["q1"][4] = "100010"
characters["q1"][5] = "011110"
characters["q1"][6] = "000010"
characters["q1"][7] = "000010"
characters["r1"][1] = "000000"
characters["r1"][2] = "000000"
characters["r1"][3] = "101100"
characters["r1"][4] = "010010"
characters["r1"][5] = "010000"
characters["r1"][6] = "010000"
characters["r1"][7] = "111000"
characters["s1"][1] = "000000"
characters["s1"][2] = "000000"
characters["s1"][3] = "011100"
characters["s1"][4] = "100000"
characters["s1"][5] = "011100"
characters["s1"][6] = "000010"
characters["s1"][7] = "011100"
characters["t1"][1] = "010000"
characters["t1"][2] = "010000"
characters["t1"][3] = "111110"
characters["t1"][4] = "010000"
characters["t1"][5] = "010000"
characters["t1"][6] = "010010"
characters["t1"][7] = "001100"
characters["u1"][1] = "000000"
characters["u1"][2] = "000000"
characters["u1"][3] = "100010"
characters["u1"][4] = "100010"
characters["u1"][5] = "100010"
characters["u1"][6] = "100010"
characters["u1"][7] = "011100"
characters["v1"][1] = "000000"
characters["v1"][2] = "000000"
characters["v1"][3] = "100010"
characters["v1"][4] = "100010"
characters["v1"][5] = "100010"
characters["v1"][6] = "010100"
characters["v1"][7] = "001000"
characters["w1"][1] = "000000"
characters["w1"][2] = "000000"
characters["w1"][3] = "101010"
characters["w1"][4] = "101010"
characters["w1"][5] = "101010"
characters["w1"][6] = "101010"
characters["w1"][7] = "010100"
characters["x1"][1] = "000000"
characters["x1"][2] = "000000"
characters["x1"][3] = "100010"
characters["x1"][4] = "010100"
characters["x1"][5] = "001000"
characters["x1"][6] = "010100"
characters["x1"][7] = "100010"
characters["y1"][1] = "100010"
characters["y1"][2] = "100010"
characters["y1"][3] = "100010"
characters["y1"][4] = "011110"
characters["y1"][5] = "000010"
characters["y1"][6] = "000010"
characters["y1"][7] = "011100"
characters["z1"][1] = "000000"
characters["z1"][2] = "000000"
characters["z1"][3] = "111110"
characters["z1"][4] = "000100"
characters["z1"][5] = "001000"
characters["z1"][6] = "010000"
characters["z1"][7] = "111110"
characters["A"][1] = "001000"
characters["A"][2] = "010100"
characters["A"][3] = "100010"
characters["A"][4] = "100010"
characters["A"][5] = "111110"
characters["A"][6] = "100010"
characters["A"][7] = "100010"
characters["B"][1] = "111100"
characters["B"][2] = "100010"
characters["B"][3] = "100010"
characters["B"][4] = "111100"
characters["B"][5] = "100010"
characters["B"][6] = "100010"
characters["B"][7] = "111100"
characters["C"][1] = "011100"
characters["C"][2] = "100010"
characters["C"][3] = "100000"
characters["C"][4] = "100000"
characters["C"][5] = "100000"
characters["C"][6] = "100010"
characters["C"][7] = "011100"
characters["D"][1] = "111100"
characters["D"][2] = "100010"
characters["D"][3] = "100010"
characters["D"][4] = "100010"
characters["D"][5] = "100010"
characters["D"][6] = "100010"
characters["D"][7] = "111100"
characters["E"][1] = "111110"
characters["E"][2] = "100000"
characters["E"][3] = "100000"
characters["E"][4] = "111110"
characters["E"][5] = "100000"
characters["E"][6] = "100000"
characters["E"][7] = "111110"
characters["F"][1] = "111110"
characters["F"][2] = "100000"
characters["F"][3] = "100000"
characters["F"][4] = "111110"
characters["F"][5] = "100000"
characters["F"][6] = "100000"
characters["F"][7] = "100000"
characters["G"][1] = "011100"
characters["G"][2] = "100010"
characters["G"][3] = "100000"
characters["G"][4] = "101110"
characters["G"][5] = "100010"
characters["G"][6] = "100010"
characters["G"][7] = "011110"
characters["H"][1] = "100010"
characters["H"][2] = "100010"
characters["H"][3] = "100010"
characters["H"][4] = "111110"
characters["H"][5] = "100010"
characters["H"][6] = "100010"
characters["H"][7] = "100010"
characters["I"][1] = "1110"
characters["I"][2] = "0100"
characters["I"][3] = "0100"
characters["I"][4] = "0100"
characters["I"][5] = "0100"
characters["I"][6] = "0100"
characters["I"][7] = "1110"
characters["J"][1] = "001110"
characters["J"][2] = "000010"
characters["J"][3] = "000010"
characters["J"][4] = "000010"
characters["J"][5] = "100010"
characters["J"][6] = "100010"
characters["J"][7] = "011100"
characters["K"][1] = "100010"
characters["K"][2] = "100100"
characters["K"][3] = "101000"
characters["K"][4] = "110000"
characters["K"][5] = "101000"
characters["K"][6] = "100100"
characters["K"][7] = "100010"
characters["L"][1] = "100000"
characters["L"][2] = "100000"
characters["L"][3] = "100000"
characters["L"][4] = "100000"
characters["L"][5] = "100000"
characters["L"][6] = "100000"
characters["L"][7] = "111110"
characters["M"][1] = "100010"
characters["M"][2] = "110110"
characters["M"][3] = "101010"
characters["M"][4] = "100010"
characters["M"][5] = "100010"
characters["M"][6] = "100010"
characters["M"][7] = "100010"
characters["N"][1] = "100010"
characters["N"][2] = "110010"
characters["N"][3] = "101010"
characters["N"][4] = "100110"
characters["N"][5] = "100010"
characters["N"][6] = "100010"
characters["N"][7] = "100010"
characters["O"][1] = "011100"
characters["O"][2] = "100010"
characters["O"][3] = "100010"
characters["O"][4] = "100010"
characters["O"][5] = "100010"
characters["O"][6] = "100010"
characters["O"][7] = "011100"
characters["P"][1] = "111100"
characters["P"][2] = "100010"
characters["P"][3] = "100010"
characters["P"][4] = "111100"
characters["P"][5] = "100000"
characters["P"][6] = "100000"
characters["P"][7] = "100000"
characters["Q"][1] = "011100"
characters["Q"][2] = "100010"
characters["Q"][3] = "100010"
characters["Q"][4] = "100010"
characters["Q"][5] = "101010"
characters["Q"][6] = "100110"
characters["Q"][7] = "011110"
characters["R"][1] = "111100"
characters["R"][2] = "100010"
characters["R"][3] = "100010"
characters["R"][4] = "111100"
characters["R"][5] = "101000"
characters["R"][6] = "100100"
characters["R"][7] = "100010"
characters["S"][1] = "011100"
characters["S"][2] = "100010"
characters["S"][3] = "100000"
characters["S"][4] = "011100"
characters["S"][5] = "000010"
characters["S"][6] = "100010"
characters["S"][7] = "011100"
characters["T"][1] = "111110"
characters["T"][2] = "001000"
characters["T"][3] = "001000"
characters["T"][4] = "001000"
characters["T"][5] = "001000"
characters["T"][6] = "001000"
characters["T"][7] = "001000"
characters["U"][1] = "100010"
characters["U"][2] = "100010"
characters["U"][3] = "100010"
characters["U"][4] = "100010"
characters["U"][5] = "100010"
characters["U"][6] = "100010"
characters["U"][7] = "011100"
characters["V"][1] = "100010"
characters["V"][2] = "100010"
characters["V"][3] = "100010"
characters["V"][4] = "100010"
characters["V"][5] = "100010"
characters["V"][6] = "010100"
characters["V"][7] = "001000"
characters["W"][1] = "100010"
characters["W"][2] = "100010"
characters["W"][3] = "100010"
characters["W"][4] = "100010"
characters["W"][5] = "101010"
characters["W"][6] = "110110"
characters["W"][7] = "100010"
characters["X"][1] = "100010"
characters["X"][2] = "100010"
characters["X"][3] = "010100"
characters["X"][4] = "001000"
characters["X"][5] = "010100"
characters["X"][6] = "100010"
characters["X"][7] = "100010"
characters["Y"][1] = "100010"
characters["Y"][2] = "100010"
characters["Y"][3] = "010100"
characters["Y"][4] = "001000"
characters["Y"][5] = "001000"
characters["Y"][6] = "001000"
characters["Y"][7] = "001000"
characters["Z"][1] = "111110"
characters["Z"][2] = "100010"
characters["Z"][3] = "000100"
characters["Z"][4] = "001000"
characters["Z"][5] = "010000"
characters["Z"][6] = "100010"
characters["Z"][7] = "111110"
characters["!"][1] = "110"
characters["!"][2] = "110"
characters["!"][3] = "110"
characters["!"][4] = "100"
characters["!"][5] = "000"
characters["!"][6] = "110"
characters["!"][7] = "110"
characters["@"][1] = "111110"
characters["@"][2] = "100010"
characters["@"][3] = "101010"
characters["@"][4] = "101010"
characters["@"][5] = "101110"
characters["@"][6] = "100000"
characters["@"][7] = "111110"
characters["#"][1] = "010100"
characters["#"][2] = "010100"
characters["#"][3] = "111110"
characters["#"][4] = "010100"
characters["#"][5] = "111110"
characters["#"][6] = "010100"
characters["#"][7] = "010100"
characters["$"][1] = "001000"
characters["$"][2] = "011100"
characters["$"][3] = "100000"
characters["$"][4] = "011100"
characters["$"][5] = "000010"
characters["$"][6] = "011100"
characters["$"][7] = "001000"
characters["%"][1] = "010000"
characters["%"][2] = "101010"
characters["%"][3] = "010100"
characters["%"][4] = "001000"
characters["%"][5] = "010100"
characters["%"][6] = "101010"
characters["%"][7] = "000100"
characters["^"][1] = "0100"
characters["^"][2] = "1010"
characters["^"][3] = "0000"
characters["^"][4] = "0000"
characters["^"][5] = "0000"
characters["^"][6] = "0000"
characters["^"][7] = "0000"
characters["&"][1] = "011000"
characters["&"][2] = "100100"
characters["&"][3] = "100100"
characters["&"][4] = "101000"
characters["&"][5] = "011010"
characters["&"][6] = "100100"
characters["&"][7] = "011010"
characters["*"][1] = "0000"
characters["*"][2] = "0000"
characters["*"][3] = "1010"
characters["*"][4] = "0100"
characters["*"][5] = "1010"
characters["*"][6] = "0000"
characters["*"][7] = "0000"
characters["("][1] = "010"
characters["("][2] = "100"
characters["("][3] = "100"
characters["("][4] = "100"
characters["("][5] = "100"
characters["("][6] = "100"
characters["("][7] = "010"
characters[")"][1] = "100"
characters[")"][2] = "010"
characters[")"][3] = "010"
characters[")"][4] = "010"
characters[")"][5] = "010"
characters[")"][6] = "010"
characters[")"][7] = "100"
characters["_"][1] = "000000"
characters["_"][2] = "000000"
characters["_"][3] = "000000"
characters["_"][4] = "000000"
characters["_"][5] = "000000"
characters["_"][6] = "000000"
characters["_"][7] = "111110"
characters["-"][1] = "0000"
characters["-"][2] = "0000"
characters["-"][3] = "0000"
characters["-"][4] = "1110"
characters["-"][5] = "0000"
characters["-"][6] = "0000"
characters["-"][7] = "0000"
characters["="][1] = "0000"
characters["="][2] = "0000"
characters["="][3] = "1110"
characters["="][4] = "0000"
characters["="][5] = "1110"
characters["="][6] = "0000"
characters["="][7] = "0000"
characters["+"][1] = "0000"
characters["+"][2] = "0000"
characters["+"][3] = "0100"
characters["+"][4] = "1110"
characters["+"][5] = "0100"
characters["+"][6] = "0000"
characters["+"][7] = "0000"
characters["\"][1] = "000000"
characters["\"][2] = "100000"
characters["\"][3] = "010000"
characters["\"][4] = "001000"
characters["\"][5] = "000100"
characters["\"][6] = "000010"
characters["\"][7] = "000000"
characters["|"][1] = "10"
characters["|"][2] = "10"
characters["|"][3] = "10"
characters["|"][4] = "10"
characters["|"][5] = "10"
characters["|"][6] = "10"
characters["|"][7] = "10"
characters["["][1] = "110"
characters["["][2] = "100"
characters["["][3] = "100"
characters["["][4] = "100"
characters["["][5] = "100"
characters["["][6] = "100"
characters["["][7] = "110"
characters["]"][1] = "110"
characters["]"][2] = "010"
characters["]"][3] = "010"
characters["]"][4] = "010"
characters["]"][5] = "010"
characters["]"][6] = "010"
characters["]"][7] = "110"
characters["{"][1] = "0010"
characters["{"][2] = "0100"
characters["{"][3] = "0100"
characters["{"][4] = "1000"
characters["{"][5] = "0100"
characters["{"][6] = "0100"
characters["{"][7] = "0010"
characters["}"][1] = "1000"
characters["}"][2] = "0100"
characters["}"][3] = "0100"
characters["}"][4] = "0010"
characters["}"][5] = "0100"
characters["}"][6] = "0100"
characters["}"][7] = "1000"
characters["'"][1] = "10"
characters["'"][2] = "10"
characters["'"][3] = "10"
characters["'"][4] = "00"
characters["'"][5] = "00"
characters["'"][6] = "00"
characters["'"][7] = "00"
characters[","][1] = "000"
characters[","][2] = "000"
characters[","][3] = "000"
characters[","][4] = "000"
characters[","][5] = "110"
characters[","][6] = "110"
characters[","][7] = "010"
characters["."][1] = "000"
characters["."][2] = "000"
characters["."][3] = "000"
characters["."][4] = "000"
characters["."][5] = "000"
characters["."][6] = "110"
characters["."][7] = "110"
characters["<"][1] = "0000"
characters["<"][2] = "0010"
characters["<"][3] = "0100"
characters["<"][4] = "1000"
characters["<"][5] = "0100"
characters["<"][6] = "0010"
characters["<"][7] = "0000"
characters[">"][1] = "0000"
characters[">"][2] = "1000"
characters[">"][3] = "0100"
characters[">"][4] = "0010"
characters[">"][5] = "0100"
characters[">"][6] = "1000"
characters[">"][7] = "0000"
characters["?"][1] = "011100"
characters["?"][2] = "100010"
characters["?"][3] = "000010"
characters["?"][4] = "001110"
characters["?"][5] = "001000"
characters["?"][6] = "000000"
characters["?"][7] = "001000"
characters["/"][1] = "000000"
characters["/"][2] = "000010"
characters["/"][3] = "000100"
characters["/"][4] = "001000"
characters["/"][5] = "010000"
characters["/"][6] = "100000"
characters["/"][7] = "000000"
characters[";"][1] = "000"
characters[";"][2] = "110"
characters[";"][3] = "110"
characters[";"][4] = "000"
characters[";"][5] = "110"
characters[";"][6] = "110"
characters[";"][7] = "010"
characters[":"][1] = "000"
characters[":"][2] = "110"
characters[":"][3] = "110"
characters[":"][4] = "000"
characters[":"][5] = "110"
characters[":"][6] = "110"
characters[":"][7] = "000"
characters[" "][1] = "000"
characters[" "][2] = "000"
characters[" "][3] = "000"
characters[" "][4] = "000"
characters[" "][5] = "000"
characters[" "][6] = "000"
characters[" "][7] = "000"
EndSub