deignore çalıişıyor fakat attığım postun sonundaki yazıyı okumadınız TCL8.5 ve üzeri versionlarda çalışacak komutu belirtmişim orda o yuzden ignore kaldırma çalışmamıştır sizde.
Neise o komutun amacı farzedelim nickler.txt içinde "
unpainful" nicki var ben silme işlemi yaparken "
uNPainFuL" yazdım büyük küçük ayrımı yapmadan o nicki yakalayıp silmesi içindi.
Şimdi vericeğim kodda çalışacaktır fakat büyük küçük uyumsuz olur buna dikkat edelim aynısını yazmak zorunda kalacaksınız..
deignore prosedüründe bu satırı : PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
set nicki [lsearch -nocase $nicks $text]
Şu satırla değiştir: PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
set nicki [lsearch -exact $nicks $text]
Diğer sorunuza gelirsek kullandığınız botun tcl sini bilmediğim için o şekilde yazdım
son kodları. Tcl de !istek komutunu çalıştıran prosedürün icinde kullanacaksınız o kodu.
!istek yazdığı an verdiğim sorgu devreye girecek nicki varsa listede uyarıyı gösterecek..
Yine o kodda bu satırı: if {[lsearch -nocase $nicks $nick] > -1]} { putquick "notice $nick : $uyari"; return } Şu satırla değiştir: if {[lsearch -exact $nicks $nick] > -1]} { putquick "notice $nick : $uyari"; return }