| Daemon | 21 Mart 2025 00:49 |
Alıntı:
Mylife Nickli Üyeden Alıntı
(Mesaj 1933039)
Kodun sizde çalışmıyor olmasının bazı sebepleri olabilir. Biraz bahsedeceğim. Bu arada kodu da deneme şansım olmadı. Varsayım üzerinden gideceğim. Kod:
on $*:snotice:/Client\sconnecting/:{ if $hfind(lamer,$9,0,W) { .gline $9 : $Network Guvenlik Sistemi | msg #Kanal $9 Lamer listesinde oldugundan sunucudan uzaklastirildi. }
}
on $*:text:/^[.!]lamer/i:#Kanal:{
if !$2 || !$3 && !$regex($2,/(l[iİı]st)$/i) || !$regex($2,/(ekle|s[iİı]l|l[iİı]st)$/i) { msg # hata mesajı | return }
elseif $regex($2,/ekle$/i) {
if $hfind(lamer,$3,0,W) { msg # Eklemek istediğiniz nick lamer listesinde zaten var! Silmek için: !lamer sil $hmatch(lamer,$strip($3),1).item | return }
.hadd -m lamer $strip($3)
.hsave -o lamer lamer.liste
.msg # $3 nicki lamer listesine eklenmiştir.
.kline $3 : $Network Guvenlik Sistemi
}
elseif $regex($2,/s[iİı]l$/i) {
if !$hfind(lamer,$3,0,W) { msg # Eklemek istediğiniz nick lamer listesinde yok! | return }
.hdel -m lamer $strip($3)
.hsave -o lamer lamer.liste
.msg # $3 nicki lamer listesinden silinmiştir.
}
elseif $regex($2,/l[iİı]st$/i) {
if !$hget(lamer,0).item { msg # Lamer olarak eklenmiş nick yok! | return }
msg # $+(«,$c(5,Lamer Nick Listesi),»)
var %m-k 1 | while (%m-k <= $hget(lamer,0).item) { msg # $hget(lamer,%m-k).item | inc %m-k }
msg # $+(«,$c(5,Lamer Nick Listesi Sonu),»)
msg # Herhangi bir kaydı silmek için örnek kullanım: !lamer sil nick
}
}
Kırmızı ile işaretlediğim kısım yani servis noticelerini status de görüyor olmanız gerekiyor aksi takdir de kod tetiklenmeyecektir sebebi bu olabilir.
ekleme/silme ve listeleme işlemlerinde hiç bir sorun yaşamıyorsanız yukarıda bahsettiğim sebepten ötürü sorun yaşıyor olabilirsiniz.
Diğer bir durum da servis noticelerindeki $9 değeri bulunduğunuz sunucuda farklı olabilir aldığınız hata mesajını buraya yazarsanız yardımcı olmaya çalışayım. İyi forumlar.
|
Statusunde gozukmeyip #Baglantı kanalında gozukuyorsa eger. Ondan da kaynaklı olabilir. Ya da mIRC'i 6.35 olmayabilir. Kod:
alias taraport return 7003|7033|6667
on *:text:*:#bağlantı*:{
if $regex($1-,/ $+ $taraport $+ /i) {
var %ipsweb = $gettok($left($right($10,-1),-1),2,64),%:wnick = $remove($6,,14, ,)
if $hfind(lamer,$9,0,W) { .gline $9 : $Network Guvenlik Sistemi | msg #Kanal $9 Lamer listesinde oldugundan sunucudan uzaklastirildi. }
}
}
denemedim ama bu sekilde de yapabilir. |
