Random Kick

alias random.kick {
    if ($nick !ison #) return
    .hinc -u3m random $1 1
    if ($hget(random,$1) > $r(0,300)) {
   .inc -u5m %random.KICK | .inc -u19m %sec $r(2000,3000) | .inc -u3 %i
   if (%random.KICK < 20) { .KICK # $nick $1- 1st random (Direct Kick)  | halt }
   if (%random.KICK > 90) { .timer -qmcdos 1 %sec .KICK # $nick $1- 2nd random Delay aktivated (Random Delay Kick) | .b | halt }
   if ($ibl(#,0) > 12) { return }
   .hadd -u3m banned $nick $+ !*@Ban*
   .timerbanned 1 9 !mode $chan + $+ $str(b,$hget(banned,*).item) $hget(banned,1).item $hget(banned,2).item $hget(banned,3).item $hget(banned,4).item $hget(banned,5).item $hget(banned,6).item $hget(banned,7).item $hget(banned,8).item $hget(banned,9).item $hget(banned,10).item $hget(banned,11).item $hget(banned,12).item
  }
}