|
alphae Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
Kod: Kodu kopyalamak için üzerine çift tıklayın! on $*:snotice:/client\x20(connecting.+\x20(.+)\x3A|connecting\x3A)\x20(\S+)\x20\x28(\S+)\x40(\S+)\x29/Si:{
msg #log 4 Web giriş 2 $9 $10
.ctcp %nick version
}
Yukardaki koda nicke version çekiyor.
Altaki koda verison bilgileri txt yazdiriyorum..
ayni zamanda admin odasina nick ve modeli yansitiyorum.
Kod: Kodu kopyalamak için üzerine çift tıklayın! on *:ctcpreply:version*: {
write version.txt MODEL $nick $4 $5 $18-
if (*qwebirc* iswm $1-) {
msg #Admin 5 Ban : 2 !mban $nick $4
}
}
Yapmak istedim şey
<&M-bot> Web giriş Mert (Mobil@85.107.94.110)
<~M-bot> Ban : !mban mert 5939947826
Bu şekilde yapmak istiyorum ipi yansitmak istiyorum
<~M-bot> Ban : !mban Mert 5939947826 (Mobil@85.107.94.110)
|
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on $*:snotice:/client\x20(connecting.+\x20(.+)\x3A|connecting\x3A)\x20(\S+)\x20\x28(\S+)\x40(\S+)\x29/Si:{
var %nicks = $regml(3), %ips = $regml(5)
hadd -m nicks %nicks %ips | .msg #log %nicks %ips | .ctcp %nicks version
}
on *:ctcpreply:version*: {
write version.txt MODEL $nick $4 $5 $18-
if (*qwebirc* iswm $1-) {
if $hget(nicks,$nick) { .msg #Admin Ban: !mban $nick $ifmatch | hdel -m nicks $nick }
}
}
Bu şekilde birşey mi istiyorsun.