Merhabalar.
Böyle Bir TCL Tabiki Yapılabilir.
Çoğaltmak Sizin Elinizde.
Ben Adanalı Olanlar için Yaptım. Denemedim ama çalışacaktır.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
bind join - * adana
proc adana { nick uhost hand chan } {
if {![string match -nocase "*Adanali*" $uhost]} {return 0}
putquick "SAJOIN $nick #Adana"
putquick "NOTICE $nick :*** ADANALI OLDUĞUNUZ TESBİT EDİLMİŞTİR. ****"
putquick "NOTICE $nick :*** SİZİ #ADANA KANALINA YÖNLENDİRİYORUZ ***"
putquick "NOTICE $nick :*** KEYİFLİ SOHBETLER DİLERİZ ***"
}
Olarak Çoğaltabilirsiniz.