just simple autoaway ;P
on *:INPUT:#:set $+(%,idle,$cid) $ctime | if ($away) away
on *:INPUT:?:set $+(%,idle,$cid) $ctime | if ($away) away
on *:PING: {
if ($away) return
if ($calc($ctime - $(,$+(%,idle,$cid))) > 600) {
away auto-away after $duration($v1,3) idle
}
}