11.7 Writing your own script
Lets get back to the auto-voice and greeting script again.
Make it so that everyone who joins one of the two channels
gets voiced and that everybody is greeted in every channel
with "Welcome $nick" or their personal greeting which can
be set with a channel command called !greeting using a file
as the database for the greetings.
You can find an example of the script here: http://www.suninet.org/tclguide/example-ch11.tcl.