on *:text:@away*:#: {
  set %away.msg $+ $nick $2-
  set %away.nick $nick
  writeini away.ini away $nick is away
  describe $chan 0,4 $nick 0,12 is now away $2-
  else {
    halt
  }
}
on *:text:*:#: {
  if ($1- == %away.nick) {
    if ($readini(away.ini,away,$nick)) notice $nick Korvin is away right now because of this: %away.msg [ $+ [ $nick ] ] $+ , try again when hes back
    else { halt
    }
  }
}
on *:text:@back:#: { 
  if ($readini(away.ini,away,$nick)) {
    describe $chan $nick is now back.
    remini away.ini away $nick
  }
}