Something

alias tb {
  ; syntax is /tb nick time reason
  if ($me ishop $chan || $me isop $chan) {
    if ($$1 ison $chan && $$2 isnum) {
      set %reason. [ $+ [ $$1 ] ] $3-
      if (%reason. [ $+ [ $$1 ] ] == $null) { set %reason. [ $+ [ $$1 ] ] No Reason }
      inc %kcount
      ban -ku $+ $calc($2 * 60) $chan $$1 2 10Reason: %reason. [ $+ [ $$1 ] ] 1¤3 $$2 Minute Ban 1¤12 Noobs Pwnt by an energy sword: %kcount
      unset %reason. [ $+ [ $$1 ] ]
    }
  }
}
}