ON *:INVITE:#:{
  if ($left($me,1) == [) { notice $nick $c2([Invite System]) $c1(Please Invite The Main Bot!) | halt }
  if (!$readini(BotData.ini,Kicks,$chan)) { writeini -n BotData.ini Kicks $chan 0 }
  var %a $r(1,2)
  if (%a = 1) { JOIN $chan }
  if (%a = 2) { notice [RS]LunarScript JOIN # }
  if ($readini(BotData.ini,BlackList,$chan)) {
    .timer.BlackList. $+ $chan 1 2 PART $chan $c1(Your Channel Has Been BlackListed For The Following Reasons:) $c2($v1) $+ $c1(.)
  }
}
ON *:NOTICE:JOIN*:*:{ if ($nick == LunarScript) && ($1 == JOIN) { JOIN $2 } }
ON *:JOIN:#:{
  if ($nick == $me) && (# != #msl) {
    .timer.join. $+ $chan 1 1 MSG $chan $c1(Hi! I am) $c2($me) $+ $c1(, the General IRC Bot!! * $&
      If you do not want me here, type) $c2($qt(!part $me)) $c1(to remove me.) $&
      $c1(I was kicked from $chan) $c2($iif($readini(BotData.ini,Kicks,$chan),$v1,0) $+ /5) $c1(times.)) $&
    .timer.JoinC. $+ $chan 1 2 CheckBots $chan
  }
}
alias CheckBots {
  ;###################################
  ;##        Exception List         ##
  ;##                               ##
  var %botchan #Ls #botchan #botz #bot #bothelp #botcentral
  ;###################################
  if ($findtok(%botchan,$1,32)) { halt }
  ;###################################
  ;##          Own Bot List         ##
  ;##                               ##
  var %BotList LunarScript [Rs]LunarScript
  ;###################################
  var %a 1
  %BotList = $remtok(%BotList,$me,32)
  while ($nick($1,%a)) {
    if ($findtok(%BotList,$nick($1,%a),32)) {
      PART $1 $c1(Only 1 Bot Per Channel!) $c2($nick($1,%a)) $c1(Found!)
      goto end
    }
    inc %a
  }