Someone

on *:invite:#:{ 
  .join $chan 
} 
on *:text:!join*:#:{ 
  .join $$2 
}
on *:kick:#: { 
  if ($knick == $me) { 
    inc $+(%,kickcnt.,$chan) 
    if ($($+(%,kickcnt.,$chan),2) > 4) { 
      write banchan.txt $chan 
      unset $+(%,kickcnt.,$chan) 
    } 
  } 
} 
on me:*:join:#:{ 
  if $read(banchan.txt,w,$chan) { 
    .part $chan 15 $chan Has been blacklisted to have this removed please contact ikitty in #the_witch
  } 
  else { 
    if ($chan != #bots) { 
      if ($($+(%,kickcnt.,$chan),2)) var %left = $+($calc(5 - $v1),/5) 
      else var %left = 5/5 
      .msg # 14if i am kicked more than 5 times this channel will be blacklisted. number of kicks left4 %left 
    } 
  } 
} 
On *:TEXT:!addban &:#: { 
  if ($nick == ikitty) { 
    msg $chan $2 has been added to Blacklist - by $nick . 
    var %file = banchan.txt 
    if ( !$read(%file,nw,$2) ) write %file $2 
  } 
} 
on *:text:!delban &:#: { 
  if ($nick == ikitty) { 
    msg $chan $2 has now been removed from Blacklist - by $nick . 
    var %file = banchan.txt 
    if ($read(%file,nw,$2)) write $+(-dl,$readn) %file 
  } 
}