Anonymous

alias Gone { 
  if (%away == off) {  
    window @awaylog 
    set %gnick $me 
    set %reason $1- 
    set %leftat $ctime | set %leftat2 $time    
    away %reason 
    amsg 03[15I am now away.03] [15Reason:15 %reason $+ 15.03] [15I left at:15 %leftat2 $+  EST15.03] 
    set %away on 
    nick SlimShady261`AwAy 
  } 
  else { 
    set %ltime $ctime  
    set %away off 
    nick %gnick 
    ns update 
    away 
  Amsg 03[15I am back from:15 %reason $+ 15.03] [15I was gone for:15 $duration($calc( %ltime - %leftat )) 15.03] [15Left at:15 %leftat2 $+ EST15.03]  } 
} 
on *:TEXT:*:#: { 
  if ($me iswm $1-) { 
    set %ltime $ctime 
    aline -ch @awaylog 3(Channel3): $chan  
    aline -ch @awaylog 3(Nick3): $nick 
    aline -ch @awaylog 3(Time3): $time 
    aline -ch @awaylog 3(Date3): $date $+ . 
    aline -ch @awaylog 3(Message3): $1- 
    aline -ch @awaylog ---3Break--- 
  notice $nick 03[15I am away:15 %reason $+ 15.03] [15I have been gone for:15 $duration($calc( %ltime - %leftat )) 15.03] [15Left at:15 %leftat2 $+ EST15.03]  } 
}