on *:TEXT:brb*:#: {
  set %brb.nick $nick
  set %brb.msg [ $+ [ $nick ] ]  $2-
  set %brb.time [ $+ [ $nick ] ] $asctime(h:nntt)
  set %brb.date [ $+ [ $nick ] ] $asctime(mm/dd/yy) 
  msg $chan 2 $nick 7will brb. 6reason left: 7 %brb.msg [ $+ [ $nick ] ] $+
  msg $chan 6 time left: 7 %brb.time [ $+ [ $nick ] ] %brb.date [ $+ [ $nick ] ]
}

on *:TEXT:back*:#: {
  if (%brb.nick iswm $nick) {
    msg $chan 2 $nick 7 is now back. 6reason left: 7 %brb.msg
    msg $chan 6time of return:7 $asctime(h:nntt) %brb.date [ $+ [ $nick ] ]
    unset %brb.* [ $+ [ $nick ] ]
  }
}