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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Kod Hk. (https://www.ircforumlari.net/mirc-scripting-sorunlari/56143-kod-hk.html)

Korkut 30 Nisan 2008 15:35

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
}
}

L4roXyL 30 Nisan 2008 18:44

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. }

Korkut 30 Nisan 2008 18:51

Cevap: Kod Hk.
 
ustam istedigim bu degil :S tam açıklayamıyorumki :D

CipriX 30 Nisan 2008 22:13

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
}
}

Korkut 01 Mayıs 2008 01:58

Cevap: Kod Hk.
 
CipriX teşekkürler ustam ßirde şey sorucam +MR kendi açıyor deilmi

Korkut 01 Mayıs 2008 06:59

Cevap: Kod Hk.
 
Abi güzel Hoşta
6(06:56:54) • Cıkıs : BasBelas`I1 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
(06:56:54) • Cıkıs : BasBe`lasI1 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
(06:56:55) • Cıkıs : ^BasBelasI2 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
(06:56:55) • Cıkıs : BasBelasI^^2 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
(06:56:56) • Cıkıs : Bas^^BelasI2 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
(06:56:56) • Cıkıs : B`asBelasI2 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
(06:56:59) • Cıkıs : B^^asBelasI2 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
(06:57:00) • Cıkıs : BasBelas`I2 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])

(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 :D kod ßi işlev görmedi

L4roXyL 01 Mayıs 2008 16:46

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.

L4roXyL 01 Mayıs 2008 17:27

Cevap: Kod Hk.
 
Kod:

;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.

CipriX 01 Mayıs 2008 20:54

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

L4roXyL 01 Mayıs 2008 20:58

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.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 05:41.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net