Valhalla Legends Forums Archive | Battle.net Bot Development | Re: Another moderation bot...

AuthorMessageTime
Ratio
[code]
'say that youv'e already obtained the users access

Public Sub RunData(Message As String)
On Error Goto ErrInfo
Dim CmdSplt() As String,Command() As String
CmdSplt() = Split(Message," ",2)
Command(0) = CmdSplt(0)
Command(1) = CmdSplt(1)

Select Case LCase(Command(0))

Case "say","s"
Send " " & Command(1)

Case "op","designate"
Send "/designate " & Command(1)
Send "/rejoin"

End Select

ErrInfo:
End Sub
[/code]
August 18, 2006, 11:47 PM
Topaz
[quote author=Ratio link=topic=14989.msg156913#msg156913 date=1155944846]
[code]
'say that youv'e already obtained the users access

Public Sub RunData(Message As String)
On Error Goto ErrInfo
Dim CmdSplt() As String,Command() As String
CmdSplt() = Split(Message," ",2)
Command(0) = CmdSplt(0)
Command(1) = CmdSplt(1)

Select Case LCase(Command(0))

Case "say","s"
Send " " & Command(1)

Case "op","designate"
Send "/designate " & Command(1)
Send "/rejoin"

End Select

ErrInfo:
End Sub
[/code]
[/quote]

Stop, you're hurting me.
August 19, 2006, 12:05 AM
ShaDoWDeM
Why are you using two arrays instead of just one?

and why did you bring up this old topic anyway?
August 19, 2006, 12:37 AM
rabbit
"ErrInfo" is a bad label.  You don't provide any info, you just leave the sub.  Not to mention you still don't know how to tab.
August 19, 2006, 2:20 AM
Ratio
:O don't hate me
August 20, 2006, 7:36 AM
rabbit
You've given us no reason to like you.
August 20, 2006, 12:47 PM
MysT_DooM
just stop trying so hard and you'll be fine  ;)
August 20, 2006, 3:04 PM
Ratio
Yes,sir
August 24, 2006, 7:11 AM

Search