Snippets Project Page
Author: entropy
Added: 5y
Updated: 5y
mIRC: 7.52+
Hits: 1,321
Downloads: 41
Review: entropy
Size: 1.58KB
2 0
Login to vote.
Bad Nick
v2.3
Kicks and bans people with bad nicknames.
Download
JSON
▲ Review
▼ Source
; Bad Nick v2.3 - by entropy 2018 menu menubar,status,channel,query { - Bad Nick .Status $chr(9) $iif($group(#felix).status == on,On,Off) { $iif($group(#felix).status == on,.disable,.enable) #felix echo $color(info) -tag $chr(9679) Bad Nicks Status is now: $+($chr(2),$replace($group(#felix).status,on,On,off,Off),$chr(2)) } .- .Bad Nicks ..Echo { echo $color(info) -tag $chr(9679) Bad Nicks are: $+($chr(2),%badnicks,$chr(2)) } ..- ..Set { var %a = $input(Bad Nicks? (sep. by space),5) %badnicks = %a } ..- ..Add { var %a = $input(Bad Nick to add?,5) if (%a) { %badnicks = %badnicks %a } } - } #felix off on @*:join:#:{ if ($wildcard($nick)) { .msg $nick You have a bad nickname! You have 2 minutes to change nicks or i will ban you. $+(.timer,$nick) -o 1 120 doit $nick } } on !*:nick:{ if ($wildcard($newnick)) { .msg $newnick You have a bad nickname! You have 2 minutes to change nicks or i will ban you. $+(.timer,$newnick) -o 1 120 doit $newnick } elseif ($timer($nick)) { $+(.timer,$nick) off } } alias -l doit { var %a = 1, %b while ($comchan($1,%a)) { %b = $v1 if ($1 ison %b && $me isop %b) { mode %b +b $+($1,!*@*) kick %b $1 Bad Nick } inc %a } } alias -l wildcard { var %a = 1, %b while ($gettok(%badnicks,%a,32)) { %b = $v1 if (%b iswm $1 || %b == $1) { return $true } inc %a } } #felix end
Changelog:
0
0