on *:*TEXT*:brb*:#: { 
  if ($chan != #sexy) { 
    elseif ($2 !== $null) { 
      set % [ $+ [ $nick ] ] $2- 
      set %time [ $+ [ $nick ] ] $ctime 
      msg $chan  $nick will be right back. Left at $time $+ . Reason: $2- 
    }
    elseif ($2 == $null) { 
      set % [ $+ [ $nick ] ] none 
      set %time [ $+ [ $nick ] ] $ctime 
      msg $chan  $nick will be right back. Left at $time $+ . No reason given.  
    }
  }
}

on *:*TEXT*:bbl*:#:{ 
  if ($chan != #sexy) { 
    elseif ($2 !== $null) { 
      set % [ $+ [ $nick ] ] $2- 
      set %time [ $+ [ $nick ] ] $ctime 
      msg $chan  $nick will be right back. Left at $time $+ . Reason: $2- 
    }
    elseif ($2 == $null) { 
      set % [ $+ [ $nick ] ] none 
      set %time [ $+ [ $nick ] ] $ctime 
      msg $chan  $nick will be right back. Left at $time $+ . No reason given.  
    }
  }
}

on *:TEXT:*:#: 
if (% [ $+ [ $nick ] ] != $null) {
  elseif (% [ $+ [ $nick ] ] == none) { 
    msg $chan $nick is now back at $time $+ . Been gone $duration($calc($ctime - %time [ $+ [ $nick ] ] )) seconds. | unset % $+ $nick 
  }
  else { 
    msg $chan $nick is now back from % [ $+ [ $nick ] ] at $time $+ . Been gone $calc($ctime - %time [ $+ [ $nick ] ] ) seconds. 
    unset % [ $+ [ $nick ] ]
    unset %time [ $+ [ $nick ] ]
  }
}