IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

 Kayıt ol  Topluluk
Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 30 Nisan 2008, 15:35   #1
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Kod Hk.




selam elimde ßöle bir kod var yanlız gline degilde sadece ban atıcak yani botlar giriş yapınca +MR Modlarına alıp banlıcam ßirde msg olarak kanal modları kitlendi dinlenme modu gibi. msg olacak yardımlarınız için şimdiden teşekkürlerimi sunarım.

on @*:join:#:{
if ($nick isop #) return
var %join.flood = $wildsite
if (%join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] == $null) {
set -u4 %join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] 1
return
}
else { inc %join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] }
if (%join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] >= 4) {
if (%join.check. [ $+ [ $wildsite ] ] == $null) {
set -u1 %join.check. [ $+ [ $wildsite ] ] 1
.mode # + 1
.timer 1 5 /mode # +R
.gline $nick +1d Makinanızda virus/trojan olabilir. Lütfen temizleyerek bağlantı kurunuz. Kaan was here
}
}

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet
Alt 30 Nisan 2008, 18:44   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod Hk.




Bu kod 5 saniye içerisinde kanal'da 4 adet'den fazla giriş yapıldığında, son giren 4 veya fazlası nick'i kanaldan banlar.
-
on !*:join:#:if ($regex($nick(#,$me).pnick,@|&|~|%|(\+))) { hadd -mu5 # $+(#,½,$nick) 1 | if ($hget(#,0).item >= 4) { mode # +MR | .msg # Kanal modları değişti vs. | var %1 = $v1,%2 = 1 | while (%2 <= %1) { ban -k # $removecs($hget(#,%2).item,#,½) 2 sebeb. | inc %2 } } }

Eğer sadece son giren nick'i banlamak istiyorsan;
-
on !*:join:#:inc -eu5 $+(%,#) 1 | if ($($+(%,#),2) >= 4) { mode # +MR | .msg # Kanal modları değişti vs. | ban -k # $nick 2 sebeb. }

 
Alıntı ile Cevapla

Alt 30 Nisan 2008, 18:51   #3
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod Hk.




ustam istedigim bu degil :S tam açıklayamıyorumki
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 30 Nisan 2008, 22:13   #4
CipriX
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: Kod Hk.




Sen anlatıyorsunda.... (:

on @*:join:#:{
if ($nick isop #) return
var %join.flood = $wildsite
if (%join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] == $null) {
set -u4 %join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] 1
return
}
else { inc %join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] }
if (%join. [ $+ [ # ] $+ . $+ [ %join.flood ] ] >= 4) {
if (%join.check. [ $+ [ $wildsite ] ] == $null) {
set -u1 %join.check. [ $+ [ $wildsite ] ] 1
.mode # + 1
.timer 1 5 /mode # +MR
msg # # Kanalının Modları kilitlendi
.mode # +b $nick
}
}

 
Alıntı ile Cevapla

Alt 01 Mayıs 2008, 01:58   #5
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod Hk.




CipriX teşekkürler ustam ßirde şey sorucam +MR kendi açıyor deilmi

 
Alıntı ile Cevapla

Alt 01 Mayıs 2008, 06:59   #6
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod Hk.




Abi güzel Hoşta
6(06:56:54) • Cıkıs : BasBelas`I1 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
(06:56:54) • Cıkıs : BasBe`lasI1 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
(06:56:55) • Cıkıs : ^BasBelasI2 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
(06:56:55) • Cıkıs : BasBelasI^^2 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
(06:56:56) • Cıkıs : Bas^^BelasI2 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
(06:56:56) • Cıkıs : B`asBelasI2 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
(06:56:59) • Cıkıs : B^^asBelasI2 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
(06:57:00) • Cıkıs : BasBelas`I2 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

(06:58:09) <BasBelas^^I2> BasBelasI///////////////////BasBelasI///////////////////BasBelasI///////////////////BasBelasI///////////////////BasBelasI///////////////////BasBelasI///////////////////BasBelasI///////////////////BasBelasI///////////////////BasBelasI///////////////////BasBelasI///////////////////BasBelasI///////////////////BasBelasI///////////////////BasBelasI/////////////////// BasBelasI///////////////////BasBelasI///////////////////BasBelasI/////////
Ve adam bastı gitti
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kod ßi işlev görmedi

 
Alıntı ile Cevapla

Alt 01 Mayıs 2008, 16:46   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod Hk.




kaans, senin istediğin belirlediğin saniyede belirlediğin limit ve/ya fazlası giriş yapıldığı zaman, son giren nick'i veya limit'i aşan son nickleri kanaldan banlayıp, sonra kanal'ı +MR moduna alıp msg ile kanal'a bildirmek değilmi?

E benim verdiğim kod(lar) bu işlevi yapıyor.
Ek olarak mode # + 1 ne oluyor anlamış değilim.

 
Alıntı ile Cevapla

Alt 01 Mayıs 2008, 17:27   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod Hk.




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
;Kanal'a benim haricimde birisi giriş yaptığı zaman, on !*:join:#: { ;Eğer ~&@%+ prefixlerinden birine sahib isem, if ($regex($nick(#,$me).pnick,@|&|~|%|(\+))) { ;Kanal tablosuna nick'i kaydet(5 saniye sonra silinmek üzere) hadd -mu5 # $+(#,½,$nick) 1 ;Eğer tablodaki veri sayısı, 4 veya fazlası olur ise if ($hget(#,0).item >= 4) { ;Kanal'ı +MR moduna al, mode # +MR ;/msg ile kanal'a text gönder, .msg # Kanal modları değişti vs. ;2 değişken oluştur, var %1 = $v1,%2 = 1 ;While ile %1 değişkenini %2 değişkenine eşitle while (%2 <= %1) { ;Eşitleme işleminde, tablodaki tüm verileri yani kayıt olan nickleri kanal'dan banla. ban -k # $removecs($hget(#,%2).item,#,½) 2 sebeb. inc %2 } } } }

Sanırım gayet açık.

 
Alıntı ile Cevapla

Alt 01 Mayıs 2008, 20:54   #9
CipriX
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: Kod Hk.




kodun işlev görmesiyle bi ilgim yok sadece glineyi ban yaptım (:

 
Alıntı ile Cevapla

Alt 01 Mayıs 2008, 20:58   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod Hk.




Ben ilgin var demedim.
Ama benim verdiğim kod'larda aynı işlemi yapıyor. Yani kodların yaptığı işlev aynı, yazım şekli farklı sadece. Ki hash kullanıyoruz, daha hızlı çalışacaktır.

 
Alıntı ile Cevapla

Cevapla

Etiketler
hk, kod, mirc download, mirc indir


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık