PunkTuReD the a in ur $nick(#,0,a) the a = all

if the server uses users marks as ~ & @ % + then use $nick(#,0,&)
ex:

 on *:text:!admins:#: {
  var %a = 1, %admins
  while (%a <= $nick(#,0,&)) {
    %admins = %admins $+(%a,.,$nick(#,%a,&))
    inc %a 
  }
  msg # # Admins are: %admins 
}

or

 on *:text:!admins:#:msg # # Admins are: $regsubex($str(-,$nick(#,0,&)),/./g,\n. $nick(#,\n,&) $chr(32))

there are more ways to go about this as well...