Anonymous

on *:TEXT:*brb*:#:{
  if (%gone. [ $+ [ $nick ] ] == $null) {
    /set %gone. [ $+ [ $nick ] ] $ctime
    /set %reason [ $+ [ $nick ] ] $2-
    /msg $chan $nick is now away, because $2- 
  }
}
on *:TEXT:*back*:#:{
  if (%gone. [ $+ [ $nick ] ] != $null) {
    /msg $chan $nick is back from %reason [ $+ [ $nick ] ] . Time Gone $duration($calc($ctime - %gone. [ $+ [ $nick ] ] $ctime)))
    /unset %gone. [ $+ [ $nick ] ]
  }
} 
}