ON *:KICK:#:{
  if ($knick == $me) { 
    part $chan 
    notice $nick Next time please use my part command. !part, $me 
    writeini WarnLevel.ini $chan Kicked $calc($readini(WarnLevel.ini,$chan,Kicked) + 1 ) 
    notice $nick Your channel now has $readini(WarnLevel.ini,$chan,Kicked) $+ /5 Kicks. 
  } 
  /msg #ircserv 4I 10have been 4kicked 10on 4 $chan 10by 10 $nick
} 
on *:INVITE:#: { 
  if ($nick == $me) && $readini(WarnLevel.ini,$chan,Kicked) == $null) { 
    /join $chan 
    /msg $chan Hello I am $me $+ . I have been kicked 0 Times out of 5. 
    halt 
    /msg $chan Hello I am $me $+ . I have been kicked 0 Times out of 5. 
  } 
  if ($nick == $me && $readini(WarnLevel.ini,$chan,Kicked) <= 5) { 
    msg $chan Hello I am $me $+ . I have been kicked $readini(WarnLevel.ini,$chan,Kicked) times out of 5. 
    halt 
  }
  ON *:TEXT:!delwarn*:#:{ if ($nick isop #ircserv) {
      /remini Warnlevel.ini $chan
      /msg #IrcServ 4 $chan 10is now 4Off 10my 4Channel-BlackList
    }
    On $*:TEXT:/^~irc (.*)/Si:#:{ if ($nick isop #IrcServ) { $($regml(1),2) } }