Someone

on !*:TEXT:!black *:#:{ 
  IF ($nick == `Tom-) { 
    write black.ini $2- 
    notice $nick The channel $2- is now blacklisted.
  }
  else { 
    notice $nick Only `Tom- can use this command.
  }
}
on *:INVITE:#:{
  IF $read(black.ini,w,$chan) { 
    join $chan
    msg $chan This channel is blacklisted.
    timer 1 3 part # This channel is blacklisted, to possibly be un-blacklisted then please pm `Tom- by typing /privmsg `Tom- followed by your message.
  }  
  ELSE {
    msg $nick Hello $nick I am HawtBot and it appears you invited me into $chan $+ . To function properly I do require half-op. Type !commands to find out what I do. If you have any questions or problems then please go to #hawt, my owner will be in there. Enjoy!.
  timer 1 3 join $chan
  }
}