#protection on
on @^!*:text:*:#:detect $1-
on @^!*:notice:*:#:detect $1-
on @^!*:action:*:#:detect $1-
alias -l detect {
  if ($nick !isreg $chan) || ($nick ishop $chan)  || ($nick isop $chan) || ($nick isvo $chan) || (staff isin $wildsite) || ($nick == $me) { goto end }
  $iif($regex($1-,/(burit|babi|puki|cibai|lancau|kote|cipap|suck|kimak|fuck|lancap|lanjiao|butuh)/g) > 0,$kik( Swearing ))
  $iif($regex($1-,/[[:cntrl:]]/g) > 59,$kik( Codes ))
  $iif($regex($strip($1-),/[[:digit:]]/g) > 59,$kik( Numerics ))
  $iif($regex($strip($1-),/[[:upper:]]/g) > 59,$kik( Capslock ))
  $iif($regex($strip($1-),/[[:punct:]]/g) > 79,$kik( Punctuations ))
  $iif($regex($strip($1-),/[ $chr(174) ]/g) > 59,$kik( Ascii ))
  $iif($regex($strip($1-),/[ $chr(160) ]/g) > 59,$kik( Blanks ))
  $iif($regex($strip($1-),/[[:lower:]]/g) > 249,$kik( Characters ))
  $iif($regex($strip($1-),/(https)/g) > 0,$kik( Spamming ))
  var %rpts = $+(%,repeat.,$hash($strip($1-),32),.,$nick) | Inc -u3 $eval(%rpts,1) | If ($eval(%rpts,2) > 3) { $kik( Repeating ) }
  var %srepeat = $+(%,special,$hash($remove($strip($1-),$chr(160),$chr(32)),32),.,$nick) | Inc -u2 $eval(%srepeat,1) | if ($eval(%srepeat,2) > 4) { $kik( Special Repeats ) }
  :end
}
alias -l kik {
  hinc -u3m dvd blue
  if ($hget(dvd,blue) <= 0) { halt } | if ($hget(dvd,blue) > 10) { halt }
  else { .ban -ku300 # $nick 2 4 Razón:4 $1- 4en  $chan $+ . 4Protección de canal. $logo | .splay $mircdirsounds\KickBan.wav }
  .ignore -u3 $nick
  else { return }
}
on ^*:kick:#: {
  if ($nick == $me) {
    window -e @kick | echo @kick ::14,1- You Kick Nick - $knick - $1- ::
  }
}
#protection end