Bad word warning and kick

By tye on Feb 07, 2007

Modify the %swears variable to the words you want to warn/kick on.
Change the %warnings to the number of warnings you want to give out.

; Copy the following code into your remotes (Alt+R)
; Tye @ Undernet #mirc.net
on @*:TEXT:*:#: {
  ; The list of swears. Words should be separated by commas
  var %swears = fark,shoot,mittens
  ; Number of times to warn before banning
  var %warns = 2
  var %x = $numtok(%swears,44)
  tokenize 32 $strip($1-)
  while (%x) && ($nick isreg $chan) {
    if ($istok($1-,$gettok(%swears,%x,44),32)) {
      inc $+(%,swear.,$wildsite)
      var %n = $($+(%,swear.,$wildsite),2)
      if (%n <= %warns) {
        notice $nick $nick $+ , this is your $ord(%n) warning for using forbidden language in this channel. $iif(%n = %warns,Breaking the channel rules one more time will result in ban.)
      }
      elseif (%n > %warns) {
        ban -ku300 $chan $nick 2 Using forbidden language
        unset $+(%,swear.,$wildsite)
      }
    }
    dec %x
  }
}
; Reset all of the swear data on mIRC start
on *:START: { unset %swear.* }

Comments

Sign in to comment.
MoonCrawlerVG   -  Nov 22, 2013

can i change it so everyone can see the message from the bot? not just the person who says the word.

Yawhatnever  -  Nov 22, 2013

You would change /notice $nick to /msg $chan

MoonCrawlerVG  -  Nov 23, 2013

Okay thank you that worked.

Sign in to comment

JoKabua   -  Nov 29, 2011

Nevermind i test it and it work thanks for the great snippet mate :D

 Respond  
JoKabua   -  Nov 29, 2011

I like this remote, but is any how i can not kick the OPS and Voicers Access..

 Respond  
DayDreamer   -  Nov 17, 2009

how to make this script warn/kick someone with voice?

 Respond  
Fujitsu   -  Jul 18, 2009

very nice addons .. but could someone edit it a bit example like i mean its like this..

1st. when user type forbidden words like fark.. notice he got will be warn abt wat the forbidden words that he using ..eg. match words fark pls dont repeat it again.

2d. when the user got kick from the channel, eg. match word fark .. forbidden words

ty pls help

 Respond  
napa182   -  Jun 16, 2009

remove

&& ($nick isreg $chan)

from the while line of the loop

 Respond  
[HANZam]   -  Jun 16, 2009

Im referring to TYE script from canada who wrote of this script.

; Copy the following code into your remotes (Alt+R)
; Tye @ Undernet #mirc.net
on @:TEXT::#: {
; The list of swears. Words should be separated by commas
var %swears = fark,shoot,mittens
; Number of times to warn before banning
var %warns = 2
var %x = $numtok(%swears,44)
tokenize 32 $strip($1-)
while (%x) && ($nick isreg $chan) {
if ($istok($1-,$gettok(%swears,%x,44),32)) {
inc $+(%,swear.,$wildsite)
var %n = $($+(%,swear.,$wildsite),2)
if (%n <= %warns) {
notice $nick $nick $+ , this is your $ord(%n) warning for using forbidden language in this channel. $iif(%n = %warns,Breaking the channel rules one more time will result in ban.)
}
elseif (%n > %warns) {
ban -ku300 $chan $nick 2 Using forbidden language
unset $+(%,swear.,$wildsite)
}
}
dec %x
}
}
; Reset all of the swear data on mIRC start
on :START: { unset %swear. }

so, where will I delete the part of this script to enable to kick anybody and warn anybody who uses the foul word.

 Respond  
Jethro   -  Jun 16, 2009

[HANZam], if you're referring to Napa's script, then all you need to do is remove if ($nick(#,$nick,vr)) { By removing it you will make it work on anybody who says a foul word.

 Respond  
[HANZam]   -  Jun 16, 2009

the script is very nice coz if u violate the script, it will warns u. but my concern is how can u make enable to kick the Operator when he or she type the badwords... can u give me an example where to put the command in the script?

 Respond  
napa182   -  Apr 01, 2009

@ falcon
you can add the word to the var or make a new code

just add the word to this line

var %swears = fark,shoot,mittens

so it looks like

var %swears = fark,shoot,mittens,farksss

or you could use somthing like this

on $@*:text:/(fuck(.+)?|shit(.+)?)/iS:#:{
  if ($nick(#,$nick,vr)) { 
    inc $+(%,warn,.,$nick,.,$chan)
    $iif($($+(%,warn,.,$nick,.,$chan),2) == 1,.notice $nick $nick $+ $chr(44) this is your $ord($($+(%,warn,.,$nick,.,$chan),2)) and only warning for using forbidden language,ban -ku300 # $nick 2 Using forbidden language) 
    $iif($($+(%,warn,.,$nick,.,$chan),2) == 2,unset $+(%,warn,.,$nick,.,$chan))
  }
}
 Respond  
falcon   -  Mar 31, 2009

its doesnt work if the word is "farksss" the script only detect a standalone fark, anyone know how to modify this?

 Respond  
AHBARAR   -  Jul 02, 2007

does it work on multi swears like f u c k etc..... or just words ???

 Respond  
APinis   -  Feb 09, 2007

ok, it does work but what do i need to change so it would put like 60 min ban or smth?

 Respond  
A*1*T*E*A*M   -  Feb 08, 2007

aham...ok i know to that work you must be opped

 Respond  
tye   -  Feb 08, 2007

It will work on any network.

In addition to changing the variables specified in the description you must also be opped for it to work.

 Respond  
chicknh8r   -  Feb 08, 2007

; The list of swears. Words should be seperated by commas
var %swears = fark,shoot,mittens

Did you change \'fark,shoot,mittens\' to actual cusswords?
Make sure you edit \'var %swears = fark,shoot,mittens\' to
actual cusswords. Example;
var %swears = ass,fu#%,sh#%\'

 Respond  
A*1*T*E*A*M   -  Feb 08, 2007

Thats only for DALnet ... ?

 Respond  
APinis   -  Feb 08, 2007

somehow it doesn`t work =/

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.