alias wildmaskmode {
; usage /wildmaskmode <channel> <wildmask> <mode>
; <channel> -> Channelname
; <wildmask> -> Nick or Hostmask, e. g. IBM|* or *!*@*.aol.com
; <mode> -> +o/+v/+h/+q/+a or -o/-v/-h/-q/-a
var %wm
if (*?!?*@?* iswm $2) { %wm = $2 }
else { %wm = $2 $+ !*@* }
if ($1 ischan) && ($3 != $null) {
if ($ialchan(%wm,$1,0)) {
var %x = $ialchan(%wm,$1,0),%n
while (%x) {
%n = %n $ialchan(%wm,$1,%x).nick
if ($numtok(%n,32) == $modespl) {
mode $1 $str($3,$modespl) %n
%n = ""
}
dec %x
}
if (%n) { mode $1 $str($3,$numtok(%n,32)) %n }
}
}
}