on !*:JOIN:%mychan: {
.echo $color(info) -ta The $+ $nick $+ user has just joined the channel!
}
on !*:PART:%mychan: {
.echo $color(info) -ta The $+ $nick $+ user has just left the channel!
}
on *:TEXT:*:%mychan: {
if ($len($1-) < 15) { return }
if ($int($calc($regex($1,/[A-ZΑ-ΩΔΦά]/g)/$len($1)*100)) > 40) {
if (!$istok(%flood-one,$nick,32)) && (!$istok(%flood-two,$nick,32)) && (!$istok(%flood-three,$nick,32)) { .set %flood-one $addtok(%flood-one,$nick,32) }
if ($istok(%flood-one,$nick,32)) {
.set %flood-one $remtok(%flood-one,$nick,32)
.set %flood-two $addtok(%flood-two,$nick,32)
.notice $nick Warning: Take off your CAPS, if you continue then you will be KICKED! (1/2)
}
elseif ($istok(%flood-two,$nick,32)) {
.set %flood-two $remtok(%flood-two,$nick,32)
.set %flood-three $addtok(%flood-three,$nick,32)
.notice $nick Warning: Take off your CAPS, if you continue then you will be KICKED! (2/2)
}
elseif ($istok(%flood-three,$nick,32)) {
.set %flood-three $remtok(%flood-three,$nick,32)
.kick $chan $nick Please Close Caps Lock..! [Too many caps 2/2]
}
}
}