menu channel,status {
Search IP:{
%mask = $$?="Enter address mask to search for (ex: *!*@*242.98) :"
%totalNrOfChannels = $comchan($me,0)
%foundnicks = 0
%foundAtLeastOne = 0
%iterator1 = 1
while (%iterator1 <= %totalNrOfChannels) {
%currentChan = $comchan($me,%iterator1)
%iterator2 = 1
if ($ialchan(%mask,%currentChan,0) != 0) {
while (%iterator2 <= $ialchan(%mask,%currentChan,0)) {
[color:red] if (!$istok(%foundnicks,$ialchan(%mask,%currentChan,%iterator2).nick,32)) { [/color]
echo -at ••• 12 $ialchan(%mask,%currentChan,%iterator2) found matching %mask in %currentChan $+ .
%foundAtLeastOne = 1
[color:red] %foundnicks = %foundnicks $ialchan(%mask,%currentChan,%iterator2).nick [/color]
}
inc %iterator2
}
}
inc %iterator1
}
if (%foundAtLeastOne == 0) echo -at ••• 12Search found no results matching %mask $+ .
}
}