alias checkchan {
  var %f = 1
  while (%f <= $nick($1,0)) {
    if ($nick($1,%f) ison $2) {
      echo $nick($1,%f) is on both $1 and $2
      inc %f
    }
    else inc %f
  }
}