Chat Channels?

[wisefire]

Find "Social packets"
You'll notice all social packets use the same, "Call AddText(Parse(1), Val(Parse(2)))".
Duplicate the sub AddText and change it to Sub AddTextGlobal.
Now create a new textbox on frmMirage called chtGlobal.
Now in your new Sub AddTextGlobal Change, txtChat to, chtGlobal.
Now Back to the Social Packets create a new Case for Global and remove it from the old Case. So you have something that looks like;

Code:

If (LCase(Parse(0)) = "globalmsg") Then
        Call AddTextGlobal(Parse(1), Val(Parse(2)))
        Exit Sub
    End If

Now all you need to do is create a way to set the visibility of each box. So say, create a label named Global Chat, and When you click on it, chtGlobal.visible = true, and so on.

Hopefully this will help. I haven't tested this, But I am almost 100% positive it will work.