Forums Scripts & Popups A very mIRCy Christmas Carol

alias santa {
  var %list = santaslist.txt
  while (%i < $nick($chan,0)) { 
    inc %i  
    write %list $nick($chan,%i) $level($ial($nick($chan,%i),5)) 
  } 
  if ($exists(%list) && $exists(%list)) { 
    window -l @nice       | filter -gfw %list @presents /nice/ 
    window -l @nopresents | filter -gfw %list @nopresents /naughty/ 
  }
  amsg Santa Claus is coming to #Town | join #Town
}