bind pub - !away away 
proc away { nick uhost hand chan text } { 
 if {$chan == "#staff"} { 
   global away 
   set awaynick [lindex [split $text " "] 0] 
   if {$text != "" && [onchan $nick $chan]} { 
     foreach line $away { puthelp "NOTICE $nick :$line" } 
     return 0 
   } 
   putquick "NOTICE $nick :\002Away\002: $nick, you are being marked as away (DEOP, VOICE) in the following channels: #emma-watson.net #trivia #help #bots #HouseCup" 
   putquick "PRIVMSG chanserv :DEOP #emma-watson.net $nick" 
   putquick "PRIVMSG chanserv :VOICE #emma-watson.net $nick" 
   putquick "PRIVMSG chanserv :DEOP #trivia $nick" 
   putquick "PRIVMSG chanserv :VOICE #trivia $nick" 
   putquick "PRIVMSG chanserv :DEOP #help $nick" 
   putquick "PRIVMSG chanserv :VOICE #help $nick" 
   putquick "PRIVMSG chanserv :DEOP #bots $nick" 
   putquick "PRIVMSG chanserv :VOICE #bots $nick" 
   putquick "PRIVMSG chanserv :DEOP #HouseCup $nick" 
   putquick "PRIVMSG chanserv :VOICE #Housecup $nick" 
   log "$nick has put him/herself on Away." 
 } 
} 
