alias away {
  set %away $1-
  set %time $time
  nick squirl|afk 
  amsg [7Away1]:[7»14Reason:7 %away $+ 7«1]:[7»14Left at:14 %time $+ 7«]
}

alias back {
  nick squirl100
  amsg [7Back1]:[7»14Reason:7 %away $+ 7«1]:[7»14Left at:14 %time $+ 7«]
  unset %time
  unset %away
  unset %told
}

on *:TEXT:*squirl*:*:{
if (%away) && (%told [  [ $nick ] ] != 1) { notice $nick [7Away1]:[7»14Reason:7 %away $+ 7«1]:[7»14Left at:14 %time $+ 7«] | set %told [  [ $nick ] ] 1 | aline @away $timestamp $nick highlighted you on $chan $+ : $replace($1-,squirl,4squirl8) } else { return } }