bind raw * notice connection
proc connection {from keyword text} {
  global botnick
  if {[string match -nocase "*Client connecting on port*" $text]} {
    set nick [lindex $text 9]
    putquick "sajoin $nick #Sohbet,#Radyo,#Oyun"
    putquick "notice $nick :Merhaba $nick"
    putquick "notice $nick :Bağlantınız kuruldu, Kanallara aktarılıyorsunuz.."
    putquick "notice $nick :Hoş sohbetler dileriz."
  }
}