Someone

on 5:text:!blchan *:#: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($3) {
      if ($left($2,1) == $chr(35)) && ($len($2) <= 35) {
        set $+(%,Blacklisted.,$2) $3
        msg $chan 14Successfully written07 $2 14to the channel blacklist script for:07 $3-
      }
      else {
        msg $chan 14Can not write07 $214 to channel blacklist. Reason:07 Reason must be specified.
        notice $nick 14Can not write07 $214 to channel blacklist. Reason:07 Reason must be specified.
      }
      else {
        notice $nick 14Can not write07 $2 14to blacklist because:07 Incorrect channel name.
        msg $chan 14Can not write07 $2 14to blacklist. Reason:07 Incorrect channel name.
      }
    }
  }
}
on *:JOIN:#:{
  if ($nick == $me) {
    if (%Blacklisted. $+ $chan) {
      .timer 1 2 part $chan 14Channel is 4blacklisted14. Reason:4 %blacklisted.$chan14 - To appeal this ban or find out more information, please talk to LightShadows' staff in 4#LightShadows14.
    }
  }
}