ON @*:JOIN:#: {
  var %ident $gettok($gettok($fulladdress,1,64),2,33)
  if $istok(badident Guest,%ident,32) {
    kick # $nick bad ident
    mode # +b $+(*!,%ident,@*)
  }
}