alias invite ban

By Aaron on Mar 01, 2007

/iban nick
/iunban
nick
/invlist

if they are inv listed they cannot invite you to any channel
*turn auto join on invite OFF

**edit chanserv will auto join

alias c1 { return $+(10,$1-) } 
alias c2 { return $+(04,$1-) }

on *:invite:#:{
  if (*chanserv* iswm $nick) { join $chan }
  if (!%iban. [ $+ [ $address($nick,2) ] ]) {
    join $chan
  }
  else notice $nick 10Your blocked from inviting4 $me $+ 10.
}
alias iban {
  if (!%iban. [ $+ [ $address($1-,2) ] ]) {
    set %iban. [ $+ [ $address($1-,2) ] ] yo
    set %invlist $addtok(%invlist,$1-,44)
    echo -t 4 $1- 10 $chr(47) 4 $address($1-,2) 10Now listed.
  }
  else echo -t 4 $1- 10 $chr(47) 4 $address($1-,2) 10is already inv listed.
}
alias iunban {
  if (%iban. [ $+ [ $address($1-,2) ] ]) {
    unset %iban. [ $+ [ $address($1-,2) ] ]
    set %invlist $remtok(%invlist,$1-,44)
    echo -t 4 $1- 10 $chr(47) 4 $address($1-,2) 10Now unlisted.
  }
  else echo -t 4 $1- 10 $chr(47) 4 $address($1-,2) 10is not inv listed.
}

alias invlist {
  echo -t 10[LIST] Inv listed nicks:
  echo -t $iif(%invlist,$+($c1,$replace(%invlist,$chr(44),$+($c2,$chr(44),$c1))),10No nicks listed.)
}

Comments

Sign in to comment.
no_body21   -  Mar 02, 2007

;)

 Respond  
Lindrian   -  Mar 02, 2007

well, something like:
if ($network !isin $nick) {

to avoid it, maybe xP?

 Respond  
Aaron   -  Mar 02, 2007

chanserv dont invite on swiftirc :P

 Respond  
no_body21   -  Mar 02, 2007

I think you should add this line

if $nick != chanserv

 Respond  
Korvin   -  Mar 01, 2007

awesome script!

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.