Miscellany

alias aw {
if ($1 == $null) { echo -a Provide a nickname! | halt } 
/set %away.nick $me
/set %away.timehours $time(HH)
/set %away.timeminutes $time(nn)
/set %away.timesecs $time(ss)
/set %away.reason $2- {
  msg $chan 4« 14Away4 » 10I14 am now away!  10R14eason 4:::14 %away.reason 4::: 10L14eft at $time(10(04 $+ HH14:04 $+ nn14:04 $+ ss10))  
    nick $1 
      /away 10R14eason 4:::14 %away.reason 4::: 10L14eft at $time(10(04 $+ HH14:04 $+ nn14:04 $+ ss10))
      enable #script
    }



alias back {
  /away
    msg $chan 4« 14Back4 » 10I14 am now back!  10R14eason 4:::14 %away.reason 4::: 10B14een away for $calc($time(HH) - %away.timehours) 10H14ours $calc($time(nn) - %away.timeminutes) 10M14inutes $calc($time(ss) - %away.timesecs) 10S14econds!
      nick %away.nick
        unset %away.timehours
        unset %away.timeminutes
        unset %away.timesecs
        unset %away.reason
        unset %away.nick
        disable #script
}

#script off
on *:text:$($+(*,$me,*)):#: {
  /window @highlight
  /echo @highlight $time $nick $chan $+ : $1-
}
#script end