alias /leave { 
set -e %time $ctime 
set -e %reason $iif($1,$1-,No Reason) 
} 
alias /back { 
if (%reason) { 
amsg Mcm is now back $chr(124) %reason $chr(124) Gone for $duration($calc($ctime - %time)) 
unset %time %reason 
} 
} 
on $*:TEXT:/Mc?m1212?/Si:#:{ 
if (%reason) { notice $nick Mcm is currently away - %reason - Left at $asctime(%time,h:nn:ss TT) } 
}