alias tkb {
  if (($me !isop $active) && ($me !ishop $active)) {
    echo 4 -a You are not an operator.
  }
  elseif ($1 !ison $active) { 
    echo 4 -a The nick $qt($1) is not on $+($active,.)
  }
  else {
    ban -ku $+ $calc(($readini(Tkb.ini,n,$+($network,.,$active),$1)+1)*600) $1 2 $2- ( $+ $calc(($readini(Tkb.ini,n,$+($network,.,$active),$1)+1)*10) minute ban $+ ) 
    writeini -n Tkb.ini $+($network,.,$active) $1 $calc($readini(Tkb.ini,n,$+($network,.,$active),$1)+1)  
  }
}