Something

alias a {
  set %ctime $ctime
  away $1-
  amsg 7,1[Away]:Now going away. 4,1Reason: $awaymsg Left: $time
}
alias b {
  if ($away == $true) {
    amsg 7,1[Back]:Now back from: $awaymsg Gone for:4,1 $replace($duration($calc($ctime - %ctime)),wk,$chr(32) week,day,$chr(32) day,hr,$chr(32) hour,min,$chr(32) minute,sec,$chr(32) second)
    away
  }
  elseif ($away == $false) {
    echo -at You are not away!
  }
}
on $*:TEXT:/(Fusion|Fusion^^|Fusion_crew1|iFusion|Fusion^|fuss)/Si:#: {
  if (%away [ $+ [ status ] ] == ON) {
    inc %msgs
    window @Highlights
    aline -a @Highlights $time :: $nick :: $1- in $chan on $network
    if (%responses < 1) {
      notice $nick I am away at %time for reason: %away [ $+ [ reason ] ]
    }
  }
}