bind mode - * chanmodes
proc chanmodes {nick uhost hand chan mode desc} {
  global botnick
  if {$mode == "+u"} {
    putquick "MODE $chan -u"
    putquick "NOTICE $nick +u kanal modunda kullanıcılar görülmediği için, bu modun kullanımı tehlikelidir."
  }
  if {$mode == "+A"} {
    putquick "MODE $chan -A"
    putquick "NOTICE $nick +A kanal modunda sadece adminler kanala girebildiği için, bu modun kullanımı tehlikelidir."
  }
  if {$mode == "+O"} {
    putquick "MODE $chan -O"
    putquick "NOTICE $nick +O kanal modunda sadece operler kanala girebildiği için, bu modun kullanımı tehlikelidir."
  }
  if {$mode == "+i"} {
    putquick "MODE $chan -i"
    putquick "NOTICE $nick +i kanal modunda sadece davetliler kanala girebildiği için, bu modun kullanımı tehlikelidir."
  }
  if {$mode == "+k"} {
    putquick "MODE $chan -k $desc"
    putquick "NOTICE $nick +k kanal modunda sadece şifreyi bilenler kanala girebildiği için, bu modun kullanımı tehlikelidir."
  }
  if {$mode == "+Q"} {
    putquick "MODE $chan -Q"
    putquick "NOTICE $nick +Q kanal modunda kimse atılamadığı için, bu modun kullanımı tehlikelidir."
  }
  if {$mode == "+z"} {
    putquick "MODE $chan -z"
    putquick "NOTICE $nick +z kanal modunda sadece güvenli bağlantılar kanala girebildiği için, bu modun kullanımı tehlikelidir."
  }
  if {$mode == "+l"} {
    putquick "MODE $chan -l"
    putquick "NOTICE $nick +l kanal modunda sadece limit sayısı kadar kullanıcı kanala girebildiği için, bu modun kullanımı tehlikelidir."
  }
  if {$mode == "+R"} {
    putquick "MODE $chan -R"
    putquick "NOTICE $nick +R kanal modunda sadece kayıtlı kullanıcılar kanala girebildiği için, bu modun kullanımı tehlikelidir."
  }
}

putlog "Kanal Mod Koruma TCL v1.0 - Written By CLubber"