Coders-IRC
IRC for Coders
![](https://www.coders-irc.net/ecms/uploads/users/user-12/profile/tn_img_91379f8d2f527518286dedc8b56b2a02.jpg)
Idlekicker
![image](https://www.coders-irc.net/ecms/uploads/sitesettings/posticons/tn_img_5167f589c181eee3618b6128ad553d96.png)
#idlekicker on
on *@!:JOIN:#help: if !$timer($nick) { $+(.timer,$nick) 1 120 KickIdler $chan $nick }
on *:TEXT:*:#help: $+(.timer,$nick) 1 120 KickIdler $chan $nick
on 1:NICK: {
if ($nick isop $chan) { return }
var %nick = $newnick, %cn = $comchan(%nick,0)
while (%cn) {
if (*#help* iswm $comchan(%nick,%cn)) { $+(.timer,%nick) 1 120 KickIdler #help %nick }
dec %cn
}
}
alias KickIdler { if ($me isop $1) && ($2 isreg $1) { ban -ku120 $1-2 2 Don't hang your nick here. Come back after 2 minutes if you really need help! Thank you }
}
#idlekicker end
![](https://www.coders-irc.net/ecms/uploads/users/user-12/profile/tn_img_91379f8d2f527518286dedc8b56b2a02.jpg)
AntiFlood v1.0
![image](https://www.coders-irc.net/ecms/uploads/sitesettings/posticons/tn_img_5167f589c181eee3618b6128ad553d96.png)
#####################################################################
# AntiFlood v1.0
# Description: Catching different types of flood on channels
# Author: Epic
#####################################################################
alias af_data {
.hadd -m af check-mess true
.hadd -m af check-rep true
.hadd -m af check-words true
.hadd -m af check-mode true
.hadd -m af check-kick true
;---------------------------
.hadd -m af max-mess 5
.hadd -m af max-mess-sec 3
.hadd -m af max-rep 3
.hadd -m af max-rep-sec 10
.hadd -m af max-words 200
.hadd -m af max-words-sec 10
.hadd -m af mode +m
.hadd -m af demode -m
.hadd -m af mode-sec 300
.hadd -m af reason flood/spam
}
====================================================
alias afcheck {
var %af_check count- $+ $1 $+ $2
if ($prop == rep) return $hget(af_rep,%af_check)
if ($prop == rsec) return $hget(af_rsec,%af_check)
if ($prop == mes) return $hget(af_mess,%af_check)
if ($prop == msec) return $hget(af_msec,%af_check)
if ($prop == words) return $hget(af_words,%af_check)
if ($prop == wsec) return $hget(af_wsec,%af_check)
}
alias af_count_mes {
var %af_count count- $+ $1 $+ $2
if (!$hget(af_msec,%af_count)) .hadd -mz af_msec %af_count $hget(af,max-mess-sec)
if (!$hget(af_mess,%af_count)) .hadd -mu $+ $hget(af,max-mess-sec) af_mess %af_count 0
if ($hget(af_msec,%af_count) > 0) .hinc -m af_mess %af_count 1
}
alias af_count_rep {
var %af_count count- $+ $1 $+ $2
if (!$hget(af_rsec,%af_count)) || ($3- !isin $hget(af_rep_text,%af_count)) {
.hadd -mz af_rsec %af_count $hget(af,max-rep-sec)
.hadd -mu $+ $hget(af,max-rep-sec) af_rep %af_count 0
.hadd -m af_rep_text %af_count $3-
}
else { .hinc -mu $+ $hget(af,max-rep-sec) af_rep %af_count 1 }
}
alias af_count_words {
var %af_count count- $+ $1 $+ $2
if (!$hget(af_wsec,%af_count)) .hadd -mz af_wsec %af_count $hget(af,max-words-sec)
if (!$hget(af_words,%af_count)) .hadd -mu $+ $hget(af,max-words-sec) af_words %af_count 0
if ($hget(af_wsec,%af_count) > 0) .hinc -m af_words %af_count $numtok($3-,32)
}
====================================================
on *:TEXT:*:#:{
af_data | var %af_count count- $+ $nick $+ $chan
if ($hget(af,check-mess) == true) af_count_mes $nick $chan
if ($hget(af,check-rep) == true) af_count_rep $nick $chan $1-
if ($hget(af,check-words) == true) af_count_words $nick $chan $strip($1-)
;# Debug check script echo
;/echo -s 28debug:18 $nick $chan 28 message:53 $hget(af_mess,%af_count) $hget(af_msec,%af_count) 28 repeat:41 $hget(af_rep,%af_count) $hget(af_rsec,%af_count) 28 words:29 $hget(af_words,%af_count) $hget(af_wsec,%af_count)
if ($afcheck($nick,$chan).mes >= $hget(af,max-mess) && $afcheck($nick,$chan).msec > 0) {
/echo -a FLOOD $chan $nick :40 $afcheck($nick,$chan).mes messages in40 $hget(af,max-mess-sec) seconds.
if ($hget(af,check-mode) == true) af_mode_chan $nick $chan
if ($hget(af_mess,%af_count)) .hdel -sw af_mess count-* | if ($hget(af_msec,%af_count)) .hdel -sw af_msec count-*
}
if ($afcheck($nick,$chan).rep >= $hget(af,max-rep) && $afcheck($nick,$chan).rsec > 0) {
/echo -a FLOOD $chan $nick :40 $afcheck($nick,$chan).rep reps in40 $hget(af,max-rep-sec) seconds.
if ($hget(af,check-mode) == true) af_mode_chan $nick $chan
if ($hget(af_rep,%af_count)) .hdel -sw af_rep count-* | if ($hget(af_rsec,%af_count)) .hdel -sw af_rsec count-*
}
if ($afcheck($nick,$chan).words >= $hget(af,max-words) && $afcheck($nick,$chan).wsec > 0) {
/echo -a FLOOD $chan $nick :40 $afcheck($nick,$chan).words words in40 $hget(af,max-words-sec) seconds.
if ($hget(af,check-mode) == true) af_mode_chan $nick $chan
if ($hget(af_words,%af_count)) .hdel -sw af_words count-* | if ($hget(af_wsec,%af_count)) .hdel -sw af_wsec count-*
}
}
====================================================
alias af_mode_chan {
if ($hget(af,check-kick) == true) /kick $2 $1 $hget(af,reason)
if (!$timer(AF $+ $2)) {
/mode $2 $hget(af,mode)
.timerAF $+ $2 1 $hget(af,mode-sec) /mode $2 $hget(af,demode)
}
}
====================================================
![](https://www.coders-irc.net/ecms/uploads/users/user-12/profile/tn_img_91379f8d2f527518286dedc8b56b2a02.jpg)
ban script particular.
![image](https://www.coders-irc.net/ecms/uploads/sitesettings/posticons/tn_img_5167f589c181eee3618b6128ad553d96.png)
Allow Chars v1.0– description:
1.This script controls the use of only those characters in channel messages that are allowed and listed in the variable "%ach_characters". Otherwise, the user will receive "KiÑk+Ban".
2.In the alias "allowchars_set" you can remake all the settings for this script by changing the values of the variables:
%ach_work – configures the enable or disable of the script. The options are:
%ach_kick – configures whether to enable or disable execution "Kick" for the offender. The options are:
%ach_ban – configures whether to enable or disable execution "Ban" for the offender. The options are:
%ach_reason – configures the reason for the ban, which will be indicated in the kick message. (You can change this to your text).
%ach_btype – configures the type (format) of the ban for the offender. More details about the types of bans are described here:$mask. Default:<2>.
%ach_btime – contains the time (in seconds) for which a temporary ban will be set, and after which it will be automatically canceled on the channel. If you do not want to remove the ban, then set: <0>.
%ach_exceptpref – contains prefixes of symbols (channel operator status) for which there will be an exception and the script will not react to these users. Default:<[!~&@%+]>. (You can change this to other prefixes).
%ach_characters – contains all characters that are allowed for use in channel messages. (You can change or add to this set your national valid charactersUnicode andEmoji).
#####################################################################
# Name: Allow Chars v1.0
# Author: Epic (epicnet@mail.ru, http://epicnet.ru)
# Description: Allows to use in channel messages only those characters that are specified in the script.
#####################################################################
alias -l allowchars_set {
%ach_work = yes
%ach_kick = yes
%ach_ban = yes
%ach_reason = There are forbidden characters in your message!
%ach_btype = 2
%ach_btime = 3600
%ach_exceptpref = [!~&@%+]
%ach_characters = [abcdefghijklmnopqrstuvwxyz0123456789^`'"*#â„–@%$&(){}[]|\/<>:;!?+=-~,._]
}
on *:TEXT:*:#: allowchars $nick $chan $1-
on *:ACTION:*:#: allowchars $nick $chan $1-
alias -l allowchars {
allowchars_set | var %ach_pnick $remove($nick($2,$1).pnick,$1)
if (%ach_work == yes && %ach_pnick !isin %ach_exceptpref) {
var %text $remove($strip($3-),$chr(32))
if ($checkchars(%text) == false) allowchars_ban $1 $2
}
}
alias -l checkchars {
var %chars $remove(%ach_characters,$left(%ach_characters,1),$right(%ach_characters,1))
var %i 1 | while (%i <= $len($1)) { if ($mid($1,%i,1) !isin %chars) { return false | break } | inc %i } | return true
}
alias -l allowchars_ban {
if (%ach_kick == yes) {
if ($len(%ach_reason) > 1) var %ach_kr %ach_reason | else var %ach_kr -
.kick $2 $1 %ach_kr
}
if (%ach_ban == yes) {
if (!%ach_btype) %ach_btype = 2 | if (%ach_btime > 0) var %ach_key $+(-u,%ach_btime)
.ban %ach_key $2 $1 %ach_btype
}
}