Someone

alias c1 { return $+(11,$1-) } 
alias c2 { return $+(03,$1-) }
alias c3 { return $+(07,$1-) }
on *:kick:#: { 
  if ($knick == $me) { 
    inc $+(%,kick.,$chan) 
    if ($($+(%,kick.,$chan),2) > 4) { 
      /writeini black.ini bans $chan banned
      unset $+(%,kick.,$chan) 
    } 
  } 
}
on me:*:join:#: {
  if $ini(black.ini,bans,$chan) {
    part $chan $c1 This channel has Been blacklisted To have this removed please contact $c2 J-DreamO $c1.
  }
  else {
    if ($chan != #bots) { 
      if ($($+(%,kick.,$chan),2)) var %left = $+($calc(5 - $v1),/5) 
      else var %left = 5/5 
      .msg $chan 3I'm invited by11 $nick
      .msg # $c1 RuneScape Related Stats Bot $c2 \Google`7-11 Created by  $c2 J-DreamO $c1. 7-11 Hosted by3 $c2 J-DreamO11.
      .msg # 4WARNING7:11 If i am kicked3 5 11Times this channel will be blacklisted Number of kicks left3 %left 11.
      .msg # 11To visit my command typ7:3 !clist 11. Ty for using it. For leave me typ7:3 !part \Google` 11.   
    }
  }
}
on *:TEXT:!addchan *:#: {
  if ($address($nick,2) == $address($me,2)) {
    if $ini(black.ini,bans,$2) {
      notice $nick $2 is Already blacklisted
    }
    else {
      writeini -n black.ini bans $2 banned
      msg $chan $c2 $+ $2 $c1 $+ has been Succesfuly added to the blacklist by - $c2 $+ $nick
    }
  }
}
on *:TEXT:!delchan *:#: {
  if ($address($nick,2) == $address($me,2)) {
    if $ini(black.ini,bans,$2) {
      remini black.ini bans $2 banned
      msg $chan $c2 $+ $2 $c1 $+ has been Succesfuly Removed from the blacklist by - $c2 $+ $nick
    }
    else {
      notice $nick $2 is not blacklisted
    }
  }
}
on *:TEXT:!viewblist*:#: {
  if ($address($nick,2) == $address($me,2)) { 
    if (!$2) notice $nick Please Specify a channel to lookup.
    elseif ($ini(black.ini,bans,$2)) notice $nick $2 is blacklisted 
    else notice $nick Channel does not appear in the blacklist
  }
}