alias afk {
set %afk $2-
}
on *:text:*tom*:#:{
if (%afk) {
msg $nick I am away: ùafk
}
}
alias back {
unset %afk
}