alias kban {
var %t
if $regex($3,/^(s|seconds|second|m|minutes|minute|h|hours|hour)$/i) {
%t = $calc($2 * $replace($left($regml(1),1),s,1,m,60,h,3600))
ban -ku $+ %t # $1 2 $iif($4,$4-,Banned from # for $replace($duration(%t),sec,$chr(32) second,min,$chr(32) minute,hr,$chr(32) hour))
}
else ban -k # $$1 2 $iif($2,$2-,Banned from #)
}