bind raw * notice connect:user
proc connecting {from keyword arg} {
if {[string match -nocase "*Client connecting on port*" $arg]} {
putquick "notice $nick :Merhaba $nick" 
putquick "notice $nick :Su anda TOR/PROXY Taramasindan geciriliyorsunuz. Lutfen sabredin global kanallara cekiliceksiniz.." 
putquick "notice $nick :2Resmi IRCD/SERVICES Kanalimiz 4#Help 2Her Zaman Yardim Vermeye Hazirdir"
putquick "notice $nick :2Calinti Nick/Kanal Ve Herturlu Server Sorunlari Icin 4#OperHelp 2Kanalina Gidebilirsiniz."
putquick "notice $nick :2Oyun Oynamak, Kendinizi Ve Bilginizi Sinayarak Gelistirmek Icin 4#Oyun , 4#Yarisma , 4#Kelime , 4#islam , 4#English Kanallarini Tercih Edebilirsiniz." 
putquick "notice $nick :2Radyo Dinlemek, Istek Parcalarinizi Sevdiklerinize Yollamak Icin 4#Radyo 2Kanalini Ziyaret Edebilirsiniz."
putquick "notice $nick :2Sunucumuz Kurallarini Ve Yonetim Kadrosunu Gormek Icin 4/motd 2 ve 4/rules 2Komutunu Uygulayiniz."
putquick "notice $nick :2Web Sitemiz 4
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Edebilirsiniz." 
} 
}