Voi la script-urile pe care le copiati/folositi nu va uitati asa de curiozitate ce si cum a facut omu acolo? In loc de regsub ar trebui sa folositi comanda
subst (citez "perform backslash, command, and variable substitutions") "care este" mult mai rapid.

Cine stie cunoaste.
Edit: A si nu ar strica sa mai aruncati si voi un ochi peste docs/tcl-commands.doc pentru ca o sa va ajute ENORM. De ex, in loc de
Code:
if {$botnick != $nick} {
(care apropo e gresit din start pentru ca ABC nu este aceiasi cu abc)
ar trebui inlocuit cu:
Code:
if {![isbotnick $nick]} {
si asa mai departe..