on $*:TEXT:/^(brb|bbl|bbs|afk)/i:#:{
  if (!$istok(#windy #irchelp #darken #applicatiockedns #polloloco #msl #bnc.swiftirc.net #wickedfury #thegodzsw,#,32)) {
    if (!$istok(Larsi Mandy_Bar x_hannah_x Ianzz `Joe` xdivine_love,$nick,32)) {
      if ($address($nick,1) != *!*[email protected]) {
        set $+(%,brbtime,$nick) $ctime
        set %person [ $+ [ $nick ] ] $nick
        if ($2 == $null) {
          set %brb [ $+ [ $nick ] ] AFK
        }
        else {
          set %brb [ $+ [ $nick ] ] $2-
        }

      msg $chan 4[7»1 $+ $nick $+ 7«4] 14is now 4[7»1Away7«4] 14reason:4  [7»1 $+ %brb [ $+ [ $nick ] ] $+ 7«4] 14left at: 4[7»1,11 $+ $gmt($ctime) $+ 7,0«4] 4GMT }
    }
  }
}
on *:TEXT:*:#: {
  if (!$istok(#windy #irchelp #darken #applications #polloloco #msl #bnc.swiftirc.net #wickedfury #thegodzsw,#,32)) {
    if (!$istok(x_hannah_x Ianzz `Joe` xdivine_love,$nick,32)) {
      if ($address($nick,1) != *!*[email protected]) {
        if ($nick == %person [ $+ [ $nick ] ]) {  msg $chan 4[7»1 $+ %person [ $+ [ $nick ] ] $+ 7«4] 14is now 4[7»1Back7«4] 14from:4  [7»1 $+ %brb [ $+ [ $nick ] ] $+ 7«4] 14and was4 [7»1GONE FOR7«4] 1,11>>> $duration($calc($ctime - $(,$+(%,brbtime,$nick,)))) <<<
          unset %brb [ $+ [ $nick ] ]
          unset $+(%,brbtime,$nick) $ctime
          unset %person [ $+ [ $nick ] ]
        }
      }
    }
  }
}