alias inviteall {
  set %x 1
  set %y $1
  set %z $chan
  while (%x <= $nick(%z,0)) {
    invite $nick(%z,%x) %y
    inc %x 1
  }
  unset %x 
  unset %y 
  unset %z
}