alias invitelist {
if (!$1) { echo Correct command:12 /invitelist #channel | halt }
var %file invite-list-Gforce.txt, %lines $lines(%file)
var %i 1, %n 0, %limit 5, %sec 0, %delay 10
while (%i <= %lines) {
var %str $read(%file,nt,%i)
if (!$ifind($1,%str)) { %masks = %masks $+(*!*@,%str) | inc %n }
if (%n == %limit) || (%i == %lines && %masks) {
$+(.timer,INVITE,%i,$r(a,z)) 1 %sec mode $1 $+(+,$str(I,%limit)) %masks
unset %n %masks | inc %sec %delay
}
inc %i
}
unset %n %sec %masks
}
alias -l ifind { var %q 1 | while (%q <= $iil($1,0)) { if ($2 == $gettok($iil($1,%q),2,64)) return 1 | inc %q } }