auto query close

alias noclose { /timer $+ $iif(($1),$1,$active) $+ * off }
on *:text:*:?:{
  if (!$istok(%dontclose,$nick,44)) {
    noclose $nick
    .timer $+ $nick $+ msgqueryclosewarn 1 270 echo -a 12[4NOTICE12] 10 30 seconds till query close with $nick $+.
    .timer $+ $nick $+ msgqueryclose 1 300 /msg $nick 12[4NOTICE12] 10 Your query window has automatically been closed after 5 minutes of inactivity, if you need something pm me again. Otherwise do not reply.
    .timer $+ $nick $+ queryclose 1 302 close -m $nick
    .timer $+ $nick $+ queryclosewarn 1 302 echo -a 12[4NOTICE12] 10 Query with $nick has been closed.
  }
}