Someone

on *:KICK:#:{
 if (%kchan. [ $+ [ $chan ] ] == $null) && ($knick == $me) {

   /set %kchan. [ $+ [ $chan ] ] 1
   /halt
 }
 if (%kchan. [ $+ [ $chan ] ] != $null) && ($knick == $me) {
   /inc %kchan. [ $+ [ $chan ] ] 1
 }
}
on *:Invite:#:{
 if (%kchan. [ $+ [ $chan ] ] == $null) {
   /join $chan
 }
 if ((%kchan. [ $+ [ $chan ] ] != $null) && (%kchan. [ $+ [ $chan ] ]  < 3)) {
   /join $chan
   /MSG $chan I have been kicked %kchan. [ $+ [ $chan ] ] Times, $calc(3 - %kchan. [ $+ [ $chan ] ] ) more kicks and your channel will be blacklisted. Kicks: $+ $chr(91) $+ %kchan. [ $+ [ $chan ] ] $+ $chr(92) $+ 3 $+ $chr(93) 
 }
 if (%kchan. [ $+ [ $chan ] ] == 3) {
   /notice $nick Sorry, $chan is on my blacklist, I'm not allowed to join that channel. Please msg me your appologies and I'll reconsider
 }
}