Çevrimdışı

saywhat Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

tekrar yazayım bari hadi... newchanban -> [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] timer vs kullanmaya gerek olmadan, sunucuya komut/mode göndermeden, bu newchanban komutuyla kişiye atılan ban direk botun .user / kullanıcı dosyasına işlenir. süre belirtilmezse 60 dakika , 0 olarak belirtilirse "sticky" yani süresiz ban bunun dışında kaç yazarsanız o kadar dakika ban kullanıcı listesine işlenmiş ve kişiye uygulanmış olur. o süre doluncada kaldırılır. newchanban local yani adı geçen kanalda ban için kullanılır. newban , global/yani botun olduğu tüm kanallarda geçerli olur.timer ile uygulanmaya çalışıldığında, saniye* bazında geçikmeler yaşanması doğaldır. kullanıcı dosyasına işlenirse bu saniyelerle ölçülen gecikmeler olmayacak,bot için daha öncelikli* bir işlem haline gelecektir.aksi uygulamalarda bot , -> [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] "queues" (sıralama/sıralandırma") diye çevirebileceğimiz bir "yapılacak işleri aciliyet/önem açısından sıraya sokar ki bu sayede kaynakların en ekonomik şekilde kullanılması sağlanmış olur. scanx'in daha dakik olduğunu söylüyorsunuz. açın scanx.tcl dosyasını ve newchanban aratın,ben bakmadım ve hiç kullanmadım da, bahse varım ki newchanban yahut global olması için newban komutlarıyla uygulanıyordur. bot dışardan bakılınca bir iş yapmıyormuş gibi gelebilir. ancak gerçekte arka planda sürekli olarak iş yapar. neler olduğunu görmek istiyorsanız. raw-log ayarını .conf üzerinde 1 yapın .restart ettikten sonra , bota login olup : .console +bcdhjkmoprstvwx komutu uygulayın o zaman botun gördüğü işlediği herşeyi görme takip etme imkanınız olur.

Kod bilgim yok bir tane tcl ile çalışıyorum (!nick nickban)+(!sus kanalda kişiyi susturmak için)+(!yasak kişinin ip adresini banlayıp kanaldan atmak için)

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 09:36 -->-> Daha önceki mesaj 09:31 --

Kullandığım tcl bu


bind pub - !yasak msg_forbid
proc msg_forbid {nick uhost handle chan arg} {
global botnick
set person [lindex $arg 0]
set mask "[string range [lindex [split [getchanhost $person $chan] "@"] 1] 0 end]"
if {$person == $botnick} {return}
if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#op"]} {
if {![ishalfop $person $chan] && ![isop $person $chan]} {
putquick "PRIVMSG IRC mode $chan +b [getchanhost $person $chan]"
putquick "kick $chan $person Kanal kurallarına uymadığınız tespit edildi. IP'niz banlandı."
putquick "PRIVMSG #bilgi $chan kanalında *****$person***** nickli üyeye -----$nick----- tarafından !yasak komutu uygulandı."
}
}
}
bind pub - !nick msg_nickban
proc msg_nickban {nick uhost handle chan arg} {
global botnick
set person [lindex $arg 0]
if {$person == $botnick} {return}
if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#op"]} {
if {![ishalfop $person $chan] && ![isop $person $chan]} {
putquick "PRIVMSG IRC mode $chan +b $person"
putquick "kick $chan $person $person rumuzu sohbet kurallarına aykırıdır. /nick Yeninick komutu ile değiştiriniz."
putquick "PRIVMSG #bilgi $chan kanalında *****$person***** nickli üye -----$nick----- tarafından bad nick sebebi ile kanaldan atıldı."
}
}
}

bind pub - !sus msg_silence
proc msg_silence {nick uhost handle chan arg} {
global botnick
set person [lindex $arg 0]
set mask "[string range [lindex [split [getchanhost $person $chan] "@"] 1] 0 end]"
if {$person == $botnick} {return}
if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#op"]} {
if {![ishalfop $person $chan] && ![isop $person $chan]} {
putquick "PRIVMSG IRC mode $chan +b ~q:[getchanhost $person $chan]"
putquick "NOTICE $person Kanal kurallarına uymadığınız tespit edildi. IP'niz banlandı."
putquick "PRIVMSG #bilgi $chan kanalında *****$person***** nickli üyeye -----$nick----- tarafından !Sus komutu uygulandı."
}
}
}