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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - flood kanal temizleme (https://www.ircforumlari.net/mirc-scripting-sorunlari/194534-flood-kanal-temizleme.html)

flood kanal temizleme

on @1:text:*:#:{
if $me !isop $chan { halt } | if $nick isop $chan { halt }
var %bflood $strip($1-)
var %mflood $strip($$1)
if ($len(%bflood) >= 250 ) || ($len($1) >= 250 ) {
ban $chan $wildsite | /floo | ban $nick 2Flood Yaptiginizdan Dolayi 4Kanal2'dan Gecici Olarak Uzaklastirildiniz4! 4 $time
}
}

alias floo {
var %i 1
while %i <= $lines(floo.txt) {
msg # $read(floo.txt,%i)
inc %i
}
}

s.a öncelikle arkadaşlar irc sunucumuzda çhok saldırı oluyor bende kanala yapılan saldırıları auto temizlmeke için şöle bir kod oluşturdum aklıma böle bişi geldi gayet güzel çalışdı ama istediğim neticeyi tam alamadım.

kanala mesela biri saldırı yaptığında ona zline atsın ve kanalı temizlesin bir daha kanala flod atarlarsa yine kanalı temizlesin ve yine zline atsın kanalıda +m ye alsın 30 sn ye sonra kanalı -m ye geri alsın.yalnız birde biz bunları hem küfür.txt dosyasından okutup kanala 500 satırlık yazı yazılırsa dedim şekilde işlem görmesini isterim yardımlarınız için sağolun.

Cevap: flood kanal temizleme

Kod:

on *:text:*:#:if $prot(repeat,#,$nick,$1-,4,1) { mode # +b $nick | kick # $nick Tekrar etme! | cs set # mLock +f [4m#M1]:1 | mode # +c | timer 1 20  mode # -c timer | mode # +m | timer 1 20  mode # -m  }

 

alias prot {

  goto $1

  :repeat

  var %÷ = $+(%,repeat.,$2,.,$3,.,$encode($4,m))

  inc $(%÷,1)

  if (!$timer($gettok(%÷,1,37))) { $+(.timer,$gettok(%÷,1,37)) 1 $6 unset $(%÷,1) }

  if ($(%÷,2) >= $5) { unset $(%÷,1) | return $true }

  else { return $false }

}

Alttakide ban işlemi görünce temizlemesi icin

Kod:

 

on *:ban:#: { 

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 4,4.

  msg # 9,1 Sayfa 0,4  $nick 9,1 Tarafından Temizlendi.......

  msg # 0,1 Pis Kirliler.... 1,0 :D 

}

}

acıklaması

Bu kod 1 saniyede 4 satır yazana ban kick atıp kanalı +m ve +c ye alır 20 saniye sonra -m ve -c ye alır kırmızı ile yazdığım 20 rakamı -m -c icin değiştire bilirsin yeşil olarak yazdığım yer

Kod:

| mode # +c | timer 1 20 mode # -c timer

silersen renk korumasını kullanmaz

Kod:

cs set # mLock +f [4m#M1]:1

bu kısım ise kanal kodlarıyla koruma saglar server saldırı yapanı atar

Cevap: flood kanal temizleme

senın koddan anlamadım elimde boyle birşey vardı umarım yardımcı olabılmısımdır :) bilgim bukadarına yetiyor :):)

Cevap: flood kanal temizleme

murat aziz allah razı olsun bu koduda denedim çalışıyor ama istediğim sonuc bundada çıkmadı allah razı olsun.

demek istediğim 300 satırlık bir şiir düşünün bu şiirlerinde içinde küfürler olduğunu düşünün benim isediğim kodda da 300 satırlık koruma ve küfür.txt içinde olan küfürleri aygılayıp kanalı süpürsün ve zline atsın. flood.txt dosyasından kanal temizlenecek yani.

Cevap: flood kanal temizleme

Kod:

on *:input:#:{ 

  if ($1 == !ekle) { write küfür.txt $2

  } 

}

on *:ban:#: {  /play $chan flood.txt 3390 }

on *:text:*:#: { 

  var %< = 1 | while (%< <= $lines(küfür.txt)) { 

    if $read(küfür.txt,%<) iswm $1- {

    mode # +b $wildsite | zline $nick Küfür yasak }

    inc %< 

  } 

}

Bunu dene !ekle *küfür* şeklinde eklersen kelimeyi şiirin arasında bulur atar attıktan sonra play devreye girip temizler 3390 yazan yer temizleme hızı bunu azaltırsan hızlı temizler cogaltırsan daha yavaş temizleme yapar

300 satırlık koruma ve küfür.txt içinde olan küfürleri aygılayıp kanalı süpürsün ve zline atsın atsın Diyorsun bu flot icinmi istiyorsun 300 satırı neye göre ayarlamamızı istiyorsun
alttaki kodda 15 saniye icinde 300 satır yazanı ziline ile uzaklaştırı kırmızı yazılı yer saniye mor olan satır sayısı oraya bakarak ayarlaya bilirsin

Kod:

on @*:text:*:#:if $prot(flood,#,$nick,300,15) { zline $nick Flood yapma }