how come this doesnt work?
Code:
[color:purple]
alias CloneScan {
  var %chan = $$1
  var %i = 1, %c = 1
  hmake Hosts 5000
  hmake Clones 5000
  while ($nick(%chan,%i)) {
    var %s = $address($nick(%chan,%i),2)
    if ($hfind(Hosts,* $+ %s $+ *,0,w).data) {
      if (!$hfind(Clones,* $+ %s %+ *,0,w).data) {
        hadd -m Clones %c %s
        inc %c
      }
    }
    hadd -m Hosts $nick(%chan,%i) %s
    inc %i
  }
  var %y = 1
  while ($hget(Clones,%y)) {
    var %a = $hget(Clones,%y)
    var %xy = 1
    while ($hget(Hosts,$hfind(Hosts,* $+ %a $+ *,%xy,w).data) {
      echo -a Clone: %xy Nick: $hfind(Hosts,* $+ %a $+ *,%xy,w).data) Address: $hget(Hosts, $hfind(Hosts,* $+ %a $+ *,%xy,w).data))
      inc %xy
    }
    inc %y
  }
  hfree Hosts
  hfree Clones
  echo -a Scan Finishes
}
[/color]

thanks