Code:

########################################################### Script: Channel Rules           # You are free to edit ## Version: 1.0.0                  # this script as much  ## Author: Alien                   # as you want as long  ## Email:  alien@irctools.org      # as you keep my name  ## Web:    www.weaklink.ws/~alien/ # in credits.          ############################################################ This simple script will make a  # Feel free to email   ## public command with channel     # me with suggestions  ## rules. It's fully configurable .# or bugs.             ## It's not much but it's useful.  #                      ############################################################### Configuration starts here##### Channel where you want to use rules command. # ex: "#channel" or use "" for allset rules_channels "#Trivia.nl"## This is command to review channel rulesset rules_command "!nieuws"## Should rules be sent as chan msg (0) or private msg (1)set rules_sendas "0"## This message will be posted when someone# request rules.set rules_rules "Om gratis de Bot in je channel te krijgen die het Nieuws weergeeft van Fok,Gamer,Cs,hoef je het volgende alleen maar te doen,typ \002!idle #channelnaam \002 (  \0031Maar pas op om de bot te behouden moet je idlen op #trivia.nl , dus dat wil zeggen als jij disconnect van #trivia.nl of quakenet dan disconnect de Bot ook van jouw channel en zou je weer van voor af aan moeten beginnen met) \0034 \002!idle #channelnaam \002"#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!##                      End of conf                      ## You shouldn't edit anything below unless you know how.##!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!#!## OK, let's bind a litlebind pub - $rules_command pub_rules# Now the procedure to cover that bindproc pub_rules { nick host hand chan smt } {global rules_channels rules_rules rules_sendasif {$rules_sendas == "0"} { set tgt $chan }if {$rules_sendas == "1"} { set tgt $nick } if {$rules_channels == ""} {         puthelp "PRIVMSG $tgt :$nick, \002-Nieuws-\002 $rules_rules"         return 0 } if {$chan == $rules_channels} {         puthelp "PRIVMSG $tgt :$nick,\002-Nieuws-\002 $rules_rules" }}# That should do it. Now let me adv :Pputlog "ALI: Loaded Channel Rules TCL by Alien"