Description: Lists common channels with a specified nick.

Usage: $comchanlist(nick)
Example: $comchanlist(bmk) == @#script @#script-staff @#scriptclass @#script-test


alias comchanlist {
  var %x = 1
  while (%x <= $comchan($$1,0)) {
    if ($$1 isop $comchan($$1,%x)) var %chan = @ $+ $comchan($$1,%x)
    elseif ($$1 ishop $comchan($$1,%x)) var %chan = $chr(37) $+ $comchan($$1,%x)
    elseif ($$1 isvoice $comchan($$1,%x)) var %chan = + $+ $comchan($$1,%x)
    else var %chan = $comchan($$1,%x)
    var %chans = $+(%chans,$chr(32),%chan)
    inc %x
  }
  return %chans
}


Edit: Changed @ to + for voice, must have overlooked it by scripting it fast (thanks knightrage :P).

[^B][ $comchans(testnick) ] == $null - 0ms
if the person isnt in any channels as me.. it should be like

[ $comchans(testnick) ] == no chans
or something :/ just a suggestion

Oops! You need to login or register before you can post a comment!