alias away {
away $1-
if ($1 != $null) {
var %i 1
while %i <= $chan(0) {
mode $chan(%i) -oa $me $me
inc %i
}
}
else {
var %i 1
while %i <= $chan(0) {
cycle $chan(%i)
inc %i
}
}
}