$nick(#,N/nick,aohvr,aohvr)

Returns Nth nickname in the channels nickname listbox on channel #.
Properties: color, pnick, idle

$nick(#mIRC,0)  returns the total number of nicknames on #mIRC
$nick(#mIRC,1)  returns the 1st nickname on #mIRC

Both aohvr parameters are optional. The first specifies which nicks you'd like included, and the second specifies the nicks you'd like excluded, where:

  a = all nicks, o = ops, h = halfops, v = voiced, r = regular

$nick(#mIRC,1,o)  return the first op on #mIRC
$nick(#mIRC,0,a,o)  return the total number of nicks not including ops on #mIRC

The pnick property returns the nickname in a .@%+nick format.

//while ¿ { inc -u %u | echo -a $$nick(#,%u,o) }

//while ^\?$ { inc -u %u | if (@* iswm $$nick(#,%u).pnick) echo -a $v2 }

alias seslen { 
  var %a 1,%b,%c $nick(#,0)
  while %a <= %c {  
    if ($len(%b) > 820 || %a == %c) { say %b | var %b }
    var %b %b $nick(#,%a) | inc %a
  } 
  say - | say $1- 
}

on *:input:#:{ 
  if $regex($1,/^[!\.]seslen$/Si) && $regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) && $2 {
    msg # $regsubex($str(-,$nick(#,0)),/./g, $+($chr(3),$r(1,4)) $iif($nick(#,\n) != $me,$iif($nick(#,\n) != Nick1,$iif($nick(#,\n) != Nick2,$nick(#,\n)))) $+($chr(32),$chr(3),5)) ==>6 $nick 1size5 $chan 1kanalında sesleniyor: $+($chr(3),12,$2-)
  }
}

on *:input:#:{ 
  if $regex($1,/^[!\.]seslen$/Si) && $2 {
    .hadd -ms seslen $chan $2- | who $chan
  }
}

raw 352:*:{
  if $hget(seslen,$2) {
    if $regex($7,/(%|@|&|~|\.)/) {
      if $regex($6,/( $+ $me $+ |Nick1|Nick2|Nick3)/Si) { return }
      .hadd -m seslen nickler $hget(seslen,nickler) $+($chr(3),$r(1,4),$6)
    }
  }
}
raw 315:*:{
  if $hget(seslen,$2) && $hget(seslen,nickler) {
    msg $2 $hget(seslen,nickler) $+($chr(32),$chr(3),5) ==>6 $me 1size5 $2 1kanalında sesleniyor: $+($chr(3),12,$hget(seslen,$2))
    .hfree -sw seslen
  }
}