Acil Help..
 

Arkadaşlar Bana Bir Code Lazım Servere Girişlerde Nickleri Ayrı Bi Pencereye Toplayıp Üstüne Tıkladıgında Forbid e Almasını istiyorum. yani Servere Gelen Nickleri Ayrı Bi Pencerede Görmek istiyorum. o Nick in Üstüne Tıkladiginda Forbid e Almasını istiyorum. Bilen Bi Arkadaş Yardım Ederse Sevnirim Şimdiden Teşekkürler.. iyi Calışmalar..

servere giren bir kullanıcının ve cıkan kullanıcıların noticelerinin sende nasıl gozuktuğunu ve forbit komutunun nasıl kullanıldıgını yazarsan gerisini hallederiz :D.
(inadina 3 sene aradan sonra ircd ye bakmaz :D)

-irc.uheuhe.net- *** Notice -- Client connecting on port 6667: ehuhe ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [clients]

/ns Forbid Nick Sebeb Diye. Tşk ilgin için Arkadaşım..

sen online olduğun sürece servere giren ve cıkan nickleri noticelerden takip eder ve hasha yazar eğer serverin cok yoğun ve 2000 kullanıcıdan fazla ise alttaki 2000 i artırabilirsin.

aşağıdaki kodu remoteye kopyala (alt + r):


on *:connect: {
if $hget(listenusers) { hfree listenusers }
hmake listenusers 2000
}
on *:snotice:*: {
if $regex($1-,Client exiting:) { .hdel listenusers $6 }
if $regex($1-,Client connecting on port) { .hadd listenusers $9 $remove($10,$chr(40),$chr(41)) }
}
alias fbdlg { if !$dialog(fbdlg) { dialog -m fbdlg fbdlg } }
dialog fbdlg {
title "Forbid"
size -1 -1 239 246
option dbu
list 1, 1 1 237 229, sort size extsel hsbar vsbar
button "Tazele", 2, 204 232 33 12
button "Seçili olan nickleri forbidle", 3, 2 232 63 12
text "birden çok nick seçmek için ctrl tuşunu kullanın", 4, 68 234 133 8
button "x",5, 0 0 0 0,cancel
}
on *:dialog:fbdlg:*:*: {
if $devent == init || ($devent == sclick && $did == 2) {
did -r $dname 1
var %i = $hget(listenusers,0).item
while %i {
did -a $dname 1 $hget(listenusers,%i).item $+($str(*,15),[ip: $hget(listenusers,%i).data,])
dec %i 1
}
}
if $devent == sclick && $did == 3 {
var %i = $did(1).lines
while %i {
if $did(1,%i).sel { .timer -m 1 $calc($rand(50,500) * 6) /ns Forbid $gettok($did(1,%i),1,32) Sebebi buraya yaz }
dec %i 1
}
}
}

kopyaladıktan sonra serverden bağlantını kes ve tekrar gir komutu çalıştırmak için /fbdlg yazman yeterli bunu kanal menusunde görmek istersen remoteye alttaki kodu da yapıştır:
menu channel {
-
Forbid list: fbdlg
-
}

ayrıca komutları çok yavaş uyguluyorsa $calc($rand(50,500) * 6) timerdaki 6 yı küçültebilirsin. çok hızlı uyguluıyorsa artırabilirsin.

* /hadd: no such table 'listenusers'

Arkadaşım Hata Veriyor ya..

disconnect olup daha sonra bağlanıcaksın yazdım yukarıda ;oki.
böylece hash table oluştusun yada var olanı silip tekrar oluştursun :D
on *:connect: {
if $hget(listenusers) { hfree listenusers }
hmake listenusers 2000
}

-irc.uheuh.net- *** Notice -- Client connecting on port 6667: otjcalyi ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [clients]

Status de Giren Nİckleri Göstermiyo Dialog Sadece # Kanala Giren Nickleri Gösteriyor. Bu Giren Nickler Kanala Girmiyor Forbidlicegim Nickler Sadece Status de Kalıyor. Ama Verdigin Dialog da Sadece Kanala Girenleri Forbid Ala Bilirsin Diye Gösteriyor Arkadaşım. ? :)

Alience cinnet geçiricek. :)

ne kanalı? o noticelerden gelen mesajlara göre nick ekler cıkarır join part ile alakası yok ? anlık giriş çıkış olursa onu siler tabiki sen tüm nickler kalsın istiyorsan if $regex($1-,Client exiting:) { .hdel listenusers $6 } yi sil ama bu durumda hash dolar.

Okadar Zormu :)