alias dccallow {
if (!$1) echo $color(info) -eati2 * /DCCALLOW [-r] < list $chr(124) help $chr(124) ? $chr(124) nick [nick [nick [nick [nick]]]] >
elseif ($1 = list) .raw DCCALLOW list
elseif (($1 == ?) || ($1 == help)) .raw DCCALLOW help
elseif ($$1 == -r) .raw DCCALLOW $+(-,$replace($2-,$chr(32),$+($chr(44),$chr(45))))
else .raw DCCALLOW $+(+,$replace($1-,$chr(32),$+($chr(44),$chr(43))))
}
raw 617:*: echo $color(whois) -ati2 * $2- | halt
raw 618:*: echo $color(whois) -ati2 $2- | halt
raw 619:*: echo $color(whois) -ati2 End of /DCCALLOW list. | linesep -a | halt
raw 620:*:{
if ($2- == The following users are on your dcc allow list:) linesep -a
echo $iif(*is not in* iswm $2-,$color(ctcp),$color(whois)) -ati2 $2-
halt
}