Untitled

/away { 
  set %reason ON
  set %time $time
  set -e %ctime $ctime 
  set -e %reason $iif($1,$1-,$$?="Enter away reason:") 
  amsg 7,1»»4,1[AMSG]7,1««7 $me 15is now away because of:4 %reason 14I left at:( %time )
  /nick $me $+ |Away- $+ $1-
} 
/back { 
  if (!%reason) { echo -a Your current Status is not set to away... } 
  else { 
    amsg 7,1»»[4,1AMSG]7,1««7 Matt 16is now back from:4 %reason I was gone for: $duration($calc( $ctime - %ctime )) 
    unset %ctime %reason
    unset %reason 
    /nick (nickhere)
  } 
}