alias opscan {
var %a Katlyn Fx IEP Funman Tim Chrono Tarball Gic Slaap Slaapkamer Strider3282 Pancakes Cursive Sara Awong Scott Allen
var %d Patje Sphinx Steve| Karl Salty |Luke| Xotick FoSho Remy Urza [-Home-] Patje Hamish Timmy Jakerz |Sean Scott| Hutchins Scotty Kol
var %b 1
while (%b < $nick(#,0)) {
if ($istok(%a,$nick(#,%b),32) || *127.0.0.1* iswm $address($nick(#,%b),5)) {
var %c %c $nick(#,%b)
inc %b
}
if ($istok(%d,$nick(#,%d),32) || *.support.SwiftIRC.net iswm $address($nick(#,%b),5)) {
var %e %e $nick(#,%d)
}
inc %b
}
if (%c != $null) {
tokenize 32 %c %e
echo -a 5There are $0 opers in $+($chan,.)
tokenize 32 %c
echo -a 5 $+ $0 are ircops - $1-
tokenize 32 %e
echo -a 5 $+ $0 are helpops - $10
}
else {
echo -a 3There are no opers in $chan
}
}