bind join - * msg_tr
proc msg_tr {nick uhost hand chan} {
  if {[string match -nocase "#Sohbet" $chan]} {
    putquick "privmsg $nick Merhaba, $nick"
    putquick "privmsg $nick "
    putquick "privmsg $nick Sunucumuza Hoşgeldiniz."
    putquick "privmsg $nick Eğlenirken Öğrenmek İsterseniz #Oyun"
    putquick "privmsg $nick Kelime Bilginizi Geliştirmek İsterseniz #Kelime"
    putquick "privmsg $nick Birbirinden Güzel Sorularla Yarışmak İçinse #Bulmaca"
    putquick "privmsg $nick Sohbet Ederken Müzik Dinlemek İçinse #Radyo"
    putquick "privmsg $nick Kanalını Kullanabilirsiniz."
    putquick "privmsg $nick "
    putquick "privmsg $nick Teşekkür Ederiz."
  }
}