alias war { 
 var %i = 0
  while (%i <= $nick($chan,0)) { 
    timer 1 %i  msg $nick($chan,%i) $2-
    inc %i 
  } 
}