|
Raw Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
Şimdi yazdım. Deneyip sonucu sölersen iyi olur. İyi forumlar
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
#######################################
# Op Kanalı Nick Değişim Yasaklama #
# coded by Raw #
#######################################
########
# Op kanalı yazınız
########
set op(kanal) "#ops"
########
# Muaf kanalı yazınız
########
set op(muaf) "#opers"
########
# Kill Mesajı Yazınız
########
set op(kill) "Global op kanalında nick değiştirdiğiniz için uzaklaştırıldınız"
bind nick - * raw
proc raw {nick chan uhost hand} {
global op
if {$chan == $op(kanal) && ![onchan $newnick $op(muaf)]} {
putquick "mode $op(kanal) +bb $nick $newnick"
putquick "kill $nick $op(kill)"
putquick "privmsg $op(kanal) \002Dikkat :\002 $nick global op nickini değiştirdiği için uzaklaştırılmıştır. Lütfen global op nickinizi değiştirmeyiniz."
}
}
########
putlog "Op Kanali Nick Degisim.Tcl Yuklendi - coded by Raw"
########
|
bind nick raw'ı 5 ayrı değişkenle döner. Ama sen 4 tane değişken belirlemişsin proc tanımlamasında. Fakat proc içerisinde 5. değişkeni de $newnick olarak kullanmışsın. Bu 5. değişkeni proc tanımlamasına eklemen lazım.
Öte yandan kanalda nick değişene kill uygulatırken eski nickine kill uygulatmaya çalışıyorsun, oysa bu bind devreye girdiğinde kişi zaten nick değişmiş olacaktır ve eski nick'e kill uygulatman birşey ifade etmeyecektir.
Bir diğer mantık hatan ise ban uygulatırken. +bb $nick $newnick yerine kişinin hostunu banlatman daha mantıklı olacaktır.
Proc isimlerini belirlerken raw gibi sunucu üzerinde kullanabilen komutları ya da tcl içerisinde kullanabilecek ana değişkenleri seçmemen daha güzel olur. raw yerine rawNick gibi bir isim daha güzel olur.
Son olarak kanal adları komutun bu haliyle büyük küçük harf duyarlıdır. o yüzden $degisken == $chan şeklindeki bir kullanım yerine string match -nocase kullanmanı tavsiye ederim.