Chat Channels?

[timster0]

How would I set up chat channels? What I need are Global and Battle(the messages that come when your in combat) chat Channels. Similar to how the XW looks. How would this work?

[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.

[Tony]

Why would you need a channel for battle messages? Battle messages aren't going to be broadcasted to anyone but you from the server. There's already battle messages.. o.O

[Coke]

To split it away from your chat messages so you can follow conversations easier.

[Matt]

To split it away from your chat messages so you can follow conversations easier.

Ding ding ding! We have a winner!

Someone, tell him what he wins!

[Nean]

I believe congratulations are in order.

[timster0]

I tried it and got "Wrong number of arguments or invalid property assignment" and it said the problem was with this:

Code:

Sub HandleGlobalMsg(ByRef Parse() As String)
    Call AddTextGlobal(Parse(1), Val(Parse(2)))
End Sub

Highlighting This Code:

Code:

Call AddTextGlobal

[wisefire]

I tried it and got "Wrong number of arguments or invalid property assignment" and it said the problem was with this:

Code:

Sub HandleGlobalMsg(ByRef Parse() As String)
    Call AddTextGlobal(Parse(1), Val(Parse(2)))
End Sub

Highlighting This Code:

Code:

Call AddTextGlobal

Did you create Sub AddTextGlobal?

[Matt]

I believe he's either passing too many variables to the sub, or not enough.

[Tony]

I believe he's either passing too many variables to the sub, or not enough.

Yeah meaning Call Something(ShouldBeSomething, ShouldBeSomething, ShouldBeSomething) or Call Something(ShouldBeSomething)

Give us your AddTextGlobal sub.