r3d

on *:TEXT:!tb*:#:{
  if ($nick ishop $chan || $nick isop $chan) || ($address($nick,2) == $address($me,2)) { 
    if (!$2) || (!$3) {
      notice $nick correct syntax: !tb <name> <time(in minutes)> & <reason(if wanted)>
      halt 
    }
    else {
      if (!$4) { 
        set %reason. [ $+ [ $2 ] ] Requested
        inc %kcount
        ban -ku $+ $calc($3 * 60) $chan $2 4Reason: %reason. [ $+ [ $$2 ] ] 13 $$3 Minute Ban 16 From: $nick 112 Noobs Raped: %kcount
        unset %reason. [ $+ [ $2 ] ]
        halt
      }
      else {
        set %reason. [ $+ [ $2 ] ] $4-
        inc %kcount
        ban -ku $+ $calc($3 * 60) $chan $2 4Reason: %reason. [ $+ [ $$2 ] ] 13 $$3 Minute Ban 16 From: $nick 112 Noobs Raped: %kcount
        unset %reason. [ $+ [ $2 ] ]
        halt
      } 
    }
  }
}