bind pub - !istek istekProc
proc istekProc {nick uhost hand chan arg} {
  global istek
  # eger !istek yazip yanina birsey yazmadiysa komutun
  # nasil kullanilacagini gösterelim.
  if {$arg == ""} {
    putquick "privmsg $chan :\002HATA\022 isteginizi belirtmeyi unuttunuz."
    putquick "privmsg $chan :\002Dogru kullanim:\002 !istek sarkiciadi - sarkisi - kime istediginiz."
    return
  }
  # burada olusturdugumuz degisken mevcut mu bakiyoruz.
  # eger mevcutsa komutu durduruyoruz.
  if {[info exists istek([md5 $uhost])]} { 
    putquick "privmsg $chan :4$nick 12, 15 Dakika Içerisinde 4Sadece 1 kez 12Istekte bulunabilirsiniz!...."
    return 
  }
  # simdi ise komutlari uygulatalim
  putquick "privmsg #dj :2Istek Isteyen Nick 4\002$nick\002, 2Istenilen Sarki: 4\002$arg\002 2isteginde bulundu." 
  putquick "privmsg $chan :\002$nick\002 isteginiz djlerimize iletilmistir."
  # simdi de bu kisinin hostunu degiskene atayalim.
  set istek([md5 $uhost]) 1
  # bu degiskeni 15 dk sonra yokedelim
  timer 15[list unset istek([md5 $uhost])]

}