Help, me out.

[Vector]

Code: [Select]

  If InStr(Message, "hi") Then
    '// They are saying a greeting. Let's give them a friendly reply
    AddQ "hi u"
  End If
However, you are testing to see if the message has "hi" in it. If they say "Hi" it won't work. In that case, you have to first place the message into all lower case.

Code: [Select]

  If InStr(Lcase(Message), "hi") Then
    AddQ "hi u"
  End If

[de80]

So like this?

Code: [Select]

'Hi
'.01
'& By de80

Sub  Hi_UserTalk(Username, Flags, Message, Ping)
    
    AddQ & Username & " Hi "
    
End Sub

If InStr(Lcase(Message), "hi") Then
    AddQ "hi u"
  End If

[ArticWolve]

Not like that.

Code: [Select]

If InStr(Lcase(Message), "hi") Then
  AddQ "hi u"
End If is in the sub, not outsideof it.

[Vector]

So like this?

Code: [Select]

'Hi
'.01
'& By de80

Sub  Hi_UserTalk(Username, Flags, Message, Ping)
    
    AddQ & Username & " Hi "
    
End Sub

If InStr(Lcase(Message), "hi") Then
    AddQ "hi u"
  End If

The If statement cannot be outside the UserTalk function, like you have.

It needs to be inside UserTalk

Code: [Select]

'Hi
'0.1
'&Hi:de80

Sub  Hi_Event_UserTalk(Username, Flags, Message, Ping)
  If InStr(Lcase(Message), "hi") Then
    AddQ "hi u"
  End If    
End Sub
Also, you seem to be forgetting that UserTalk is an Event.

Sub Hi_Event_UserTalk(Username, Flags, Message, Ping)

Your third line:

Code: [Select]

'&by de80
Needs to look like this:

Code: [Select]

'&Name of plugin:Name of author:What this plugin doesthis line is entirely optional, though.

[de80]

Code: [Select]

'Hi
'.01
'& By de80

Sub  Hi_UserTalk(Username, Flags, Message, Ping)
    
    AddQ & Username & " Hi "
    If InStr(Lcase(Message), "hi") Then
    AddQ "hi u"
  End If

  End Sub

[Vector]

Sub Hi_Event_UserTalk

not Sub Hi_UserTalk

This line:

Code: [Select]

AddQ & Username & " Hi "
will execute each time someone talks, because it is not contained within an If block.

[ArticWolve]

[code]AddQ & Username & " Hi "
  /code]

 
  Vector: Lol at your error
 
  De80: He means this:
  [div class='codetop']CODE[/div][div class='codemain' style='height:200px;white-space:pre;overflow:auto']'Hi
  '.01
  '& Hi Script:De80
 
  Sub  Hi_Event_UserTalk(Username, Flags, Message, Ping)
 
   If InStr(Lcase(Message), "hi") Then
      AddQ "Hello " & Username
    End If
 
  End Sub[/div]

Corrected your mistakes in red ><

[de80]

Code: [Select]

'Hi
'.01
'& By de80

Sub  Hi_Event_UserTalk(Username, Flags, Message, Ping)
    
    If InStr(Lcase(Message), "hi") Then
    
    AddQ "hi u"
  
  End If

  End Sub

[Vector]

There is nothing syntaxically wrong with de's post though.

Your third line is still the same.

yours is:

Code: [Select]

'& by de80
Should be:

Code: [Select]

'&Hi:de80:Says "hi u" when user says a message with "hi" in it

[ArticWolve]

He edited it after I reposted. It was wrong but oh well. I guess

This post has been edited by de80: Today, 07:08 PM

means nothing. Anyways, good job De80.

[de80]

Ok, well now i want to try something, im gona need help but this is what i want to do, i do

-shitaddclan (clan name)

And it will shitlist every buddy in that clan, im gona probly need some help

[ArticWolve]

The beta does this already. I have no clue on how to do that one......

[Vector]

Yes, this is complicated for a beginner.

Shadow, GetInternalDataByUsername(Username, 0) will get the clan tag of the user that joined.

If you need any help, just ask me what each function does.

Consider this:

Code: [Select]

'cb
'0.1
'&Clan ban:Vector

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

Sub cb_Event_UserJoins(Username, Flags, Message, Ping, Product, Level, OriginalStatString)
  If InArray(ClanTags, GetInternalDataByUsername(Username, 0)) Then
    AddQ "/ban " & Username & " Clan banned"
  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
I don't have the patience to explain exactly how you do this. Please ask me, and I will answer any questions you may have.

[de80]

Code: [Select]

'cb
'0.1
'&Clan ban:Vector

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

Sub cb_Event_UserJoins(Username, Flags, Message, Ping, Product, Level, OriginalStatString)
  If InArray(ClanTags, GetInternalDataByUsername(Username, 0)) Then
    AddQ "-shitadd " & Username & " Clan banned"
  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
Would this shit list them?

[Ace]

AddQ "-shitadd " & Username & " Clan banned"

Would this shit list them?

Yes, see above.