Help, me out.

[de80]

Code: [Select]

[10:48:25 PM] UserJoins Call Error On File> C:\Program Files\Stealth Bot 4\plugins\Cb.txt
 [10:48:25 PM] Error Number: 13   Description: Type mismatch

[Vector]

lol, oops. I forgot to mention you can't create an array as a constant!

Code: [Select]

'cb
'0.1
'&Clan ban:Vector

'// Add the clans you want banned here.
Public ClanTags
ClanTags = Array("", "", "", "")

Sub cb_Event_UserJoins(Username, Flags, Message, Ping, Product, Level, OriginalStatString)
  userClan = GetInternalDataByUsername(Username, 0)
  If userClan = "" Then Exit Sub

  If InArray(ClanTags, GetInternalDataByUsername(Username, 0)) Then
    Command BotVars.Username, "/shitadd " & Username & " Clan banned", True
  End If
End Sub

Function InArray(arr, Item)
  For i=0 to Ubound(arr)
    If Lcase(arr(i)) = Lcase(Item) Then
      InArray = True
      Exit Function
    End If
  Next

  '// If this line is reached, the user's clan is not banned.
  InArray = False
End Function
That works.

[de80]

Code: [Select]

ClanTags = Array("", "", "", "")
It this how you write it?

Code: [Select]

ClanTags = Array("clan gay", "clan hi", "clan you", "clan by")
??

[Reason]

Its

Code: [Select]

ClanTags = Array("gay", "hi", "you", "by")