irc cloud banmask

By simo on Apr 15, 2017

this removes regular banmask set on irccloud users and replaces with ident ban since many irccloud users have clone hosts ( some actually have uid in host as well but since some dont i decided to make this small code that bans ident instead since all irccloud users have UID in ident )

by Cappuccino.

On *:BAN:#:{
if ($nick(#,$me,@%&~)) {
if ($regex($banmask,/^\*!\*@/) && $regex($banmask,/(irccloud)/i)) { mode $chan -b $banmask | set %ircloudnick on }
if ($banmask == *!*@* || $banmask == *!~*@*) { mode $chan -b $banmask }
}
}

ON ^:KICK:#:{ 
       if (%ircloudnick == on) { 
    var %irccloudbanmazk = 1
    while ($chan(%irccloudbanmazk))  {
      var %ircloudChan $ifmatch
      if ($nick(%ircloudChan,$me,@&~%)) {    
       mode %ircloudChan +b $regsubex($mid($address($knick,0),3),/(~?[^@]+)@.*(?=\.[^.]+\..+)/,*!\1@*\2)   
      }
      inc %irccloudbanmazk
    } 
    unset  %ircloudnick 
  } 
}

Comments

Sign in to comment.
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.