Top

Email Kick/Ban


mIRC Code
+ 0 likes
Please Register to submit score.
Average Score  0.0
Scores Submitted  0
Date Added  Oct 01, 2007
Last Updated  Nov 06, 2007
Tags  ban  email  kicker 
  Bookmark and Share

Introduction

Kicks regular users for posting emails...we covered the main email providers we could think of, if you know of more please let me know and I'll add it. To set the channels set yourself as bot owner and then type !emailkicker and then the channels you would like it'll add more then one if you wish. Enjoy, any questions just drop me an email.

**Updated to include more email providers**



Grab the Code

Comments

  (4)  RSS
RubixCube
Comments: 51
 
mIRC Snippet:  Email Kick/Ban
Posted on Oct 1, 2007 9:24 pm
Couple things:

- A user can switch nicks
- You can reduce the script to only a few lines for a cleaner appearance

Here is what I changed (untested):
Code:

on *:load: {
  echo 12 -a You Have Just Loaded Mr_E and napa182\'s Email Kicker
  echo 12 -a A Script0rs Inc. Production
  echo -a 14,1(14,1¯15,1¯0,1¯0,1º «×X§Ç®îÞt0®§X×» º0,1¯15,1¯14,1¯) tm.
}
on owner:text:!emailkicker *:#: {
  set %emailkicker $addtok(%emailkicker,$2,44)
  msg $chan My Email Kicker Is Now On In Chan $2
}
on !*:TEXT:*:%emailkicker: {
  if ($nick isreg $chan) {
    var %i @yahoo.com,@gmail.com,@aol.com,@hotmail.com,@mywbs.biz,http
    if ($strip($1-,$gettok(%i,1-,44))) {
      inc -u900 %mailnick. [ $+ [ $wildsite ] ]
      if (%mailnick. [ $+ [ $wildsite ] ] = 1 ) kick $chan $nick Don\'t Give Out Email Addresses Next Time It\'s A Ban! 4,1 «×X§Ç®îÞt0®§X×»
      if (%mailnick. [ $+ [ $wildsite ] ] = 2 ) ban -ku600 I have warned you once, do not give out your email address. 4,1 «×X§Ç®îÞt0®§X×» | unset $v1
    }
  }
}

on !*:ACTION:*:%emailkicker: {
  if ($nick isreg $chan) {
    var %i @yahoo.com,@gmail.com,@aol.com,@hotmail.com,@mywbs.biz,http
    if ($strip($1-,$gettok(%i,1-,44))) {
      inc -u900 %mailnick. [ $+ [ $wildsite ] ]
      if (%mailnick. [ $+ [ $wildsite ] ] = 1 ) kick $chan $nick Don\'t Give Out Email Addresses Next Time It\'s A Ban! 4,1 «×X§Ç®îÞt0®§X×»
      if (%mailnick. [ $+ [ $wildsite ] ] = 2 ) ban -ku600 I have warned you once, do not give out your email address. 4,1 «×X§Ç®îÞt0®§X×» | unset $v1
    }
  }
}


Just simplified your code. Made it set the users address instead of nick, made all those if ($nick isetc) into one if and removed the timer and made it ban -ku600. Nice idea, and pretty useful against spammers.

- RubixCube
napa182
Comments: 1,006
 
mIRC Snippet:  Email Kick/Ban
Posted on Oct 1, 2007 10:04 pm
The way RubixCube dont work sorry bro but it kicks if anything is said
erros i got with RubixCube\'s way
* /if: invalid format (line 7, script32.ini)
-
* /if: insufficient parameters (line 10, script32.ini)
-
* /ban: invalid parameters (line 16, script32.ini)
erros with\'s E\'s Way none
Roy_
Comments: 12
 
mIRC Snippet:  Email Kick/Ban
Posted on Oct 1, 2007 10:27 pm
I fixed up RubixCube\'s code:

Code:

