on *:JOIN:#: {
  if ($nick($chan,$me,ohaq)) {
    .auser joinchan $nick
    set %j. $+ $chan $chan
    set %chantime 0
    inc -c %chantime
  }
}
on joinchan:PART:#: {
  if ($nick($chan,$me,ohaq)) {
    if (%j. $+ $chan) {
      if (%var [ $+ [ $chan ] ] => 3) {
        mode $chan +bb $address($nick,2) $nick
        .ruser $nick
        unset %chantime
        msg $chan 4[5[4[12Auto-Banned 4 $+ $nick 12for: 10Join/Part 3 times...4]5]4]    
      }
    }
  }
}
on joinchan:QUIT: {
  if (%j. $+ $chan) {
    if (%var [ $+ [ $chan ] ] => 3) {
      mode $chan +bb $address($nick,2) $nick
      .ruser $nick
      unset %chantime
      msg $chan 4[5[4[12Auto-Banned 4 $+ $nick 12for: 10Join/Part 3 times...4]5]4]    
    }
  }
}
on joinchan:KICK: {
  if (%j. $+ $chan) {
    .ruser $nick
  }
}