alias badnick { .auser 02 $1 } 
on ^&*:JOIN:#:{ 
if ($nick != $me) { 
if ($ulist($address($nick,-1),02,1)) { 
if (o isin $usermode) { 
mode # +b $nick | kick # $nick Badnick
sapart $nick # | sajoin $nick #Kanal
} 
} 
} 
}