on *:open:?:*: {
msg $nick I have $query(0) $iif($query(0) == 1,query,queries) open. $iif($numtok(%unanswered,32) == 0,None,$numtok(%unanswered,32)) being before you.
msg $nick I see you in $iif($comchans($nick),$comchans($nick),no channels) $+ . I have been idle for $duration($idle) $+ . Please idle !@#%*! and i'll get back to you asap.
set %unanswered %unanswered $nick
}
on *:active:?: {
if ($active isin %unanswered) {
if (!$remove(%unanswered,$active)) { unset %unanswered }
else { set %unanswered $remove(%unanswered,$active) }
}
}
on *:start: unset %unanswered