raw 311:*: { if ($2 == %qnick) { if (%do == add) { set %host $+(*!*@,$4) write qignore.txt %host echo -a Added %host to Ignore! } if (%do == remove) { set %host $+(*!*@,$4) write $+(-ds,%host) qignore.txt echo -a Removed %host from Ignore! } } } on *:OPEN:?: { if ($read(qignore.txt, w,$query($active).address)) { msg $nick $c1(Your Query Has Been Ignored!) close -m $nick } elseif (%.away. [ $+ [ $network ] ]) { msg $nick $c1(Sorry) $+($c2($nick),$c1(,)) $c1(Iam currently Away!) $c2(%.1-. [ $+ [ $network ] ]) $c1(Please try again later!) } else { msg $nick $c1(Waiting for Query Acceptance/Decline) $c2(This may take a moment!) } } alias accept { msg $active $c1(Query Accepted!) | set %query. [ $+ [ $query($active).address) ] ] On } alias decline { set %do add set %qnick $2 | whois $2 timer 1 1 msg $active $c1(Query Declined! You have been added to Auto Query Ignore Under Host) $c2(%host) write qignore.txt %host | close -m $active } alias unignore { set %do remove | set %qnick $nick | whois $nick write $+(-ds,$query($active).address) qignore.txt | msg $1 $c1(You have been Unignored!) } alias -l c1 { return $+($chr(3),06,$1-) } alias -l c2 { return $+($chr(3),4,$1-) }