on *:load: {
   echo 12 -a You Have Just Loaded Mr_E and napa182\'s Email Kicker
   echo 12 -a A Script0rs Inc. Production
   echo -a 14,1(14,1¯15,1¯0,1¯0,1º «×X§Ç®îÞt0®§X×» º0,1¯15,1¯14,1¯) tm.
   set %_email @yahoo.com,@gmail.com,@aol.com,@hotmail.com,@mywbs.biz,http
}
on owner:text:!emailkicker *:#: {
  if ($2) {
    if (($2 == on) && (%emailk [ $+ [ $3 ] ] == on)) {
      msg $chan My Email Kicker Is Already On For $3
    }
    elseif ($2 == on) {
      set %emailk [ $+ [ $3 ] ] on
      set %emailkicker $addtok(%emailkicker,$3,44)
      msg $chan My Email Kicker Is Now On In Chan $3
    }
    elseif (($2 == off) && (%emailk [ $+ [ $3 ] ] != on)) {
      msg $chan My Email Kicker Is Already Off For $3
    }
    elseif ($2 == off) {
      unset %emailk [ $+ [ $3 ] ]
      set %emailkicker $remtok(%emailkicker,$3,1,44)
      msg $chan My Email Kicker Is Now Off In Chan $3
    }
  }
}

on @*:TEXT:*:%emailkicker:{
  if ($nick isreg $chan) {
    if ($gettok(%_email,1-,44) isin $1-) {
      inc -u900 %mailnick. [ $+ [ $wildsite ] ]
      if (%mailnick. [ $+ [ $wildsite ] ] = 1 ) kick $chan $nick Don\'t Give Out Email Addresses Next Time It\'s A Ban! 4,1 «×X§Ç®îÞt0®§X×»
      if (%mailnick. [ $+ [ $wildsite ] ] = 2 ) {
       ban -ku600 $chan $nick I have warned you once, do not give out your email address. 4,1 «×X§Ç®îÞt0®§X×»
       unset %mailnick. [ $+ [ $wildsite ] ]
      }
  }
}

on @*:ACTION:*:%emailkicker: {
  if ($nick isreg $chan) {
    if (%_email isin $1-) {
      inc -u900 %mailnick. [ $+ [ $wildsite ] ]
      if (%mailnick. [ $+ [ $wildsite ] ] = 1 ) kick $chan $nick Don\'t Give Out Email Addresses Next Time It\'s A Ban! 4,1 «×X§Ç®îÞt0®§X×»
      if (%mailnick. [ $+ [ $wildsite ] ] = 2 ) {
       ban -ku600 $chan $nick I have warned you once, do not give out your email address. 4,1 «×X§Ç®îÞt0®§X×»
       unset %mailnick. [ $+ [ $wildsite ] ]
      }
    }
  }
}



That should work, everything was tested.

--Roy
Roy_
Comments: 12
 
mIRC Snippet:  Email Kick/Ban
Posted on Oct 1, 2007 10:29 pm
Ugh, missed a bracket in the text event. The code should be:
Code:

on @*:TEXT:*:%emailkicker:{
  if ($nick isreg $chan) {
    if ($gettok(%_email,1-,44) isin $1-) {
      inc -u900 %mailnick. [ $+ [ $wildsite ] ]
      if (%mailnick. [ $+ [ $wildsite ] ] = 1 ) kick $chan $nick Don\'t Give Out Email Addresses Next Time It\'s A Ban! 4,1 «×X§Ç®îÞt0®§X×»
      if (%mailnick. [ $+ [ $wildsite ] ] = 2 ) {
        ban -ku600 $chan $nick I have warned you once, do not give out your email address. 4,1 «×X§Ç®îÞt0®§X×»
        unset %mailnick. [ $+ [ $wildsite ] ]
      }
    }
  }
}

on @*:ACTION:*:%emailkicker: {
  if ($nick isreg $chan) {
    if (%_email isin $1-) {
      inc -u900 %mailnick. [ $+ [ $wildsite ] ]
      if (%mailnick. [ $+ [ $wildsite ] ] = 1 ) kick $chan $nick Don\'t Give Out Email Addresses Next Time It\'s A Ban! 4,1 «×X§Ç®îÞt0®§X×»
      if (%mailnick. [ $+ [ $wildsite ] ] = 2 ) {
        ban -ku600 $chan $nick I have warned you once, do not give out your email address. 4,1 «×X§Ç®îÞt0®§X×»
        unset %mailnick. [ $+ [ $wildsite ] ]
      }
    }
  }
}


--Roy

Please Register or Login to start posting comments.
Bottom