Code:

[join $topicvariable]

Code:

14,1[ 0Check4Six 14] 4¤ 14[ 0www4.0teamx64.0net 14] 4¤ 14[ 0News4: 0x6\\cha0ticz picked to represent the USA at ESWC for Quake 4! Congrats cha0ticz 14]

Code:

5(14Topic in #Check-Six has changed.5) {14,1[} 0Check4Six 14\] 4¤ {14[} 0www4.0teamx64.0net 14\] 4¤ {14[} 0News4: {0x6\cha0ticz} picked to represent the USA at ESWC for Quake 4! Congrats cha0ticz 14\]

Code:

################################################## clink.tcl Channel Linker v1.2# Written by {SImPhAt}, May 6th 2002## This script lets you link channels (as many as you# like) on different (or same) IRC Networks using 2 or# more eggdrops.## Messages are sent in a botnet-link connection.## Easy to configure.## Join, Part, Nick change, Quit, Kick, Msgs and # Actions (/me) are currently relayed.## Tested on eggdrop v1.6.x (3 bots) relaying between 3# different channels.## E-mail questions or comments to simon.boulet@divahost.net.# I'd like to know who is using my script and where, just to# see it live in action =).## Changes since 1.0:#1) Linking of channels that do not have the same name#   (ex: linking #help with #help.quebec-chat)#2) Spelling correction in "nick as joined #chan" should be has#3) Stupid bug showing empty () on kick/part/quit with no reason#4) Tested everything with 3 channels/networks/bots.## TODO:#1) Flood protection.#2) List current nicks on the linked side (.names).#3) Remote topic change, kick/ban, op.################################################### Configuration################################################### Note: I was relaying #clink.qc(Quebec-Chat) #clink.io(Ionical) and# #clink.un(Undernet) all together (those 3 eggdrops where using the# same .tcl source).## CLink-QC on Quebec-Chat, CLink-IO on Ionical and CLink-UN on Undernet.## Nickname (botnet-nick) of the bots who are involved in the relaying.# Enter all of them, case-sensitive.#set clink_botnicks {"staffbot" "j3rryx" "j3rryx-"}## The channel(s) you want to relay messages from and the bot that is on.## You need to "set network 'Network-Name'" in your bot(s) .conf file.# If you don't want to waste time searching what you put there, simply# .rehash your bot with clink.tcl loaded and you should see something like:## clink.tcl: I am CLink-UN running on Undernet.# --- Network-Name -------------------^^^^^^^^# Loaded clink.tcl: {SImPhAt} Channel Linker v1.x## Case-sensitive.## Syntax: set clink_onchan(#chan@network) "bot-name"set clink_onchan(#mychannel@GameSurge) "staffbot"set clink_onchan(#Check-Six@GameSurge) "j3rryx"## The channel(s) where you want the messages to be relayed.## For each channels you need to tell where you want everything# to be sent to.## Case-sensitive.## Syntax: set clink_relayto(#from_chan@network1) {"#destination_chan@network2"}set clink_relayto(#Check-Six@GameSurge) {"#mychannel@GameSurge"}## Should we add colors to join, part, nick, quit,# action, etc.#set clink_usecolor 0## Do you want me to display the network name?#set clink_relaynet 0## Characters to use when displaying the nicknames in channels msgs.## Exemples:# <Nickname> hello# set clink_charmsgs {"<" ">"}## (Nickname) helloset clink_charmsgs {"(" ")"}################################################### Script, you should *not* need to change# anything below.#################################################bind topc - * clink_topc bind bot - clink clink_botdat# Colors settings (Default: mIRC style)if {$clink_usecolor == 1} {set clink_color(topc) "\00314"} else {  set clink_color(topc) ""}# Done# Check current configurationif {${botnet-nick} == ""} {set {botnet-nick} $nickputlog "clink.tcl: Warning: botnet-nick not defined in .conf file, using \"$nick\"."}if {[lsearch $clink_botnicks ${botnet-nick}] == -1} {die "clink.tcl: Fatal: Bot \"${botnet-nick}\" not defined in clink_botnicks. Please edit clink.tcl and check your configuration."}if {$network == "unknown-net"} {putlog "clink.tcl: Warning: network not defined in .conf file, using \"unknown-net\"."}# Doneproc clink_topc {nick uhost hand chan text} {   global clink_onchan network   if {[info exist clink_onchan($chan@$network)]} {      clink_botsend $chan [concat "topc" [clink_cleannick $nick] $text]   }}proc clink_botsend {chan param} {global clink_onchan {botnet-nick} network clink_relaytoforeach clink_relaychan $clink_relayto($chan@$network) {if {[lsearch -exact [bots] $clink_onchan($clink_relaychan)] == -1} {putlog "clink.tcl: Warning: bot $clink_onchan($clink_relaychan) not linked."} else {putbot $clink_onchan($clink_relaychan) "clink $chan $network $param"}}}proc clink_botdat {bot clink param} {global clink_relaynet clink_color clink_charmsgs clink_relayto networkif {$clink_relaynet == 1} {set clink_network "\[[lindex $param 1]\] "} else {set clink_network ""}if {[lrange $param 5 end] != ""} {set reason "\([lrange $param 5 end]\)"} else {set reason ""}set clink_destchan [lindex [split [lindex $clink_relayto([lindex $param 0]@[lindex $param 1]) [lsearch -glob $clink_relayto([lindex $param 0]@[lindex $param 1]) "*@$network"]] @] 0]switch [lindex $param 2] {topc   { putserv "PRIVMSG $clink_destchan :$clink_network$clink_color(topc)\002\0035[lindex $clink_charmsgs 0]\00314\002Topic in [lindex $param 0] has changed.\0035\002[lindex $clink_charmsgs 1]\003\002 [lrange $param 4 end]" }default { putlog "clink.tcl: Warning: unknown action type \"[lindex $param 2]\" for [lindex $param 0]." }}}proc clink_cleannick {nick} {if {[string range $nick 0 0] == "\{"} {set nick "\\$nick"}        return $nick}putlog "clink.tcl: I am ${botnet-nick} running on $network."putlog "Loaded clink.tcl: {SImPhAt} Channel Linker v1.2"