Mine

on *:INVITE:#:{
  if ($network == SwiftIRC) {
    notice $nick $c1(I cannot be invited. Type:) $c2(/invite FusionBot $chan) $c1(to get a bot.)
}
}
on *:KICK:#:{
  if ($knick == $me) {
    notice $nick $c1(Learn how to use) $C2(!part $me) $c1(instead of kicking/banning me or I will gban you & ignore.)
    msg #FusionBot-Admins $c1(I was kicked in) $c2($chan) $c1(by) $c2($nick @ $fulldate $+ .)
    if (!$readini(ChannelBlacklist.ini,Channels,$chan)) {
      writeini ChannelBlacklist.ini Channels $chan 1
    }
    elseif ($readini(ChannelBlacklist.ini,Channels,$chan)) {
      var %xy = $readini(ChannelBlacklist.ini,Channels,$chan)
      writeini ChannelBlacklist.ini Channels $chan $calc(%xy + 1)
    }
    if ($readini(ChannelBlacklist.ini,Channels,$chan) >= 3) && (!$readini(ChannelBlacklist.ini,Reasons,$chan)) {
      writeini ChannelBlacklist.ini Reasons $chan I was kicked 3 times, come to #FusionBot to appeal.
    }
  }
}
on $*:TEXT:/^[~]ChanBan/Si:#:{
  if ($readini(admin_stafflist.ini,$nick,Admin)) || ($nick isop #FusionBot-Admins) {
    if ($2) {
      writeini ChannelBlacklist.ini Channels $chan 3
      if ($3) {
        writeini ChannelBlacklist.ini Reasons $chan $3-
      }
      notice $nick $c1(You have blacklisted) $c2($2) $c1(with) $c2($iif($3,reason: $3-,no reason.))
      if ($me ison $2) {
        part $2 Channel Blacklisted.) ( $+ $iif($3-,$3-,No reason given.)
      }
    }
    else {
      notice $nick $c1(Give a channel to be banned.)
    }
  }
  else {
    notice $nick $c1(Only my admins may blacklist channels.)
  }
}
on $*:TEXT:/^[~]RemChanBan/Si:#:{
  if ($readini(admin_stafflist.ini,$nick,Admin)) || ($nick isop #FusionBot-Admins) {
    if ($2) {
      if (!$readini(ChannelBlacklist.ini,Channels,$2)) && (!$readini(Channelblacklist.ini,Reasons,$2)) {
        notice $nick $c1(That channel has no blackmarks and isnt blacklisted.)
        halt
      }
      elseif ($readini(ChannelBlacklist.ini,Channels,$2)) {
        remini Channelblacklist.ini Channels $2
        if ($readini(ChannelBlacklist.ini,Reasons,$2)) {
          remini ChannelBlacklist.ini Reasons $2
        }
        notice $nick $c1(All blackmarks for) $c2($2) $c1(removed.)
      }
    }
    else {
      notice $nick $c1(You must give a channel to unblacklist.)
    }
  }
  else {
    notice $nick $c1(Only my admins can remove channel blacklist)
  }
}
on $*:TEXT:/^[~]addexcept/Si:#:{
  if ($readini(admin_stafflist.ini,$nick,Admin)) || ($nick isop #FusionBot-Admins) {
    if ($2) {
      if (!$readini(ChannelBlacklist.ini,Excepts,$2)) {
        writeini ChanneBlacklist.ini Excepts $2 $2
        notice $nick $c1(Channel) $c2($2) $c1(added to except list.)
      }
      elseif ($readini(ChannelBlacklist.ini,Excepts,$2)) {
        notice $nick $c1(Channel) $c2($2) $c1(was already on except list.)
      }
    }
    else {
      notice $nick $c1(You must give a channel to add to the except list.)
    }
  }
  else {
    notice $nick $c1(Only my admins can add a channel to the except list.)
  }
}
on $*:TEXT:/^[~]remexcept/Si:#:{
  if ($readini(admin_stafflist.ini,$nick,Admin)) || ($nick isop #FusionBot-Admins) {
    if ($2) {
      if ($readini(ChannelBlacklist.ini,Excepts,$2)) {
        remini ChanneBlacklist.ini Excepts $ $2
        notice $nick $c1(Channel) $c2($2) $c1(removed from except list.)
      }
      elseif (!$readini(ChannelBlacklist.ini,Excepts,$2)) {
        notice $nick $c1(Channel) $c2($2) $c1(was not found on except list.)
      }
    }
    else {
      notice $nick $c1(You must give a channel to add remove from the except list.)
    }
  }
  else {
    notice $nick $c1(Only my admins can remove a channel from the except list.)
  }
}
ON *:TEXT:join *:?: { if ($nick isop #FusionBot) {
    join $2
  }
}